[Home] [Help]
376:
377: l_job_header_rec wip_job_schedule_interface%ROWTYPE := p_job_header_rec;
378:
379:
380: -- variables used for FND_LOG debug messages
381:
382: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
383: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
384: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
378:
379:
380: -- variables used for FND_LOG debug messages
381:
382: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
383: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
384: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
385:
386:
379:
380: -- variables used for FND_LOG debug messages
381:
382: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
383: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
384: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
385:
386:
387: -- Constants Used for Inserting into wip_job_schedule_interface,
405: BEGIN
406:
407:
408: IF ( l_proc_level >= l_debug_level ) then
409: FND_LOG.STRING( l_proc_level,
410: l_mod_name||'begin',
411: 'Entering procedure insert_job_header' );
412: END IF;
413:
510: END;
511:
512:
513: IF ( l_proc_level >= l_debug_level ) then
514: FND_LOG.STRING( l_proc_level,
515: l_mod_name||'end',
516: 'Leaving procedure insert_job_header');
517: END IF;
518:
535:
536: l_job_details_rec wip_job_dtls_interface%ROWTYPE := p_job_details_rec;
537:
538:
539: -- variables used for FND_LOG debug messages
540:
541: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
542: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
543: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
537:
538:
539: -- variables used for FND_LOG debug messages
540:
541: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
542: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
543: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
544:
545:
538:
539: -- variables used for FND_LOG debug messages
540:
541: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
542: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
543: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
544:
545:
546: -- Constants Used for Inserting into wip_job_schedule_interface,
564:
565: -- dbms_output.put_line('usage_rate_or_amount is ' || l_job_details_rec.usage_rate_or_amount );
566:
567: IF ( l_proc_level >= l_debug_level ) then
568: FND_LOG.STRING( l_proc_level,
569: l_mod_name||'begin',
570: 'Entering procedure insert_job_header' );
571: END IF;
572:
703: END;
704:
705:
706: IF ( l_proc_level >= l_debug_level ) then
707: FND_LOG.STRING( l_proc_level,
708: l_mod_name||'end',
709: 'Leaving procedure insert_job_header');
710: END IF;
711:
725:
726: l_transactions_interface_rec mtl_transactions_interface%ROWTYPE := p_transactions_interface_rec;
727:
728:
729: -- constant used for FND_LOG debug messages
730:
731: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_transactions_header.';
732:
733:
741:
742: BEGIN
743:
744:
745: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
746: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
747: lc_mod_name||'begin',
748: 'Entering procedure insert_job_header' );
749: END IF;
742: BEGIN
743:
744:
745: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
746: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
747: lc_mod_name||'begin',
748: 'Entering procedure insert_job_header' );
749: END IF;
750:
846: END;
847:
848:
849:
850: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
851: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
852: lc_mod_name||'end',
853: 'Leaving procedure insert_transactions_header');
854: END IF;
847:
848:
849:
850: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
851: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
852: lc_mod_name||'end',
853: 'Leaving procedure insert_transactions_header');
854: END IF;
855:
865: IS
866:
867:
868:
869: -- constant used for FND_LOG debug messages
870:
871: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.update_transactions_header.';
872:
873:
875:
876: BEGIN
877:
878:
879: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
880: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
881: lc_mod_name||'begin',
882: 'Entering procedure update_transactions_header' );
883: END IF;
876: BEGIN
877:
878:
879: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
880: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
881: lc_mod_name||'begin',
882: 'Entering procedure update_transactions_header' );
883: END IF;
884:
912: END;
913:
914:
915:
916: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
917: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
918: lc_mod_name||'end',
919: 'Leaving procedure update_transactions_header');
920: END IF;
913:
914:
915:
916: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
917: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
918: lc_mod_name||'end',
919: 'Leaving procedure update_transactions_header');
920: END IF;
921:
930: )
931: IS
932:
933:
934: -- constant used for FND_LOG debug messages
935:
936: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_transaction_lots';
937:
938:
945:
946: BEGIN
947:
948:
949: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
950: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
951: lc_mod_name||'begin',
952: 'Entering procedure insert_transaction_lots' );
953: END IF;
946: BEGIN
947:
948:
949: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
950: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
951: lc_mod_name||'begin',
952: 'Entering procedure insert_transaction_lots' );
953: END IF;
954:
1001: END;
1002:
1003:
1004:
1005: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1006: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1007: lc_mod_name||'end',
1008: 'Leaving procedure insert_transaction_lots');
1009: END IF;
1002:
1003:
1004:
1005: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1006: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1007: lc_mod_name||'end',
1008: 'Leaving procedure insert_transaction_lots');
1009: END IF;
1010:
1019: )
1020: IS
1021:
1022:
1023: -- constant used for FND_LOG debug messages
1024:
1025: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_upd_serial_numbers.';
1026:
1027:
1035:
1036: BEGIN
1037:
1038:
1039: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1040: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1041: lc_mod_name||'begin',
1042: 'Entering procedure insert_upd_serial_numbers' );
1043: END IF;
1036: BEGIN
1037:
1038:
1039: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1040: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1041: lc_mod_name||'begin',
1042: 'Entering procedure insert_upd_serial_numbers' );
1043: END IF;
1044:
1110: END;
1111:
1112: END IF;
1113:
1114: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1115: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1116: lc_mod_name||'end',
1117: 'Leaving procedure insert_upd_serial_numbers');
1118: END IF;
1111:
1112: END IF;
1113:
1114: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1115: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1116: lc_mod_name||'end',
1117: 'Leaving procedure insert_upd_serial_numbers');
1118: END IF;
1119:
1129: IS
1130:
1131:
1132:
1133: -- constant used for FND_LOG debug messages
1134:
1135: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_transactions_header.';
1136:
1137:
1159:
1160: BEGIN
1161:
1162:
1163: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1164: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1165: lc_mod_name||'begin',
1166: 'Entering procedure insert_job_header' );
1167: END IF;
1160: BEGIN
1161:
1162:
1163: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1164: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1165: lc_mod_name||'begin',
1166: 'Entering procedure insert_job_header' );
1167: END IF;
1168:
1247:
1248: END;
1249:
1250:
1251: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1252: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1253: lc_mod_name||'end',
1254: 'Leaving procedure insert_transactions_header');
1255: END IF;
1248: END;
1249:
1250:
1251: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1252: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1253: lc_mod_name||'end',
1254: 'Leaving procedure insert_transactions_header');
1255: END IF;
1256:
1266: IS
1267:
1268:
1269:
1270: -- constant used for FND_LOG debug messages
1271:
1272: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_wip_move_txn';
1273:
1274:
1294:
1295: BEGIN
1296:
1297:
1298: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1299: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1300: lc_mod_name||'begin',
1301: 'Entering procedure insert_wip_move_txn' );
1302: END IF;
1295: BEGIN
1296:
1297:
1298: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1299: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1300: lc_mod_name||'begin',
1301: 'Entering procedure insert_wip_move_txn' );
1302: END IF;
1303:
1376:
1377: END;
1378:
1379:
1380: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1381: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1382: lc_mod_name||'end',
1383: 'Leaving procedure insert_wip_move_txn');
1384: END IF;
1377: END;
1378:
1379:
1380: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1381: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1382: lc_mod_name||'end',
1383: 'Leaving procedure insert_wip_move_txn');
1384: END IF;
1385:
1409: IS
1410: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_JOB_COMP_TXN';
1411: lc_api_version_number CONSTANT NUMBER := 1.0;
1412:
1413: -- constants used for FND_LOG debug messages
1414: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_job_comp_txn';
1415:
1416: l_need_details_flag VARCHAR2(1) := 'F';
1417: l_transaction_header_id NUMBER;
1416: l_need_details_flag VARCHAR2(1) := 'F';
1417: l_transaction_header_id NUMBER;
1418:
1419: BEGIN
1420: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1422: lc_mod_name||'begin',
1423: 'Entering private API process_job_comp_txn' );
1424: END IF;
1417: l_transaction_header_id NUMBER;
1418:
1419: BEGIN
1420: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1422: lc_mod_name||'begin',
1423: 'Entering private API process_job_comp_txn' );
1424: END IF;
1425:
1438: END IF;
1439:
1440: x_return_status := FND_API.G_RET_STS_SUCCESS;
1441:
1442: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1443: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1444: lc_mod_name||'beforecallinsertjobcomptxn',
1445: 'Just before calling insert_job_comp_txn');
1446: END IF;
1439:
1440: x_return_status := FND_API.G_RET_STS_SUCCESS;
1441:
1442: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1443: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1444: lc_mod_name||'beforecallinsertjobcomptxn',
1445: 'Just before calling insert_job_comp_txn');
1446: END IF;
1447: insert_job_comp_txn (
1464: END IF;
1465:
1466: -- if no need for details, then we can process transactions and commit
1467: IF l_need_details_flag = 'F' THEN
1468: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1469: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1470: lc_mod_name||'beforecallprocesstxn',
1471: 'Just before calling process_mti_transactions');
1472: END IF;
1465:
1466: -- if no need for details, then we can process transactions and commit
1467: IF l_need_details_flag = 'F' THEN
1468: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1469: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1470: lc_mod_name||'beforecallprocesstxn',
1471: 'Just before calling process_mti_transactions');
1472: END IF;
1473: process_mti_transactions(
1505: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1506: p_count => x_msg_count,
1507: p_data => x_msg_data);
1508:
1509: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1510: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1511: lc_mod_name||'unx_exception',
1512: 'G_EXC_UNEXPECTED_ERROR Exception');
1513: END IF;
1506: p_count => x_msg_count,
1507: p_data => x_msg_data);
1508:
1509: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1510: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1511: lc_mod_name||'unx_exception',
1512: 'G_EXC_UNEXPECTED_ERROR Exception');
1513: END IF;
1514:
1520: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1521: p_count => x_msg_count,
1522: p_data => x_msg_data);
1523:
1524: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1525: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
1526: lc_mod_name||'exc_exception',
1527: 'G_EXC_ERROR Exception');
1528: END IF;
1521: p_count => x_msg_count,
1522: p_data => x_msg_data);
1523:
1524: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1525: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
1526: lc_mod_name||'exc_exception',
1527: 'G_EXC_ERROR Exception');
1528: END IF;
1529:
1541: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1542: p_count => x_msg_count,
1543: p_data => x_msg_data);
1544:
1545: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1546: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1547: lc_mod_name||'others_exception',
1548: 'OTHERS Exception');
1549: END IF;
1542: p_count => x_msg_count,
1543: p_data => x_msg_data);
1544:
1545: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1546: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1547: lc_mod_name||'others_exception',
1548: 'OTHERS Exception');
1549: END IF;
1550: END process_job_comp_txn;
1574:
1575: lc_api_name CONSTANT VARCHAR2(30) := 'INSERT_JOB_COMP_TXN';
1576: lc_api_version_number CONSTANT NUMBER := 1.0;
1577:
1578: -- constants used for FND_LOG debug messages
1579: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_job_comp_txn';
1580:
1581: lc_revision_controlled CONSTANT NUMBER := 2;
1582: lc_full_lot_control CONSTANT NUMBER := 2;
1702: organization_id = p_organization_id and
1703: inventory_item_id = p_inventory_item_id;
1704:
1705: BEGIN
1706: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1707: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1708: lc_mod_name||'begin',
1709: 'Entering private API insert_job_comp_txn' );
1710: END IF;
1703: inventory_item_id = p_inventory_item_id;
1704:
1705: BEGIN
1706: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1707: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1708: lc_mod_name||'begin',
1709: 'Entering private API insert_job_comp_txn' );
1710: END IF;
1711:
1863:
1864: --insert into table mtl_transactions_interface
1865: FOR l_qty_ctr IN 1..l_transaction_quantity
1866: LOOP
1867: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1868: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1869: lc_mod_name||'beforecallinserttxnshdr',
1870: 'Just before calling insert_transactions_header');
1871: END IF;
1864: --insert into table mtl_transactions_interface
1865: FOR l_qty_ctr IN 1..l_transaction_quantity
1866: LOOP
1867: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1868: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1869: lc_mod_name||'beforecallinserttxnshdr',
1870: 'Just before calling insert_transactions_header');
1871: END IF;
1872:
1885: END IF;
1886: END LOOP;
1887: ELSE -- Quantity = 1
1888: --insert into table mtl_transactions_interface
1889: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1890: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1891: lc_mod_name||'beforecallinserttxnshdr',
1892: 'Just before calling insert_transactions_header');
1893: END IF;
1886: END LOOP;
1887: ELSE -- Quantity = 1
1888: --insert into table mtl_transactions_interface
1889: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1890: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1891: lc_mod_name||'beforecallinserttxnshdr',
1892: 'Just before calling insert_transactions_header');
1893: END IF;
1894:
1906: l_transactions_interface_rec.source_line_id := -1;
1907: END IF;
1908:
1909: --insert into table mtl_transactions_interface
1910: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1911: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1912: lc_mod_name||'beforecallinserttxnshdr',
1913: 'Just before calling insert_transactions_header');
1914: END IF;
1907: END IF;
1908:
1909: --insert into table mtl_transactions_interface
1910: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1911: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1912: lc_mod_name||'beforecallinserttxnshdr',
1913: 'Just before calling insert_transactions_header');
1914: END IF;
1915:
1939: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1940: p_count => x_msg_count,
1941: p_data => x_msg_data);
1942:
1943: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1944: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1945: lc_mod_name||'unx_exception',
1946: 'G_EXC_UNEXPECTED_ERROR Exception');
1947: END IF;
1940: p_count => x_msg_count,
1941: p_data => x_msg_data);
1942:
1943: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1944: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1945: lc_mod_name||'unx_exception',
1946: 'G_EXC_UNEXPECTED_ERROR Exception');
1947: END IF;
1948:
1955: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1956: p_count => x_msg_count,
1957: p_data => x_msg_data);
1958:
1959: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1960: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
1961: lc_mod_name||'exc_exception',
1962: 'G_EXC_ERROR Exception');
1963: END IF;
1956: p_count => x_msg_count,
1957: p_data => x_msg_data);
1958:
1959: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1960: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
1961: lc_mod_name||'exc_exception',
1962: 'G_EXC_ERROR Exception');
1963: END IF;
1964:
1978: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1979: p_count => x_msg_count,
1980: p_data => x_msg_data);
1981:
1982: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1983: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1984: lc_mod_name||'others_exception',
1985: 'OTHERS Exception');
1986: END IF;
1979: p_count => x_msg_count,
1980: p_data => x_msg_data);
1981:
1982: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1983: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1984: lc_mod_name||'others_exception',
1985: 'OTHERS Exception');
1986: END IF;
1987: END insert_job_comp_txn;
2000: IS
2001: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_MTI_TRANSACTIONS';
2002: lc_api_version_number CONSTANT NUMBER := 1.0;
2003:
2004: -- constants used for FND_LOG debug messages
2005: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_mti_transactions';
2006:
2007: lc_MTI_source_table CONSTANT NUMBER := 1;
2008:
2009: l_table NUMBER;
2010: l_trans_count NUMBER;
2011: l_return_count NUMBER;
2012: BEGIN
2013: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2014: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2015: lc_mod_name||'begin',
2016: 'Entering private API process_mti_transactions' );
2017: END IF;
2010: l_trans_count NUMBER;
2011: l_return_count NUMBER;
2012: BEGIN
2013: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2014: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2015: lc_mod_name||'begin',
2016: 'Entering private API process_mti_transactions' );
2017: END IF;
2018:
2034:
2035: -- Populate the constant values
2036: l_table := lc_MTI_source_table;
2037:
2038: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2039: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2040: lc_mod_name||'beforecallprocesstxns',
2041: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
2042: END IF;
2035: -- Populate the constant values
2036: l_table := lc_MTI_source_table;
2037:
2038: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2039: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2040: lc_mod_name||'beforecallprocesstxns',
2041: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
2042: END IF;
2043:
2074: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2075: p_count => x_msg_count,
2076: p_data => x_msg_data);
2077:
2078: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2079: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2080: lc_mod_name||'unx_exception',
2081: 'G_EXC_UNEXPECTED_ERROR Exception');
2082: END IF;
2075: p_count => x_msg_count,
2076: p_data => x_msg_data);
2077:
2078: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2079: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2080: lc_mod_name||'unx_exception',
2081: 'G_EXC_UNEXPECTED_ERROR Exception');
2082: END IF;
2083:
2089: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2090: p_count => x_msg_count,
2091: p_data => x_msg_data);
2092:
2093: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2094: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2095: lc_mod_name||'exc_exception',
2096: 'G_EXC_ERROR Exception');
2097: END IF;
2090: p_count => x_msg_count,
2091: p_data => x_msg_data);
2092:
2093: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2094: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2095: lc_mod_name||'exc_exception',
2096: 'G_EXC_ERROR Exception');
2097: END IF;
2098:
2110: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2111: p_count => x_msg_count,
2112: p_data => x_msg_data);
2113:
2114: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2115: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2116: lc_mod_name||'others_exception',
2117: 'OTHERS Exception');
2118: END IF;
2111: p_count => x_msg_count,
2112: p_data => x_msg_data);
2113:
2114: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2115: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2116: lc_mod_name||'others_exception',
2117: 'OTHERS Exception');
2118: END IF;
2119: END process_mti_transactions;
2133:
2134: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_OPER_COMP_TXN';
2135: lc_api_version_number CONSTANT NUMBER := 1.0;
2136:
2137: -- constants used for FND_LOG debug messages
2138:
2139: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_oper_comp_txn';
2140:
2141: -- Indicates that the process Phase is Validation
2200:
2201:
2202: BEGIN
2203:
2204: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2205: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2206: lc_mod_name||'begin',
2207: 'Entering private API process_oper_comp_txn' );
2208: END IF;
2201:
2202: BEGIN
2203:
2204: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2205: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2206: lc_mod_name||'begin',
2207: 'Entering private API process_oper_comp_txn' );
2208: END IF;
2209:
2310: l_prev_to_operation_seq_num := l_wip_move_txn_interface_rec.to_operation_seq_num;
2311: l_prev_transaction_quantity := l_wip_move_txn_interface_rec.transaction_quantity;
2312:
2313: --insert into table wip_move_txn_interface
2314: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2315: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2316: lc_mod_name||'beforecallinsertwipmvtxn',
2317: 'Just before calling insert_wip_move_txn');
2318: END IF;
2311: l_prev_transaction_quantity := l_wip_move_txn_interface_rec.transaction_quantity;
2312:
2313: --insert into table wip_move_txn_interface
2314: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2315: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2316: lc_mod_name||'beforecallinsertwipmvtxn',
2317: 'Just before calling insert_wip_move_txn');
2318: END IF;
2319:
2332: fetch get_material_transaction_id into l_material_transaction_id;
2333: close get_material_transaction_id;
2334: */
2335:
2336: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2337: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2338: lc_mod_name||'beforecallprocesstxns',
2339: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
2340: END IF;
2333: close get_material_transaction_id;
2334: */
2335:
2336: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2337: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2338: lc_mod_name||'beforecallprocesstxns',
2339: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
2340: END IF;
2341:
2389: FND_MSG_PUB.ADD;
2390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
2391:
2392:
2393: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2394: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2395: lc_mod_name||'exc_exception',
2396: 'G_EXC_ERROR Exception');
2397: END IF;
2390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
2391:
2392:
2393: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2394: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2395: lc_mod_name||'exc_exception',
2396: 'G_EXC_ERROR Exception');
2397: END IF;
2398:
2415: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2416: p_count => x_msg_count,
2417: p_data => x_msg_data);
2418:
2419: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2420: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2421: lc_mod_name||'unx_exception',
2422: 'G_EXC_UNEXPECTED_ERROR Exception');
2423: END IF;
2416: p_count => x_msg_count,
2417: p_data => x_msg_data);
2418:
2419: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2420: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2421: lc_mod_name||'unx_exception',
2422: 'G_EXC_UNEXPECTED_ERROR Exception');
2423: END IF;
2424:
2431: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2432: p_count => x_msg_count,
2433: p_data => x_msg_data);
2434:
2435: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2436: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2437: lc_mod_name||'exc_exception',
2438: 'G_EXC_ERROR Exception');
2439: END IF;
2432: p_count => x_msg_count,
2433: p_data => x_msg_data);
2434:
2435: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2436: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2437: lc_mod_name||'exc_exception',
2438: 'G_EXC_ERROR Exception');
2439: END IF;
2440:
2454: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2455: p_count => x_msg_count,
2456: p_data => x_msg_data);
2457:
2458: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2459: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2460: lc_mod_name||'others_exception',
2461: 'OTHERS Exception');
2462: END IF;
2455: p_count => x_msg_count,
2456: p_data => x_msg_data);
2457:
2458: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2459: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2460: lc_mod_name||'others_exception',
2461: 'OTHERS Exception');
2462: END IF;
2463:
2482:
2483: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_ISSUE_MTL_TXN';
2484: lc_api_version_number CONSTANT NUMBER := 1.0;
2485:
2486: -- constants used for FND_LOG debug messages
2487:
2488: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_issue_mtl_txn';
2489:
2490:
2573:
2574:
2575: BEGIN
2576:
2577: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2579: lc_mod_name||'begin',
2580: 'Entering private API process_issue_mtl_txn' );
2581: END IF;
2574:
2575: BEGIN
2576:
2577: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2579: lc_mod_name||'begin',
2580: 'Entering private API process_issue_mtl_txn' );
2581: END IF;
2582:
2847:
2848:
2849: --insert into table mtl_transactions_interface
2850:
2851: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2852: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2853: lc_mod_name||'beforecallinserttxnshdr',
2854: 'Just before calling insert_transactions_header');
2855: END IF;
2848:
2849: --insert into table mtl_transactions_interface
2850:
2851: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2852: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2853: lc_mod_name||'beforecallinserttxnshdr',
2854: 'Just before calling insert_transactions_header');
2855: END IF;
2856:
2888: l_srl_nmbrs_interface_rec.transaction_interface_id := l_transactions_interface_rec.transaction_interface_id;
2889:
2890: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
2891:
2892: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2893: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2894: lc_mod_name||'beforecallinsertsrlnmbrs',
2895: 'Just before calling insert_upd_serial_numbers');
2896: END IF;
2889:
2890: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
2891:
2892: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2893: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2894: lc_mod_name||'beforecallinsertsrlnmbrs',
2895: 'Just before calling insert_upd_serial_numbers');
2896: END IF;
2897:
2921: end if;
2922:
2923: --insert into table mtl_transactions_interface
2924:
2925: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2926: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2927: lc_mod_name||'beforecallinserttxnshdr',
2928: 'Just before calling insert_transactions_header');
2929: END IF;
2922:
2923: --insert into table mtl_transactions_interface
2924:
2925: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2926: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2927: lc_mod_name||'beforecallinserttxnshdr',
2928: 'Just before calling insert_transactions_header');
2929: END IF;
2930:
2954:
2955:
2956: --insert into table mtl_transactions_interface
2957:
2958: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2959: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2960: lc_mod_name||'beforecallinserttxnshdr',
2961: 'Just before calling insert_transactions_header');
2962: END IF;
2955:
2956: --insert into table mtl_transactions_interface
2957:
2958: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2959: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2960: lc_mod_name||'beforecallinserttxnshdr',
2961: 'Just before calling insert_transactions_header');
2962: END IF;
2963:
3032:
3033: -- Call procedures to insert job header and job details information
3034: -- into wip interface tables
3035:
3036: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3037: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3038: lc_mod_name||'beforecallinsertjob',
3039: 'Just before calling insert_job_header');
3040: END IF;
3033: -- Call procedures to insert job header and job details information
3034: -- into wip interface tables
3035:
3036: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3037: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3038: lc_mod_name||'beforecallinsertjob',
3039: 'Just before calling insert_job_header');
3040: END IF;
3041:
3048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3049: END IF;
3050:
3051:
3052: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3053: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3054: lc_mod_name||'beforecallinsertjobdtls',
3055: 'Just before calling insert_job_details');
3056: END IF;
3049: END IF;
3050:
3051:
3052: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3053: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3054: lc_mod_name||'beforecallinsertjobdtls',
3055: 'Just before calling insert_job_details');
3056: END IF;
3057:
3075: ---- Update CSD_WIP_TRANSACTION_DETAILS rows to have null values
3076:
3077: If p_mtl_txn_dtls_tbl(mtl_ctr).WIP_TRANSACTION_DETAIL_ID is not null then
3078:
3079: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3080: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3081: lc_mod_name||'beforecallupdaterow',
3082: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
3083: END IF;
3076:
3077: If p_mtl_txn_dtls_tbl(mtl_ctr).WIP_TRANSACTION_DETAIL_ID is not null then
3078:
3079: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3080: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3081: lc_mod_name||'beforecallupdaterow',
3082: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
3083: END IF;
3084:
3122: x_transaction_header_id := l_transactions_interface_rec.transaction_header_id;
3123:
3124: END IF;
3125:
3126: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3127: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3128: lc_mod_name||'beforecallprocesstxns',
3129: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
3130: END IF;
3123:
3124: END IF;
3125:
3126: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3127: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3128: lc_mod_name||'beforecallprocesstxns',
3129: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
3130: END IF;
3131:
3238: RETURN; */
3239: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3240:
3241:
3242: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3243: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3244: lc_mod_name||'exc_exception',
3245: 'G_EXC_ERROR Exception');
3246: END IF;
3239: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3240:
3241:
3242: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3243: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3244: lc_mod_name||'exc_exception',
3245: 'G_EXC_ERROR Exception');
3246: END IF;
3247:
3269: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3270: p_count => x_msg_count,
3271: p_data => x_msg_data);
3272:
3273: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3274: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3275: lc_mod_name||'unx_exception',
3276: 'G_EXC_UNEXPECTED_ERROR Exception');
3277: END IF;
3270: p_count => x_msg_count,
3271: p_data => x_msg_data);
3272:
3273: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3274: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3275: lc_mod_name||'unx_exception',
3276: 'G_EXC_UNEXPECTED_ERROR Exception');
3277: END IF;
3278:
3285: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3286: p_count => x_msg_count,
3287: p_data => x_msg_data);
3288:
3289: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3290: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3291: lc_mod_name||'exc_exception',
3292: 'G_EXC_ERROR Exception');
3293: END IF;
3286: p_count => x_msg_count,
3287: p_data => x_msg_data);
3288:
3289: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3290: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3291: lc_mod_name||'exc_exception',
3292: 'G_EXC_ERROR Exception');
3293: END IF;
3294:
3309: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3310: p_count => x_msg_count,
3311: p_data => x_msg_data);
3312:
3313: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3314: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3315: lc_mod_name||'others_exception',
3316: 'OTHERS Exception');
3317: END IF;
3310: p_count => x_msg_count,
3311: p_data => x_msg_data);
3312:
3313: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3314: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3315: lc_mod_name||'others_exception',
3316: 'OTHERS Exception');
3317: END IF;
3318:
3339: IS
3340: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_ISSUE_MTL_TXNS_LOT_SRL';
3341: lc_api_version_number CONSTANT NUMBER := 1.0;
3342:
3343: -- constants used for FND_LOG debug messages
3344: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_issue_mtl_txns_lot_srl';
3345:
3346: BEGIN
3347: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3343: -- constants used for FND_LOG debug messages
3344: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_issue_mtl_txns_lot_srl';
3345:
3346: BEGIN
3347: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3348: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3349: lc_mod_name||'begin',
3350: 'Entering private API process_issue_mtl_txns_lot_srl' );
3351: END IF;
3344: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_issue_mtl_txns_lot_srl';
3345:
3346: BEGIN
3347: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3348: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3349: lc_mod_name||'begin',
3350: 'Entering private API process_issue_mtl_txns_lot_srl' );
3351: END IF;
3352:
3366: END IF;
3367:
3368: x_return_status := FND_API.G_RET_STS_SUCCESS;
3369:
3370: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3371: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3372: lc_mod_name||'beforecallinsertjobcomptxn',
3373: 'Just before calling insert_job_comp_txn');
3374: END IF;
3367:
3368: x_return_status := FND_API.G_RET_STS_SUCCESS;
3369:
3370: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3371: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3372: lc_mod_name||'beforecallinsertjobcomptxn',
3373: 'Just before calling insert_job_comp_txn');
3374: END IF;
3375: update_mtl_txns_lot_srl (
3388: FND_MSG_PUB.ADD;
3389: RAISE FND_API.G_EXC_ERROR;
3390: END IF;
3391:
3392: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3393: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3394: lc_mod_name||'beforecallprocesstxn',
3395: 'Just before calling process_mti_transactions');
3396: END IF;
3389: RAISE FND_API.G_EXC_ERROR;
3390: END IF;
3391:
3392: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3393: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3394: lc_mod_name||'beforecallprocesstxn',
3395: 'Just before calling process_mti_transactions');
3396: END IF;
3397: process_mti_transactions(
3425: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3426: p_count => x_msg_count,
3427: p_data => x_msg_data);
3428:
3429: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3430: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3431: lc_mod_name||'unx_exception',
3432: 'G_EXC_UNEXPECTED_ERROR Exception');
3433: END IF;
3426: p_count => x_msg_count,
3427: p_data => x_msg_data);
3428:
3429: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3430: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3431: lc_mod_name||'unx_exception',
3432: 'G_EXC_UNEXPECTED_ERROR Exception');
3433: END IF;
3434:
3439: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3440: p_count => x_msg_count,
3441: p_data => x_msg_data);
3442:
3443: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3444: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3445: lc_mod_name||'exc_exception',
3446: 'G_EXC_ERROR Exception');
3447: END IF;
3440: p_count => x_msg_count,
3441: p_data => x_msg_data);
3442:
3443: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3444: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3445: lc_mod_name||'exc_exception',
3446: 'G_EXC_ERROR Exception');
3447: END IF;
3448:
3460: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3461: p_count => x_msg_count,
3462: p_data => x_msg_data);
3463:
3464: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3465: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3466: lc_mod_name||'others_exception',
3467: 'OTHERS Exception');
3468: END IF;
3461: p_count => x_msg_count,
3462: p_data => x_msg_data);
3463:
3464: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3465: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3466: lc_mod_name||'others_exception',
3467: 'OTHERS Exception');
3468: END IF;
3469: END process_issue_mtl_txns_lot_srl;
3487: IS
3488: lc_api_name CONSTANT VARCHAR2(30) := 'UPDATE_MTL_TXNS_LOT_SRL';
3489: lc_api_version_number CONSTANT NUMBER := 1.0;
3490:
3491: -- constants used for FND_LOG debug messages
3492: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.update_mtl_txns_lot_srl';
3493:
3494: lc_revision_controlled CONSTANT NUMBER := 2;
3495: lc_full_lot_control CONSTANT NUMBER := 2;
3505: SELECT mtl_material_transactions_s.nextval from dual;
3506:
3507: BEGIN
3508:
3509: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3510: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3511: lc_mod_name||'begin',
3512: 'Entering private API update_mtl_txns_lot_srl' );
3513: END IF;
3506:
3507: BEGIN
3508:
3509: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3510: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3511: lc_mod_name||'begin',
3512: 'Entering private API update_mtl_txns_lot_srl' );
3513: END IF;
3514:
3538: l_transactions_interface_rec.source_line_id := p_mtl_txn_dtls_tbl(mtl_ctr).operation_seq_num;
3539: l_transactions_interface_rec.reason_id := p_mtl_txn_dtls_tbl(mtl_ctr).reason_id; -- swai bug 6841113
3540:
3541: --Update table mtl_transactions_interface
3542: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3543: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3544: lc_mod_name||'beforecallupdtxnhdr',
3545: 'Just before calling update_transactions_header');
3546: END IF;
3539: l_transactions_interface_rec.reason_id := p_mtl_txn_dtls_tbl(mtl_ctr).reason_id; -- swai bug 6841113
3540:
3541: --Update table mtl_transactions_interface
3542: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3543: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3544: lc_mod_name||'beforecallupdtxnhdr',
3545: 'Just before calling update_transactions_header');
3546: END IF;
3547:
3566:
3567: l_srl_nmbrs_interface_rec.transaction_interface_id := l_txn_lots_interface_rec.serial_transaction_temp_id;
3568: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
3569:
3570: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3571: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3572: lc_mod_name||'beforecallinsertsrlnmbrs',
3573: 'Just before calling insert_upd_serial_numbers');
3574: END IF;
3567: l_srl_nmbrs_interface_rec.transaction_interface_id := l_txn_lots_interface_rec.serial_transaction_temp_id;
3568: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
3569:
3570: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3571: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3572: lc_mod_name||'beforecallinsertsrlnmbrs',
3573: 'Just before calling insert_upd_serial_numbers');
3574: END IF;
3575:
3580: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3581: END IF;
3582: END IF;
3583:
3584: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3585: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3586: lc_mod_name||'beforecallinserttxnslots',
3587: 'Just before calling insert_transaction_lots');
3588: END IF;
3581: END IF;
3582: END IF;
3583:
3584: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3585: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3586: lc_mod_name||'beforecallinserttxnslots',
3587: 'Just before calling insert_transaction_lots');
3588: END IF;
3589:
3597: IF p_mtl_txn_dtls_tbl(mtl_ctr).SERIAL_NUMBER_CONTROL_CODE in ( lc_predefined_serial_control , lc_inven_rct_srl_control ) THEN
3598: l_srl_nmbrs_interface_rec.transaction_interface_id := l_transactions_interface_rec.transaction_interface_id;
3599: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
3600:
3601: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3602: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3603: lc_mod_name||'beforecallinsertsrlnbrs',
3604: 'Just before calling insert_upd_serial_numbers');
3605: END IF;
3598: l_srl_nmbrs_interface_rec.transaction_interface_id := l_transactions_interface_rec.transaction_interface_id;
3599: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
3600:
3601: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3602: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3603: lc_mod_name||'beforecallinsertsrlnbrs',
3604: 'Just before calling insert_upd_serial_numbers');
3605: END IF;
3606:
3628: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3629: p_count => x_msg_count,
3630: p_data => x_msg_data);
3631:
3632: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3633: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3634: lc_mod_name||'unx_exception',
3635: 'G_EXC_UNEXPECTED_ERROR Exception');
3636: END IF;
3629: p_count => x_msg_count,
3630: p_data => x_msg_data);
3631:
3632: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3633: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3634: lc_mod_name||'unx_exception',
3635: 'G_EXC_UNEXPECTED_ERROR Exception');
3636: END IF;
3637:
3642: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3643: p_count => x_msg_count,
3644: p_data => x_msg_data);
3645:
3646: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3647: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3648: lc_mod_name||'exc_exception',
3649: 'G_EXC_ERROR Exception');
3650: END IF;
3643: p_count => x_msg_count,
3644: p_data => x_msg_data);
3645:
3646: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3647: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3648: lc_mod_name||'exc_exception',
3649: 'G_EXC_ERROR Exception');
3650: END IF;
3651:
3663: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3664: p_count => x_msg_count,
3665: p_data => x_msg_data);
3666:
3667: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3668: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3669: lc_mod_name||'others_exception',
3670: 'OTHERS Exception');
3671: END IF;
3664: p_count => x_msg_count,
3665: p_data => x_msg_data);
3666:
3667: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3668: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3669: lc_mod_name||'others_exception',
3670: 'OTHERS Exception');
3671: END IF;
3672: END update_mtl_txns_lot_srl;
3688:
3689: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_TRANSACT_RES_TXN';
3690: lc_api_version_number CONSTANT NUMBER := 1.0;
3691:
3692: -- constants used for FND_LOG debug messages
3693:
3694: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_transact_res_txn';
3695:
3696:
3729:
3730:
3731: BEGIN
3732:
3733: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3734: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
3735: lc_mod_name||'begin',
3736: 'Entering private API process_transact_res_txn' );
3737: END IF;
3730:
3731: BEGIN
3732:
3733: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3734: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
3735: lc_mod_name||'begin',
3736: 'Entering private API process_transact_res_txn' );
3737: END IF;
3738:
3862: l_wip_cost_txn_interface_rec.employee_num := p_res_txn_dtls_tbl(res_ctr).employee_num;
3863:
3864: --insert into table wip_cost_txn_interface
3865:
3866: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3867: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3868: lc_mod_name||'beforecallinsertwipcosttxn',
3869: 'Just before calling insert_wip_cost_txn');
3870: END IF;
3863:
3864: --insert into table wip_cost_txn_interface
3865:
3866: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3867: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3868: lc_mod_name||'beforecallinsertwipcosttxn',
3869: 'Just before calling insert_wip_cost_txn');
3870: END IF;
3871:
3955:
3956: -- Call procedures to insert job header and job details information
3957: -- into wip interface tables
3958:
3959: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3960: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3961: lc_mod_name||'beforecallinsertjob',
3962: 'Just before calling insert_job_header');
3963: END IF;
3956: -- Call procedures to insert job header and job details information
3957: -- into wip interface tables
3958:
3959: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3960: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3961: lc_mod_name||'beforecallinsertjob',
3962: 'Just before calling insert_job_header');
3963: END IF;
3964:
3971: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3972: END IF;
3973:
3974:
3975: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3976: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3977: lc_mod_name||'beforecallinsertjobdtls',
3978: 'Just before calling insert_job_details');
3979: END IF;
3972: END IF;
3973:
3974:
3975: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3976: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3977: lc_mod_name||'beforecallinsertjobdtls',
3978: 'Just before calling insert_job_details');
3979: END IF;
3980:
3992: ---- Update CSD_WIP_TRANSACTION_DETAILS rows to have null values
3993:
3994: If p_res_txn_dtls_tbl(res_ctr).WIP_TRANSACTION_DETAIL_ID is not null then
3995:
3996: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3997: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3998: lc_mod_name||'beforecallupdaterow',
3999: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
4000: END IF;
3993:
3994: If p_res_txn_dtls_tbl(res_ctr).WIP_TRANSACTION_DETAIL_ID is not null then
3995:
3996: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3997: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3998: lc_mod_name||'beforecallupdaterow',
3999: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
4000: END IF;
4001:
4089: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4090: */
4091:
4092:
4093: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4094: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4095: lc_mod_name||'exc_exception',
4096: 'G_EXC_ERROR Exception');
4097: END IF;
4090: */
4091:
4092:
4093: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4094: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4095: lc_mod_name||'exc_exception',
4096: 'G_EXC_ERROR Exception');
4097: END IF;
4098:
4117: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4118: p_count => x_msg_count,
4119: p_data => x_msg_data);
4120:
4121: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4122: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4123: lc_mod_name||'unx_exception',
4124: 'G_EXC_UNEXPECTED_ERROR Exception');
4125: END IF;
4118: p_count => x_msg_count,
4119: p_data => x_msg_data);
4120:
4121: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4122: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4123: lc_mod_name||'unx_exception',
4124: 'G_EXC_UNEXPECTED_ERROR Exception');
4125: END IF;
4126:
4133: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4134: p_count => x_msg_count,
4135: p_data => x_msg_data);
4136:
4137: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4138: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4139: lc_mod_name||'exc_exception',
4140: 'G_EXC_ERROR Exception');
4141: END IF;
4134: p_count => x_msg_count,
4135: p_data => x_msg_data);
4136:
4137: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4138: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4139: lc_mod_name||'exc_exception',
4140: 'G_EXC_ERROR Exception');
4141: END IF;
4142:
4156: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4157: p_count => x_msg_count,
4158: p_data => x_msg_data);
4159:
4160: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4161: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4162: lc_mod_name||'others_exception',
4163: 'OTHERS Exception');
4164: END IF;
4157: p_count => x_msg_count,
4158: p_data => x_msg_data);
4159:
4160: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4161: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4162: lc_mod_name||'others_exception',
4163: 'OTHERS Exception');
4164: END IF;
4165:
4185: IS
4186: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_SAVE_CSD_MTL_TXN_DTLS';
4187: lc_api_version_number CONSTANT NUMBER := 1.0;
4188:
4189: -- constants used for FND_LOG debug messages
4190: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_save_mtl_txn_dtls';
4191:
4192: -- Constants Used for Inserting into wip_job_schedule_interface,
4193: -- These are the values needed for WIP Mass Load to pick up the records
4242: and rownum = 1;
4243:
4244: BEGIN
4245:
4246: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4247: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
4248: lc_mod_name||'begin',
4249: 'Entering private API process_save_mtl_txn_dtls' );
4250: END IF;
4243:
4244: BEGIN
4245:
4246: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4247: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
4248: lc_mod_name||'begin',
4249: 'Entering private API process_save_mtl_txn_dtls' );
4250: END IF;
4251:
4400:
4401: -- Call procedures to insert job header and job details information
4402: -- into wip interface tables
4403:
4404: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4405: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4406: lc_mod_name||'beforecallinsertjob',
4407: 'Just before calling insert_job_header');
4408: END IF;
4401: -- Call procedures to insert job header and job details information
4402: -- into wip interface tables
4403:
4404: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4405: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4406: lc_mod_name||'beforecallinsertjob',
4407: 'Just before calling insert_job_header');
4408: END IF;
4409:
4416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4417: END IF;
4418:
4419:
4420: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4421: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4422: lc_mod_name||'beforecallinsertjobdtls',
4423: 'Just before calling insert_job_details');
4424: END IF;
4417: END IF;
4418:
4419:
4420: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4421: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4422: lc_mod_name||'beforecallinsertjobdtls',
4423: 'Just before calling insert_job_details');
4424: END IF;
4425:
4434:
4435:
4436: -- Call WIP Mass Load API
4437:
4438: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4439: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4440: lc_mod_name||'beforecallwipmassload',
4441: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
4442: END IF;
4435:
4436: -- Call WIP Mass Load API
4437:
4438: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4439: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4440: lc_mod_name||'beforecallwipmassload',
4441: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
4442: END IF;
4443:
4488: END;
4489: end if;
4490:
4491: If p_mtl_txn_dtls_tbl(mtl_ctr).WIP_TRANSACTION_DETAIL_ID is null then
4492: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4493: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4494: lc_mod_name||'beforecallinsertrow',
4495: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
4496: END IF;
4489: end if;
4490:
4491: If p_mtl_txn_dtls_tbl(mtl_ctr).WIP_TRANSACTION_DETAIL_ID is null then
4492: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4493: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4494: lc_mod_name||'beforecallinsertrow',
4495: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
4496: END IF;
4497:
4527: );
4528:
4529: else
4530:
4531: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4532: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4533: lc_mod_name||'beforecallupdaterow',
4534: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
4535: END IF;
4528:
4529: else
4530:
4531: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4532: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4533: lc_mod_name||'beforecallupdaterow',
4534: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
4535: END IF;
4536:
4582: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4583: p_count => x_msg_count,
4584: p_data => x_msg_data);
4585:
4586: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4587: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4588: lc_mod_name||'unx_exception',
4589: 'G_EXC_UNEXPECTED_ERROR Exception');
4590: END IF;
4583: p_count => x_msg_count,
4584: p_data => x_msg_data);
4585:
4586: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4587: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4588: lc_mod_name||'unx_exception',
4589: 'G_EXC_UNEXPECTED_ERROR Exception');
4590: END IF;
4591:
4598: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4599: p_count => x_msg_count,
4600: p_data => x_msg_data);
4601:
4602: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4603: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4604: lc_mod_name||'exc_exception',
4605: 'G_EXC_ERROR Exception');
4606: END IF;
4599: p_count => x_msg_count,
4600: p_data => x_msg_data);
4601:
4602: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4603: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4604: lc_mod_name||'exc_exception',
4605: 'G_EXC_ERROR Exception');
4606: END IF;
4607:
4621: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4622: p_count => x_msg_count,
4623: p_data => x_msg_data);
4624:
4625: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4626: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4627: lc_mod_name||'others_exception',
4628: 'OTHERS Exception');
4629: END IF;
4622: p_count => x_msg_count,
4623: p_data => x_msg_data);
4624:
4625: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4626: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4627: lc_mod_name||'others_exception',
4628: 'OTHERS Exception');
4629: END IF;
4630:
4649: IS
4650: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_SAVE_RES_TXN_DTLS';
4651: lc_api_version_number CONSTANT NUMBER := 1.0;
4652:
4653: -- constants used for FND_LOG debug messages
4654:
4655: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
4656:
4657:
4711:
4712:
4713: BEGIN
4714:
4715: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4716: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
4717: lc_mod_name||'begin',
4718: 'Entering private API process_save_res_txn_dtls' );
4719: END IF;
4712:
4713: BEGIN
4714:
4715: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4716: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
4717: lc_mod_name||'begin',
4718: 'Entering private API process_save_res_txn_dtls' );
4719: END IF;
4720:
4819:
4820: -- Call procedures to insert job header and job details information
4821: -- into wip interface tables
4822:
4823: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4824: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4825: lc_mod_name||'beforecallinsertjob',
4826: 'Just before calling insert_job_header');
4827: END IF;
4820: -- Call procedures to insert job header and job details information
4821: -- into wip interface tables
4822:
4823: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4824: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4825: lc_mod_name||'beforecallinsertjob',
4826: 'Just before calling insert_job_header');
4827: END IF;
4828:
4835: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4836: END IF;
4837:
4838:
4839: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4840: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4841: lc_mod_name||'beforecallinsertjobdtls',
4842: 'Just before calling insert_job_details');
4843: END IF;
4836: END IF;
4837:
4838:
4839: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4840: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4841: lc_mod_name||'beforecallinsertjobdtls',
4842: 'Just before calling insert_job_details');
4843: END IF;
4844:
4853:
4854:
4855: -- Call WIP Mass Load API
4856:
4857: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4858: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4859: lc_mod_name||'beforecallwipmassload',
4860: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
4861: END IF;
4854:
4855: -- Call WIP Mass Load API
4856:
4857: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4858: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4859: lc_mod_name||'beforecallwipmassload',
4860: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
4861: END IF;
4862:
4909: end if;
4910:
4911: If p_res_txn_dtls_tbl(res_ctr).WIP_TRANSACTION_DETAIL_ID is null then
4912:
4913: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4914: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4915: lc_mod_name||'beforecallinsertrow',
4916: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
4917: END IF;
4910:
4911: If p_res_txn_dtls_tbl(res_ctr).WIP_TRANSACTION_DETAIL_ID is null then
4912:
4913: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4914: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4915: lc_mod_name||'beforecallinsertrow',
4916: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
4917: END IF;
4918:
4947: ,p_STANDARD_OPERATION_ID => null
4948: );
4949: else
4950:
4951: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4952: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4953: lc_mod_name||'beforecallupdaterow',
4954: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
4955: END IF;
4948: );
4949: else
4950:
4951: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4952: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4953: lc_mod_name||'beforecallupdaterow',
4954: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
4955: END IF;
4956:
5003: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5004: p_count => x_msg_count,
5005: p_data => x_msg_data);
5006:
5007: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5008: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5009: lc_mod_name||'unx_exception',
5010: 'G_EXC_UNEXPECTED_ERROR Exception');
5011: END IF;
5004: p_count => x_msg_count,
5005: p_data => x_msg_data);
5006:
5007: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5008: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5009: lc_mod_name||'unx_exception',
5010: 'G_EXC_UNEXPECTED_ERROR Exception');
5011: END IF;
5012:
5019: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5020: p_count => x_msg_count,
5021: p_data => x_msg_data);
5022:
5023: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5024: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5025: lc_mod_name||'exc_exception',
5026: 'G_EXC_ERROR Exception');
5027: END IF;
5020: p_count => x_msg_count,
5021: p_data => x_msg_data);
5022:
5023: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5024: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5025: lc_mod_name||'exc_exception',
5026: 'G_EXC_ERROR Exception');
5027: END IF;
5028:
5042: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5043: p_count => x_msg_count,
5044: p_data => x_msg_data);
5045:
5046: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5047: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5048: lc_mod_name||'others_exception',
5049: 'OTHERS Exception');
5050: END IF;
5043: p_count => x_msg_count,
5044: p_data => x_msg_data);
5045:
5046: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5047: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5048: lc_mod_name||'others_exception',
5049: 'OTHERS Exception');
5050: END IF;
5051:
5067: IS
5068: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_SAVE_OP_DTLS';
5069: lc_api_version_number CONSTANT NUMBER := 1.0;
5070:
5071: -- constants used for FND_LOG debug messages
5072: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.process_save_op_dtls.';
5073:
5074: -- Constants Used for Inserting into wip_job_schedule_interface,
5075: -- These are the values needed for WIP Mass Load to pick up the records
5097: l_wip_transaction_detail_id NUMBER;
5098:
5099: BEGIN
5100:
5101: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5102: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
5103: lc_mod_name||'begin',
5104: 'Entering private API process_save_op_dtls' );
5105: END IF;
5098:
5099: BEGIN
5100:
5101: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5102: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
5103: lc_mod_name||'begin',
5104: 'Entering private API process_save_op_dtls' );
5105: END IF;
5106:
5183: END IF;
5184:
5185: -- Call procedures to insert job header and job details information
5186: -- into wip interface tables
5187: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5188: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5189: lc_mod_name||'beforecallinsertjob',
5190: 'Just before calling insert_job_header');
5191: END IF;
5184:
5185: -- Call procedures to insert job header and job details information
5186: -- into wip interface tables
5187: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5188: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5189: lc_mod_name||'beforecallinsertjob',
5190: 'Just before calling insert_job_header');
5191: END IF;
5192:
5196: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5197: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5198: END IF;
5199:
5200: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5201: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5202: lc_mod_name||'beforecallinsertjobdtls',
5203: 'Just before calling insert_job_details');
5204: END IF;
5197: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5198: END IF;
5199:
5200: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5201: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5202: lc_mod_name||'beforecallinsertjobdtls',
5203: 'Just before calling insert_job_details');
5204: END IF;
5205:
5210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5211: END IF;
5212:
5213: -- Call WIP Mass Load API
5214: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5215: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5216: lc_mod_name||'beforecallwipmassload',
5217: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
5218: END IF;
5211: END IF;
5212:
5213: -- Call WIP Mass Load API
5214: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5215: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5216: lc_mod_name||'beforecallwipmassload',
5217: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
5218: END IF;
5219:
5266: END;
5267: end if;
5268:
5269: If p_op_dtls_tbl(op_ctr).WIP_TRANSACTION_DETAIL_ID is null then
5270: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5271: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5272: lc_mod_name||'beforecallinsertrow',
5273: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
5274: END IF;
5267: end if;
5268:
5269: If p_op_dtls_tbl(op_ctr).WIP_TRANSACTION_DETAIL_ID is null then
5270: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5271: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5272: lc_mod_name||'beforecallinsertrow',
5273: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
5274: END IF;
5275:
5305:
5306: );
5307:
5308: else
5309: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5310: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5311: lc_mod_name||'beforecallupdaterow',
5312: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
5313: END IF;
5306: );
5307:
5308: else
5309: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5310: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5311: lc_mod_name||'beforecallupdaterow',
5312: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
5313: END IF;
5314:
5359: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5360: p_count => x_msg_count,
5361: p_data => x_msg_data);
5362:
5363: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5364: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5365: lc_mod_name||'unx_exception',
5366: 'G_EXC_UNEXPECTED_ERROR Exception');
5367: END IF;
5360: p_count => x_msg_count,
5361: p_data => x_msg_data);
5362:
5363: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5364: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5365: lc_mod_name||'unx_exception',
5366: 'G_EXC_UNEXPECTED_ERROR Exception');
5367: END IF;
5368:
5375: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5376: p_count => x_msg_count,
5377: p_data => x_msg_data);
5378:
5379: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5380: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5381: lc_mod_name||'exc_exception',
5382: 'G_EXC_ERROR Exception');
5383: END IF;
5376: p_count => x_msg_count,
5377: p_data => x_msg_data);
5378:
5379: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5380: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5381: lc_mod_name||'exc_exception',
5382: 'G_EXC_ERROR Exception');
5383: END IF;
5384:
5398: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5399: p_count => x_msg_count,
5400: p_data => x_msg_data);
5401:
5402: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5403: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5404: lc_mod_name||'others_exception',
5405: 'OTHERS Exception');
5406: END IF;
5399: p_count => x_msg_count,
5400: p_data => x_msg_data);
5401:
5402: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5403: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5404: lc_mod_name||'others_exception',
5405: 'OTHERS Exception');
5406: END IF;
5407: END PROCESS_SAVE_OP_DTLS;
5439: -- Non Standard Discrete Job Load Type
5440: lc_non_standard_load_type CONSTANT NUMBER := 4;
5441:
5442:
5443: -- COnstants used for FND_LOG debug messages
5444:
5445: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.create_wip_job';
5446:
5447:
5510:
5511:
5512: BEGIN
5513:
5514: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5515: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
5516: lc_mod_name||'begin',
5517: 'Entering Private API create_wip_job');
5518: END IF;
5511:
5512: BEGIN
5513:
5514: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5515: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
5516: lc_mod_name||'begin',
5517: 'Entering Private API create_wip_job');
5518: END IF;
5519:
5632:
5633: x_job_name := l_job_header_rec.job_name;
5634:
5635:
5636: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5637: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5638: lc_mod_name||'beforecallinsert',
5639: 'Just before calling insert_job_header');
5640: END IF;
5633: x_job_name := l_job_header_rec.job_name;
5634:
5635:
5636: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5637: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5638: lc_mod_name||'beforecallinsert',
5639: 'Just before calling insert_job_header');
5640: END IF;
5641:
5659: --If API fails, Raise error, rollback and return
5660:
5661: -- Call WIP Mass Load API
5662:
5663: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5664: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5665: lc_mod_name||'beforecallcreateonejob',
5666: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
5667: END IF;
5660:
5661: -- Call WIP Mass Load API
5662:
5663: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5664: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5665: lc_mod_name||'beforecallcreateonejob',
5666: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
5667: END IF;
5668: -- dbms_output.put_line('Before calling createonejob');
5803:
5804:
5805: -- dbms_output.put_line('In Error');
5806:
5807: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5808: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5809: lc_mod_name||'exc_exception',
5810: 'G_EXC_ERROR Exception');
5811: END IF;
5804:
5805: -- dbms_output.put_line('In Error');
5806:
5807: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5808: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5809: lc_mod_name||'exc_exception',
5810: 'G_EXC_ERROR Exception');
5811: END IF;
5812:
5819: -- and csd_repair_history tables for the job created.
5820:
5821: L_user_id := fnd_global.user_id;
5822:
5823: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5824: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5825: lc_mod_name||'beforecallxrefwrite',
5826: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
5827: END IF;
5820:
5821: L_user_id := fnd_global.user_id;
5822:
5823: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5824: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5825: lc_mod_name||'beforecallxrefwrite',
5826: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
5827: END IF;
5828:
5876:
5877: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5878: ROLLBACK to CREATE_WIP_JOB_PVT ;
5879:
5880: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5881: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5882: lc_mod_name||'exc_exception',
5883: 'G_EXC_ERROR Exception');
5884: END IF;
5877: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5878: ROLLBACK to CREATE_WIP_JOB_PVT ;
5879:
5880: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5881: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5882: lc_mod_name||'exc_exception',
5883: 'G_EXC_ERROR Exception');
5884: END IF;
5885:
5887:
5888: END IF;
5889:
5890:
5891: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5892: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5893: lc_mod_name||'beforecallhistwrite',
5894: 'Just before calling csd_to_form_repair_history.validate_and_write');
5895: END IF;
5888: END IF;
5889:
5890:
5891: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5892: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5893: lc_mod_name||'beforecallhistwrite',
5894: 'Just before calling csd_to_form_repair_history.validate_and_write');
5895: END IF;
5896:
5968:
5969: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5970: ROLLBACK to CREATE_WIP_JOB_PVT ;
5971:
5972: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5973: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5974: lc_mod_name||'exc_exception',
5975: 'G_EXC_ERROR Exception');
5976: END IF;
5969: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5970: ROLLBACK to CREATE_WIP_JOB_PVT ;
5971:
5972: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5973: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5974: lc_mod_name||'exc_exception',
5975: 'G_EXC_ERROR Exception');
5976: END IF;
5977:
5994: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5995: p_count => x_msg_count,
5996: p_data => x_msg_data);
5997:
5998: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5999: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6000: lc_mod_name||'unx_exception',
6001: 'G_EXC_UNEXPECTED_ERROR Exception');
6002: END IF;
5995: p_count => x_msg_count,
5996: p_data => x_msg_data);
5997:
5998: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5999: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6000: lc_mod_name||'unx_exception',
6001: 'G_EXC_UNEXPECTED_ERROR Exception');
6002: END IF;
6003:
6010: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6011: p_count => x_msg_count,
6012: p_data => x_msg_data);
6013:
6014: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6015: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6016: lc_mod_name||'exc_exception',
6017: 'G_EXC_ERROR Exception');
6018: END IF;
6011: p_count => x_msg_count,
6012: p_data => x_msg_data);
6013:
6014: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6015: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6016: lc_mod_name||'exc_exception',
6017: 'G_EXC_ERROR Exception');
6018: END IF;
6019:
6033: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6034: p_count => x_msg_count,
6035: p_data => x_msg_data);
6036:
6037: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6038: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6039: lc_mod_name||'others_exception',
6040: 'OTHERS Exception');
6041: END IF;
6034: p_count => x_msg_count,
6035: p_data => x_msg_data);
6036:
6037: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6038: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6039: lc_mod_name||'others_exception',
6040: 'OTHERS Exception');
6041: END IF;
6042:
6075:
6076: lc_service_code CONSTANT VARCHAR2(30) := 'SERVICE_CODE';
6077:
6078:
6079: -- Constants used for FND_LOG debug messages
6080: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.generate_wip_jobs_from_scs';
6081:
6082: l_object_version_number NUMBER;
6083: l_user_id NUMBER;
6182:
6183:
6184: BEGIN
6185:
6186: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6187: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
6188: lc_mod_name||'begin',
6189: 'Entering Private API generate_wip_jobs_from_scs');
6190: END IF;
6183:
6184: BEGIN
6185:
6186: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6187: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
6188: lc_mod_name||'begin',
6189: 'Entering Private API generate_wip_jobs_from_scs');
6190: END IF;
6191:
6305: x_job_name => l_job_header_rec.job_name );
6306: -- dbms_output.put_line('After generate job name');
6307:
6308:
6309: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6310: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6311: lc_mod_name||'beforecallinsert',
6312: 'Just before calling insert_job_header');
6313: END IF;
6306: -- dbms_output.put_line('After generate job name');
6307:
6308:
6309: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6310: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6311: lc_mod_name||'beforecallinsert',
6312: 'Just before calling insert_job_header');
6313: END IF;
6314:
6330: -- If API fails, Raise error, rollback and return
6331:
6332: -- Call WIP Mass Load API
6333:
6334: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6335: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6336: lc_mod_name||'beforecallcreateonejob',
6337: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
6338: END IF;
6331:
6332: -- Call WIP Mass Load API
6333:
6334: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6335: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6336: lc_mod_name||'beforecallcreateonejob',
6337: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
6338: END IF;
6339:
6474: -- and csd_repair_history tables for the job created.
6475:
6476: l_user_id := fnd_global.user_id;
6477:
6478: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6479: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6480: lc_mod_name||'beforecallxrefwrite',
6481: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
6482: END IF;
6475:
6476: l_user_id := fnd_global.user_id;
6477:
6478: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6479: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6480: lc_mod_name||'beforecallxrefwrite',
6481: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
6482: END IF;
6483:
6530:
6531:
6532: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6533: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
6534: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6535: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6536: lc_mod_name||'exc_exception',
6537: 'G_EXC_ERROR Exception');
6538: END IF;
6531:
6532: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6533: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
6534: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6535: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6536: lc_mod_name||'exc_exception',
6537: 'G_EXC_ERROR Exception');
6538: END IF;
6539: RETURN;
6538: END IF;
6539: RETURN;
6540: END IF;
6541:
6542: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6543: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6544: lc_mod_name||'beforecallhistwrite',
6545: 'Just before calling csd_to_form_repair_history.validate_and_write');
6546: END IF;
6539: RETURN;
6540: END IF;
6541:
6542: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6543: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6544: lc_mod_name||'beforecallhistwrite',
6545: 'Just before calling csd_to_form_repair_history.validate_and_write');
6546: END IF;
6547:
6618: -- dbms_output.put_line('after call to csd_to_form_repair_history.validate_and_write');
6619:
6620: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6621: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
6622: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6623: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6624: lc_mod_name||'exc_exception',
6625: 'G_EXC_ERROR Exception');
6626: END IF;
6619:
6620: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6621: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
6622: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6623: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6624: lc_mod_name||'exc_exception',
6625: 'G_EXC_ERROR Exception');
6626: END IF;
6627: RETURN;
6648:
6649:
6650: -- l_object_version_number := p_service_code_tbl(sc_ctr).object_version_number;
6651:
6652: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6653: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6654: lc_mod_name||'beforecallupdatesc',
6655: 'Just before calling CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
6656: END IF;
6649:
6650: -- l_object_version_number := p_service_code_tbl(sc_ctr).object_version_number;
6651:
6652: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6653: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6654: lc_mod_name||'beforecallupdatesc',
6655: 'Just before calling CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
6656: END IF;
6657:
6672: -- dbms_output.put_line('after call to CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
6673: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6674: -- dbms_output.put_line('inside return status CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
6675: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
6676: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6677: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6678: lc_mod_name||'exc_exception',
6679: 'G_EXC_ERROR Exception');
6680: END IF;
6673: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6674: -- dbms_output.put_line('inside return status CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
6675: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
6676: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6677: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6678: lc_mod_name||'exc_exception',
6679: 'G_EXC_ERROR Exception');
6680: END IF;
6681: RETURN;
6709: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6710: p_count => x_msg_count,
6711: p_data => x_msg_data);
6712:
6713: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6714: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6715: lc_mod_name||'unx_exception',
6716: 'G_EXC_UNEXPECTED_ERROR Exception');
6717: END IF;
6710: p_count => x_msg_count,
6711: p_data => x_msg_data);
6712:
6713: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6714: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6715: lc_mod_name||'unx_exception',
6716: 'G_EXC_UNEXPECTED_ERROR Exception');
6717: END IF;
6718:
6725: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6726: p_count => x_msg_count,
6727: p_data => x_msg_data);
6728:
6729: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6730: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6731: lc_mod_name||'exc_exception',
6732: 'G_EXC_ERROR Exception');
6733: END IF;
6726: p_count => x_msg_count,
6727: p_data => x_msg_data);
6728:
6729: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6730: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6731: lc_mod_name||'exc_exception',
6732: 'G_EXC_ERROR Exception');
6733: END IF;
6734:
6748: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6749: p_count => x_msg_count,
6750: p_data => x_msg_data);
6751:
6752: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6753: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6754: lc_mod_name||'others_exception',
6755: 'OTHERS Exception');
6756: END IF;
6749: p_count => x_msg_count,
6750: p_data => x_msg_data);
6751:
6752: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6753: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6754: lc_mod_name||'others_exception',
6755: 'OTHERS Exception');
6756: END IF;
6757: