45:
46: l_job_header_rec wip_job_schedule_interface%ROWTYPE;
47:
48:
49: -- variables used for FND_LOG debug messages
50:
51: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
52: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
53: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
47:
48:
49: -- variables used for FND_LOG debug messages
50:
51: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
52: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
53: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
54:
55:
48:
49: -- variables used for FND_LOG debug messages
50:
51: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
52: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
53: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
54:
55:
56: -- Constants Used for Inserting into wip_job_schedule_interface,
76: BEGIN
77:
78:
79: IF ( l_proc_level >= l_debug_level ) then
80: FND_LOG.STRING( l_proc_level,
81: l_mod_name||'begin',
82: 'Entering procedure insert_job_header' );
83: END IF;
84:
233: END;
234:
235:
236: IF ( l_proc_level >= l_debug_level ) then
237: FND_LOG.STRING( l_proc_level,
238: l_mod_name||'end',
239: 'Leaving procedure insert_job_header');
240: END IF;
241:
259:
260: l_job_header_rec wip_job_schedule_interface%ROWTYPE := p_job_header_rec;
261:
262:
263: -- variables used for FND_LOG debug messages
264:
265: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
266: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
267: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
261:
262:
263: -- variables used for FND_LOG debug messages
264:
265: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
266: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
267: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
268:
269:
262:
263: -- variables used for FND_LOG debug messages
264:
265: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
266: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
267: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.insert_job_header.';
268:
269:
270: -- Constants Used for Inserting into wip_job_schedule_interface,
288: BEGIN
289:
290:
291: IF ( l_proc_level >= l_debug_level ) then
292: FND_LOG.STRING( l_proc_level,
293: l_mod_name||'begin',
294: 'Entering procedure insert_job_header' );
295: END IF;
296:
399: END;
400:
401:
402: IF ( l_proc_level >= l_debug_level ) then
403: FND_LOG.STRING( l_proc_level,
404: l_mod_name||'end',
405: 'Leaving procedure insert_job_header');
406: END IF;
407:
860: -- Bill, routing information for the Job passed to insert_job_header
861: l_job_bill_routing_rec job_bill_routing_rec_type;
862:
863:
864: -- variables used for FND_LOG debug messages
865:
866: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
867: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
868: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
862:
863:
864: -- variables used for FND_LOG debug messages
865:
866: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
867: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
868: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
869: l_event_level NUMBER := FND_LOG.LEVEL_EVENT;
870: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.submit_jobs.';
863:
864: -- variables used for FND_LOG debug messages
865:
866: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
867: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
868: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
869: l_event_level NUMBER := FND_LOG.LEVEL_EVENT;
870: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.submit_jobs.';
871:
864: -- variables used for FND_LOG debug messages
865:
866: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
867: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
868: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
869: l_event_level NUMBER := FND_LOG.LEVEL_EVENT;
870: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.submit_jobs.';
871:
872: l_default_ro_item VARCHAR2(1);
865:
866: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
867: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
868: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
869: l_event_level NUMBER := FND_LOG.LEVEL_EVENT;
870: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.submit_jobs.';
871:
872: l_default_ro_item VARCHAR2(1);
873: l_wip_entity_id NUMBER;
923:
924: BEGIN
925:
926: IF ( l_proc_level >= l_debug_level ) THEN
927: FND_LOG.STRING( l_proc_level,
928: l_mod_name||'begin',
929: 'Entering Private API submit_jobs');
930: END IF;
931:
1026:
1027: p_x_job_bill_routing_tbl(0).job_name := l_job_bill_routing_rec.job_name;
1028:
1029: IF ( l_event_level >= l_debug_level ) then
1030: FND_LOG.STRING( l_event_level,
1031: l_mod_name||'beforecallinsert',
1032: 'Just before calling insert_job_header');
1033: END IF;
1034:
1192: END IF;
1193:
1194:
1195: IF ( l_event_level >= l_debug_level ) then
1196: FND_LOG.STRING( l_event_level,
1197: l_mod_name||'beforecallinsert',
1198: 'Just before calling insert_job_header');
1199: END IF;
1200:
1329: argument1 => TO_CHAR(l_group_id),
1330: argument2 => p_repair_line_id ) ;
1331:
1332: IF ( l_stat_level >= l_debug_level ) then
1333: FND_LOG.STRING( l_stat_level,
1334: l_mod_name||'submitdata',
1335: 'When calling submit_request, the group_id is '||to_char(l_group_id));
1336: END IF;
1337:
1346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1347:
1348:
1349: IF ( l_stat_level >= l_debug_level ) then
1350: FND_LOG.STRING( l_stat_level,
1351: l_mod_name||'requestfail',
1352: 'Submit request failed');
1353: END IF;
1354:
1365:
1366: COMMIT;
1367:
1368: IF ( l_proc_level >= l_debug_level ) then
1369: FND_LOG.STRING( l_proc_level,
1370: l_mod_name||'end',
1371: 'Leaving Private API submit_jobs');
1372: END IF;
1373:
1378: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1379: p_count => x_msg_count,
1380: p_data => x_msg_data);
1381:
1382: IF ( FND_LOG.LEVEL_EXCEPTION >= l_debug_level ) then
1383: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1384: l_mod_name||'unx_exception',
1385: 'G_EXC_UNEXPECTED_ERROR Exception');
1386: END IF;
1379: p_count => x_msg_count,
1380: p_data => x_msg_data);
1381:
1382: IF ( FND_LOG.LEVEL_EXCEPTION >= l_debug_level ) then
1383: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1384: l_mod_name||'unx_exception',
1385: 'G_EXC_UNEXPECTED_ERROR Exception');
1386: END IF;
1387:
1392: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1393: p_count => x_msg_count,
1394: p_data => x_msg_data);
1395:
1396: IF ( FND_LOG.LEVEL_ERROR >= l_debug_level ) then
1397: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
1398: l_mod_name||'exc_exception',
1399: 'G_EXC_ERROR Exception');
1400: END IF;
1393: p_count => x_msg_count,
1394: p_data => x_msg_data);
1395:
1396: IF ( FND_LOG.LEVEL_ERROR >= l_debug_level ) then
1397: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
1398: l_mod_name||'exc_exception',
1399: 'G_EXC_ERROR Exception');
1400: END IF;
1401:
1415: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1416: p_count => x_msg_count,
1417: p_data => x_msg_data);
1418:
1419: IF ( FND_LOG.LEVEL_EXCEPTION >= l_debug_level ) then
1420: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1421: l_mod_name||'others_exception',
1422: 'OTHERS Exception');
1423: END IF;
1416: p_count => x_msg_count,
1417: p_data => x_msg_data);
1418:
1419: IF ( FND_LOG.LEVEL_EXCEPTION >= l_debug_level ) then
1420: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1421: l_mod_name||'others_exception',
1422: 'OTHERS Exception');
1423: END IF;
1424:
1478: l_msg_count NUMBER;
1479: l_msg_data VARCHAR2(2000);
1480: l_return_status VARCHAR2(1);
1481:
1482: -- variables used for FND_LOG debug messages
1483:
1484: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1485: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
1486: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
1480: l_return_status VARCHAR2(1);
1481:
1482: -- variables used for FND_LOG debug messages
1483:
1484: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1485: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
1486: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
1487: l_event_level NUMBER := FND_LOG.LEVEL_EVENT;
1488: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.submit_wip_mass_load_conc.';
1481:
1482: -- variables used for FND_LOG debug messages
1483:
1484: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1485: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
1486: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
1487: l_event_level NUMBER := FND_LOG.LEVEL_EVENT;
1488: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.submit_wip_mass_load_conc.';
1489:
1482: -- variables used for FND_LOG debug messages
1483:
1484: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1485: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
1486: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
1487: l_event_level NUMBER := FND_LOG.LEVEL_EVENT;
1488: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.submit_wip_mass_load_conc.';
1489:
1490:
1483:
1484: l_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1485: l_stat_level NUMBER := FND_LOG.LEVEL_STATEMENT;
1486: l_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
1487: l_event_level NUMBER := FND_LOG.LEVEL_EVENT;
1488: l_mod_name VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.submit_wip_mass_load_conc.';
1489:
1490:
1491:
1492:
1493: BEGIN
1494:
1495: IF ( l_proc_level >= l_debug_level ) then
1496: FND_LOG.STRING( l_proc_level,
1497: l_mod_name||'begin',
1498: 'Entering procedure submit_wip_mass_load_conc' );
1499: END IF;
1500:
1525: l_msg_data := FND_MESSAGE.GET_STRING('CSD','CSD_WICMLP_SUBMIT_FAILURE');
1526: fnd_file.put_line(fnd_file.log, l_msg_data );
1527:
1528: IF ( l_stat_level >= l_debug_level ) then
1529: FND_LOG.STRING( l_stat_level,
1530: l_mod_name||'requestfailure',
1531: 'WIP Mass Load Submit request failed' );
1532: END IF;
1533:
1537:
1538: COMMIT; --This commit is a must for the completion of the concurrent request submission
1539:
1540: IF ( l_stat_level >= l_debug_level ) then
1541: FND_LOG.STRING( l_stat_level,
1542: l_mod_name||'beforewait',
1543: 'After commit and before wait for request' );
1544: END IF;
1545:
1569: fnd_file.put_line(fnd_file.log, l_msg_data );
1570:
1571:
1572: IF ( l_stat_level >= l_debug_level ) then
1573: FND_LOG.STRING( l_stat_level,
1574: l_mod_name||'waitfailure',
1575: 'Wait for request failed');
1576: END IF;
1577:
1582:
1583: -- WIP Mass Load completed successfully
1584:
1585: IF ( l_event_level >= l_debug_level ) then
1586: FND_LOG.STRING( l_event_level,
1587: l_mod_name||'beforeupdatecall',
1588: 'Before Call to depot_wip_update');
1589: END IF;
1590:
1638:
1639: END IF;
1640:
1641: IF ( l_stat_level >= l_debug_level ) then
1642: FND_LOG.STRING( l_stat_level,
1643: l_mod_name||'updatecallerror',
1644: 'CSD_UPDATE_PROGRAMS_PVT.WIP_UPDATE call returned error');
1645: END IF;
1646:
1664: l_msg_data := FND_MESSAGE.GET_STRING('CSD','CSD_WICMLP_COMPLETION_FAILURE');
1665: fnd_file.put_line(fnd_file.log,l_msg_data );
1666:
1667: IF ( l_stat_level >= l_debug_level ) then
1668: FND_LOG.STRING( l_stat_level,
1669: l_mod_name||'completionfailure',
1670: 'WIP Mass Load did not Complete Successfully');
1671: END IF;
1672:
1675: END IF;
1676: END IF;
1677:
1678: IF ( l_proc_level >= l_debug_level ) then
1679: FND_LOG.STRING( l_proc_level,
1680: l_mod_name||'end',
1681: 'Leaving procedure submit_wip_mass_load_conc');
1682: END IF;
1683:
1738:
1739: errbuf := FND_MESSAGE.GET_STRING('CSD','CSD_CSDJSWIP_FAILURE');
1740: retcode := l_error ;
1741:
1742: IF ( FND_LOG.LEVEL_EXCEPTION >= l_debug_level ) then
1743: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1744: l_mod_name||'others_exception',
1745: 'OTHERS Exception');
1746: END IF;
1739: errbuf := FND_MESSAGE.GET_STRING('CSD','CSD_CSDJSWIP_FAILURE');
1740: retcode := l_error ;
1741:
1742: IF ( FND_LOG.LEVEL_EXCEPTION >= l_debug_level ) then
1743: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
1744: l_mod_name||'others_exception',
1745: 'OTHERS Exception');
1746: END IF;
1747:
1804: -- Non Standard Discrete Job Load Type
1805: lc_non_standard_load_type CONSTANT NUMBER := 4;
1806:
1807:
1808: -- Constants used for FND_LOG debug messages
1809:
1810: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.create_job_from_estimate';
1811:
1812:
1821:
1822:
1823: BEGIN
1824:
1825: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1826: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1827: lc_mod_name||'begin',
1828: 'Entering Private API create_job_from_estimate');
1829: END IF;
1822:
1823: BEGIN
1824:
1825: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1826: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
1827: lc_mod_name||'begin',
1828: 'Entering Private API create_job_from_estimate');
1829: END IF;
1830:
1967: NULL;
1968: END;
1969: END IF;
1970:
1971: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1972: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1973: lc_mod_name||'beforecallinsert',
1974: 'Just before calling insert_job_header');
1975: END IF;
1968: END;
1969: END IF;
1970:
1971: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1972: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1973: lc_mod_name||'beforecallinsert',
1974: 'Just before calling insert_job_header');
1975: END IF;
1976:
1994: --If API fails, Raise error, rollback and return
1995:
1996: -- Call WIP Mass Load API
1997:
1998: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1999: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2000: lc_mod_name||'beforecallcreateonejob',
2001: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
2002: END IF;
1995:
1996: -- Call WIP Mass Load API
1997:
1998: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1999: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2000: lc_mod_name||'beforecallcreateonejob',
2001: 'Just before calling WIP_MASSLOAD_PUB.createOneJob');
2002: END IF;
2003:
2020: -- and csd_repair_history tables for the job created.
2021:
2022: L_user_id := fnd_global.user_id;
2023:
2024: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2025: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2026: lc_mod_name||'beforecallxrefwrite',
2027: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
2028: END IF;
2021:
2022: L_user_id := fnd_global.user_id;
2023:
2024: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2025: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2026: lc_mod_name||'beforecallxrefwrite',
2027: 'Just before calling csd_to_form_repair_job_xref.validate_and_write');
2028: END IF;
2029:
2077:
2078: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2079: ROLLBACK to CREATE_WIP_JOB_PVT ;
2080:
2081: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2082: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2083: lc_mod_name||'exc_exception',
2084: 'G_EXC_ERROR Exception');
2085: END IF;
2078: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2079: ROLLBACK to CREATE_WIP_JOB_PVT ;
2080:
2081: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2082: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2083: lc_mod_name||'exc_exception',
2084: 'G_EXC_ERROR Exception');
2085: END IF;
2086:
2088:
2089: END IF;
2090:
2091:
2092: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2093: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2094: lc_mod_name||'beforecallhistwrite',
2095: 'Just before calling csd_to_form_repair_history.validate_and_write');
2096: END IF;
2089: END IF;
2090:
2091:
2092: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2093: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
2094: lc_mod_name||'beforecallhistwrite',
2095: 'Just before calling csd_to_form_repair_history.validate_and_write');
2096: END IF;
2097:
2169:
2170: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2171: ROLLBACK to CREATE_WIP_JOB_PVT ;
2172:
2173: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2174: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2175: lc_mod_name||'exc_exception',
2176: 'G_EXC_ERROR Exception');
2177: END IF;
2170: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2171: ROLLBACK to CREATE_WIP_JOB_PVT ;
2172:
2173: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2174: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2175: lc_mod_name||'exc_exception',
2176: 'G_EXC_ERROR Exception');
2177: END IF;
2178:
2195: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2196: p_count => x_msg_count,
2197: p_data => x_msg_data);
2198:
2199: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2200: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2201: lc_mod_name||'unx_exception',
2202: 'G_EXC_UNEXPECTED_ERROR Exception');
2203: END IF;
2196: p_count => x_msg_count,
2197: p_data => x_msg_data);
2198:
2199: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2200: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2201: lc_mod_name||'unx_exception',
2202: 'G_EXC_UNEXPECTED_ERROR Exception');
2203: END IF;
2204:
2211: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2212: p_count => x_msg_count,
2213: p_data => x_msg_data);
2214:
2215: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2216: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2217: lc_mod_name||'exc_exception',
2218: 'G_EXC_ERROR Exception');
2219: END IF;
2212: p_count => x_msg_count,
2213: p_data => x_msg_data);
2214:
2215: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2216: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2217: lc_mod_name||'exc_exception',
2218: 'G_EXC_ERROR Exception');
2219: END IF;
2220:
2234: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2235: p_count => x_msg_count,
2236: p_data => x_msg_data);
2237:
2238: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2239: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2240: lc_mod_name||'others_exception',
2241: 'OTHERS Exception');
2242: END IF;
2235: p_count => x_msg_count,
2236: p_data => x_msg_data);
2237:
2238: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2239: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION,
2240: lc_mod_name||'others_exception',
2241: 'OTHERS Exception');
2242: END IF;
2243:
2269:
2270:
2271: BEGIN
2272:
2273: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2274: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2275: lc_mod_name||'begin',
2276: 'Entering Private API create_job_from_estimate');
2277: END IF;
2270:
2271: BEGIN
2272:
2273: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2274: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2275: lc_mod_name||'begin',
2276: 'Entering Private API create_job_from_estimate');
2277: END IF;
2278:
2292: -- hvr API to create the material requirements(we just create material requirements, we dont issue -- materials).
2293:
2294: IF x_mtl_txn_dtls_tab_type.COUNT >= 1 THEN
2295:
2296: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2297: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2298: lc_mod_name||'begin',
2299: 'Calling HVR API to create material requirements');
2300: END IF;
2293:
2294: IF x_mtl_txn_dtls_tab_type.COUNT >= 1 THEN
2295:
2296: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2297: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
2298: lc_mod_name||'begin',
2299: 'Calling HVR API to create material requirements');
2300: END IF;
2301: