29: --========================================================================
30: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'oks.plsql.import.' || G_PKG_NAME;
31: G_WORKER_REQ_ID CONSTANT NUMBER := FND_GLOBAL.conc_request_id;
32: G_MODULE_HEAD CONSTANT VARCHAR2(60) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
33: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
34: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
35: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
36: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
37: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
30: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'oks.plsql.import.' || G_PKG_NAME;
31: G_WORKER_REQ_ID CONSTANT NUMBER := FND_GLOBAL.conc_request_id;
32: G_MODULE_HEAD CONSTANT VARCHAR2(60) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
33: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
34: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
35: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
36: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
37: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
38: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
31: G_WORKER_REQ_ID CONSTANT NUMBER := FND_GLOBAL.conc_request_id;
32: G_MODULE_HEAD CONSTANT VARCHAR2(60) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
33: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
34: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
35: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
36: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
37: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
38: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
39: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
32: G_MODULE_HEAD CONSTANT VARCHAR2(60) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
33: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
34: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
35: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
36: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
37: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
38: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
39: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
40: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
33: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
34: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
35: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
36: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
37: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
38: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
39: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
40: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
41:
34: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
35: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
36: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
37: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
38: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
39: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
40: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
41:
42: --=========================
35: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
36: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
37: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
38: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
39: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
40: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
41:
42: --=========================
43: -- PROCEDURES AND FUNCTIONS
36: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
37: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
38: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
39: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
40: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
41:
42: --=========================
43: -- PROCEDURES AND FUNCTIONS
44: --=========================
56: l_int_count NUMBER := 0;
57: l_stg_count NUMBER := 0;
58: BEGIN
59: IF G_PROCEDURE_LOG THEN
60: fnd_log.string(fnd_log.level_procedure,
61: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
62: 'Entering ');
63:
64: END IF;
221:
222: IF G_STMT_LOG THEN
223:
224: l_int_count := SQL%ROWCOUNT;
225: fnd_log.string(fnd_log.level_statement,
226: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
227: 'Number of records successfully inserted = ' || l_int_count );
228: END IF;
229:
353:
354: IF G_STMT_LOG THEN
355:
356: l_int_count := SQL%ROWCOUNT;
357: fnd_log.string(fnd_log.level_statement,
358: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
359: 'Number of records successfully inserted = ' || l_int_count );
360: END IF;
361:
360: END IF;
361:
362: IF G_PROCEDURE_LOG THEN
363:
364: fnd_log.string(fnd_log.level_procedure,
365: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
366: 'Exit with ' ||
367: 'Number of records Inserted = '|| l_int_count);
368: END IF;
392: l_int_count NUMBER := 0;
393: l_stg_count NUMBER := 0;
394: BEGIN
395: IF G_PROCEDURE_LOG THEN
396: fnd_log.string(fnd_log.level_procedure,
397: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
398: 'Begin');
399: END IF;
400:
591: IF G_STMT_LOG THEN
592:
593: l_int_count := SQL%ROWCOUNT;
594:
595: fnd_log.string(fnd_log.level_statement,
596: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
597: 'Number of records successfully inserted = ' || l_int_count );
598: END IF;
599:
597: 'Number of records successfully inserted = ' || l_int_count );
598: END IF;
599:
600: IF G_PROCEDURE_LOG THEN
601: fnd_log.string(fnd_log.level_procedure,
602: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
603: 'Exit with ' ||
604: 'Number of records Inserted = '|| l_int_count);
605: END IF;
628: l_int_count NUMBER := 0;
629: l_stg_count NUMBER := 0;
630: BEGIN
631: IF G_PROCEDURE_LOG THEN
632: fnd_log.string(fnd_log.level_procedure,
633: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
634: 'Begin');
635: END IF;
636:
680: IF G_STMT_LOG THEN
681:
682: l_int_count := SQL%ROWCOUNT;
683:
684: fnd_log.string(fnd_log.level_statement,
685: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
686: 'Number of records successfully inserted = ' || l_int_count );
687: END IF;
688:
686: 'Number of records successfully inserted = ' || l_int_count );
687: END IF;
688:
689: IF G_PROCEDURE_LOG THEN
690: fnd_log.string(fnd_log.level_procedure,
691: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
692: 'Exit with ' ||
693: 'Number of records Inserted = '|| l_int_count);
694: END IF;
722: l_msg_count NUMBER;
723: l_norecords_exception EXCEPTION;
724: BEGIN
725: IF G_PROCEDURE_LOG THEN
726: fnd_log.string(fnd_log.level_procedure,
727: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
728: 'Begin');
729: END IF;
730:
845: IF G_STMT_LOG THEN
846:
847: l_int_count := SQL%ROWCOUNT;
848:
849: fnd_log.string(fnd_log.level_statement,
850: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
851: 'Number of records successfully inserted = ' || l_int_count );
852: END IF;
853:
920: IF G_STMT_LOG THEN
921:
922: l_int_count := SQL%ROWCOUNT;
923:
924: fnd_log.string(fnd_log.level_statement,
925: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
926: 'Number of records successfully inserted = ' || l_int_count );
927: END IF;
928:
973: IF G_STMT_LOG THEN
974:
975: l_int_count := SQL%ROWCOUNT;
976:
977: fnd_log.string(fnd_log.level_statement,
978: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
979: 'Number of records successfully inserted = ' || l_int_count );
980: END IF;
981:
979: 'Number of records successfully inserted = ' || l_int_count );
980: END IF;
981:
982: IF G_PROCEDURE_LOG THEN
983: fnd_log.string(fnd_log.level_procedure,
984: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
985: 'Exit with ' ||
986: 'Number of records Inserted = '|| l_int_count);
987: END IF;
1011: l_int_count NUMBER := 0;
1012: l_stg_count NUMBER := 0;
1013: BEGIN
1014: IF G_PROCEDURE_LOG THEN
1015: fnd_log.string(fnd_log.level_procedure,
1016: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1017: 'Begin ' );
1018: END IF;
1019:
1066: AND OKCKPTYRL.CLE_ID IS null;
1067:
1068: IF G_STMT_LOG THEN
1069: l_int_count := SQL%ROWCOUNT;
1070: fnd_log.string(fnd_log.level_statement,
1071: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1072: 'Number of records successfully inserted = ' || l_int_count );
1073: END IF;
1074:
1124: AND OKCKPTYRL.RLE_CODE IN ('VENDOR','MERCHANT') ;
1125:
1126: IF G_STMT_LOG THEN
1127: l_int_count := SQL%ROWCOUNT;
1128: fnd_log.string(fnd_log.level_statement,
1129: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1130: 'Number of records successfully inserted = ' || l_int_count );
1131: END IF;
1132:
1228:
1229:
1230: IF G_STMT_LOG THEN
1231: l_int_count := SQL%ROWCOUNT;
1232: fnd_log.string(fnd_log.level_statement,
1233: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1234: 'Number of records successfully inserted = ' || l_int_count );
1235: END IF;
1236:
1234: 'Number of records successfully inserted = ' || l_int_count );
1235: END IF;
1236:
1237: IF G_PROCEDURE_LOG THEN
1238: fnd_log.string(fnd_log.level_procedure,
1239: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1240: 'Exit with ' ||
1241: 'Number of records Inserted = '|| l_int_count);
1242: END IF;
1265: l_int_count NUMBER := 0;
1266: l_stg_count NUMBER := 0;
1267: BEGIN
1268: IF G_PROCEDURE_LOG THEN
1269: fnd_log.string(fnd_log.level_procedure,
1270: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1271: 'Entered ' );
1272: END IF;
1273:
1388:
1389:
1390: IF G_STMT_LOG THEN
1391: l_int_count := SQL%ROWCOUNT;
1392: fnd_log.string(fnd_log.level_statement,
1393: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1394: 'Number of records successfully inserted = ' || l_int_count );
1395: END IF;
1396:
1394: 'Number of records successfully inserted = ' || l_int_count );
1395: END IF;
1396:
1397: IF G_PROCEDURE_LOG THEN
1398: fnd_log.string(fnd_log.level_procedure,
1399: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1400: 'Exit with ' ||
1401: 'Number of records Inserted = '|| l_int_count);
1402: END IF;
1426: l_int_count NUMBER := 0;
1427: l_stg_count NUMBER := 0;
1428: BEGIN
1429: IF G_PROCEDURE_LOG THEN
1430: fnd_log.string(fnd_log.level_procedure,
1431: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1432: 'Entering ');
1433: END IF;
1434:
1593: AND OHSTG.INTERFACE_STATUS ='S';
1594:
1595: IF G_STMT_LOG THEN
1596: l_int_count := SQL%ROWCOUNT;
1597: /* fnd_log.string(fnd_log.level_statement,
1598: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1599: 'Number of records successfully inserted = ' || l_int_count );*/
1600: END IF;
1601:
1712: AND HDRSTG.INTERFACE_STATUS ='S' ;
1713:
1714:
1715: /*IF G_PROCEDURE_LOG THEN
1716: fnd_log.string(fnd_log.level_procedure,
1717: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1718: 'Exit with ' ||
1719: 'Number of records Inserted = '|| l_int_count);
1720: END IF; */
1744: l_int_count NUMBER := 0;
1745: l_stg_count NUMBER := 0;
1746: BEGIN
1747: IF G_PROCEDURE_LOG THEN
1748: fnd_log.string(fnd_log.level_procedure,
1749: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1750: 'Entering ');
1751: END IF;
1752:
1908: AND OKCLINB.CLE_ID IS NULL;
1909:
1910: IF G_STMT_LOG THEN
1911: l_int_count := SQL%ROWCOUNT;
1912: /*fnd_log.string(fnd_log.level_statement,
1913: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1914: 'Number of records successfully inserted = ' || l_int_count ); */
1915: END IF;
1916:
2102: AND SUB_HDR_TL.LANGUAGE = USERENV('LANG');
2103:
2104: IF G_STMT_LOG THEN
2105: l_int_count := SQL%ROWCOUNT;
2106: fnd_log.string(fnd_log.level_statement,
2107: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2108: 'Number of records successfully inserted = ' || l_int_count );
2109: END IF;
2110:
2108: 'Number of records successfully inserted = ' || l_int_count );
2109: END IF;
2110:
2111: IF G_PROCEDURE_LOG THEN
2112: fnd_log.string(fnd_log.level_procedure,
2113: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2114: 'Exit with ' ||
2115: 'Number of records Inserted = '|| l_int_count);
2116: END IF;
2139: l_int_count NUMBER := 0;
2140: l_stg_count NUMBER := 0;
2141: BEGIN
2142: IF G_PROCEDURE_LOG THEN
2143: fnd_log.string(fnd_log.level_procedure,
2144: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2145: 'Entering ');
2146: END IF;
2147:
2336: AND HDRSTG.INTERFACE_STATUS ='S';
2337:
2338: /* IF G_STMT_LOG THEN
2339: l_int_count := SQL%ROWCOUNT;
2340: fnd_log.string(fnd_log.level_statement,
2341: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2342: 'Number of records successfully inserted = ' || l_int_count );
2343: END IF; */
2344:
2403: AND OKSLINB.DNZ_CHR_ID = OKCHDRB.ID;
2404:
2405: /* IF G_STMT_LOG THEN
2406: l_int_count := SQL%ROWCOUNT;
2407: fnd_log.string(fnd_log.level_statement,
2408: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2409: 'Number of records successfully inserted = ' || l_int_count );
2410: END IF; */
2411:
2883:
2884: IF G_STMT_LOG THEN
2885: null;
2886: /*l_int_count := SQL%ROWCOUNT;
2887: fnd_log.string(fnd_log.level_statement,
2888: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2889: 'Number of records successfully inserted = ' || l_int_count );*/
2890: END IF;
2891:
2889: 'Number of records successfully inserted = ' || l_int_count );*/
2890: END IF;
2891:
2892: IF G_PROCEDURE_LOG THEN
2893: fnd_log.string(fnd_log.level_procedure,
2894: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2895: 'Exit.');
2896: END IF;
2897:
2920: X_errbuf VARCHAR2(2000);
2921: X_retcode VARCHAR2(1);
2922: BEGIN
2923: IF G_PROCEDURE_LOG THEN
2924: fnd_log.string(fnd_log.level_procedure,
2925: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2926: 'Entering .' );
2927:
2928: END IF;
2941: Insert_Sales_Credits ;
2942: Insert_covlevel_and_usgcounter;
2943:
2944: IF G_PROCEDURE_LOG THEN
2945: fnd_log.string(fnd_log.level_procedure,
2946: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2947: 'Exit.');
2948: END IF;
2949: