1: PACKAGE BODY CST_PendingTxnsReport_PVT AS
2: /* $Header: CSTVPTRB.pls 120.12.12010000.5 2008/11/13 22:25:56 mpuranik ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CST_PendingTxnsReport_PVT';
5: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6:
7: -- API name : generateXML
8: -- Description : The API is directly called by the Period Close Pending
9: -- transactions report.
53:
54: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
55: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
56:
57: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
58: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
59: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
60: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
61: /*Bug 7305146*/
54: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
55: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
56:
57: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
58: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
59: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
60: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
61: /*Bug 7305146*/
62: l_encoding VARCHAR2(20);
55: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
56:
57: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
58: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
59: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
60: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
61: /*Bug 7305146*/
62: l_encoding VARCHAR2(20);
63: l_xml_header VARCHAR2(100);
56:
57: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
58: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
59: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
60: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
61: /*Bug 7305146*/
62: l_encoding VARCHAR2(20);
63: l_xml_header VARCHAR2(100);
64:
64:
65: BEGIN
66:
67: IF (l_pLog) THEN
68: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
69: l_module || '.begin',
70: '>>> ' || l_api_name || ':Parameters:' ||
71: 'Org id: ' || p_org_id ||
72: '; period id: ' || p_period_id ||
384: l_offset := l_offset + l_amount;
385: END LOOP;
386:
387: IF (l_eventLog) THEN
388: FND_LOG.STRING (FND_LOG.LEVEL_EVENT,
389: l_module || '.' || l_stmt_num,
390: 'Completed writing to output file');
391: END IF;
392:
394: DBMS_LOB.FREETEMPORARY (l_xml_doc);
395: l_success := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL', 'Request Completed Successfully');
396:
397: IF (l_pLog) THEN
398: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
399: l_module || '.end',
400: '<<< ' || l_api_name);
401: END IF;
402:
411: x_return_status=> l_return_status);
412: l_msg_data := SUBSTRB (SQLERRM,1,240);
413: l_success := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', l_msg_data);
414: IF (l_uLog) THEN
415: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
416: l_module || '.' || l_stmt_num,
417: l_msg_data);
418: END IF;
419: WHEN OTHERS THEN
417: l_msg_data);
418: END IF;
419: WHEN OTHERS THEN
420: IF (l_uLog) THEN
421: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
422: l_module || '.' || l_stmt_num,
423: SUBSTRB (SQLERRM , 1 , 240));
424: END IF;
425: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
465:
466: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
467: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
468:
469: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
470: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
471: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
472: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
473:
466: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
467: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
468:
469: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
470: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
471: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
472: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
473:
474: BEGIN
467: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
468:
469: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
470: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
471: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
472: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
473:
474: BEGIN
475:
468:
469: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
470: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
471: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
472: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
473:
474: BEGIN
475:
476: IF (l_pLog) THEN
473:
474: BEGIN
475:
476: IF (l_pLog) THEN
477: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
478: l_module || '.begin',
479: '>>> ' || l_api_name);
480: END IF;
481:
564: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
565: p_data => x_msg_data);
566:
567: IF (l_pLog) THEN
568: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
569: l_module || '.end',
570: '<<< ' || l_api_name);
571: END IF;
572: EXCEPTION
578: );
579: WHEN OTHERS THEN
580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
581: IF (l_uLog) THEN
582: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
583: l_module || '.' || l_stmt_num,
584: SUBSTRB (SQLERRM , 1 , 240));
585: END IF;
586:
619:
620: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
621: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
622:
623: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
624: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
625: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
626: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
627: BEGIN
620: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
621: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
622:
623: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
624: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
625: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
626: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
627: BEGIN
628:
621: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
622:
623: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
624: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
625: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
626: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
627: BEGIN
628:
629: IF (l_pLog) THEN
622:
623: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
624: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
625: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
626: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
627: BEGIN
628:
629: IF (l_pLog) THEN
630: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
626: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
627: BEGIN
628:
629: IF (l_pLog) THEN
630: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
631: l_module || '.begin',
632: '>>> ' || l_api_name);
633: END IF;
634:
750: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
751: p_data => x_msg_data);
752:
753: IF (l_pLog) THEN
754: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
755: l_module || '.end',
756: '<<< ' || l_api_name);
757: END IF;
758:
763: p_data => x_msg_data);
764: WHEN OTHERS THEN
765: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
766: IF (l_uLog) THEN
767: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
768: l_module || '.' || l_stmt_num,
769: SUBSTRB (SQLERRM , 1 , 240));
770: END IF;
771:
799:
800: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
801: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
802:
803: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
804: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
805: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
806: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
807: BEGIN
800: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
801: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
802:
803: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
804: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
805: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
806: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
807: BEGIN
808: IF (l_pLog) THEN
801: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
802:
803: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
804: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
805: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
806: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
807: BEGIN
808: IF (l_pLog) THEN
809: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
802:
803: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
804: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
805: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
806: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
807: BEGIN
808: IF (l_pLog) THEN
809: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
810: l_module || '.begin',
805: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
806: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
807: BEGIN
808: IF (l_pLog) THEN
809: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
810: l_module || '.begin',
811: '>>> ' || l_api_name);
812: END IF;
813:
914: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
915: p_data => x_msg_data);
916:
917: IF (l_pLog) THEN
918: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
919: l_module || '.end',
920: '<<< ' || l_api_name);
921: END IF;
922: EXCEPTION
926: p_data => x_msg_data);
927: WHEN OTHERS THEN
928: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
929: IF (l_uLog) THEN
930: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
931: l_module || '.' || l_stmt_num,
932: SUBSTRB (SQLERRM , 1 , 240));
933: END IF;
934:
962:
963: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
964: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
965:
966: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
967: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
968: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
969: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
970: BEGIN
963: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
964: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
965:
966: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
967: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
968: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
969: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
970: BEGIN
971: IF (l_pLog) THEN
964: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
965:
966: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
967: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
968: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
969: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
970: BEGIN
971: IF (l_pLog) THEN
972: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
965:
966: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
967: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
968: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
969: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
970: BEGIN
971: IF (l_pLog) THEN
972: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
973: l_module || '.begin',
968: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
969: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
970: BEGIN
971: IF (l_pLog) THEN
972: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
973: l_module || '.begin',
974: '>>> ' || l_api_name);
975: END IF;
976:
1081: -- Standard call to get message count and if count is 1, get message info.
1082: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1083: p_data => x_msg_data);
1084: IF (l_pLog) THEN
1085: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1086: l_module || '.end',
1087: '<<< ' || l_api_name);
1088: END IF;
1089: EXCEPTION
1093: p_data => x_msg_data);
1094: WHEN OTHERS THEN
1095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1096: IF (l_uLog) THEN
1097: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
1098: l_module || '.' || l_stmt_num,
1099: SUBSTRB (SQLERRM , 1 , 240));
1100: END IF;
1101:
1134:
1135: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1136: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1137:
1138: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1139: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1140: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1141: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1142: BEGIN
1135: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1136: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1137:
1138: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1139: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1140: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1141: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1142: BEGIN
1143: IF (l_pLog) THEN
1136: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1137:
1138: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1139: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1140: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1141: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1142: BEGIN
1143: IF (l_pLog) THEN
1144: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1137:
1138: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1139: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1140: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1141: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1142: BEGIN
1143: IF (l_pLog) THEN
1144: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1145: l_module || '.begin',
1140: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1141: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1142: BEGIN
1143: IF (l_pLog) THEN
1144: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1145: l_module || '.begin',
1146: '>>> ' || l_api_name);
1147: END IF;
1148:
1230: DBMS_XMLGEN.closeContext(l_ctx);
1231: CLOSE l_ref_cur;
1232:
1233: IF (l_eventLog) THEN
1234: FND_LOG.STRING (FND_LOG.LEVEL_EVENT,
1235: l_module || '.' || l_stmt_num,
1236: 'Completed WSMTI transactions');
1237: END IF;
1238:
1309: DBMS_XMLGEN.closeContext(l_ctx);
1310: CLOSE l_ref_cur;
1311:
1312: IF (l_eventLog) THEN
1313: FND_LOG.STRING (FND_LOG.LEVEL_EVENT,
1314: l_module || '.' || l_stmt_num,
1315: 'Completed WLMTI transactions');
1316: END IF;
1317:
1378: DBMS_XMLGEN.closeContext(l_ctx);
1379: CLOSE l_ref_cur;
1380:
1381: IF (l_eventLog) THEN
1382: FND_LOG.STRING (FND_LOG.LEVEL_EVENT,
1383: l_module || '.' || l_stmt_num,
1384: 'Completed WLSMI transactions');
1385: END IF;
1386:
1409: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1410: p_data => x_msg_data);
1411:
1412: IF (l_pLog) THEN
1413: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1414: l_module || '.end',
1415: '<<< ' || l_api_name);
1416: END IF;
1417: EXCEPTION
1421: p_data => x_msg_data);
1422: WHEN OTHERS THEN
1423: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1424: IF (l_uLog) THEN
1425: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
1426: l_module || '.' || l_stmt_num,
1427: SUBSTRB (SQLERRM , 1 , 240));
1428: END IF;
1429:
1458: l_max_txn_if_id MTL_TRANSACTIONS_INTERFACE.TRANSACTION_INTERFACE_ID%TYPE;
1459: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1460: l_module CONSTANT VARCHAR2(70) := 'cst.plsql.' || l_full_name;
1461:
1462: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1463: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1464: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1465: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1466: BEGIN
1459: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1460: l_module CONSTANT VARCHAR2(70) := 'cst.plsql.' || l_full_name;
1461:
1462: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1463: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1464: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1465: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1466: BEGIN
1467: IF (l_pLog) THEN
1460: l_module CONSTANT VARCHAR2(70) := 'cst.plsql.' || l_full_name;
1461:
1462: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1463: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1464: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1465: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1466: BEGIN
1467: IF (l_pLog) THEN
1468: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1461:
1462: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1463: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1464: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1465: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1466: BEGIN
1467: IF (l_pLog) THEN
1468: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1469: l_module || '.begin',
1464: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1465: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1466: BEGIN
1467: IF (l_pLog) THEN
1468: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1469: l_module || '.begin',
1470: '>>> ' || l_api_name);
1471: END IF;
1472:
1610: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1611: p_data => x_msg_data);
1612:
1613: IF (l_pLog) THEN
1614: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1615: l_module || '.end',
1616: '<<< ' || l_api_name);
1617: END IF;
1618:
1623: p_data => x_msg_data);
1624: WHEN OTHERS THEN
1625: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1626: IF (l_uLog) THEN
1627: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
1628: l_module || '.' || l_stmt_num,
1629: SUBSTRB (SQLERRM , 1 , 240));
1630: END IF;
1631:
1659:
1660: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1661: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1662:
1663: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1664: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1665: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1666: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1667: BEGIN
1660: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1661: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1662:
1663: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1664: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1665: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1666: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1667: BEGIN
1668: IF (l_pLog) THEN
1661: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1662:
1663: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1664: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1665: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1666: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1667: BEGIN
1668: IF (l_pLog) THEN
1669: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1662:
1663: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1664: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1665: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1666: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1667: BEGIN
1668: IF (l_pLog) THEN
1669: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1670: l_module || '.begin',
1665: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1666: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1667: BEGIN
1668: IF (l_pLog) THEN
1669: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1670: l_module || '.begin',
1671: '>>> ' || l_api_name);
1672: END IF;
1673:
1781: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1782: p_data => x_msg_data);
1783:
1784: IF (l_pLog) THEN
1785: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1786: l_module || '.end',
1787: '<<< ' || l_api_name);
1788: END IF;
1789: EXCEPTION
1793: p_data => x_msg_data);
1794: WHEN OTHERS THEN
1795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1796: IF (l_uLog) THEN
1797: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
1798: l_module || '.' || l_stmt_num,
1799: SUBSTRB (SQLERRM , 1 , 240));
1800: END IF;
1801:
1829:
1830: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1831: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1832:
1833: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1834: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1835: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1836: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1837: BEGIN
1830: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1831: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1832:
1833: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1834: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1835: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1836: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1837: BEGIN
1838: IF (l_pLog) THEN
1831: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1832:
1833: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1834: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1835: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1836: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1837: BEGIN
1838: IF (l_pLog) THEN
1839: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1832:
1833: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1834: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1835: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1836: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1837: BEGIN
1838: IF (l_pLog) THEN
1839: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1840: l_module || '.begin',
1835: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1836: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1837: BEGIN
1838: IF (l_pLog) THEN
1839: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1840: l_module || '.begin',
1841: '>>> ' || l_api_name);
1842: END IF;
1843:
1936: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
1937: p_data => x_msg_data);
1938:
1939: IF (l_pLog) THEN
1940: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1941: l_module || '.end',
1942: '<<< ' || l_api_name);
1943: END IF;
1944: EXCEPTION
1949:
1950: WHEN OTHERS THEN
1951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1952: IF (l_uLog) THEN
1953: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
1954: l_module || '.' || l_stmt_num,
1955: SUBSTRB (SQLERRM , 1 , 240));
1956: END IF;
1957:
1986:
1987: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1988: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1989:
1990: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1991: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1992: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1993: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1994: BEGIN
1987: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
1988: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1989:
1990: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1991: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1992: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1993: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1994: BEGIN
1995: IF (l_pLog) THEN
1988: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
1989:
1990: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1991: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1992: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1993: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1994: BEGIN
1995: IF (l_pLog) THEN
1996: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1989:
1990: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
1991: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1992: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1993: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1994: BEGIN
1995: IF (l_pLog) THEN
1996: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1997: l_module || '.begin',
1992: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1993: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1994: BEGIN
1995: IF (l_pLog) THEN
1996: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
1997: l_module || '.begin',
1998: '>>> ' || l_api_name);
1999: END IF;
2000:
2174: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
2175: p_data => x_msg_data);
2176:
2177: IF (l_pLog) THEN
2178: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
2179: l_module || '.end',
2180: '<<< ' || l_api_name);
2181: END IF;
2182: EXCEPTION
2186: p_data => x_msg_data);
2187: WHEN OTHERS THEN
2188: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2189: IF (l_uLog) THEN
2190: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
2191: l_module || '.' || l_stmt_num,
2192: SUBSTRB (SQLERRM , 1 , 240));
2193: END IF;
2194:
2222:
2223: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
2224: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
2225:
2226: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
2227: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2228: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2229: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2230: BEGIN
2223: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
2224: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
2225:
2226: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
2227: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2228: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2229: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2230: BEGIN
2231: IF (l_pLog) THEN
2224: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
2225:
2226: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
2227: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2228: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2229: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2230: BEGIN
2231: IF (l_pLog) THEN
2232: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
2225:
2226: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
2227: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2228: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2229: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2230: BEGIN
2231: IF (l_pLog) THEN
2232: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
2233: l_module || '.begin',
2228: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2229: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2230: BEGIN
2231: IF (l_pLog) THEN
2232: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
2233: l_module || '.begin',
2234: '>>> ' || l_api_name);
2235: END IF;
2236:
2367: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
2368: p_data => x_msg_data);
2369:
2370: IF (l_pLog) THEN
2371: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
2372: l_module || '.end',
2373: '<<< ' || l_api_name);
2374: END IF;
2375: EXCEPTION
2379: p_data => x_msg_data);
2380: WHEN OTHERS THEN
2381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2382: IF (l_uLog) THEN
2383: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
2384: l_module || '.' || l_stmt_num,
2385: SUBSTRB (SQLERRM , 1 , 240));
2386: END IF;
2387:
2415:
2416: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
2417: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
2418:
2419: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
2420: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2421: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2422: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2423: BEGIN
2416: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
2417: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
2418:
2419: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
2420: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2421: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2422: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2423: BEGIN
2424: IF (l_pLog) THEN
2417: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.' || l_full_name;
2418:
2419: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
2420: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2421: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2422: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2423: BEGIN
2424: IF (l_pLog) THEN
2425: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
2418:
2419: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST (FND_LOG.LEVEL_UNEXPECTED, l_module);
2420: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2421: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2422: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2423: BEGIN
2424: IF (l_pLog) THEN
2425: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
2426: l_module || '.begin',
2421: l_eventLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2422: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2423: BEGIN
2424: IF (l_pLog) THEN
2425: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
2426: l_module || '.begin',
2427: '>>> ' || l_api_name);
2428: END IF;
2429:
2508: -- Standard call to get message count and if count is 1, get message info.
2509: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count,
2510: p_data => x_msg_data);
2511: IF (l_pLog) THEN
2512: FND_LOG.STRING (FND_LOG.LEVEL_PROCEDURE,
2513: l_module || '.end',
2514: '<<< ' || l_api_name);
2515: END IF;
2516: EXCEPTION
2520: p_data => x_msg_data);
2521: WHEN OTHERS THEN
2522: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2523: IF (l_uLog) THEN
2524: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
2525: l_module || '.' || l_stmt_num,
2526: SUBSTRB (SQLERRM , 1 , 240));
2527: END IF;
2528: