24: --========================================================================
25: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'oks.plsql.import.' || G_PKG_NAME;
26: G_WORKER_REQ_ID CONSTANT NUMBER := FND_GLOBAL.conc_request_id;
27: G_MODULE_HEAD CONSTANT VARCHAR2(60) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
28: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
29: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
30: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
31: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
32: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
25: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'oks.plsql.import.' || G_PKG_NAME;
26: G_WORKER_REQ_ID CONSTANT NUMBER := FND_GLOBAL.conc_request_id;
27: G_MODULE_HEAD CONSTANT VARCHAR2(60) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
28: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
29: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
30: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
31: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
32: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
33: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
26: G_WORKER_REQ_ID CONSTANT NUMBER := FND_GLOBAL.conc_request_id;
27: G_MODULE_HEAD CONSTANT VARCHAR2(60) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
28: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
29: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
30: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
31: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
32: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
33: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
34: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
27: G_MODULE_HEAD CONSTANT VARCHAR2(60) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
28: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
29: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
30: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
31: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
32: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
33: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
34: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
35: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
28: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
29: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
30: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
31: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
32: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
33: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
34: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
35: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
36:
29: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
30: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
31: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
32: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
33: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
34: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
35: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
36:
37: --=========================
30: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
31: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
32: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
33: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
34: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
35: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
36:
37: --=========================
38: -- PROCEDURES AND FUNCTIONS
31: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
32: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
33: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
34: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
35: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
36:
37: --=========================
38: -- PROCEDURES AND FUNCTIONS
39: --=========================
51: l_int_count NUMBER := 0;
52: l_stg_count NUMBER := 0;
53: BEGIN
54: IF G_PROCEDURE_LOG THEN
55: fnd_log.string(fnd_log.level_procedure,
56: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
57: 'Entering ');
58:
59: END IF;
216:
217: IF G_STMT_LOG THEN
218:
219: l_int_count := SQL%ROWCOUNT;
220: fnd_log.string(fnd_log.level_statement,
221: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
222: 'Number of records successfully inserted = ' || l_int_count );
223: END IF;
224:
348:
349: IF G_STMT_LOG THEN
350:
351: l_int_count := SQL%ROWCOUNT;
352: fnd_log.string(fnd_log.level_statement,
353: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
354: 'Number of records successfully inserted = ' || l_int_count );
355: END IF;
356:
355: END IF;
356:
357: IF G_PROCEDURE_LOG THEN
358:
359: fnd_log.string(fnd_log.level_procedure,
360: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
361: 'Exit with ' ||
362: 'Number of records Inserted = '|| l_int_count);
363: END IF;
387: l_int_count NUMBER := 0;
388: l_stg_count NUMBER := 0;
389: BEGIN
390: IF G_PROCEDURE_LOG THEN
391: fnd_log.string(fnd_log.level_procedure,
392: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
393: 'Begin');
394: END IF;
395:
586: IF G_STMT_LOG THEN
587:
588: l_int_count := SQL%ROWCOUNT;
589:
590: fnd_log.string(fnd_log.level_statement,
591: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
592: 'Number of records successfully inserted = ' || l_int_count );
593: END IF;
594:
592: 'Number of records successfully inserted = ' || l_int_count );
593: END IF;
594:
595: IF G_PROCEDURE_LOG THEN
596: fnd_log.string(fnd_log.level_procedure,
597: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
598: 'Exit with ' ||
599: 'Number of records Inserted = '|| l_int_count);
600: END IF;
623: l_int_count NUMBER := 0;
624: l_stg_count NUMBER := 0;
625: BEGIN
626: IF G_PROCEDURE_LOG THEN
627: fnd_log.string(fnd_log.level_procedure,
628: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
629: 'Begin');
630: END IF;
631:
675: IF G_STMT_LOG THEN
676:
677: l_int_count := SQL%ROWCOUNT;
678:
679: fnd_log.string(fnd_log.level_statement,
680: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
681: 'Number of records successfully inserted = ' || l_int_count );
682: END IF;
683:
681: 'Number of records successfully inserted = ' || l_int_count );
682: END IF;
683:
684: IF G_PROCEDURE_LOG THEN
685: fnd_log.string(fnd_log.level_procedure,
686: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
687: 'Exit with ' ||
688: 'Number of records Inserted = '|| l_int_count);
689: END IF;
717: l_msg_count NUMBER;
718: l_norecords_exception EXCEPTION;
719: BEGIN
720: IF G_PROCEDURE_LOG THEN
721: fnd_log.string(fnd_log.level_procedure,
722: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
723: 'Begin');
724: END IF;
725:
840: IF G_STMT_LOG THEN
841:
842: l_int_count := SQL%ROWCOUNT;
843:
844: fnd_log.string(fnd_log.level_statement,
845: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
846: 'Number of records successfully inserted = ' || l_int_count );
847: END IF;
848:
915: IF G_STMT_LOG THEN
916:
917: l_int_count := SQL%ROWCOUNT;
918:
919: fnd_log.string(fnd_log.level_statement,
920: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
921: 'Number of records successfully inserted = ' || l_int_count );
922: END IF;
923:
968: IF G_STMT_LOG THEN
969:
970: l_int_count := SQL%ROWCOUNT;
971:
972: fnd_log.string(fnd_log.level_statement,
973: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
974: 'Number of records successfully inserted = ' || l_int_count );
975: END IF;
976:
974: 'Number of records successfully inserted = ' || l_int_count );
975: END IF;
976:
977: IF G_PROCEDURE_LOG THEN
978: fnd_log.string(fnd_log.level_procedure,
979: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
980: 'Exit with ' ||
981: 'Number of records Inserted = '|| l_int_count);
982: END IF;
1006: l_int_count NUMBER := 0;
1007: l_stg_count NUMBER := 0;
1008: BEGIN
1009: IF G_PROCEDURE_LOG THEN
1010: fnd_log.string(fnd_log.level_procedure,
1011: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1012: 'Begin ' );
1013: END IF;
1014:
1061: AND OKCKPTYRL.CLE_ID IS null;
1062:
1063: IF G_STMT_LOG THEN
1064: l_int_count := SQL%ROWCOUNT;
1065: fnd_log.string(fnd_log.level_statement,
1066: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1067: 'Number of records successfully inserted = ' || l_int_count );
1068: END IF;
1069:
1119: AND OKCKPTYRL.RLE_CODE IN ('VENDOR','MERCHANT') ;
1120:
1121: IF G_STMT_LOG THEN
1122: l_int_count := SQL%ROWCOUNT;
1123: fnd_log.string(fnd_log.level_statement,
1124: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1125: 'Number of records successfully inserted = ' || l_int_count );
1126: END IF;
1127:
1223:
1224:
1225: IF G_STMT_LOG THEN
1226: l_int_count := SQL%ROWCOUNT;
1227: fnd_log.string(fnd_log.level_statement,
1228: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1229: 'Number of records successfully inserted = ' || l_int_count );
1230: END IF;
1231:
1229: 'Number of records successfully inserted = ' || l_int_count );
1230: END IF;
1231:
1232: IF G_PROCEDURE_LOG THEN
1233: fnd_log.string(fnd_log.level_procedure,
1234: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1235: 'Exit with ' ||
1236: 'Number of records Inserted = '|| l_int_count);
1237: END IF;
1260: l_int_count NUMBER := 0;
1261: l_stg_count NUMBER := 0;
1262: BEGIN
1263: IF G_PROCEDURE_LOG THEN
1264: fnd_log.string(fnd_log.level_procedure,
1265: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1266: 'Entered ' );
1267: END IF;
1268:
1383:
1384:
1385: IF G_STMT_LOG THEN
1386: l_int_count := SQL%ROWCOUNT;
1387: fnd_log.string(fnd_log.level_statement,
1388: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1389: 'Number of records successfully inserted = ' || l_int_count );
1390: END IF;
1391:
1389: 'Number of records successfully inserted = ' || l_int_count );
1390: END IF;
1391:
1392: IF G_PROCEDURE_LOG THEN
1393: fnd_log.string(fnd_log.level_procedure,
1394: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1395: 'Exit with ' ||
1396: 'Number of records Inserted = '|| l_int_count);
1397: END IF;
1421: l_int_count NUMBER := 0;
1422: l_stg_count NUMBER := 0;
1423: BEGIN
1424: IF G_PROCEDURE_LOG THEN
1425: fnd_log.string(fnd_log.level_procedure,
1426: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1427: 'Entering ');
1428: END IF;
1429:
1588: AND OHSTG.INTERFACE_STATUS ='S';
1589:
1590: IF G_STMT_LOG THEN
1591: l_int_count := SQL%ROWCOUNT;
1592: /* fnd_log.string(fnd_log.level_statement,
1593: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1594: 'Number of records successfully inserted = ' || l_int_count );*/
1595: END IF;
1596:
1704: AND HDRSTG.INTERFACE_STATUS ='S' ;
1705:
1706:
1707: /*IF G_PROCEDURE_LOG THEN
1708: fnd_log.string(fnd_log.level_procedure,
1709: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1710: 'Exit with ' ||
1711: 'Number of records Inserted = '|| l_int_count);
1712: END IF; */
1736: l_int_count NUMBER := 0;
1737: l_stg_count NUMBER := 0;
1738: BEGIN
1739: IF G_PROCEDURE_LOG THEN
1740: fnd_log.string(fnd_log.level_procedure,
1741: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1742: 'Entering ');
1743: END IF;
1744:
1900: AND OKCLINB.CLE_ID IS NULL;
1901:
1902: IF G_STMT_LOG THEN
1903: l_int_count := SQL%ROWCOUNT;
1904: /*fnd_log.string(fnd_log.level_statement,
1905: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
1906: 'Number of records successfully inserted = ' || l_int_count ); */
1907: END IF;
1908:
2094: AND SUB_HDR_TL.LANGUAGE = USERENV('LANG');
2095:
2096: IF G_STMT_LOG THEN
2097: l_int_count := SQL%ROWCOUNT;
2098: fnd_log.string(fnd_log.level_statement,
2099: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2100: 'Number of records successfully inserted = ' || l_int_count );
2101: END IF;
2102:
2100: 'Number of records successfully inserted = ' || l_int_count );
2101: END IF;
2102:
2103: IF G_PROCEDURE_LOG THEN
2104: fnd_log.string(fnd_log.level_procedure,
2105: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2106: 'Exit with ' ||
2107: 'Number of records Inserted = '|| l_int_count);
2108: END IF;
2131: l_int_count NUMBER := 0;
2132: l_stg_count NUMBER := 0;
2133: BEGIN
2134: IF G_PROCEDURE_LOG THEN
2135: fnd_log.string(fnd_log.level_procedure,
2136: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2137: 'Entering ');
2138: END IF;
2139:
2326: AND HDRSTG.INTERFACE_STATUS ='S';
2327:
2328: /* IF G_STMT_LOG THEN
2329: l_int_count := SQL%ROWCOUNT;
2330: fnd_log.string(fnd_log.level_statement,
2331: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2332: 'Number of records successfully inserted = ' || l_int_count );
2333: END IF; */
2334:
2393: AND OKSLINB.DNZ_CHR_ID = OKCHDRB.ID;
2394:
2395: /* IF G_STMT_LOG THEN
2396: l_int_count := SQL%ROWCOUNT;
2397: fnd_log.string(fnd_log.level_statement,
2398: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2399: 'Number of records successfully inserted = ' || l_int_count );
2400: END IF; */
2401:
2873:
2874: IF G_STMT_LOG THEN
2875: null;
2876: /*l_int_count := SQL%ROWCOUNT;
2877: fnd_log.string(fnd_log.level_statement,
2878: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2879: 'Number of records successfully inserted = ' || l_int_count );*/
2880: END IF;
2881:
2879: 'Number of records successfully inserted = ' || l_int_count );*/
2880: END IF;
2881:
2882: IF G_PROCEDURE_LOG THEN
2883: fnd_log.string(fnd_log.level_procedure,
2884: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2885: 'Exit.');
2886: END IF;
2887:
2910: X_errbuf VARCHAR2(2000);
2911: X_retcode VARCHAR2(1);
2912: BEGIN
2913: IF G_PROCEDURE_LOG THEN
2914: fnd_log.string(fnd_log.level_procedure,
2915: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2916: 'Entering .' );
2917:
2918: END IF;
2931: Insert_Sales_Credits ;
2932: Insert_covlevel_and_usgcounter;
2933:
2934: IF G_PROCEDURE_LOG THEN
2935: fnd_log.string(fnd_log.level_procedure,
2936: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
2937: 'Exit.');
2938: END IF;
2939: