408:
409: l_job_header_rec wip_job_schedule_interface%ROWTYPE := p_job_header_rec;
410:
411:
412: -- variables used for FND_LOG debug messages
413:
414: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
415: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
416: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
410:
411:
412: -- variables used for FND_LOG debug messages
413:
414: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
415: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
416: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
417:
418:
411:
412: -- variables used for FND_LOG debug messages
413:
414: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
415: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
416: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
417:
418:
419: -- Constants Used for Inserting into wip_job_schedule_interface,
437: BEGIN
438:
439:
440: IF ( l_proc_level >= l_debug_level ) then
441: FND_LOG.STRING( l_proc_level,
442: l_mod_name||'begin',
443: 'Entering procedure insert_job_header' );
444: END IF;
445:
548: END;
549:
550:
551: IF ( l_proc_level >= l_debug_level ) then
552: FND_LOG.STRING( l_proc_level,
553: l_mod_name||'end',
554: 'Leaving procedure insert_job_header');
555: END IF;
556:
573:
574: l_job_details_rec wip_job_dtls_interface%ROWTYPE := p_job_details_rec;
575:
576:
577: -- variables used for FND_LOG debug messages
578:
579: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
580: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
581: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
575:
576:
577: -- variables used for FND_LOG debug messages
578:
579: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
580: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
581: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
582:
583:
576:
577: -- variables used for FND_LOG debug messages
578:
579: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
580: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
581: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
582:
583:
584: -- Constants Used for Inserting into wip_job_schedule_interface,
602:
603: -- dbms_output.put_line('usage_rate_or_amount is ' || l_job_details_rec.usage_rate_or_amount );
604:
605: IF ( l_proc_level >= l_debug_level ) then
606: FND_LOG.STRING( l_proc_level,
607: l_mod_name||'begin',
608: 'Entering procedure insert_job_details' );
609: END IF;
610:
743: END;
744:
745:
746: IF ( l_proc_level >= l_debug_level ) then
747: FND_LOG.STRING( l_proc_level,
748: l_mod_name||'end',
749: 'Leaving procedure insert_job_details');
750: END IF;
751:
765:
766: l_transactions_interface_rec mtl_transactions_interface%ROWTYPE := p_transactions_interface_rec;
767:
768:
769: -- constant used for FND_LOG debug messages
770:
771: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_transactions_header.';
772:
773:
781:
782: BEGIN
783:
784:
785: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
786: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
787: lc_mod_name||'begin',
788: 'Entering procedure insert_transactions_header' );
789: END IF;
782: BEGIN
783:
784:
785: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
786: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
787: lc_mod_name||'begin',
788: 'Entering procedure insert_transactions_header' );
789: END IF;
790:
886: END;
887:
888:
889:
890: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
891: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
892: lc_mod_name||'end',
893: 'Leaving procedure insert_transactions_header');
894: END IF;
887:
888:
889:
890: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
891: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
892: lc_mod_name||'end',
893: 'Leaving procedure insert_transactions_header');
894: END IF;
895:
905: IS
906:
907:
908:
909: -- constant used for FND_LOG debug messages
910:
911: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.update_transactions_header.';
912:
913:
915:
916: BEGIN
917:
918:
919: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
920: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
921: lc_mod_name||'begin',
922: 'Entering procedure update_transactions_header' );
923: END IF;
916: BEGIN
917:
918:
919: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
920: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
921: lc_mod_name||'begin',
922: 'Entering procedure update_transactions_header' );
923: END IF;
924:
952: END;
953:
954:
955:
956: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
957: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
958: lc_mod_name||'end',
959: 'Leaving procedure update_transactions_header');
960: END IF;
953:
954:
955:
956: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
957: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
958: lc_mod_name||'end',
959: 'Leaving procedure update_transactions_header');
960: END IF;
961:
970: )
971: IS
972:
973:
974: -- constant used for FND_LOG debug messages
975:
976: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_transaction_lots';
977:
978:
985:
986: BEGIN
987:
988:
989: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
990: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
991: lc_mod_name||'begin',
992: 'Entering procedure insert_transaction_lots' );
993: END IF;
986: BEGIN
987:
988:
989: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
990: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
991: lc_mod_name||'begin',
992: 'Entering procedure insert_transaction_lots' );
993: END IF;
994:
1041: END;
1042:
1043:
1044:
1045: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1046: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1047: lc_mod_name||'end',
1048: 'Leaving procedure insert_transaction_lots');
1049: END IF;
1042:
1043:
1044:
1045: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1046: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1047: lc_mod_name||'end',
1048: 'Leaving procedure insert_transaction_lots');
1049: END IF;
1050:
1059: )
1060: IS
1061:
1062:
1063: -- constant used for FND_LOG debug messages
1064:
1065: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_upd_serial_numbers.';
1066:
1067:
1075:
1076: BEGIN
1077:
1078:
1079: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1080: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1081: lc_mod_name||'begin',
1082: 'Entering procedure insert_upd_serial_numbers' );
1083: END IF;
1076: BEGIN
1077:
1078:
1079: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1080: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1081: lc_mod_name||'begin',
1082: 'Entering procedure insert_upd_serial_numbers' );
1083: END IF;
1084:
1150: END;
1151:
1152: END IF;
1153:
1154: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1155: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1156: lc_mod_name||'end',
1157: 'Leaving procedure insert_upd_serial_numbers');
1158: END IF;
1151:
1152: END IF;
1153:
1154: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1155: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1156: lc_mod_name||'end',
1157: 'Leaving procedure insert_upd_serial_numbers');
1158: END IF;
1159:
1169: IS
1170:
1171:
1172:
1173: -- constant used for FND_LOG debug messages
1174:
1175: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_transactions_header.';
1176:
1177:
1199:
1200: BEGIN
1201:
1202:
1203: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1204: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1205: lc_mod_name||'begin',
1206: 'Entering procedure insert_wip_cost_txn' );
1207: END IF;
1200: BEGIN
1201:
1202:
1203: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1204: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1205: lc_mod_name||'begin',
1206: 'Entering procedure insert_wip_cost_txn' );
1207: END IF;
1208:
1287:
1288: END;
1289:
1290:
1291: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1292: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1293: lc_mod_name||'end',
1294: 'Leaving procedure insert_transactions_header');
1295: END IF;
1288: END;
1289:
1290:
1291: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1292: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1293: lc_mod_name||'end',
1294: 'Leaving procedure insert_transactions_header');
1295: END IF;
1296:
1306: IS
1307:
1308:
1309:
1310: -- constant used for FND_LOG debug messages
1311:
1312: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_wip_move_txn';
1313:
1314:
1334:
1335: BEGIN
1336:
1337:
1338: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1339: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1340: lc_mod_name||'begin',
1341: 'Entering procedure insert_wip_move_txn' );
1342: END IF;
1335: BEGIN
1336:
1337:
1338: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1339: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1340: lc_mod_name||'begin',
1341: 'Entering procedure insert_wip_move_txn' );
1342: END IF;
1343:
1416:
1417: END;
1418:
1419:
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||'end',
1423: 'Leaving procedure insert_wip_move_txn');
1424: END IF;
1417: END;
1418:
1419:
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||'end',
1423: 'Leaving procedure insert_wip_move_txn');
1424: END IF;
1425:
1608: IS
1609: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_JOB_COMP_TXN';
1610: lc_api_version_number CONSTANT NUMBER := 1.0;
1611:
1612: -- constants used for FND_LOG debug messages
1613: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_job_comp_txn';
1614:
1615: l_need_details_flag VARCHAR2(1) := 'F';
1616: l_transaction_header_id NUMBER;
1615: l_need_details_flag VARCHAR2(1) := 'F';
1616: l_transaction_header_id NUMBER;
1617:
1618: BEGIN
1619: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1620: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1621: lc_mod_name||'begin',
1622: 'Entering private API process_job_comp_txn' );
1623: END IF;
1616: l_transaction_header_id NUMBER;
1617:
1618: BEGIN
1619: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1620: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1621: lc_mod_name||'begin',
1622: 'Entering private API process_job_comp_txn' );
1623: END IF;
1624:
1637: END IF;
1638:
1639: x_return_status := FND_API.G_RET_STS_SUCCESS;
1640:
1641: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1642: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1643: lc_mod_name||'beforecallinsertjobcomptxn',
1644: 'Just before calling insert_job_comp_txn');
1645: END IF;
1638:
1639: x_return_status := FND_API.G_RET_STS_SUCCESS;
1640:
1641: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1642: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1643: lc_mod_name||'beforecallinsertjobcomptxn',
1644: 'Just before calling insert_job_comp_txn');
1645: END IF;
1646: insert_job_comp_txn (
1663: END IF;
1664:
1665: -- if no need for details, then we can process transactions and commit
1666: IF l_need_details_flag = 'F' THEN
1667: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1668: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1669: lc_mod_name||'beforecallprocesstxn',
1670: 'Just before calling process_mti_transactions');
1671: END IF;
1664:
1665: -- if no need for details, then we can process transactions and commit
1666: IF l_need_details_flag = 'F' THEN
1667: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1668: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1669: lc_mod_name||'beforecallprocesstxn',
1670: 'Just before calling process_mti_transactions');
1671: END IF;
1672: process_mti_transactions(
1704: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1705: p_count => x_msg_count,
1706: p_data => x_msg_data);
1707:
1708: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1709: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1710: lc_mod_name||'unx_exception',
1711: 'G_EXC_UNEXPECTED_ERROR Exception');
1712: END IF;
1705: p_count => x_msg_count,
1706: p_data => x_msg_data);
1707:
1708: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1709: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1710: lc_mod_name||'unx_exception',
1711: 'G_EXC_UNEXPECTED_ERROR Exception');
1712: END IF;
1713:
1719: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1720: p_count => x_msg_count,
1721: p_data => x_msg_data);
1722:
1723: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1724: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
1725: lc_mod_name||'exc_exception',
1726: 'G_EXC_ERROR Exception');
1727: END IF;
1720: p_count => x_msg_count,
1721: p_data => x_msg_data);
1722:
1723: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1724: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
1725: lc_mod_name||'exc_exception',
1726: 'G_EXC_ERROR Exception');
1727: END IF;
1728:
1740: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1741: p_count => x_msg_count,
1742: p_data => x_msg_data);
1743:
1744: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1745: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1746: lc_mod_name||'others_exception',
1747: 'OTHERS Exception');
1748: END IF;
1741: p_count => x_msg_count,
1742: p_data => x_msg_data);
1743:
1744: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1745: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1746: lc_mod_name||'others_exception',
1747: 'OTHERS Exception');
1748: END IF;
1749: END process_job_comp_txn;
1773:
1774: lc_api_name CONSTANT VARCHAR2(30) := 'INSERT_JOB_COMP_TXN';
1775: lc_api_version_number CONSTANT NUMBER := 1.0;
1776:
1777: -- constants used for FND_LOG debug messages
1778: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.insert_job_comp_txn';
1779:
1780: lc_revision_controlled CONSTANT NUMBER := 2;
1781: lc_full_lot_control CONSTANT NUMBER := 2;
1907: organization_id = p_organization_id and
1908: inventory_item_id = p_inventory_item_id;
1909:
1910: BEGIN
1911: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1912: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1913: lc_mod_name||'begin',
1914: 'Entering private API insert_job_comp_txn' );
1915: END IF;
1908: inventory_item_id = p_inventory_item_id;
1909:
1910: BEGIN
1911: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1912: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1913: lc_mod_name||'begin',
1914: 'Entering private API insert_job_comp_txn' );
1915: END IF;
1916:
2069:
2070: --insert into table mtl_transactions_interface
2071: FOR l_qty_ctr IN 1..l_transaction_quantity
2072: LOOP
2073: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2074: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2075: lc_mod_name||'beforecallinserttxnshdr',
2076: 'Just before calling insert_transactions_header');
2077: END IF;
2070: --insert into table mtl_transactions_interface
2071: FOR l_qty_ctr IN 1..l_transaction_quantity
2072: LOOP
2073: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2074: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2075: lc_mod_name||'beforecallinserttxnshdr',
2076: 'Just before calling insert_transactions_header');
2077: END IF;
2078: -- Support job completion for average costing method bug#9453092, Subhat
2113: END IF;
2114: END LOOP;
2115: ELSE -- Quantity = 1
2116: --insert into table mtl_transactions_interface
2117: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2118: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2119: lc_mod_name||'beforecallinserttxnshdr',
2120: 'Just before calling insert_transactions_header');
2121: END IF;
2114: END LOOP;
2115: ELSE -- Quantity = 1
2116: --insert into table mtl_transactions_interface
2117: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2118: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2119: lc_mod_name||'beforecallinserttxnshdr',
2120: 'Just before calling insert_transactions_header');
2121: END IF;
2122:
2156: l_transactions_interface_rec.source_line_id := -1;
2157: END IF;
2158:
2159: --insert into table mtl_transactions_interface
2160: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2161: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2162: lc_mod_name||'beforecallinserttxnshdr',
2163: 'Just before calling insert_transactions_header');
2164: END IF;
2157: END IF;
2158:
2159: --insert into table mtl_transactions_interface
2160: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2161: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2162: lc_mod_name||'beforecallinserttxnshdr',
2163: 'Just before calling insert_transactions_header');
2164: END IF;
2165:
2210: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2211: p_count => x_msg_count,
2212: p_data => x_msg_data);
2213:
2214: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2215: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2216: lc_mod_name||'unx_exception',
2217: 'G_EXC_UNEXPECTED_ERROR Exception');
2218: END IF;
2211: p_count => x_msg_count,
2212: p_data => x_msg_data);
2213:
2214: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2215: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2216: lc_mod_name||'unx_exception',
2217: 'G_EXC_UNEXPECTED_ERROR Exception');
2218: END IF;
2219:
2226: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2227: p_count => x_msg_count,
2228: p_data => x_msg_data);
2229:
2230: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2231: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2232: lc_mod_name||'exc_exception',
2233: 'G_EXC_ERROR Exception');
2234: END IF;
2227: p_count => x_msg_count,
2228: p_data => x_msg_data);
2229:
2230: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2231: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2232: lc_mod_name||'exc_exception',
2233: 'G_EXC_ERROR Exception');
2234: END IF;
2235:
2249: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2250: p_count => x_msg_count,
2251: p_data => x_msg_data);
2252:
2253: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2254: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2255: lc_mod_name||'others_exception',
2256: 'OTHERS Exception');
2257: END IF;
2250: p_count => x_msg_count,
2251: p_data => x_msg_data);
2252:
2253: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2254: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2255: lc_mod_name||'others_exception',
2256: 'OTHERS Exception');
2257: END IF;
2258: END insert_job_comp_txn;
2271: IS
2272: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_MTI_TRANSACTIONS';
2273: lc_api_version_number CONSTANT NUMBER := 1.0;
2274:
2275: -- constants used for FND_LOG debug messages
2276: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_mti_transactions';
2277:
2278: lc_MTI_source_table CONSTANT NUMBER := 1;
2279:
2283: --subhat, FedEx material updates changes.
2284: -- swai: bug 13820264, FP of bug#13797285, subhat
2285: l_wip_entity_ids JTF_NUMBER_TABLE := JTF_NUMBER_TABLE();
2286: BEGIN
2287: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2288: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2289: lc_mod_name||'begin',
2290: 'Entering private API process_mti_transactions' );
2291: END IF;
2284: -- swai: bug 13820264, FP of bug#13797285, subhat
2285: l_wip_entity_ids JTF_NUMBER_TABLE := JTF_NUMBER_TABLE();
2286: BEGIN
2287: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2288: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2289: lc_mod_name||'begin',
2290: 'Entering private API process_mti_transactions' );
2291: END IF;
2292:
2315:
2316: -- Populate the constant values
2317: l_table := lc_MTI_source_table;
2318:
2319: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2320: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2321: lc_mod_name||'beforecallprocesstxns',
2322: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
2323: END IF;
2316: -- Populate the constant values
2317: l_table := lc_MTI_source_table;
2318:
2319: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2320: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2321: lc_mod_name||'beforecallprocesstxns',
2322: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
2323: END IF;
2324:
2340: --bug#14456229 --14497341
2341: if (p_txn_header_id is not null) then
2342: IF (nvl(fnd_profile.value('MRP_DEBUG'),'Y') = 'N') THEN
2343:
2344: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2345: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2346: lc_mod_name||'Error',
2347: 'delete from mtl_transactions_interface');
2348: END IF;
2341: if (p_txn_header_id is not null) then
2342: IF (nvl(fnd_profile.value('MRP_DEBUG'),'Y') = 'N') THEN
2343:
2344: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2345: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2346: lc_mod_name||'Error',
2347: 'delete from mtl_transactions_interface');
2348: END IF;
2349:
2346: lc_mod_name||'Error',
2347: 'delete from mtl_transactions_interface');
2348: END IF;
2349:
2350: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2351: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2352: lc_mod_name||'Error',
2353: 'p_txn_header_id :' ||p_txn_header_id );
2354: END IF;
2347: 'delete from mtl_transactions_interface');
2348: END IF;
2349:
2350: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2351: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2352: lc_mod_name||'Error',
2353: 'p_txn_header_id :' ||p_txn_header_id );
2354: END IF;
2355:
2403: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2404: p_count => x_msg_count,
2405: p_data => x_msg_data);
2406:
2407: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2408: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2409: lc_mod_name||'unx_exception',
2410: 'G_EXC_UNEXPECTED_ERROR Exception');
2411: END IF;
2404: p_count => x_msg_count,
2405: p_data => x_msg_data);
2406:
2407: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2408: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2409: lc_mod_name||'unx_exception',
2410: 'G_EXC_UNEXPECTED_ERROR Exception');
2411: END IF;
2412:
2423: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2424: p_count => x_msg_count,
2425: p_data => x_msg_data);
2426:
2427: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2428: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2429: lc_mod_name||'exc_exception',
2430: 'G_EXC_ERROR Exception');
2431: END IF;
2424: p_count => x_msg_count,
2425: p_data => x_msg_data);
2426:
2427: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2428: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2429: lc_mod_name||'exc_exception',
2430: 'G_EXC_ERROR Exception');
2431: END IF;
2432:
2444: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2445: p_count => x_msg_count,
2446: p_data => x_msg_data);
2447:
2448: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2449: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2450: lc_mod_name||'others_exception',
2451: 'OTHERS Exception');
2452: END IF;
2445: p_count => x_msg_count,
2446: p_data => x_msg_data);
2447:
2448: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2449: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2450: lc_mod_name||'others_exception',
2451: 'OTHERS Exception');
2452: END IF;
2453: END process_mti_transactions;
2466: IS
2467: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_OPER_COMP_TXN';
2468: lc_api_version_number CONSTANT NUMBER := 1.0;
2469:
2470: -- constants used for FND_LOG debug messages
2471:
2472: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_oper_comp_txn';
2473:
2474: -- Indicates that the process Phase is Validation
2537:
2538:
2539: BEGIN
2540:
2541: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2542: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2543: lc_mod_name||'begin',
2544: 'Entering private API process_oper_comp_txn' );
2545: END IF;
2538:
2539: BEGIN
2540:
2541: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2542: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2543: lc_mod_name||'begin',
2544: 'Entering private API process_oper_comp_txn' );
2545: END IF;
2546:
2647: l_prev_to_operation_seq_num := l_wip_move_txn_interface_rec.to_operation_seq_num;
2648: l_prev_transaction_quantity := l_wip_move_txn_interface_rec.transaction_quantity;
2649:
2650: --insert into table wip_move_txn_interface
2651: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2652: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2653: lc_mod_name||'beforecallinsertwipmvtxn',
2654: 'Just before calling insert_wip_move_txn');
2655: END IF;
2648: l_prev_transaction_quantity := l_wip_move_txn_interface_rec.transaction_quantity;
2649:
2650: --insert into table wip_move_txn_interface
2651: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2652: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2653: lc_mod_name||'beforecallinsertwipmvtxn',
2654: 'Just before calling insert_wip_move_txn');
2655: END IF;
2656:
2669: fetch get_material_transaction_id into l_material_transaction_id;
2670: close get_material_transaction_id;
2671: */
2672:
2673: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2674: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2675: lc_mod_name||'beforecallprocesstxns',
2676: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
2677: END IF;
2670: close get_material_transaction_id;
2671: */
2672:
2673: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2674: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2675: lc_mod_name||'beforecallprocesstxns',
2676: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
2677: END IF;
2678:
2727: FND_MSG_PUB.ADD;
2728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
2729:
2730:
2731: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2732: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2733: lc_mod_name||'exc_exception',
2734: 'G_EXC_ERROR Exception');
2735: END IF;
2728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
2729:
2730:
2731: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2732: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2733: lc_mod_name||'exc_exception',
2734: 'G_EXC_ERROR Exception');
2735: END IF;
2736:
2753: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2754: p_count => x_msg_count,
2755: p_data => x_msg_data);
2756:
2757: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2758: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2759: lc_mod_name||'unx_exception',
2760: 'G_EXC_UNEXPECTED_ERROR Exception');
2761: END IF;
2754: p_count => x_msg_count,
2755: p_data => x_msg_data);
2756:
2757: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2758: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2759: lc_mod_name||'unx_exception',
2760: 'G_EXC_UNEXPECTED_ERROR Exception');
2761: END IF;
2762:
2769: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2770: p_count => x_msg_count,
2771: p_data => x_msg_data);
2772:
2773: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2774: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2775: lc_mod_name||'exc_exception',
2776: 'G_EXC_ERROR Exception');
2777: END IF;
2770: p_count => x_msg_count,
2771: p_data => x_msg_data);
2772:
2773: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2774: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2775: lc_mod_name||'exc_exception',
2776: 'G_EXC_ERROR Exception');
2777: END IF;
2778:
2792: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2793: p_count => x_msg_count,
2794: p_data => x_msg_data);
2795:
2796: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2797: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2798: lc_mod_name||'others_exception',
2799: 'OTHERS Exception');
2800: END IF;
2793: p_count => x_msg_count,
2794: p_data => x_msg_data);
2795:
2796: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2797: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2798: lc_mod_name||'others_exception',
2799: 'OTHERS Exception');
2800: END IF;
2801:
2820:
2821: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_ISSUE_MTL_TXN';
2822: lc_api_version_number CONSTANT NUMBER := 1.0;
2823:
2824: -- constants used for FND_LOG debug messages
2825:
2826: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_issue_mtl_txn';
2827:
2828:
2918:
2919:
2920: BEGIN
2921:
2922: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2923: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2924: lc_mod_name||'begin',
2925: 'Entering private API process_issue_mtl_txn' );
2926: END IF;
2919:
2920: BEGIN
2921:
2922: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2923: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2924: lc_mod_name||'begin',
2925: 'Entering private API process_issue_mtl_txn' );
2926: END IF;
2927:
3204:
3205:
3206: --insert into table mtl_transactions_interface
3207:
3208: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3209: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3210: lc_mod_name||'beforecallinserttxnshdr',
3211: 'Just before calling insert_transactions_header');
3212: END IF;
3205:
3206: --insert into table mtl_transactions_interface
3207:
3208: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3209: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3210: lc_mod_name||'beforecallinserttxnshdr',
3211: 'Just before calling insert_transactions_header');
3212: END IF;
3213:
3245: l_srl_nmbrs_interface_rec.transaction_interface_id := l_transactions_interface_rec.transaction_interface_id;
3246:
3247: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
3248:
3249: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3250: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3251: lc_mod_name||'beforecallinsertsrlnmbrs',
3252: 'Just before calling insert_upd_serial_numbers');
3253: END IF;
3246:
3247: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
3248:
3249: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3250: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3251: lc_mod_name||'beforecallinsertsrlnmbrs',
3252: 'Just before calling insert_upd_serial_numbers');
3253: END IF;
3254:
3278: end if;
3279:
3280: --insert into table mtl_transactions_interface
3281:
3282: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3283: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3284: lc_mod_name||'beforecallinserttxnshdr',
3285: 'Just before calling insert_transactions_header');
3286: END IF;
3279:
3280: --insert into table mtl_transactions_interface
3281:
3282: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3283: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3284: lc_mod_name||'beforecallinserttxnshdr',
3285: 'Just before calling insert_transactions_header');
3286: END IF;
3287:
3311:
3312:
3313: --insert into table mtl_transactions_interface
3314:
3315: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3316: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3317: lc_mod_name||'beforecallinserttxnshdr',
3318: 'Just before calling insert_transactions_header');
3319: END IF;
3312:
3313: --insert into table mtl_transactions_interface
3314:
3315: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3316: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3317: lc_mod_name||'beforecallinserttxnshdr',
3318: 'Just before calling insert_transactions_header');
3319: END IF;
3320:
3389:
3390: -- Call procedures to insert job header and job details information
3391: -- into wip interface tables
3392:
3393: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3394: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3395: lc_mod_name||'beforecallinsertjob',
3396: 'Just before calling insert_job_header');
3397: END IF;
3390: -- Call procedures to insert job header and job details information
3391: -- into wip interface tables
3392:
3393: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3394: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3395: lc_mod_name||'beforecallinsertjob',
3396: 'Just before calling insert_job_header');
3397: END IF;
3398:
3405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3406: END IF;
3407:
3408:
3409: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3410: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3411: lc_mod_name||'beforecallinsertjobdtls',
3412: 'Just before calling insert_job_details');
3413: END IF;
3406: END IF;
3407:
3408:
3409: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3410: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3411: lc_mod_name||'beforecallinsertjobdtls',
3412: 'Just before calling insert_job_details');
3413: END IF;
3414:
3432: ---- Update CSD_WIP_TRANSACTION_DETAILS rows to have null values
3433:
3434: If p_mtl_txn_dtls_tbl(mtl_ctr).WIP_TRANSACTION_DETAIL_ID is not null then
3435:
3436: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3437: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3438: lc_mod_name||'beforecallupdaterow',
3439: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
3440: END IF;
3433:
3434: If p_mtl_txn_dtls_tbl(mtl_ctr).WIP_TRANSACTION_DETAIL_ID is not null then
3435:
3436: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3437: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3438: lc_mod_name||'beforecallupdaterow',
3439: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
3440: END IF;
3441:
3494: x_transaction_header_id := l_transactions_interface_rec.transaction_header_id;
3495:
3496: END IF;
3497:
3498: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3499: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3500: lc_mod_name||'beforecallprocesstxns',
3501: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
3502: END IF;
3495:
3496: END IF;
3497:
3498: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3499: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3500: lc_mod_name||'beforecallprocesstxns',
3501: 'Just before calling INV_TXN_MANAGER_PUB.process_Transactions');
3502: END IF;
3503:
3619: RETURN; */
3620: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3621:
3622:
3623: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3624: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3625: lc_mod_name||'exc_exception',
3626: 'G_EXC_ERROR Exception');
3627: END IF;
3620: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3621:
3622:
3623: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3624: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3625: lc_mod_name||'exc_exception',
3626: 'G_EXC_ERROR Exception');
3627: END IF;
3628:
3706: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3707: p_count => x_msg_count,
3708: p_data => x_msg_data);
3709:
3710: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3711: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3712: lc_mod_name||'unx_exception',
3713: 'G_EXC_UNEXPECTED_ERROR Exception');
3714: END IF;
3707: p_count => x_msg_count,
3708: p_data => x_msg_data);
3709:
3710: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3711: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3712: lc_mod_name||'unx_exception',
3713: 'G_EXC_UNEXPECTED_ERROR Exception');
3714: END IF;
3715:
3722: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3723: p_count => x_msg_count,
3724: p_data => x_msg_data);
3725:
3726: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3727: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3728: lc_mod_name||'exc_exception',
3729: 'G_EXC_ERROR Exception');
3730: END IF;
3723: p_count => x_msg_count,
3724: p_data => x_msg_data);
3725:
3726: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3727: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3728: lc_mod_name||'exc_exception',
3729: 'G_EXC_ERROR Exception');
3730: END IF;
3731:
3746: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3747: p_count => x_msg_count,
3748: p_data => x_msg_data);
3749:
3750: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3751: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3752: lc_mod_name||'others_exception',
3753: 'OTHERS Exception');
3754: END IF;
3747: p_count => x_msg_count,
3748: p_data => x_msg_data);
3749:
3750: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3751: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3752: lc_mod_name||'others_exception',
3753: 'OTHERS Exception');
3754: END IF;
3755:
3776: IS
3777: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_ISSUE_MTL_TXNS_LOT_SRL';
3778: lc_api_version_number CONSTANT NUMBER := 1.0;
3779:
3780: -- constants used for FND_LOG debug messages
3781: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_issue_mtl_txns_lot_srl';
3782:
3783: BEGIN
3784: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3780: -- constants used for FND_LOG debug messages
3781: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_issue_mtl_txns_lot_srl';
3782:
3783: BEGIN
3784: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3785: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3786: lc_mod_name||'begin',
3787: 'Entering private API process_issue_mtl_txns_lot_srl' );
3788: END IF;
3781: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_issue_mtl_txns_lot_srl';
3782:
3783: BEGIN
3784: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3785: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3786: lc_mod_name||'begin',
3787: 'Entering private API process_issue_mtl_txns_lot_srl' );
3788: END IF;
3789:
3803: END IF;
3804:
3805: x_return_status := FND_API.G_RET_STS_SUCCESS;
3806:
3807: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3808: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3809: lc_mod_name||'beforecallinsertjobcomptxn',
3810: 'Just before calling insert_job_comp_txn');
3811: END IF;
3804:
3805: x_return_status := FND_API.G_RET_STS_SUCCESS;
3806:
3807: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3808: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3809: lc_mod_name||'beforecallinsertjobcomptxn',
3810: 'Just before calling insert_job_comp_txn');
3811: END IF;
3812: update_mtl_txns_lot_srl (
3825: FND_MSG_PUB.ADD;
3826: RAISE FND_API.G_EXC_ERROR;
3827: END IF;
3828:
3829: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3830: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3831: lc_mod_name||'beforecallprocesstxn',
3832: 'Just before calling process_mti_transactions');
3833: END IF;
3826: RAISE FND_API.G_EXC_ERROR;
3827: END IF;
3828:
3829: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3830: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3831: lc_mod_name||'beforecallprocesstxn',
3832: 'Just before calling process_mti_transactions');
3833: END IF;
3834: process_mti_transactions(
3862: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3863: p_count => x_msg_count,
3864: p_data => x_msg_data);
3865:
3866: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3867: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3868: lc_mod_name||'unx_exception',
3869: 'G_EXC_UNEXPECTED_ERROR Exception');
3870: END IF;
3863: p_count => x_msg_count,
3864: p_data => x_msg_data);
3865:
3866: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3867: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3868: lc_mod_name||'unx_exception',
3869: 'G_EXC_UNEXPECTED_ERROR Exception');
3870: END IF;
3871:
3876: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3877: p_count => x_msg_count,
3878: p_data => x_msg_data);
3879:
3880: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3881: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3882: lc_mod_name||'exc_exception',
3883: 'G_EXC_ERROR Exception');
3884: END IF;
3877: p_count => x_msg_count,
3878: p_data => x_msg_data);
3879:
3880: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3881: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3882: lc_mod_name||'exc_exception',
3883: 'G_EXC_ERROR Exception');
3884: END IF;
3885:
3897: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3898: p_count => x_msg_count,
3899: p_data => x_msg_data);
3900:
3901: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3902: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3903: lc_mod_name||'others_exception',
3904: 'OTHERS Exception');
3905: END IF;
3898: p_count => x_msg_count,
3899: p_data => x_msg_data);
3900:
3901: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3902: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
3903: lc_mod_name||'others_exception',
3904: 'OTHERS Exception');
3905: END IF;
3906: END process_issue_mtl_txns_lot_srl;
3924: IS
3925: lc_api_name CONSTANT VARCHAR2(30) := 'UPDATE_MTL_TXNS_LOT_SRL';
3926: lc_api_version_number CONSTANT NUMBER := 1.0;
3927:
3928: -- constants used for FND_LOG debug messages
3929: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.update_mtl_txns_lot_srl';
3930:
3931: lc_revision_controlled CONSTANT NUMBER := 2;
3932: lc_full_lot_control CONSTANT NUMBER := 2;
3942: SELECT mtl_material_transactions_s.nextval from dual;
3943:
3944: BEGIN
3945:
3946: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3947: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3948: lc_mod_name||'begin',
3949: 'Entering private API update_mtl_txns_lot_srl' );
3950: END IF;
3943:
3944: BEGIN
3945:
3946: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3947: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3948: lc_mod_name||'begin',
3949: 'Entering private API update_mtl_txns_lot_srl' );
3950: END IF;
3951:
3975: l_transactions_interface_rec.source_line_id := p_mtl_txn_dtls_tbl(mtl_ctr).operation_seq_num;
3976: l_transactions_interface_rec.reason_id := p_mtl_txn_dtls_tbl(mtl_ctr).reason_id; -- swai bug 6841113
3977:
3978: --Update table mtl_transactions_interface
3979: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3980: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3981: lc_mod_name||'beforecallupdtxnhdr',
3982: 'Just before calling update_transactions_header');
3983: END IF;
3976: l_transactions_interface_rec.reason_id := p_mtl_txn_dtls_tbl(mtl_ctr).reason_id; -- swai bug 6841113
3977:
3978: --Update table mtl_transactions_interface
3979: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3980: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3981: lc_mod_name||'beforecallupdtxnhdr',
3982: 'Just before calling update_transactions_header');
3983: END IF;
3984:
4003:
4004: l_srl_nmbrs_interface_rec.transaction_interface_id := l_txn_lots_interface_rec.serial_transaction_temp_id;
4005: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
4006:
4007: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4008: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4009: lc_mod_name||'beforecallinsertsrlnmbrs',
4010: 'Just before calling insert_upd_serial_numbers');
4011: END IF;
4004: l_srl_nmbrs_interface_rec.transaction_interface_id := l_txn_lots_interface_rec.serial_transaction_temp_id;
4005: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
4006:
4007: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4008: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4009: lc_mod_name||'beforecallinsertsrlnmbrs',
4010: 'Just before calling insert_upd_serial_numbers');
4011: END IF;
4012:
4017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4018: END IF;
4019: END IF;
4020:
4021: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4022: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4023: lc_mod_name||'beforecallinserttxnslots',
4024: 'Just before calling insert_transaction_lots');
4025: END IF;
4018: END IF;
4019: END IF;
4020:
4021: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4022: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4023: lc_mod_name||'beforecallinserttxnslots',
4024: 'Just before calling insert_transaction_lots');
4025: END IF;
4026:
4034: IF p_mtl_txn_dtls_tbl(mtl_ctr).SERIAL_NUMBER_CONTROL_CODE in ( lc_predefined_serial_control , lc_inven_rct_srl_control ) THEN
4035: l_srl_nmbrs_interface_rec.transaction_interface_id := l_transactions_interface_rec.transaction_interface_id;
4036: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
4037:
4038: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4039: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4040: lc_mod_name||'beforecallinsertsrlnbrs',
4041: 'Just before calling insert_upd_serial_numbers');
4042: END IF;
4035: l_srl_nmbrs_interface_rec.transaction_interface_id := l_transactions_interface_rec.transaction_interface_id;
4036: l_srl_nmbrs_interface_rec.fm_serial_number := p_mtl_txn_dtls_tbl(mtl_ctr).serial_number;
4037:
4038: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4039: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4040: lc_mod_name||'beforecallinsertsrlnbrs',
4041: 'Just before calling insert_upd_serial_numbers');
4042: END IF;
4043:
4065: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4066: p_count => x_msg_count,
4067: p_data => x_msg_data);
4068:
4069: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4070: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4071: lc_mod_name||'unx_exception',
4072: 'G_EXC_UNEXPECTED_ERROR Exception');
4073: END IF;
4066: p_count => x_msg_count,
4067: p_data => x_msg_data);
4068:
4069: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4070: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4071: lc_mod_name||'unx_exception',
4072: 'G_EXC_UNEXPECTED_ERROR Exception');
4073: END IF;
4074:
4079: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4080: p_count => x_msg_count,
4081: p_data => x_msg_data);
4082:
4083: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4084: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4085: lc_mod_name||'exc_exception',
4086: 'G_EXC_ERROR Exception');
4087: END IF;
4080: p_count => x_msg_count,
4081: p_data => x_msg_data);
4082:
4083: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4084: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4085: lc_mod_name||'exc_exception',
4086: 'G_EXC_ERROR Exception');
4087: END IF;
4088:
4100: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4101: p_count => x_msg_count,
4102: p_data => x_msg_data);
4103:
4104: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4105: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4106: lc_mod_name||'others_exception',
4107: 'OTHERS Exception');
4108: END IF;
4101: p_count => x_msg_count,
4102: p_data => x_msg_data);
4103:
4104: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4105: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4106: lc_mod_name||'others_exception',
4107: 'OTHERS Exception');
4108: END IF;
4109: END update_mtl_txns_lot_srl;
4125:
4126: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_TRANSACT_RES_TXN';
4127: lc_api_version_number CONSTANT NUMBER := 1.0;
4128:
4129: -- constants used for FND_LOG debug messages
4130:
4131: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_transact_res_txn';
4132:
4133:
4166:
4167:
4168: BEGIN
4169:
4170: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4171: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
4172: lc_mod_name||'begin',
4173: 'Entering private API process_transact_res_txn' );
4174: END IF;
4167:
4168: BEGIN
4169:
4170: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4171: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
4172: lc_mod_name||'begin',
4173: 'Entering private API process_transact_res_txn' );
4174: END IF;
4175:
4299: l_wip_cost_txn_interface_rec.employee_num := p_res_txn_dtls_tbl(res_ctr).employee_num;
4300:
4301: --insert into table wip_cost_txn_interface
4302:
4303: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4304: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4305: lc_mod_name||'beforecallinsertwipcosttxn',
4306: 'Just before calling insert_wip_cost_txn');
4307: END IF;
4300:
4301: --insert into table wip_cost_txn_interface
4302:
4303: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4304: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4305: lc_mod_name||'beforecallinsertwipcosttxn',
4306: 'Just before calling insert_wip_cost_txn');
4307: END IF;
4308:
4392:
4393: -- Call procedures to insert job header and job details information
4394: -- into wip interface tables
4395:
4396: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4397: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4398: lc_mod_name||'beforecallinsertjob',
4399: 'Just before calling insert_job_header');
4400: END IF;
4393: -- Call procedures to insert job header and job details information
4394: -- into wip interface tables
4395:
4396: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4397: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4398: lc_mod_name||'beforecallinsertjob',
4399: 'Just before calling insert_job_header');
4400: END IF;
4401:
4408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4409: END IF;
4410:
4411:
4412: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4413: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4414: lc_mod_name||'beforecallinsertjobdtls',
4415: 'Just before calling insert_job_details');
4416: END IF;
4409: END IF;
4410:
4411:
4412: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4413: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4414: lc_mod_name||'beforecallinsertjobdtls',
4415: 'Just before calling insert_job_details');
4416: END IF;
4417:
4429: ---- Update CSD_WIP_TRANSACTION_DETAILS rows to have null values
4430:
4431: If p_res_txn_dtls_tbl(res_ctr).WIP_TRANSACTION_DETAIL_ID is not null then
4432:
4433: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4434: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4435: lc_mod_name||'beforecallupdaterow',
4436: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
4437: END IF;
4430:
4431: If p_res_txn_dtls_tbl(res_ctr).WIP_TRANSACTION_DETAIL_ID is not null then
4432:
4433: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4434: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4435: lc_mod_name||'beforecallupdaterow',
4436: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
4437: END IF;
4438:
4549: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4550: */
4551:
4552:
4553: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4554: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4555: lc_mod_name||'exc_exception',
4556: 'G_EXC_ERROR Exception');
4557: END IF;
4550: */
4551:
4552:
4553: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4554: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4555: lc_mod_name||'exc_exception',
4556: 'G_EXC_ERROR Exception');
4557: END IF;
4558:
4577: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4578: p_count => x_msg_count,
4579: p_data => x_msg_data);
4580:
4581: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4582: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4583: lc_mod_name||'unx_exception',
4584: 'G_EXC_UNEXPECTED_ERROR Exception');
4585: END IF;
4578: p_count => x_msg_count,
4579: p_data => x_msg_data);
4580:
4581: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4582: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4583: lc_mod_name||'unx_exception',
4584: 'G_EXC_UNEXPECTED_ERROR Exception');
4585: END IF;
4586:
4593: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4594: p_count => x_msg_count,
4595: p_data => x_msg_data);
4596:
4597: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4598: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4599: lc_mod_name||'exc_exception',
4600: 'G_EXC_ERROR Exception');
4601: END IF;
4594: p_count => x_msg_count,
4595: p_data => x_msg_data);
4596:
4597: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4598: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
4599: lc_mod_name||'exc_exception',
4600: 'G_EXC_ERROR Exception');
4601: END IF;
4602:
4616: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4617: p_count => x_msg_count,
4618: p_data => x_msg_data);
4619:
4620: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4621: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4622: lc_mod_name||'others_exception',
4623: 'OTHERS Exception');
4624: END IF;
4617: p_count => x_msg_count,
4618: p_data => x_msg_data);
4619:
4620: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4621: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
4622: lc_mod_name||'others_exception',
4623: 'OTHERS Exception');
4624: END IF;
4625:
4645: IS
4646: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_SAVE_CSD_MTL_TXN_DTLS';
4647: lc_api_version_number CONSTANT NUMBER := 1.0;
4648:
4649: -- constants used for FND_LOG debug messages
4650: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_save_mtl_txn_dtls';
4651:
4652: -- Constants Used for Inserting into wip_job_schedule_interface,
4653: -- These are the values needed for WIP Mass Load to pick up the records
4754: and organization_id = p_organization_id;
4755:
4756: BEGIN
4757:
4758: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
4760: lc_mod_name||'begin',
4761: 'Entering private API process_save_mtl_txn_dtls' );
4762: END IF;
4755:
4756: BEGIN
4757:
4758: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
4760: lc_mod_name||'begin',
4761: 'Entering private API process_save_mtl_txn_dtls' );
4762: END IF;
4763:
4907:
4908: --bug#8465719 begin
4909: l_job_details_rec.SUPPLY_LOCATOR_ID := p_mtl_txn_dtls_tbl(mtl_ctr).supply_locator_id;
4910:
4911: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'SUPPLY_LOCATOR_ID : '||p_mtl_txn_dtls_tbl(mtl_ctr).supply_locator_id);
4912: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'supply_subinventory : '||p_mtl_txn_dtls_tbl(mtl_ctr).supply_subinventory);
4913: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'CSD_DEF_HV_SUBINV : '||fnd_profile.value('CSD_DEF_HV_SUBINV'));
4914:
4915:
4908: --bug#8465719 begin
4909: l_job_details_rec.SUPPLY_LOCATOR_ID := p_mtl_txn_dtls_tbl(mtl_ctr).supply_locator_id;
4910:
4911: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'SUPPLY_LOCATOR_ID : '||p_mtl_txn_dtls_tbl(mtl_ctr).supply_locator_id);
4912: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'supply_subinventory : '||p_mtl_txn_dtls_tbl(mtl_ctr).supply_subinventory);
4913: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'CSD_DEF_HV_SUBINV : '||fnd_profile.value('CSD_DEF_HV_SUBINV'));
4914:
4915:
4916: if (p_mtl_txn_dtls_tbl(mtl_ctr).supply_locator_id is null) Then
4909: l_job_details_rec.SUPPLY_LOCATOR_ID := p_mtl_txn_dtls_tbl(mtl_ctr).supply_locator_id;
4910:
4911: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'SUPPLY_LOCATOR_ID : '||p_mtl_txn_dtls_tbl(mtl_ctr).supply_locator_id);
4912: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'supply_subinventory : '||p_mtl_txn_dtls_tbl(mtl_ctr).supply_subinventory);
4913: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'CSD_DEF_HV_SUBINV : '||fnd_profile.value('CSD_DEF_HV_SUBINV'));
4914:
4915:
4916: if (p_mtl_txn_dtls_tbl(mtl_ctr).supply_locator_id is null) Then
4917:
4920: fetch get_inv_location_control_code into l_location_control_code ;
4921: close get_inv_location_control_code;
4922:
4923:
4924: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_location_control_code : '||l_location_control_code);
4925:
4926: If l_location_control_code in ( lc_predfn_loc_cntrl ,
4927: lc_dyn_loc_cntrl ) THEN
4928: l_locator_controlled := 'T' ;
4942: p_mtl_txn_dtls_tbl(mtl_ctr).inventory_item_id ) ;
4943: fetch get_wip_supply_info into l_wip_supply_type, l_wip_supply_subinventory, l_wip_supply_locator_id;
4944: close get_wip_supply_info;
4945:
4946: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_wip_supply_subinventory : '||l_wip_supply_subinventory);
4947: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_wip_supply_locator_id : '||l_wip_supply_locator_id);
4948: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_locator_controlled : '||l_locator_controlled);
4949: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'CSD_DEF_INV_LOCATOR : '||fnd_profile.value('CSD_DEF_INV_LOCATOR'));
4950: --wip_supply_type = 2 means assembly pull, 3 means operation pull
4943: fetch get_wip_supply_info into l_wip_supply_type, l_wip_supply_subinventory, l_wip_supply_locator_id;
4944: close get_wip_supply_info;
4945:
4946: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_wip_supply_subinventory : '||l_wip_supply_subinventory);
4947: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_wip_supply_locator_id : '||l_wip_supply_locator_id);
4948: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_locator_controlled : '||l_locator_controlled);
4949: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'CSD_DEF_INV_LOCATOR : '||fnd_profile.value('CSD_DEF_INV_LOCATOR'));
4950: --wip_supply_type = 2 means assembly pull, 3 means operation pull
4951:
4944: close get_wip_supply_info;
4945:
4946: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_wip_supply_subinventory : '||l_wip_supply_subinventory);
4947: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_wip_supply_locator_id : '||l_wip_supply_locator_id);
4948: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_locator_controlled : '||l_locator_controlled);
4949: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'CSD_DEF_INV_LOCATOR : '||fnd_profile.value('CSD_DEF_INV_LOCATOR'));
4950: --wip_supply_type = 2 means assembly pull, 3 means operation pull
4951:
4952: If ((l_locator_controlled = 'T' or l_locator_subinv_controlled = 'T') and (l_wip_supply_type = 2 or l_wip_supply_type = 3))
4945:
4946: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_wip_supply_subinventory : '||l_wip_supply_subinventory);
4947: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_wip_supply_locator_id : '||l_wip_supply_locator_id);
4948: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'l_locator_controlled : '||l_locator_controlled);
4949: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'CSD_DEF_INV_LOCATOR : '||fnd_profile.value('CSD_DEF_INV_LOCATOR'));
4950: --wip_supply_type = 2 means assembly pull, 3 means operation pull
4951:
4952: If ((l_locator_controlled = 'T' or l_locator_subinv_controlled = 'T') and (l_wip_supply_type = 2 or l_wip_supply_type = 3))
4953: THEN
4957: l_job_details_rec.supply_subinventory := l_wip_supply_subinventory;
4958: l_job_details_rec.SUPPLY_LOCATOR_ID := l_wip_supply_locator_id;
4959: else
4960: l_job_details_rec.SUPPLY_LOCATOR_ID := fnd_profile.value('CSD_DEF_INV_LOCATOR');
4961: --FND_LOG.STRING(FND_LOG.LEVEL_EVENT,lc_mod_name,'SUPPLY_LOCATOR_ID : '||l_job_details_rec.SUPPLY_LOCATOR_ID);
4962: end if;
4963: end if;
4964:
4965: end if;
4979:
4980: -- Call procedures to insert job header and job details information
4981: -- into wip interface tables
4982:
4983: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4984: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4985: lc_mod_name||'beforecallinsertjob',
4986: 'Just before calling insert_job_header');
4987: END IF;
4980: -- Call procedures to insert job header and job details information
4981: -- into wip interface tables
4982:
4983: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4984: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
4985: lc_mod_name||'beforecallinsertjob',
4986: 'Just before calling insert_job_header');
4987: END IF;
4988:
4995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4996: END IF;
4997:
4998:
4999: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5000: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5001: lc_mod_name||'beforecallinsertjobdtls',
5002: 'Just before calling insert_job_details');
5003: END IF;
4996: END IF;
4997:
4998:
4999: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5000: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5001: lc_mod_name||'beforecallinsertjobdtls',
5002: 'Just before calling insert_job_details');
5003: END IF;
5004:
5013:
5014:
5015: -- Call WIP Mass Load API
5016:
5017: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5018: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5019: lc_mod_name||'beforecallwipmassload',
5020: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
5021: END IF;
5014:
5015: -- Call WIP Mass Load API
5016:
5017: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5018: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5019: lc_mod_name||'beforecallwipmassload',
5020: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
5021: END IF;
5022:
5077: -- subinventory and locator update not supported right now. */
5078:
5079: else -- p_mtl_txn_dtls_tbl(mtl_ctr).new_row <> 'Y'
5080:
5081: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5082: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5083: lc_mod_name,
5084: 'Updating material requirements');
5085: END IF;
5078:
5079: else -- p_mtl_txn_dtls_tbl(mtl_ctr).new_row <> 'Y'
5080:
5081: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5082: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5083: lc_mod_name,
5084: 'Updating material requirements');
5085: END IF;
5086:
5134:
5135:
5136: -- Call procedures to insert job header and job details information
5137: -- into wip interface tables
5138: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5139: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name||'beforecallinsertjob',
5140: 'Just before calling insert_job_header');
5141: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5142: 'l_job_header_rec.header_id='||l_job_header_rec.header_id );
5135:
5136: -- Call procedures to insert job header and job details information
5137: -- into wip interface tables
5138: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5139: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name||'beforecallinsertjob',
5140: 'Just before calling insert_job_header');
5141: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5142: 'l_job_header_rec.header_id='||l_job_header_rec.header_id );
5143: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5137: -- into wip interface tables
5138: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5139: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name||'beforecallinsertjob',
5140: 'Just before calling insert_job_header');
5141: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5142: 'l_job_header_rec.header_id='||l_job_header_rec.header_id );
5143: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5144: 'l_job_header_rec.wip_entity_id='||l_job_header_rec.wip_entity_id );
5145: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5139: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name||'beforecallinsertjob',
5140: 'Just before calling insert_job_header');
5141: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5142: 'l_job_header_rec.header_id='||l_job_header_rec.header_id );
5143: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5144: 'l_job_header_rec.wip_entity_id='||l_job_header_rec.wip_entity_id );
5145: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5146: 'l_job_header_rec.organization_id='||l_job_header_rec.organization_id );
5147: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5141: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5142: 'l_job_header_rec.header_id='||l_job_header_rec.header_id );
5143: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5144: 'l_job_header_rec.wip_entity_id='||l_job_header_rec.wip_entity_id );
5145: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5146: 'l_job_header_rec.organization_id='||l_job_header_rec.organization_id );
5147: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5148: 'l_job_details_rec.group_id='||l_job_details_rec.group_id );
5149: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5143: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5144: 'l_job_header_rec.wip_entity_id='||l_job_header_rec.wip_entity_id );
5145: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5146: 'l_job_header_rec.organization_id='||l_job_header_rec.organization_id );
5147: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5148: 'l_job_details_rec.group_id='||l_job_details_rec.group_id );
5149: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5150: 'l_job_details_rec.parent_header_id='||l_job_details_rec.parent_header_id );
5151: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5145: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5146: 'l_job_header_rec.organization_id='||l_job_header_rec.organization_id );
5147: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5148: 'l_job_details_rec.group_id='||l_job_details_rec.group_id );
5149: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5150: 'l_job_details_rec.parent_header_id='||l_job_details_rec.parent_header_id );
5151: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5152: 'l_job_details_rec.operation_seq_num='||l_job_details_rec.operation_seq_num );
5153: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5147: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5148: 'l_job_details_rec.group_id='||l_job_details_rec.group_id );
5149: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5150: 'l_job_details_rec.parent_header_id='||l_job_details_rec.parent_header_id );
5151: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5152: 'l_job_details_rec.operation_seq_num='||l_job_details_rec.operation_seq_num );
5153: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5154: 'l_job_details_rec.organization_id='||l_job_details_rec.organization_id );
5155: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5149: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5150: 'l_job_details_rec.parent_header_id='||l_job_details_rec.parent_header_id );
5151: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5152: 'l_job_details_rec.operation_seq_num='||l_job_details_rec.operation_seq_num );
5153: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5154: 'l_job_details_rec.organization_id='||l_job_details_rec.organization_id );
5155: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5156: 'l_job_details_rec.wip_entity_id='||l_job_details_rec.wip_entity_id );
5157: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5151: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5152: 'l_job_details_rec.operation_seq_num='||l_job_details_rec.operation_seq_num );
5153: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5154: 'l_job_details_rec.organization_id='||l_job_details_rec.organization_id );
5155: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5156: 'l_job_details_rec.wip_entity_id='||l_job_details_rec.wip_entity_id );
5157: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5158: 'l_job_details_rec.inventory_item_id_old='||l_job_details_rec.inventory_item_id_old );
5159: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5153: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5154: 'l_job_details_rec.organization_id='||l_job_details_rec.organization_id );
5155: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5156: 'l_job_details_rec.wip_entity_id='||l_job_details_rec.wip_entity_id );
5157: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5158: 'l_job_details_rec.inventory_item_id_old='||l_job_details_rec.inventory_item_id_old );
5159: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5160: 'l_job_details_rec.inventory_item_id_new='||l_job_details_rec.inventory_item_id_new );
5161: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5155: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5156: 'l_job_details_rec.wip_entity_id='||l_job_details_rec.wip_entity_id );
5157: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5158: 'l_job_details_rec.inventory_item_id_old='||l_job_details_rec.inventory_item_id_old );
5159: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5160: 'l_job_details_rec.inventory_item_id_new='||l_job_details_rec.inventory_item_id_new );
5161: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5162: 'l_job_details_rec.required_quantity='||l_job_details_rec.required_quantity );
5163: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5157: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5158: 'l_job_details_rec.inventory_item_id_old='||l_job_details_rec.inventory_item_id_old );
5159: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5160: 'l_job_details_rec.inventory_item_id_new='||l_job_details_rec.inventory_item_id_new );
5161: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5162: 'l_job_details_rec.required_quantity='||l_job_details_rec.required_quantity );
5163: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5164: 'l_job_details_rec.quantity_per_assembly='||l_job_details_rec.quantity_per_assembly );
5165: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5159: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5160: 'l_job_details_rec.inventory_item_id_new='||l_job_details_rec.inventory_item_id_new );
5161: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5162: 'l_job_details_rec.required_quantity='||l_job_details_rec.required_quantity );
5163: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5164: 'l_job_details_rec.quantity_per_assembly='||l_job_details_rec.quantity_per_assembly );
5165: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5166: 'l_job_details_rec.supply_subinventory='||l_job_details_rec.supply_subinventory );
5167: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5161: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5162: 'l_job_details_rec.required_quantity='||l_job_details_rec.required_quantity );
5163: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5164: 'l_job_details_rec.quantity_per_assembly='||l_job_details_rec.quantity_per_assembly );
5165: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5166: 'l_job_details_rec.supply_subinventory='||l_job_details_rec.supply_subinventory );
5167: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5168: 'l_job_details_rec.supply_locator_id='||l_job_details_rec.supply_locator_id );
5169: END IF;
5163: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5164: 'l_job_details_rec.quantity_per_assembly='||l_job_details_rec.quantity_per_assembly );
5165: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5166: 'l_job_details_rec.supply_subinventory='||l_job_details_rec.supply_subinventory );
5167: FND_LOG.STRING( FND_LOG.LEVEL_EVENT, lc_mod_name,
5168: 'l_job_details_rec.supply_locator_id='||l_job_details_rec.supply_locator_id );
5169: END IF;
5170:
5171: insert_job_header( p_job_header_rec => l_job_header_rec,
5175: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5176: END IF;
5177:
5178:
5179: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5180: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5181: lc_mod_name||'beforecallinsertjobdtls',
5182: 'Just before calling insert_job_details');
5183: END IF;
5176: END IF;
5177:
5178:
5179: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5180: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5181: lc_mod_name||'beforecallinsertjobdtls',
5182: 'Just before calling insert_job_details');
5183: END IF;
5184:
5188: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5189: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5190: END IF;
5191:
5192: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5193: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5194: lc_mod_name||'beforecallwipmassload',
5195: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs for group_id=l_job_header_rec.group_id');
5196: END IF;
5189: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5190: END IF;
5191:
5192: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5193: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5194: lc_mod_name||'beforecallwipmassload',
5195: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs for group_id=l_job_header_rec.group_id');
5196: END IF;
5197:
5205:
5206: If ( ml_error_exists( l_job_header_rec.group_id ) or
5207: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
5208:
5209: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5210: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5211: lc_mod_name,
5212: 'Error occured during WIP_MASSLOAD_PUB.massLoadJobs');
5213: END IF;
5206: If ( ml_error_exists( l_job_header_rec.group_id ) or
5207: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
5208:
5209: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5210: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5211: lc_mod_name,
5212: 'Error occured during WIP_MASSLOAD_PUB.massLoadJobs');
5213: END IF;
5214:
5229: --bug#12316893
5230:
5231: EXCEPTION
5232: WHEN OTHERS THEN
5233: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5234: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5235: lc_mod_name||'exception',
5236: 'WIP_MASSLOAD_PUB.massLoadJobs Others Exception');
5237: END IF;
5230:
5231: EXCEPTION
5232: WHEN OTHERS THEN
5233: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5234: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5235: lc_mod_name||'exception',
5236: 'WIP_MASSLOAD_PUB.massLoadJobs Others Exception');
5237: END IF;
5238:
5248: END;
5249: END IF; -- p_mtl_txn_dtls_tbl(mtl_ctr).new_row <> 'Y'
5250:
5251: If p_mtl_txn_dtls_tbl(mtl_ctr).WIP_TRANSACTION_DETAIL_ID is null then
5252: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5253: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5254: lc_mod_name||'beforecallinsertrow',
5255: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
5256: END IF;
5249: END IF; -- p_mtl_txn_dtls_tbl(mtl_ctr).new_row <> 'Y'
5250:
5251: If p_mtl_txn_dtls_tbl(mtl_ctr).WIP_TRANSACTION_DETAIL_ID is null then
5252: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5253: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5254: lc_mod_name||'beforecallinsertrow',
5255: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
5256: END IF;
5257:
5305: );
5306:
5307: else
5308:
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: else
5308:
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:
5378: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5379: p_count => x_msg_count,
5380: p_data => x_msg_data);
5381:
5382: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5383: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5384: lc_mod_name||'unx_exception',
5385: 'G_EXC_UNEXPECTED_ERROR Exception');
5386: END IF;
5379: p_count => x_msg_count,
5380: p_data => x_msg_data);
5381:
5382: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5383: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5384: lc_mod_name||'unx_exception',
5385: 'G_EXC_UNEXPECTED_ERROR Exception');
5386: END IF;
5387:
5394: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5395: p_count => x_msg_count,
5396: p_data => x_msg_data);
5397:
5398: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5399: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5400: lc_mod_name||'exc_exception',
5401: 'G_EXC_ERROR Exception');
5402: END IF;
5395: p_count => x_msg_count,
5396: p_data => x_msg_data);
5397:
5398: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5399: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5400: lc_mod_name||'exc_exception',
5401: 'G_EXC_ERROR Exception');
5402: END IF;
5403:
5417: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5418: p_count => x_msg_count,
5419: p_data => x_msg_data);
5420:
5421: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5422: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5423: lc_mod_name||'others_exception',
5424: 'OTHERS Exception');
5425: END IF;
5418: p_count => x_msg_count,
5419: p_data => x_msg_data);
5420:
5421: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5422: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5423: lc_mod_name||'others_exception',
5424: 'OTHERS Exception');
5425: END IF;
5426:
5445: IS
5446: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_SAVE_RES_TXN_DTLS';
5447: lc_api_version_number CONSTANT NUMBER := 1.0;
5448:
5449: -- constants used for FND_LOG debug messages
5450:
5451: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
5452:
5453:
5507:
5508:
5509: BEGIN
5510:
5511: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5512: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
5513: lc_mod_name||'begin',
5514: 'Entering private API process_save_res_txn_dtls' );
5515: END IF;
5508:
5509: BEGIN
5510:
5511: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5512: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
5513: lc_mod_name||'begin',
5514: 'Entering private API process_save_res_txn_dtls' );
5515: END IF;
5516:
5615:
5616: -- Call procedures to insert job header and job details information
5617: -- into wip interface tables
5618:
5619: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5620: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5621: lc_mod_name||'beforecallinsertjob',
5622: 'Just before calling insert_job_header');
5623: END IF;
5616: -- Call procedures to insert job header and job details information
5617: -- into wip interface tables
5618:
5619: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5620: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5621: lc_mod_name||'beforecallinsertjob',
5622: 'Just before calling insert_job_header');
5623: END IF;
5624:
5631: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5632: END IF;
5633:
5634:
5635: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5636: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5637: lc_mod_name||'beforecallinsertjobdtls',
5638: 'Just before calling insert_job_details');
5639: END IF;
5632: END IF;
5633:
5634:
5635: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5636: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5637: lc_mod_name||'beforecallinsertjobdtls',
5638: 'Just before calling insert_job_details');
5639: END IF;
5640:
5649:
5650:
5651: -- Call WIP Mass Load API
5652:
5653: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5654: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5655: lc_mod_name||'beforecallwipmassload',
5656: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
5657: END IF;
5650:
5651: -- Call WIP Mass Load API
5652:
5653: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5654: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5655: lc_mod_name||'beforecallwipmassload',
5656: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
5657: END IF;
5658:
5712: end if;
5713:
5714: If p_res_txn_dtls_tbl(res_ctr).WIP_TRANSACTION_DETAIL_ID is null then
5715:
5716: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5717: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5718: lc_mod_name||'beforecallinsertrow',
5719: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
5720: END IF;
5713:
5714: If p_res_txn_dtls_tbl(res_ctr).WIP_TRANSACTION_DETAIL_ID is null then
5715:
5716: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5717: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5718: lc_mod_name||'beforecallinsertrow',
5719: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
5720: END IF;
5721:
5768: ,p_CREATE_RO_FLAG => null -- bug#13698799 auto create ro, parent ro
5769: );
5770: else
5771:
5772: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5773: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5774: lc_mod_name||'beforecallupdaterow',
5775: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
5776: END IF;
5769: );
5770: else
5771:
5772: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5773: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5774: lc_mod_name||'beforecallupdaterow',
5775: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
5776: END IF;
5777:
5842: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5843: p_count => x_msg_count,
5844: p_data => x_msg_data);
5845:
5846: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5847: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5848: lc_mod_name||'unx_exception',
5849: 'G_EXC_UNEXPECTED_ERROR Exception');
5850: END IF;
5843: p_count => x_msg_count,
5844: p_data => x_msg_data);
5845:
5846: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5847: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5848: lc_mod_name||'unx_exception',
5849: 'G_EXC_UNEXPECTED_ERROR Exception');
5850: END IF;
5851:
5858: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5859: p_count => x_msg_count,
5860: p_data => x_msg_data);
5861:
5862: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5863: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5864: lc_mod_name||'exc_exception',
5865: 'G_EXC_ERROR Exception');
5866: END IF;
5859: p_count => x_msg_count,
5860: p_data => x_msg_data);
5861:
5862: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5863: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
5864: lc_mod_name||'exc_exception',
5865: 'G_EXC_ERROR Exception');
5866: END IF;
5867:
5881: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5882: p_count => x_msg_count,
5883: p_data => x_msg_data);
5884:
5885: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5886: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5887: lc_mod_name||'others_exception',
5888: 'OTHERS Exception');
5889: END IF;
5882: p_count => x_msg_count,
5883: p_data => x_msg_data);
5884:
5885: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5886: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
5887: lc_mod_name||'others_exception',
5888: 'OTHERS Exception');
5889: END IF;
5890:
5906: IS
5907: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_SAVE_OP_DTLS';
5908: lc_api_version_number CONSTANT NUMBER := 1.0;
5909:
5910: -- constants used for FND_LOG debug messages
5911: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.process_save_op_dtls.';
5912:
5913: -- Constants Used for Inserting into wip_job_schedule_interface,
5914: -- These are the values needed for WIP Mass Load to pick up the records
5936: l_wip_transaction_detail_id NUMBER;
5937:
5938: BEGIN
5939:
5940: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5941: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
5942: lc_mod_name||'begin',
5943: 'Entering private API process_save_op_dtls' );
5944: END IF;
5937:
5938: BEGIN
5939:
5940: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5941: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
5942: lc_mod_name||'begin',
5943: 'Entering private API process_save_op_dtls' );
5944: END IF;
5945:
6022: END IF;
6023:
6024: -- Call procedures to insert job header and job details information
6025: -- into wip interface tables
6026: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6027: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6028: lc_mod_name||'beforecallinsertjob',
6029: 'Just before calling insert_job_header');
6030: END IF;
6023:
6024: -- Call procedures to insert job header and job details information
6025: -- into wip interface tables
6026: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6027: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6028: lc_mod_name||'beforecallinsertjob',
6029: 'Just before calling insert_job_header');
6030: END IF;
6031:
6035: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6037: END IF;
6038:
6039: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6040: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6041: lc_mod_name||'beforecallinsertjobdtls',
6042: 'Just before calling insert_job_details');
6043: END IF;
6036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6037: END IF;
6038:
6039: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6040: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6041: lc_mod_name||'beforecallinsertjobdtls',
6042: 'Just before calling insert_job_details');
6043: END IF;
6044:
6049: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6050: END IF;
6051:
6052: -- Call WIP Mass Load API
6053: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6054: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6055: lc_mod_name||'beforecallwipmassload',
6056: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
6057: END IF;
6050: END IF;
6051:
6052: -- Call WIP Mass Load API
6053: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6054: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6055: lc_mod_name||'beforecallwipmassload',
6056: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
6057: END IF;
6058:
6112: END;
6113: end if;
6114:
6115: If p_op_dtls_tbl(op_ctr).WIP_TRANSACTION_DETAIL_ID is null then
6116: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6117: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6118: lc_mod_name||'beforecallinsertrow',
6119: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
6120: END IF;
6113: end if;
6114:
6115: If p_op_dtls_tbl(op_ctr).WIP_TRANSACTION_DETAIL_ID is null then
6116: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6117: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6118: lc_mod_name||'beforecallinsertrow',
6119: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Insert_Row');
6120: END IF;
6121:
6168: ,p_CREATE_RO_FLAG => NULL -- bug#13698799 auto create ro, parent ro
6169: );
6170:
6171: else
6172: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6173: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6174: lc_mod_name||'beforecallupdaterow',
6175: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
6176: END IF;
6169: );
6170:
6171: else
6172: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6173: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6174: lc_mod_name||'beforecallupdaterow',
6175: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
6176: END IF;
6177:
6240: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6241: p_count => x_msg_count,
6242: p_data => x_msg_data);
6243:
6244: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6245: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6246: lc_mod_name||'unx_exception',
6247: 'G_EXC_UNEXPECTED_ERROR Exception');
6248: END IF;
6241: p_count => x_msg_count,
6242: p_data => x_msg_data);
6243:
6244: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6245: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6246: lc_mod_name||'unx_exception',
6247: 'G_EXC_UNEXPECTED_ERROR Exception');
6248: END IF;
6249:
6256: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6257: p_count => x_msg_count,
6258: p_data => x_msg_data);
6259:
6260: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6261: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6262: lc_mod_name||'exc_exception',
6263: 'G_EXC_ERROR Exception');
6264: END IF;
6257: p_count => x_msg_count,
6258: p_data => x_msg_data);
6259:
6260: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6261: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6262: lc_mod_name||'exc_exception',
6263: 'G_EXC_ERROR Exception');
6264: END IF;
6265:
6279: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6280: p_count => x_msg_count,
6281: p_data => x_msg_data);
6282:
6283: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6284: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6285: lc_mod_name||'others_exception',
6286: 'OTHERS Exception');
6287: END IF;
6280: p_count => x_msg_count,
6281: p_data => x_msg_data);
6282:
6283: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6284: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6285: lc_mod_name||'others_exception',
6286: 'OTHERS Exception');
6287: END IF;
6288: END PROCESS_SAVE_OP_DTLS;
6320: -- Non Standard Discrete Job Load Type
6321: lc_non_standard_load_type CONSTANT NUMBER := 4;
6322:
6323:
6324: -- COnstants used for FND_LOG debug messages
6325:
6326: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.create_wip_job';
6327:
6328:
6407: l_msg_data VARCHAR2(2000);
6408:
6409: BEGIN
6410:
6411: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6412: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
6413: lc_mod_name||'begin',
6414: 'Entering Private API create_wip_job');
6415: END IF;
6408:
6409: BEGIN
6410:
6411: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6412: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
6413: lc_mod_name||'begin',
6414: 'Entering Private API create_wip_job');
6415: END IF;
6416:
6541:
6542: x_job_name := l_job_header_rec.job_name;
6543:
6544:
6545: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6546: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6547: lc_mod_name||'beforecallinsert',
6548: 'Just before calling insert_job_header');
6549: END IF;
6542: x_job_name := l_job_header_rec.job_name;
6543:
6544:
6545: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6546: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6547: lc_mod_name||'beforecallinsert',
6548: 'Just before calling insert_job_header');
6549: END IF;
6550:
6568: --If API fails, Raise error, rollback and return
6569:
6570: -- Call WIP Mass Load API
6571:
6572: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6573: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6574: lc_mod_name||'beforecallcreateonejob',
6575: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
6576: END IF;
6569:
6570: -- Call WIP Mass Load API
6571:
6572: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6573: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6574: lc_mod_name||'beforecallcreateonejob',
6575: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
6576: END IF;
6577: -- dbms_output.put_line('Before calling createonejob');
6801:
6802:
6803: -- dbms_output.put_line('In Error');
6804:
6805: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6806: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6807: lc_mod_name||'exc_exception',
6808: 'G_EXC_ERROR Exception');
6809: END IF;
6802:
6803: -- dbms_output.put_line('In Error');
6804:
6805: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6806: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6807: lc_mod_name||'exc_exception',
6808: 'G_EXC_ERROR Exception');
6809: END IF;
6810:
6817: -- and csd_repair_history tables for the job created.
6818:
6819: L_user_id := fnd_global.user_id;
6820:
6821: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6822: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6823: lc_mod_name||'beforecallxrefwrite',
6824: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
6825: END IF;
6818:
6819: L_user_id := fnd_global.user_id;
6820:
6821: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6822: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6823: lc_mod_name||'beforecallxrefwrite',
6824: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
6825: END IF;
6826:
6874:
6875: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6876: ROLLBACK to CREATE_WIP_JOB_PVT ;
6877:
6878: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6879: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6880: lc_mod_name||'exc_exception',
6881: 'G_EXC_ERROR Exception');
6882: END IF;
6875: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6876: ROLLBACK to CREATE_WIP_JOB_PVT ;
6877:
6878: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6879: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6880: lc_mod_name||'exc_exception',
6881: 'G_EXC_ERROR Exception');
6882: END IF;
6883:
6885:
6886: END IF;
6887:
6888:
6889: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6890: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6891: lc_mod_name||'beforecallhistwrite',
6892: 'Just before calling csd_to_form_repair_history.validate_and_write');
6893: END IF;
6886: END IF;
6887:
6888:
6889: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6890: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6891: lc_mod_name||'beforecallhistwrite',
6892: 'Just before calling csd_to_form_repair_history.validate_and_write');
6893: END IF;
6894:
6966:
6967: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6968: ROLLBACK to CREATE_WIP_JOB_PVT ;
6969:
6970: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6971: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6972: lc_mod_name||'exc_exception',
6973: 'G_EXC_ERROR Exception');
6974: END IF;
6967: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6968: ROLLBACK to CREATE_WIP_JOB_PVT ;
6969:
6970: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6971: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6972: lc_mod_name||'exc_exception',
6973: 'G_EXC_ERROR Exception');
6974: END IF;
6975:
6992: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6993: p_count => x_msg_count,
6994: p_data => x_msg_data);
6995:
6996: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6997: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6998: lc_mod_name||'unx_exception',
6999: 'G_EXC_UNEXPECTED_ERROR Exception');
7000: END IF;
6993: p_count => x_msg_count,
6994: p_data => x_msg_data);
6995:
6996: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6997: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
6998: lc_mod_name||'unx_exception',
6999: 'G_EXC_UNEXPECTED_ERROR Exception');
7000: END IF;
7001:
7008: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7009: p_count => x_msg_count,
7010: p_data => x_msg_data);
7011:
7012: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7013: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7014: lc_mod_name||'exc_exception',
7015: 'G_EXC_ERROR Exception');
7016: END IF;
7009: p_count => x_msg_count,
7010: p_data => x_msg_data);
7011:
7012: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7013: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7014: lc_mod_name||'exc_exception',
7015: 'G_EXC_ERROR Exception');
7016: END IF;
7017:
7031: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7032: p_count => x_msg_count,
7033: p_data => x_msg_data);
7034:
7035: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7036: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
7037: lc_mod_name||'others_exception',
7038: 'OTHERS Exception');
7039: END IF;
7032: p_count => x_msg_count,
7033: p_data => x_msg_data);
7034:
7035: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7036: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
7037: lc_mod_name||'others_exception',
7038: 'OTHERS Exception');
7039: END IF;
7040:
7073:
7074: lc_service_code CONSTANT VARCHAR2(30) := 'SERVICE_CODE';
7075:
7076:
7077: -- Constants used for FND_LOG debug messages
7078: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.generate_wip_jobs_from_scs';
7079:
7080: l_object_version_number NUMBER;
7081: l_user_id NUMBER;
7210:
7211:
7212: BEGIN
7213:
7214: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7215: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
7216: lc_mod_name||'begin',
7217: 'Entering Private API generate_wip_jobs_from_scs');
7218: END IF;
7211:
7212: BEGIN
7213:
7214: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7215: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
7216: lc_mod_name||'begin',
7217: 'Entering Private API generate_wip_jobs_from_scs');
7218: END IF;
7219:
7351: x_job_name => l_job_header_rec.job_name );
7352: -- dbms_output.put_line('After generate job name');
7353:
7354:
7355: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7356: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7357: lc_mod_name||'beforecallinsert',
7358: 'Just before calling insert_job_header');
7359: END IF;
7352: -- dbms_output.put_line('After generate job name');
7353:
7354:
7355: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7356: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7357: lc_mod_name||'beforecallinsert',
7358: 'Just before calling insert_job_header');
7359: END IF;
7360:
7376: -- If API fails, Raise error, rollback and return
7377:
7378: -- Call WIP Mass Load API
7379:
7380: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7381: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7382: lc_mod_name||'beforecallcreateonejob',
7383: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
7384: END IF;
7377:
7378: -- Call WIP Mass Load API
7379:
7380: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7381: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7382: lc_mod_name||'beforecallcreateonejob',
7383: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
7384: END IF;
7385:
7688: -- and csd_repair_history tables for the job created.
7689:
7690: l_user_id := fnd_global.user_id;
7691:
7692: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7693: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7694: lc_mod_name||'beforecallxrefwrite',
7695: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
7696: END IF;
7689:
7690: l_user_id := fnd_global.user_id;
7691:
7692: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7693: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7694: lc_mod_name||'beforecallxrefwrite',
7695: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
7696: END IF;
7697:
7744:
7745:
7746: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7747: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7748: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7749: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7750: lc_mod_name||'exc_exception',
7751: 'G_EXC_ERROR Exception');
7752: END IF;
7745:
7746: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7747: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7748: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7749: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7750: lc_mod_name||'exc_exception',
7751: 'G_EXC_ERROR Exception');
7752: END IF;
7753: RETURN;
7752: END IF;
7753: RETURN;
7754: END IF;
7755:
7756: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7757: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7758: lc_mod_name||'beforecallhistwrite',
7759: 'Just before calling csd_to_form_repair_history.validate_and_write');
7760: END IF;
7753: RETURN;
7754: END IF;
7755:
7756: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7757: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7758: lc_mod_name||'beforecallhistwrite',
7759: 'Just before calling csd_to_form_repair_history.validate_and_write');
7760: END IF;
7761:
7832: -- dbms_output.put_line('after call to csd_to_form_repair_history.validate_and_write');
7833:
7834: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7835: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7836: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7837: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7838: lc_mod_name||'exc_exception',
7839: 'G_EXC_ERROR Exception');
7840: END IF;
7833:
7834: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7835: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7836: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7837: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7838: lc_mod_name||'exc_exception',
7839: 'G_EXC_ERROR Exception');
7840: END IF;
7841: RETURN;
7862:
7863:
7864: -- l_object_version_number := p_service_code_tbl(sc_ctr).object_version_number;
7865:
7866: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7867: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7868: lc_mod_name||'beforecallupdatesc',
7869: 'Just before calling CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
7870: END IF;
7863:
7864: -- l_object_version_number := p_service_code_tbl(sc_ctr).object_version_number;
7865:
7866: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7867: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
7868: lc_mod_name||'beforecallupdatesc',
7869: 'Just before calling CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
7870: END IF;
7871:
7886: -- dbms_output.put_line('after call to CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
7887: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7888: -- dbms_output.put_line('inside return status CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
7889: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7890: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7891: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7892: lc_mod_name||'exc_exception',
7893: 'G_EXC_ERROR Exception');
7894: END IF;
7887: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7888: -- dbms_output.put_line('inside return status CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
7889: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7890: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7891: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7892: lc_mod_name||'exc_exception',
7893: 'G_EXC_ERROR Exception');
7894: END IF;
7895: RETURN;
7923: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7924: p_count => x_msg_count,
7925: p_data => x_msg_data);
7926:
7927: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7928: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
7929: lc_mod_name||'unx_exception',
7930: 'G_EXC_UNEXPECTED_ERROR Exception');
7931: END IF;
7924: p_count => x_msg_count,
7925: p_data => x_msg_data);
7926:
7927: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7928: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
7929: lc_mod_name||'unx_exception',
7930: 'G_EXC_UNEXPECTED_ERROR Exception');
7931: END IF;
7932:
7939: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7940: p_count => x_msg_count,
7941: p_data => x_msg_data);
7942:
7943: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7944: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7945: lc_mod_name||'exc_exception',
7946: 'G_EXC_ERROR Exception');
7947: END IF;
7940: p_count => x_msg_count,
7941: p_data => x_msg_data);
7942:
7943: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7944: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7945: lc_mod_name||'exc_exception',
7946: 'G_EXC_ERROR Exception');
7947: END IF;
7948:
7962: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7963: p_count => x_msg_count,
7964: p_data => x_msg_data);
7965:
7966: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7967: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
7968: lc_mod_name||'others_exception',
7969: 'OTHERS Exception');
7970: END IF;
7963: p_count => x_msg_count,
7964: p_data => x_msg_data);
7965:
7966: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7967: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
7968: lc_mod_name||'others_exception',
7969: 'OTHERS Exception');
7970: END IF;
7971:
7994: p_operation_seq_num IN NUMBER,
7995: p_repair_line_id IN NUMBER,
7996: x_transaction_header_id OUT NOCOPY NUMBER
7997: ) IS
7998: -- constants used for FND_LOG debug messages
7999: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_AUTO_ISSUE_MTL_TXN';
8000: lc_api_version_number CONSTANT NUMBER := 1.0;
8001: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_auto_issue_mtl_txn';
8002:
8087: -- local variables --
8088: l_mtl_txn_dtls_tbl MTL_TXN_DTLS_TBL_TYPE;
8089: BEGIN
8090:
8091: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8092: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
8093: lc_mod_name||'begin',
8094: 'Entering private API process_issue_mtl_txn' );
8095: END IF;
8088: l_mtl_txn_dtls_tbl MTL_TXN_DTLS_TBL_TYPE;
8089: BEGIN
8090:
8091: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8092: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
8093: lc_mod_name||'begin',
8094: 'Entering private API process_issue_mtl_txn' );
8095: END IF;
8096:
8144: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8145: p_count => x_msg_count,
8146: p_data => x_msg_data);
8147:
8148: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8149: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8150: lc_mod_name||'unx_exception',
8151: 'G_EXC_UNEXPECTED_ERROR Exception');
8152: END IF;
8145: p_count => x_msg_count,
8146: p_data => x_msg_data);
8147:
8148: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8149: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8150: lc_mod_name||'unx_exception',
8151: 'G_EXC_UNEXPECTED_ERROR Exception');
8152: END IF;
8153:
8160: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8161: p_count => x_msg_count,
8162: p_data => x_msg_data);
8163:
8164: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8165: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
8166: lc_mod_name||'exc_exception',
8167: 'G_EXC_ERROR Exception');
8168: END IF;
8161: p_count => x_msg_count,
8162: p_data => x_msg_data);
8163:
8164: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8165: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
8166: lc_mod_name||'exc_exception',
8167: 'G_EXC_ERROR Exception');
8168: END IF;
8169:
8183: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8184: p_count => x_msg_count,
8185: p_data => x_msg_data);
8186:
8187: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8188: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8189: lc_mod_name||'others_exception',
8190: 'OTHERS Exception');
8191: END IF;
8184: p_count => x_msg_count,
8185: p_data => x_msg_data);
8186:
8187: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8188: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8189: lc_mod_name||'others_exception',
8190: 'OTHERS Exception');
8191: END IF;
8192:
8213: p_wip_entity_id IN NUMBER,
8214: p_operation_seq_num IN NUMBER,
8215: p_repair_line_id IN NUMBER
8216: ) IS
8217: -- constants used for FND_LOG debug messages
8218: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_AUTO_TRANSACT_RES_TXN';
8219: lc_api_version_number CONSTANT NUMBER := 1.0;
8220: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_auto_transact_res_txn';
8221:
8309: l_res_txn_dtls_tbl RES_TXN_DTLS_TBL_TYPE;
8310:
8311: BEGIN
8312:
8313: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8314: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
8315: lc_mod_name||'begin',
8316: 'Entering private API process_auto_transact_res_txn' );
8317: END IF;
8310:
8311: BEGIN
8312:
8313: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8314: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
8315: lc_mod_name||'begin',
8316: 'Entering private API process_auto_transact_res_txn' );
8317: END IF;
8318:
8365: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8366: p_count => x_msg_count,
8367: p_data => x_msg_data);
8368:
8369: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8370: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8371: lc_mod_name||'unx_exception',
8372: 'G_EXC_UNEXPECTED_ERROR Exception');
8373: END IF;
8366: p_count => x_msg_count,
8367: p_data => x_msg_data);
8368:
8369: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8370: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8371: lc_mod_name||'unx_exception',
8372: 'G_EXC_UNEXPECTED_ERROR Exception');
8373: END IF;
8374:
8381: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8382: p_count => x_msg_count,
8383: p_data => x_msg_data);
8384:
8385: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8386: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
8387: lc_mod_name||'exc_exception',
8388: 'G_EXC_ERROR Exception');
8389: END IF;
8382: p_count => x_msg_count,
8383: p_data => x_msg_data);
8384:
8385: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8386: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
8387: lc_mod_name||'exc_exception',
8388: 'G_EXC_ERROR Exception');
8389: END IF;
8390:
8404: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8405: p_count => x_msg_count,
8406: p_data => x_msg_data);
8407:
8408: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8409: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8410: lc_mod_name||'others_exception',
8411: 'OTHERS Exception');
8412: END IF;
8405: p_count => x_msg_count,
8406: p_data => x_msg_data);
8407:
8408: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8409: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8410: lc_mod_name||'others_exception',
8411: 'OTHERS Exception');
8412: END IF;
8413:
8436: p_repair_line_id IN NUMBER
8437:
8438: ) IS
8439:
8440: -- constants used for FND_LOG debug messages
8441: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_AUTO_OPER_COMP_TXN';
8442: lc_api_version_number CONSTANT NUMBER := 1.0;
8443: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_auto_oper_comp_txn';
8444:
8484: l_mv_txn_dtls_tbl MV_TXN_DTLS_TBL_TYPE;
8485:
8486: BEGIN
8487:
8488: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8489: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
8490: lc_mod_name||'begin',
8491: 'Entering private API process_auto_oper_comp_txn' );
8492: END IF;
8485:
8486: BEGIN
8487:
8488: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8489: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
8490: lc_mod_name||'begin',
8491: 'Entering private API process_auto_oper_comp_txn' );
8492: END IF;
8493:
8540: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8541: p_count => x_msg_count,
8542: p_data => x_msg_data);
8543:
8544: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8545: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8546: lc_mod_name||'unx_exception',
8547: 'G_EXC_UNEXPECTED_ERROR Exception');
8548: END IF;
8541: p_count => x_msg_count,
8542: p_data => x_msg_data);
8543:
8544: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8545: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8546: lc_mod_name||'unx_exception',
8547: 'G_EXC_UNEXPECTED_ERROR Exception');
8548: END IF;
8549:
8556: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8557: p_count => x_msg_count,
8558: p_data => x_msg_data);
8559:
8560: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8561: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
8562: lc_mod_name||'exc_exception',
8563: 'G_EXC_ERROR Exception');
8564: END IF;
8557: p_count => x_msg_count,
8558: p_data => x_msg_data);
8559:
8560: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8561: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
8562: lc_mod_name||'exc_exception',
8563: 'G_EXC_ERROR Exception');
8564: END IF;
8565:
8579: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8580: p_count => x_msg_count,
8581: p_data => x_msg_data);
8582:
8583: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8584: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8585: lc_mod_name||'others_exception',
8586: 'OTHERS Exception');
8587: END IF;
8580: p_count => x_msg_count,
8581: p_data => x_msg_data);
8582:
8583: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8584: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8585: lc_mod_name||'others_exception',
8586: 'OTHERS Exception');
8587: END IF;
8588: END process_auto_oper_comp_txn;
8598: x_msg_count OUT NOCOPY NUMBER,
8599: x_msg_data OUT NOCOPY VARCHAR2,
8600: p_time_clock_entry_id IN NUMBER
8601: ) IS
8602: -- constants used for FND_LOG debug messages
8603: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_TIME_CLOCK_RES_TXN';
8604: lc_api_version_number CONSTANT NUMBER := 1.0;
8605: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_time_clock_res_txn';
8606:
8741: AND NVL(WOR.REPETITIVE_SCHEDULE_ID,-1)=NVL(WO.REPETITIVE_SCHEDULE_ID,-1);
8742:
8743: BEGIN
8744:
8745: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8746: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
8747: lc_mod_name||'begin',
8748: 'Entering private API process_time_clock_res_txn' );
8749: END IF;
8742:
8743: BEGIN
8744:
8745: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8746: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
8747: lc_mod_name||'begin',
8748: 'Entering private API process_time_clock_res_txn' );
8749: END IF;
8750:
8922: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8923: p_count => x_msg_count,
8924: p_data => x_msg_data);
8925:
8926: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8927: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8928: lc_mod_name||'unx_exception',
8929: 'G_EXC_UNEXPECTED_ERROR Exception');
8930: END IF;
8923: p_count => x_msg_count,
8924: p_data => x_msg_data);
8925:
8926: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8927: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8928: lc_mod_name||'unx_exception',
8929: 'G_EXC_UNEXPECTED_ERROR Exception');
8930: END IF;
8931:
8938: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8939: p_count => x_msg_count,
8940: p_data => x_msg_data);
8941:
8942: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8943: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
8944: lc_mod_name||'exc_exception',
8945: 'G_EXC_ERROR Exception');
8946: END IF;
8939: p_count => x_msg_count,
8940: p_data => x_msg_data);
8941:
8942: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8943: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
8944: lc_mod_name||'exc_exception',
8945: 'G_EXC_ERROR Exception');
8946: END IF;
8947:
8961: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8962: p_count => x_msg_count,
8963: p_data => x_msg_data);
8964:
8965: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8966: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8967: lc_mod_name||'others_exception',
8968: 'OTHERS Exception');
8969: END IF;
8962: p_count => x_msg_count,
8963: p_data => x_msg_data);
8964:
8965: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8966: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
8967: lc_mod_name||'others_exception',
8968: 'OTHERS Exception');
8969: END IF;
8970: END process_time_clock_res_txn;
8981: p_repair_line_id IN NUMBER,
8982: x_new_flow_status_code OUT NOCOPY VARCHAR2,
8983: x_new_ro_status_code OUT NOCOPY VARCHAR2
8984: ) IS
8985: -- constants used for FND_LOG debug messages
8986: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_COMP_WORK_RO_STATUS';
8987: lc_api_version_number CONSTANT NUMBER := 1.0;
8988: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_comp_work_ro_status';
8989:
9010: l_fm_flow_status_id NUMBER;
9011: l_to_flow_status_id NUMBER;
9012:
9013: BEGIN
9014: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9015: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9016: lc_mod_name||'begin',
9017: 'Entering private API process_comp_work_ro_status' );
9018: END IF;
9011: l_to_flow_status_id NUMBER;
9012:
9013: BEGIN
9014: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9015: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9016: lc_mod_name||'begin',
9017: 'Entering private API process_comp_work_ro_status' );
9018: END IF;
9019:
9088: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9089: p_count => x_msg_count,
9090: p_data => x_msg_data);
9091:
9092: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9093: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9094: lc_mod_name||'unx_exception',
9095: 'G_EXC_UNEXPECTED_ERROR Exception');
9096: END IF;
9089: p_count => x_msg_count,
9090: p_data => x_msg_data);
9091:
9092: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9093: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9094: lc_mod_name||'unx_exception',
9095: 'G_EXC_UNEXPECTED_ERROR Exception');
9096: END IF;
9097:
9104: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9105: p_count => x_msg_count,
9106: p_data => x_msg_data);
9107:
9108: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9109: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
9110: lc_mod_name||'exc_exception',
9111: 'G_EXC_ERROR Exception');
9112: END IF;
9105: p_count => x_msg_count,
9106: p_data => x_msg_data);
9107:
9108: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9109: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
9110: lc_mod_name||'exc_exception',
9111: 'G_EXC_ERROR Exception');
9112: END IF;
9113:
9127: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9128: p_count => x_msg_count,
9129: p_data => x_msg_data);
9130:
9131: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9132: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9133: lc_mod_name||'others_exception',
9134: 'OTHERS Exception');
9135: END IF;
9128: p_count => x_msg_count,
9129: p_data => x_msg_data);
9130:
9131: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9132: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9133: lc_mod_name||'others_exception',
9134: 'OTHERS Exception');
9135: END IF;
9136: END process_comp_work_ro_status;
9159: IS
9160: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_DELETE_MTL_TXN_DTL';
9161: lc_api_version_number CONSTANT NUMBER := 1.0;
9162:
9163: -- constants used for FND_LOG debug messages
9164: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_delete_mtl_txn_dtl';
9165:
9166: -- Constants Used for Inserting into wip_job_schedule_interface,
9167: -- These are the values needed for WIP Mass Load to pick up the records
9189: and operation_seq_num = p_mtl_txn_dtls.operation_seq_num;
9190:
9191: BEGIN
9192:
9193: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9194: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9195: lc_mod_name||'begin',
9196: 'Entering private API process_delete_mtl_txn_dtl' );
9197: END IF;
9190:
9191: BEGIN
9192:
9193: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9194: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9195: lc_mod_name||'begin',
9196: 'Entering private API process_delete_mtl_txn_dtl' );
9197: END IF;
9198:
9239: l_job_details_rec.operation_seq_num := p_mtl_txn_dtls.operation_seq_num;
9240:
9241: -- Call procedures to insert job header and job details information
9242: -- into wip interface tables
9243: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9244: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9245: lc_mod_name||'beforecallinsertjob',
9246: 'Just before calling insert_job_header');
9247: END IF;
9240:
9241: -- Call procedures to insert job header and job details information
9242: -- into wip interface tables
9243: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9244: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9245: lc_mod_name||'beforecallinsertjob',
9246: 'Just before calling insert_job_header');
9247: END IF;
9248:
9255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9256: END IF;
9257:
9258:
9259: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9260: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9261: lc_mod_name||'beforecallinsertjobdtls',
9262: 'Just before calling insert_job_details');
9263: END IF;
9256: END IF;
9257:
9258:
9259: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9260: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9261: lc_mod_name||'beforecallinsertjobdtls',
9262: 'Just before calling insert_job_details');
9263: END IF;
9264:
9273:
9274:
9275: -- Call WIP Mass Load API
9276:
9277: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9278: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9279: lc_mod_name||'beforecallwipmassload',
9280: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
9281: END IF;
9274:
9275: -- Call WIP Mass Load API
9276:
9277: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9278: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9279: lc_mod_name||'beforecallwipmassload',
9280: 'Just before calling WIP_MASSLOAD_PUB.massLoadJobs');
9281: END IF;
9282:
9341: l_wip_transaction_detail_id := p_mtl_txn_dtls.WIP_TRANSACTION_DETAIL_ID;
9342: end if;
9343:
9344: If l_wip_transaction_detail_id is not null then
9345: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9346: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9347: lc_mod_name||'beforecallinsertrow',
9348: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
9349: END IF;
9342: end if;
9343:
9344: If l_wip_transaction_detail_id is not null then
9345: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9346: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9347: lc_mod_name||'beforecallinsertrow',
9348: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
9349: END IF;
9350:
9366: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9367: p_count => x_msg_count,
9368: p_data => x_msg_data);
9369:
9370: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9371: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9372: lc_mod_name||'unx_exception',
9373: 'G_EXC_UNEXPECTED_ERROR Exception');
9374: END IF;
9367: p_count => x_msg_count,
9368: p_data => x_msg_data);
9369:
9370: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9371: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9372: lc_mod_name||'unx_exception',
9373: 'G_EXC_UNEXPECTED_ERROR Exception');
9374: END IF;
9375:
9382: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9383: p_count => x_msg_count,
9384: p_data => x_msg_data);
9385:
9386: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9387: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
9388: lc_mod_name||'exc_exception',
9389: 'G_EXC_ERROR Exception');
9390: END IF;
9383: p_count => x_msg_count,
9384: p_data => x_msg_data);
9385:
9386: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9387: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
9388: lc_mod_name||'exc_exception',
9389: 'G_EXC_ERROR Exception');
9390: END IF;
9391:
9405: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9406: p_count => x_msg_count,
9407: p_data => x_msg_data);
9408:
9409: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9410: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9411: lc_mod_name||'others_exception',
9412: 'OTHERS Exception');
9413: END IF;
9406: p_count => x_msg_count,
9407: p_data => x_msg_data);
9408:
9409: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9410: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9411: lc_mod_name||'others_exception',
9412: 'OTHERS Exception');
9413: END IF;
9414:
9467: into l_ro_status;
9468: close c_get_ro_status;
9469:
9470: IF (l_ro_status <> 'O') THEN
9471: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9472: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9473: lc_mod_name||'.begin',
9474: 'Repair order is not open.' );
9475: END IF;
9468: close c_get_ro_status;
9469:
9470: IF (l_ro_status <> 'O') THEN
9471: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9472: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9473: lc_mod_name||'.begin',
9474: 'Repair order is not open.' );
9475: END IF;
9476: return lc_not_valid;
9475: END IF;
9476: return lc_not_valid;
9477: END IF;
9478:
9479: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9480: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9481: lc_mod_name||'.begin',
9482: 'Entering procedure is_delete_wip_op_valid' );
9483: END IF;
9476: return lc_not_valid;
9477: END IF;
9478:
9479: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9480: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9481: lc_mod_name||'.begin',
9482: 'Entering procedure is_delete_wip_op_valid' );
9483: END IF;
9484:
9488: x_return_status => l_return_status,
9489: x_error_message => l_error_message);
9490:
9491: IF (l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
9492: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9494: lc_mod_name,
9495: 'WIP_OPERATIONS_PKG.Valid_Op_Delete returned success.' );
9496: END IF;
9489: x_error_message => l_error_message);
9490:
9491: IF (l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
9492: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9494: lc_mod_name,
9495: 'WIP_OPERATIONS_PKG.Valid_Op_Delete returned success.' );
9496: END IF;
9497:
9500: into l_time_clock_entries_exist;
9501: close c_time_clock_entries_exist;
9502:
9503: IF (l_time_clock_entries_exist is null) THEN
9504: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9505: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9506: lc_mod_name,
9507: 'No time clock entries exist. Continuing...' );
9508: END IF;
9501: close c_time_clock_entries_exist;
9502:
9503: IF (l_time_clock_entries_exist is null) THEN
9504: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9505: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9506: lc_mod_name,
9507: 'No time clock entries exist. Continuing...' );
9508: END IF;
9509:
9512: into l_mat_txn_exists;
9513: close c_mat_txn_exists;
9514:
9515: if (l_mat_txn_exists is not null) then
9516: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9518: lc_mod_name,
9519: 'Materials have been issued for this operation. Returning N' );
9520: END IF;
9513: close c_mat_txn_exists;
9514:
9515: if (l_mat_txn_exists is not null) then
9516: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9518: lc_mod_name,
9519: 'Materials have been issued for this operation. Returning N' );
9520: END IF;
9521: return lc_not_valid;
9523:
9524: return lc_valid;
9525:
9526: ELSE
9527: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9529: lc_mod_name,
9530: 'Time clock entries exist. Returning N' );
9531: END IF;
9524: return lc_valid;
9525:
9526: ELSE
9527: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9529: lc_mod_name,
9530: 'Time clock entries exist. Returning N' );
9531: END IF;
9532: return lc_not_valid;
9532: return lc_not_valid;
9533: END IF;
9534: END IF;
9535:
9536: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9537: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9538: lc_mod_name,
9539: 'WIP_OPERATIONS_PKG.Valid_Op_Delete returned non-success value: ' || l_return_status );
9540: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9533: END IF;
9534: END IF;
9535:
9536: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9537: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9538: lc_mod_name,
9539: 'WIP_OPERATIONS_PKG.Valid_Op_Delete returned non-success value: ' || l_return_status );
9540: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9541: lc_mod_name,
9536: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9537: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9538: lc_mod_name,
9539: 'WIP_OPERATIONS_PKG.Valid_Op_Delete returned non-success value: ' || l_return_status );
9540: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9541: lc_mod_name,
9542: 'WIP_OPERATIONS_PKG.Valid_Op_Delete returned error message: ' || l_error_message );
9543: END IF;
9544: return lc_not_valid;
9544: return lc_not_valid;
9545:
9546: EXCEPTION
9547: WHEN OTHERS THEN
9548: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9549: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9550: lc_mod_name,
9551: 'WIP_OPERATIONS_PKG.Valid_Op_Delete threw exception');
9552: END IF;
9545:
9546: EXCEPTION
9547: WHEN OTHERS THEN
9548: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9549: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9550: lc_mod_name,
9551: 'WIP_OPERATIONS_PKG.Valid_Op_Delete threw exception');
9552: END IF;
9553:
9576: IS
9577: lc_api_name CONSTANT VARCHAR2(30) := 'PROCESS_DELETE_OP_DTL';
9578: lc_api_version_number CONSTANT NUMBER := 1.0;
9579:
9580: -- constants used for FND_LOG debug messages
9581: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.process_delete_op_dtl';
9582:
9583:
9584: l_return_status VARCHAR2(1);
9616: where wip_entity_id = p_op_dtls.wip_entity_id;
9617:
9618: BEGIN
9619:
9620: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9621: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9622: lc_mod_name||'begin',
9623: 'Entering private API process_delete_op_dtl' );
9624: END IF;
9617:
9618: BEGIN
9619:
9620: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9621: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9622: lc_mod_name||'begin',
9623: 'Entering private API process_delete_op_dtl' );
9624: END IF;
9625:
9643:
9644:
9645: x_return_status := FND_API.G_RET_STS_SUCCESS;
9646:
9647: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9648: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9649: lc_mod_name||'beforecallinsertjobdtls',
9650: 'Just before calling WIP_OPERATIONS_PKG.Delete_Operation');
9651: END IF;
9644:
9645: x_return_status := FND_API.G_RET_STS_SUCCESS;
9646:
9647: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9648: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9649: lc_mod_name||'beforecallinsertjobdtls',
9650: 'Just before calling WIP_OPERATIONS_PKG.Delete_Operation');
9651: END IF;
9652:
9657: x_return_status => l_return_status,
9658: x_error_message => l_error_message);
9659:
9660: If (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
9661: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9662: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9663: lc_mod_name,
9664: 'Error during WIP_OPERATIONS_PKG.Delete_Operation: ' || l_error_message);
9665: END IF;
9658: x_error_message => l_error_message);
9659:
9660: If (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
9661: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9662: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9663: lc_mod_name,
9664: 'Error during WIP_OPERATIONS_PKG.Delete_Operation: ' || l_error_message);
9665: END IF;
9666:
9712: into l_txn_detail_id, l_obj_ver_num,
9713: l_required_quantity, l_quantity_issued;
9714: close c_get_material_req_details;
9715: if (l_required_quantity is not null) then
9716: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9717: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9718: lc_mod_name,
9719: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
9720: END IF;
9713: l_required_quantity, l_quantity_issued;
9714: close c_get_material_req_details;
9715: if (l_required_quantity is not null) then
9716: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9717: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9718: lc_mod_name,
9719: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Update_Row');
9720: END IF;
9721:
9770: end if;
9771: end if; -- if it is a material
9772:
9773: /** DELETE CSD_WIP_TRANSACTION_DETAILS ROW for the deleted operation **/
9774: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9775: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9776: lc_mod_name,
9777: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
9778: END IF;
9771: end if; -- if it is a material
9772:
9773: /** DELETE CSD_WIP_TRANSACTION_DETAILS ROW for the deleted operation **/
9774: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9775: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9776: lc_mod_name,
9777: 'Just before calling CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row');
9778: END IF;
9779: -- remove the row in CSD table.
9796: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9797: p_count => x_msg_count,
9798: p_data => x_msg_data);
9799:
9800: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9801: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9802: lc_mod_name||'unx_exception',
9803: 'G_EXC_UNEXPECTED_ERROR Exception');
9804: END IF;
9797: p_count => x_msg_count,
9798: p_data => x_msg_data);
9799:
9800: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9801: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9802: lc_mod_name||'unx_exception',
9803: 'G_EXC_UNEXPECTED_ERROR Exception');
9804: END IF;
9805:
9812: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9813: p_count => x_msg_count,
9814: p_data => x_msg_data);
9815:
9816: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9817: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
9818: lc_mod_name||'exc_exception',
9819: 'G_EXC_ERROR Exception');
9820: END IF;
9813: p_count => x_msg_count,
9814: p_data => x_msg_data);
9815:
9816: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9817: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
9818: lc_mod_name||'exc_exception',
9819: 'G_EXC_ERROR Exception');
9820: END IF;
9821:
9835: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9836: p_count => x_msg_count,
9837: p_data => x_msg_data);
9838:
9839: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9840: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9841: lc_mod_name||'others_exception',
9842: 'OTHERS Exception');
9843: END IF;
9836: p_count => x_msg_count,
9837: p_data => x_msg_data);
9838:
9839: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9840: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
9841: lc_mod_name||'others_exception',
9842: 'OTHERS Exception');
9843: END IF;
9844:
9875:
9876:
9877: BEGIN
9878:
9879: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level )
9880: THEN
9881: fnd_log.string(fnd_log.level_statement,lc_mod_name||'begin','Entering private API' );
9882: END IF;
9883:
9877: BEGIN
9878:
9879: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level )
9880: THEN
9881: fnd_log.string(fnd_log.level_statement,lc_mod_name||'begin','Entering private API' );
9882: END IF;
9883:
9884: -- Standard call to check for call compatibility.
9885: IF NOT fnd_api.Compatible_API_Call
9900: x_return_status := fnd_api.g_ret_sts_success;
9901:
9902: -- dump the input parameters.
9903:
9904: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level )
9905: THEN
9906: fnd_log.string(fnd_log.level_statement,lc_mod_name,'API called with below parameters');
9907: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_repair_line_id => '||p_repair_line_id);
9908: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_entity_id => '||p_wip_entity_id);
9902: -- dump the input parameters.
9903:
9904: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level )
9905: THEN
9906: fnd_log.string(fnd_log.level_statement,lc_mod_name,'API called with below parameters');
9907: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_repair_line_id => '||p_repair_line_id);
9908: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_entity_id => '||p_wip_entity_id);
9909: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_transaction_detail_id => '||p_wip_transaction_detail_id);
9910: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_type_id => '||p_transaction_type_id);
9903:
9904: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level )
9905: THEN
9906: fnd_log.string(fnd_log.level_statement,lc_mod_name,'API called with below parameters');
9907: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_repair_line_id => '||p_repair_line_id);
9908: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_entity_id => '||p_wip_entity_id);
9909: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_transaction_detail_id => '||p_wip_transaction_detail_id);
9910: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_type_id => '||p_transaction_type_id);
9911: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_quantity => '||p_quantity);
9904: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level )
9905: THEN
9906: fnd_log.string(fnd_log.level_statement,lc_mod_name,'API called with below parameters');
9907: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_repair_line_id => '||p_repair_line_id);
9908: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_entity_id => '||p_wip_entity_id);
9909: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_transaction_detail_id => '||p_wip_transaction_detail_id);
9910: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_type_id => '||p_transaction_type_id);
9911: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_quantity => '||p_quantity);
9912: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_exclude_closed_jobs => '||p_exclude_closed_jobs);
9905: THEN
9906: fnd_log.string(fnd_log.level_statement,lc_mod_name,'API called with below parameters');
9907: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_repair_line_id => '||p_repair_line_id);
9908: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_entity_id => '||p_wip_entity_id);
9909: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_transaction_detail_id => '||p_wip_transaction_detail_id);
9910: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_type_id => '||p_transaction_type_id);
9911: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_quantity => '||p_quantity);
9912: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_exclude_closed_jobs => '||p_exclude_closed_jobs);
9913: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_start => '||p_transaction_date_start);
9906: fnd_log.string(fnd_log.level_statement,lc_mod_name,'API called with below parameters');
9907: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_repair_line_id => '||p_repair_line_id);
9908: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_entity_id => '||p_wip_entity_id);
9909: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_transaction_detail_id => '||p_wip_transaction_detail_id);
9910: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_type_id => '||p_transaction_type_id);
9911: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_quantity => '||p_quantity);
9912: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_exclude_closed_jobs => '||p_exclude_closed_jobs);
9913: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_start => '||p_transaction_date_start);
9914: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_end => '||p_transaction_date_start);
9907: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_repair_line_id => '||p_repair_line_id);
9908: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_entity_id => '||p_wip_entity_id);
9909: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_transaction_detail_id => '||p_wip_transaction_detail_id);
9910: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_type_id => '||p_transaction_type_id);
9911: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_quantity => '||p_quantity);
9912: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_exclude_closed_jobs => '||p_exclude_closed_jobs);
9913: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_start => '||p_transaction_date_start);
9914: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_end => '||p_transaction_date_start);
9915: END IF;
9908: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_entity_id => '||p_wip_entity_id);
9909: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_transaction_detail_id => '||p_wip_transaction_detail_id);
9910: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_type_id => '||p_transaction_type_id);
9911: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_quantity => '||p_quantity);
9912: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_exclude_closed_jobs => '||p_exclude_closed_jobs);
9913: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_start => '||p_transaction_date_start);
9914: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_end => '||p_transaction_date_start);
9915: END IF;
9916:
9909: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_wip_transaction_detail_id => '||p_wip_transaction_detail_id);
9910: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_type_id => '||p_transaction_type_id);
9911: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_quantity => '||p_quantity);
9912: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_exclude_closed_jobs => '||p_exclude_closed_jobs);
9913: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_start => '||p_transaction_date_start);
9914: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_end => '||p_transaction_date_start);
9915: END IF;
9916:
9917: -- start processing.
9910: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_type_id => '||p_transaction_type_id);
9911: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_quantity => '||p_quantity);
9912: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_exclude_closed_jobs => '||p_exclude_closed_jobs);
9913: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_start => '||p_transaction_date_start);
9914: fnd_log.string(fnd_log.level_statement,lc_mod_name,'p_transaction_date_end => '||p_transaction_date_start);
9915: END IF;
9916:
9917: -- start processing.
9918: -- case#1. Best case. The wip transaction detail id and quantity and transaction type are provided.
10318: x_msg_data OUT NOCOPY VARCHAR2,
10319: p_repair_line_id IN NUMBER
10320: ) IS
10321:
10322: lc_debug_level CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10323: lc_stat_level CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
10324: lc_proc_level CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10325: lc_event_level CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10326: lc_excep_level CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10319: p_repair_line_id IN NUMBER
10320: ) IS
10321:
10322: lc_debug_level CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10323: lc_stat_level CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
10324: lc_proc_level CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10325: lc_event_level CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10326: lc_excep_level CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10327: lc_error_level CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10320: ) IS
10321:
10322: lc_debug_level CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10323: lc_stat_level CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
10324: lc_proc_level CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10325: lc_event_level CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10326: lc_excep_level CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10327: lc_error_level CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10328: lc_unexp_level CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10321:
10322: lc_debug_level CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10323: lc_stat_level CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
10324: lc_proc_level CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10325: lc_event_level CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10326: lc_excep_level CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10327: lc_error_level CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10328: lc_unexp_level CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10329:
10322: lc_debug_level CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10323: lc_stat_level CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
10324: lc_proc_level CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10325: lc_event_level CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10326: lc_excep_level CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10327: lc_error_level CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10328: lc_unexp_level CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10329:
10330: lc_api_name CONSTANT VARCHAR2(30) := 'GENERATE_ESTIMATE_FROM_WIP';
10323: lc_stat_level CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
10324: lc_proc_level CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10325: lc_event_level CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10326: lc_excep_level CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10327: lc_error_level CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10328: lc_unexp_level CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10329:
10330: lc_api_name CONSTANT VARCHAR2(30) := 'GENERATE_ESTIMATE_FROM_WIP';
10331: lc_api_version_number CONSTANT NUMBER := 1.0;
10324: lc_proc_level CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10325: lc_event_level CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10326: lc_excep_level CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10327: lc_error_level CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10328: lc_unexp_level CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10329:
10330: lc_api_name CONSTANT VARCHAR2(30) := 'GENERATE_ESTIMATE_FROM_WIP';
10331: lc_api_version_number CONSTANT NUMBER := 1.0;
10332:
10329:
10330: lc_api_name CONSTANT VARCHAR2(30) := 'GENERATE_ESTIMATE_FROM_WIP';
10331: lc_api_version_number CONSTANT NUMBER := 1.0;
10332:
10333: -- constants used for FND_LOG debug messages
10334: lc_mod_name VARCHAR2(2000) := 'csd.plsql.csd_hv_wip_job_pvt.generate_estimate_from_wip';
10335:
10336: l_repair_type_id NUMBER;
10337: l_business_process_id NUMBER;
10341: l_warning_flag VARCHAR2(1);
10342:
10343: BEGIN
10344: IF (lc_proc_level >= lc_debug_level) then
10345: FND_LOG.STRING( lc_proc_level,
10346: lc_mod_name||'begin',
10347: 'Entering private API generate_estimate_from_wip' );
10348: END IF;
10349:
10366: x_return_status := FND_API.G_RET_STS_SUCCESS;
10367:
10368: -- Validate mandatory input parameters.
10369: if (lc_proc_level >= lc_debug_level) then
10370: FND_LOG.STRING(lc_proc_level, lc_mod_name,
10371: 'Calling CSD_PROCESS_UTIL.Check_Reqd_Param for p_repair_line_id');
10372: end if;
10373:
10374: CSD_PROCESS_UTIL.Check_Reqd_Param
10376: p_param_name => 'REPAIR_LINE_ID',
10377: p_api_name => lc_api_name);
10378:
10379: if (lc_stat_level >= lc_debug_level) then
10380: FND_LOG.STRING(lc_stat_level, lc_mod_name,
10381: 'Done checking required params');
10382: end if;
10383:
10384: select dra.repair_type_id,
10396: l_organization_id := fnd_profile.value('CSD_DEF_REP_INV_ORG');
10397:
10398:
10399: IF ( lc_event_level >= lc_debug_level ) then
10400: FND_LOG.STRING( lc_event_level,
10401: lc_mod_name,
10402: 'Just before calling IMPORT_ESTIMATES_FROM_WIP');
10403: END IF;
10404:
10442: p_count => x_msg_count,
10443: p_data => x_msg_data);
10444:
10445: IF (lc_excep_level >= lc_debug_level ) then
10446: FND_LOG.STRING( lc_excep_level,
10447: lc_mod_name||'unx_exception',
10448: 'G_EXC_UNEXPECTED_ERROR Exception');
10449: END IF;
10450:
10458: p_count => x_msg_count,
10459: p_data => x_msg_data);
10460:
10461: IF ( lc_error_level >= lc_debug_level ) then
10462: FND_LOG.STRING( lc_error_level,
10463: lc_mod_name||'exc_exception',
10464: 'G_EXC_ERROR Exception');
10465: END IF;
10466:
10479: p_count => x_msg_count,
10480: p_data => x_msg_data);
10481:
10482: IF ( lc_excep_level >= lc_debug_level) then
10483: FND_LOG.STRING( lc_excep_level,
10484: lc_mod_name||'others_exception',
10485: 'OTHERS Exception');
10486: END IF;
10487: END generate_estimate_from_wip;