[Home] [Help]
1: PACKAGE BODY OKL_PROCESS_STREAMS_PVT AS
2: /* $Header: OKLRPSRB.pls 120.47.12020000.4 2012/10/23 06:08:47 bkatraga ship $ */
3:
4: G_MODULE VARCHAR2(255) := 'okl.stream.esg.okl_esg_transport_pvt';
5: G_DEBUG_ENABLED CONSTANT VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
6: G_IS_DEBUG_STATEMENT_ON BOOLEAN;
7: -- Start of wraper code generated automatically by Debug code generator
8: L_MODULE VARCHAR2(40) := 'LEASE.STREAMS';
9: L_DEBUG_ENABLED VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
5: G_DEBUG_ENABLED CONSTANT VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
6: G_IS_DEBUG_STATEMENT_ON BOOLEAN;
7: -- Start of wraper code generated automatically by Debug code generator
8: L_MODULE VARCHAR2(40) := 'LEASE.STREAMS';
9: L_DEBUG_ENABLED VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
10: L_LEVEL_PROCEDURE NUMBER;
11: IS_DEBUG_PROCEDURE_ON BOOLEAN;
12: -- End of wraper code generated automatically by Debug code generator
13: --| : 10-08-04 GKADARKA -- Fixes for bug 3909261 -Start |
301: END LOOP;
302: -- Start of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.create_streams
303: IF(L_DEBUG_ENABLED='Y') THEN
304: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
305: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
306: END IF;
307: IF(IS_DEBUG_PROCEDURE_ON) THEN
308: BEGIN
309: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
305: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
306: END IF;
307: IF(IS_DEBUG_PROCEDURE_ON) THEN
308: BEGIN
309: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
310: END;
311: END IF;
312: Okl_Streams_Pub.create_streams(p_api_version
313: ,p_init_msg_list
319: ,x_stmv_rec
320: ,x_selv_tbl);
321: IF(IS_DEBUG_PROCEDURE_ON) THEN
322: BEGIN
323: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
324: END;
325: END IF;
326: -- End of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.create_streams
327: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
533: END LOOP;
534: -- Start of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.create_streams
535: IF(L_DEBUG_ENABLED='Y') THEN
536: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
537: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
538: END IF;
539: IF(IS_DEBUG_PROCEDURE_ON) THEN
540: BEGIN
541: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
537: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
538: END IF;
539: IF(IS_DEBUG_PROCEDURE_ON) THEN
540: BEGIN
541: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
542: END;
543: END IF;
544: Okl_Streams_Pub.create_streams(p_api_version
545: ,p_init_msg_list
551: ,x_stmv_rec
552: ,x_selv_tbl);
553: IF(IS_DEBUG_PROCEDURE_ON) THEN
554: BEGIN
555: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
556: END;
557: END IF;
558: -- End of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.create_streams
559: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1092: --Bug 4346646-End of Changes
1093:
1094: BEGIN
1095: IF (G_DEBUG_ENABLED = 'Y') THEN
1096: G_IS_DEBUG_STATEMENT_ON := OKL_DEBUG_PUB.CHECK_LOG_ON(G_MODULE, FND_LOG.LEVEL_STATEMENT);
1097: END IF;
1098: --Added by kthiruva for Debugging
1099: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
1100: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1095: IF (G_DEBUG_ENABLED = 'Y') THEN
1096: G_IS_DEBUG_STATEMENT_ON := OKL_DEBUG_PUB.CHECK_LOG_ON(G_MODULE, FND_LOG.LEVEL_STATEMENT);
1097: END IF;
1098: --Added by kthiruva for Debugging
1099: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
1100: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1101: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Transaction number is :'||p_transaction_number);
1102: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Inside procedure process_stream_results');
1103: END IF;
1097: END IF;
1098: --Added by kthiruva for Debugging
1099: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
1100: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1101: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Transaction number is :'||p_transaction_number);
1102: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Inside procedure process_stream_results');
1103: END IF;
1104:
1105:
1098: --Added by kthiruva for Debugging
1099: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
1100: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1101: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Transaction number is :'||p_transaction_number);
1102: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Inside procedure process_stream_results');
1103: END IF;
1104:
1105:
1106: l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
1234: ELSE
1235: -- call the insert API for STREAMS
1236: IF(IS_DEBUG_PROCEDURE_ON) THEN
1237: BEGIN
1238: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
1239: END;
1240: END IF;
1241:
1242: --Modified by kthiruva for Streams Performance on 15-May-2005
1292: --Bug 4346646 - End of Changes
1293:
1294: IF(IS_DEBUG_PROCEDURE_ON) THEN
1295: BEGIN
1296: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
1297: END;
1298: END IF;
1299:
1300: j := 1 ;
1337: IF( l_khr_id IS NOT NULL )
1338: THEN
1339: IF(IS_DEBUG_PROCEDURE_ON) THEN
1340: BEGIN
1341: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
1342: END;
1343: END IF;
1344:
1345: --Modified by kthiruva on 15-May-2005 for Streams Performance
1346: --Bug 4346646 - Start of Changes
1347:
1348: --Added by kthiruva for Debug Logging
1349: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1350: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to the call to Okl_Streams_Util.round_streams_amount_esg');
1351: END IF;
1352: --Making the round amount call for the stream elements of the last stream header
1353: x_return_status := Okl_Streams_Util.round_streams_amount_esg(p_api_version => p_api_version,
1354: p_init_msg_list => p_init_msg_list,
1364: p_apply_rnd_diff => l_diff_lookup_code);
1365:
1366: --Added by kthiruva for Debug Logging
1367: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1368: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to Okl_Streams_Util.round_streams_amount_esg, return status is :'||x_return_status);
1369: END IF;
1370:
1371: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1372: RAISE G_EXCEPTION_UNEXPECTED_ERROR;
1381: x_return_status => x_return_status
1382: );
1383: --Added by kthiruva for Debug Logging
1384: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1385: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to Okl_Streams_Util.accumulate_strm_elements, return status is :'||x_return_status);
1386: END IF;
1387:
1388: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1389: RAISE G_EXCEPTION_UNEXPECTED_ERROR;
1404: ,x_selv_tbl);
1405: --Bug 4346646 - End of Changes
1406: --Added by kthiruva for Debug Logging
1407: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1408: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to Okl_Streams_Pub.create_streams_perf, return status is :'||x_return_status);
1409: END IF;
1410:
1411:
1412: IF(IS_DEBUG_PROCEDURE_ON) THEN
1410:
1411:
1412: IF(IS_DEBUG_PROCEDURE_ON) THEN
1413: BEGIN
1414: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
1415: END;
1416: END IF;
1417: -- End of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.create_streams
1418: IF (x_return_status = G_RET_STS_UNEXP_ERROR)
1427: FETCH chk_for_subsidy_csr INTO l_chk_subsidy;
1428: CLOSE chk_for_subsidy_csr;
1429: --Added by kthiruva for Debug Logging
1430: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1431: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Value of l_chk_subsidy is :'||l_chk_subsidy);
1432: END IF;
1433:
1434: -- TODO : check what yield has to be assigned
1435: -- Update Yields at contract header
1492: -- generate streams for the SERVICE LINES
1493: -- Start of wraper code generated automatically by Debug code generator for OKL_PROCESS_STREAMS_PVT.GEN_SERV_MAIN_LINE_STRMS
1494: IF(IS_DEBUG_PROCEDURE_ON) THEN
1495: BEGIN
1496: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_PROCESS_STREAMS_PVT.GEN_SERV_MAIN_LINE_STRMS ');
1497: END;
1498: END IF;
1499:
1500: --start smahapat bugfix# 2790695
1505: FETCH reporting_product_csr INTO reporting_product_rec;
1506: CLOSE reporting_product_csr;
1507: --Added by kthiruva for Debug Logging
1508: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1509: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Reporting Product present.Calling OKL_SETUPPRODUCTS_PVT.Getpdt_parameters');
1510: END IF;
1511:
1512: l_pdtv_rec.id := reporting_product_rec.reporting_pdt_id;
1513: OKL_SETUPPRODUCTS_PVT.Getpdt_parameters(
1521: p_pdt_parameter_rec => lx_pdt_parameter_rec);
1522:
1523: --Added by kthiruva for Debug Logging
1524: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1525: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to OKL_SETUPPRODUCTS_PVT.Getpdt_parameters, return status is :'|| x_return_status);
1526: END IF;
1527: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1528: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1529: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1541: IF SERVICE_LINES_EXIST%FOUND THEN
1542: --Bug 4346646 - End of Changes
1543: --Added by kthiruva for Debug Logging
1544: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1545: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Service Lines Exist');
1546: END IF;
1547: okl_stream_generator_pub.GENERATE_STREAMS(
1548: p_api_version => p_api_version,
1549: p_init_msg_list => p_init_msg_list,
1556: x_msg_count => x_msg_count,
1557: x_msg_data => x_msg_data);
1558: --Added by kthiruva for Debug Logging
1559: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1560: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to okl_stream_generator_pub.GENERATE_STREAMS, return status is :'|| x_return_status);
1561: END IF;
1562:
1563: IF (x_return_status = G_RET_STS_UNEXP_ERROR)
1564: THEN
1573: CLOSE SERVICE_LINES_EXIST;
1574: --Bug 4346646 - End of Changes
1575: --Added by kthiruva for Debug Logging
1576: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1577: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to generating Residual Value streams');
1578: END IF;
1579: --Generate accrual streams for residual streams internally
1580: okl_stream_generator_pub.GENERATE_STREAMS(
1581: p_api_version => p_api_version,
1589: x_msg_count => x_msg_count,
1590: x_msg_data => x_msg_data);
1591: --Added by kthiruva for Debug Logging
1592: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1593: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to okl_stream_generator_pub.GENERATE_STREAMS, return status is :'|| x_return_status);
1594: END IF;
1595:
1596: IF (x_return_status = G_RET_STS_UNEXP_ERROR)
1597: THEN
1614: -- generate streams for the SECURITY DEPOSIT FEES
1615: -- Start of wraper code generated automatically by Debug code generator for OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS
1616: IF(IS_DEBUG_PROCEDURE_ON) THEN
1617: BEGIN
1618: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS ');
1619: END;
1620: END IF;
1621: --Added by kthiruva for Debug Logging
1622: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1619: END;
1620: END IF;
1621: --Added by kthiruva for Debug Logging
1622: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1623: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Security deposit amount is not null');
1624: END IF;
1625:
1626: OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS(p_api_version => p_api_version
1627: ,p_init_msg_list => p_init_msg_list
1632: ,x_msg_count => x_msg_count
1633: ,x_msg_data => x_msg_data);
1634: --Added by kthiruva for Debug Logging
1635: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1636: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS, return status is :'|| x_return_status);
1637: END IF;
1638:
1639: IF(IS_DEBUG_PROCEDURE_ON) THEN
1640: BEGIN
1637: END IF;
1638:
1639: IF(IS_DEBUG_PROCEDURE_ON) THEN
1640: BEGIN
1641: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS ');
1642: END;
1643: END IF;
1644: -- End of wraper code generated automatically by Debug code generator for OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS
1645: IF (x_return_status = G_RET_STS_UNEXP_ERROR)
1678: -- Start of wraper code generated automatically by Debug code generator for OKL_LA_STREAM_PVT.process_streams
1679: IF(IS_DEBUG_PROCEDURE_ON) THEN
1680:
1681: BEGIN
1682: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_LA_STREAM_PVT.process_streams ');
1683: END;
1684: END IF;
1685: --Added by kthiruva for Debug Logging
1686: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1683: END;
1684: END IF;
1685: --Added by kthiruva for Debug Logging
1686: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1687: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to the call to OKL_LA_STREAM_PVT.process_streams');
1688: END IF;
1689:
1690: OKL_LA_STREAM_PVT.process_streams(
1691: p_api_version,
1697: l_process_yn,
1698: l_khr_yields_rec);
1699: --Added by kthiruva for Debug Logging
1700: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1701: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to OKL_LA_STREAM_PVT.process_streams, return status is :'|| x_return_status);
1702: END IF;
1703:
1704: IF(IS_DEBUG_PROCEDURE_ON) THEN
1705: BEGIN
1702: END IF;
1703:
1704: IF(IS_DEBUG_PROCEDURE_ON) THEN
1705: BEGIN
1706: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_LA_STREAM_PVT.process_streams ');
1707: END;
1708: END IF;
1709: -- End of wraper code generated automatically by Debug code generator for OKL_LA_STREAM_PVT.process_streams
1710: /*
1737: l_sirv_rec.date_processed := to_date(to_char(SYSDATE,'YYYYMMDD HH24MISS'), 'YYYYMMDD HH24MISS');
1738: -- Start of wraper code generated automatically by Debug code generator for OKL_SIF_RETS_PUB.update_sif_rets
1739: IF(IS_DEBUG_PROCEDURE_ON) THEN
1740: BEGIN
1741: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
1742: END;
1743: END IF;
1744: --Added by kthiruva for Debug Logging
1745: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1742: END;
1743: END IF;
1744: --Added by kthiruva for Debug Logging
1745: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1746: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to the call to OKL_SIF_RETS_PUB.update_sif_rets');
1747: END IF;
1748: OKL_SIF_RETS_PUB.update_sif_rets(p_api_version => p_api_version,
1749: p_init_msg_list => p_init_msg_list,
1750: x_return_status => l_return_status,
1753: p_sirv_rec => l_sirv_rec,
1754: x_sirv_rec => p_sirv_rec);
1755: --Added by kthiruva for Debug Logging
1756: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1757: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to OKL_SIF_RETS_PUB.update_sif_rets, return status is :'|| x_return_status);
1758: END IF;
1759:
1760: IF(IS_DEBUG_PROCEDURE_ON) THEN
1761: BEGIN
1758: END IF;
1759:
1760: IF(IS_DEBUG_PROCEDURE_ON) THEN
1761: BEGIN
1762: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
1763: END;
1764: END IF;
1765: -- End of wraper code generated automatically by Debug code generator for OKL_SIF_RETS_PUB.update_sif_rets
1766:
1782: END IF;
1783: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAM_INTERFACES_PUB.update_stream_interfaces
1784: IF(IS_DEBUG_PROCEDURE_ON) THEN
1785: BEGIN
1786: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_STREAM_INTERFACES_PUB.update_stream_interfaces ');
1787: END;
1788: END IF;
1789: --Added by kthiruva for Debug Logging
1790: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1787: END;
1788: END IF;
1789: --Added by kthiruva for Debug Logging
1790: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1791: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to the call to OKL_STREAM_INTERFACES_PUB.update_stream_interfaces');
1792: END IF;
1793: OKL_STREAM_INTERFACES_PUB.update_stream_interfaces(
1794: p_api_version => p_api_version
1795: ,p_init_msg_list => p_init_msg_list
1799: ,p_sifv_rec => lp_sifv_rec
1800: ,x_sifv_rec => lx_sifv_rec);
1801: --Added by kthiruva for Debug Logging
1802: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1803: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'After the call to OKL_STREAM_INTERFACES_PUB.update_stream_interfaces, return status is :'|| x_return_status);
1804: END IF;
1805:
1806: IF(IS_DEBUG_PROCEDURE_ON) THEN
1807: BEGIN
1804: END IF;
1805:
1806: IF(IS_DEBUG_PROCEDURE_ON) THEN
1807: BEGIN
1808: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_STREAM_INTERFACES_PUB.update_stream_interfaces ');
1809: END;
1810: END IF;
1811: -- End of wraper code generated automatically by Debug code generator for OKL_STREAM_INTERFACES_PUB.update_stream_interfaces
1812: IF l_return_status = G_RET_STS_ERROR THEN
1899: -- call the update for all the records
1900: -- Start of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.update_streams
1901: IF(L_DEBUG_ENABLED='Y') THEN
1902: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
1903: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
1904: END IF;
1905: IF(IS_DEBUG_PROCEDURE_ON) THEN
1906: BEGIN
1907: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.update_streams ');
1903: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
1904: END IF;
1905: IF(IS_DEBUG_PROCEDURE_ON) THEN
1906: BEGIN
1907: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.update_streams ');
1908: END;
1909: END IF;
1910: Okl_Streams_Pub.update_streams(l_api_version
1911: ,p_init_msg_list
1915: ,stmv_tbl
1916: ,x_stmv_tbl);
1917: IF(IS_DEBUG_PROCEDURE_ON) THEN
1918: BEGIN
1919: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call Okl_Streams_Pub.update_streams ');
1920: END;
1921: END IF;
1922: -- End of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.update_streams
1923: EXCEPTION
2122: lp_sirv_rec.date_processed := to_date(to_char(SYSDATE,'YYYYMMDD HH24MISS'), 'YYYYMMDD HH24MISS');
2123: -- Start of wraper code generated automatically by Debug code generator for OKL_SIF_RETS_PUB.update_sif_rets
2124: IF(L_DEBUG_ENABLED='Y') THEN
2125: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
2126: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2127: END IF;
2128: IF(IS_DEBUG_PROCEDURE_ON) THEN
2129: BEGIN
2130: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
2126: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2127: END IF;
2128: IF(IS_DEBUG_PROCEDURE_ON) THEN
2129: BEGIN
2130: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
2131: END;
2132: END IF;
2133: OKL_SIF_RETS_PUB.update_sif_rets(p_api_version => lp_api_version,
2134: p_init_msg_list => lp_init_msg_list,
2138: p_sirv_rec => lp_sirv_rec,
2139: x_sirv_rec => lx_sirv_rec);
2140: IF(IS_DEBUG_PROCEDURE_ON) THEN
2141: BEGIN
2142: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
2143: END;
2144: END IF;
2145: -- End of wraper code generated automatically by Debug code generator for OKL_SIF_RETS_PUB.update_sif_rets
2146: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2166: END IF;
2167: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAM_INTERFACES_PUB.update_stream_interfaces
2168: IF(IS_DEBUG_PROCEDURE_ON) THEN
2169: BEGIN
2170: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_STREAM_INTERFACES_PUB.update_stream_interfaces ');
2171: END;
2172: END IF;
2173: OKL_STREAM_INTERFACES_PUB.update_stream_interfaces(p_api_version => lp_api_version
2174: ,p_init_msg_list => lp_init_msg_list
2179: ,x_sifv_rec => lx_sifv_rec);
2180:
2181: IF(IS_DEBUG_PROCEDURE_ON) THEN
2182: BEGIN
2183: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_STREAM_INTERFACES_PUB.update_stream_interfaces ');
2184: END;
2185: END IF;
2186: -- End of wraper code generated automatically by Debug code generator for OKL_STREAM_INTERFACES_PUB.update_stream_interfaces
2187: IF l_return_status = G_RET_STS_ERROR THEN
2368: -- call the restructure api for processing results
2369: -- Start of wraper code generated automatically by Debug code generator for OKL_AM_RESTRUCTURE_RENTS_PVT.process_results
2370: IF(L_DEBUG_ENABLED='Y') THEN
2371: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
2372: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2373: END IF;
2374: IF(IS_DEBUG_PROCEDURE_ON) THEN
2375: BEGIN
2376: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_AM_RESTRUCTURE_RENTS_PVT.process_results ');
2372: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2373: END IF;
2374: IF(IS_DEBUG_PROCEDURE_ON) THEN
2375: BEGIN
2376: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_AM_RESTRUCTURE_RENTS_PVT.process_results ');
2377: END;
2378: END IF;
2379: OKL_AM_RESTRUCTURE_RENTS_PVT.process_results(p_api_version => l_api_version,
2380:
2389: x_msg_count => x_msg_count,
2390: x_msg_data => x_msg_data);
2391: IF(IS_DEBUG_PROCEDURE_ON) THEN
2392: BEGIN
2393: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_AM_RESTRUCTURE_RENTS_PVT.process_results ');
2394: END;
2395: END IF;
2396: -- End of wraper code generated automatically by Debug code generator for OKL_AM_RESTRUCTURE_RENTS_PVT.process_results
2397: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2616: -- Start of wraper code generated automatically by Debug code generator for okl_solve_for_rent_pvt.process_results
2617: /*
2618: IF(L_DEBUG_ENABLED='Y') THEN
2619: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
2620: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2621: END IF;
2622: IF(IS_DEBUG_PROCEDURE_ON) THEN
2623: BEGIN
2624: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call okl_solve_for_rent_pvt.process_results ');
2620: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2621: END IF;
2622: IF(IS_DEBUG_PROCEDURE_ON) THEN
2623: BEGIN
2624: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call okl_solve_for_rent_pvt.process_results ');
2625: END;
2626: END IF;
2627: okl_solve_for_rent_pvt.process_results(p_api_version => l_api_version,
2628: p_init_msg_list => p_init_msg_list,
2635: x_msg_count => x_msg_count,
2636: x_msg_data => x_msg_data);
2637: IF(IS_DEBUG_PROCEDURE_ON) THEN
2638: BEGIN
2639: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call okl_solve_for_rent_pvt.process_results ');
2640: END;
2641: END IF;
2642: -- End of wraper code generated automatically by Debug code generator for okl_solve_for_rent_pvt.process_results
2643: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2990: -- call the restructure api for processing results
2991: -- Start of wraper code generated automatically by Debug code generator for okl_cs_lease_renewal_pub.update_lrnw_request
2992: IF(L_DEBUG_ENABLED='Y') THEN
2993: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
2994: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2995: END IF;
2996: IF(IS_DEBUG_PROCEDURE_ON) THEN
2997: BEGIN
2998: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call okl_cs_lease_renewal_pub.update_lrnw_request ');
2994: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2995: END IF;
2996: IF(IS_DEBUG_PROCEDURE_ON) THEN
2997: BEGIN
2998: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call okl_cs_lease_renewal_pub.update_lrnw_request ');
2999: END;
3000: END IF;
3001: okl_cs_lease_renewal_pub.update_lrnw_request(p_api_version => p_api_version
3002: ,p_init_msg_list => p_init_msg_list
3006: ,p_trqv_rec => p_trqv_rec
3007: ,x_trqv_rec => x_trqv_rec);
3008: IF(IS_DEBUG_PROCEDURE_ON) THEN
3009: BEGIN
3010: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call okl_cs_lease_renewal_pub.update_lrnw_request ');
3011: END;
3012: END IF;
3013: -- End of wraper code generated automatically by Debug code generator for okl_cs_lease_renewal_pub.update_lrnw_request
3014: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
3475: -- Start of wraper code generated automatically by Debug code generator for OKL_VARIABLE_INTEREST_PUB.var_int_rent_level
3476:
3477: IF(L_DEBUG_ENABLED='Y') THEN
3478: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
3479: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3480: END IF;
3481: IF(IS_DEBUG_PROCEDURE_ON) THEN
3482: BEGIN
3483: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_VARIABLE_INTEREST_PUB.var_int_rent_level ');
3479: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3480: END IF;
3481: IF(IS_DEBUG_PROCEDURE_ON) THEN
3482: BEGIN
3483: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_VARIABLE_INTEREST_PUB.var_int_rent_level ');
3484: END;
3485: END IF;
3486: --Made change by bkatraga for bug 13447258 to call the new Reamort API
3487: OKL_VAR_INT_REAMORT_PVT.var_int_rent_level(p_api_version => p_api_version
3496: ,p_csm_loan_level_tbl => l_csm_loan_level_tbl
3497: ,x_child_trx_id => l_child_trx_id);
3498: IF(IS_DEBUG_PROCEDURE_ON) THEN
3499: BEGIN
3500: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_VARIABLE_INTEREST_PUB.var_int_rent_level ');
3501: END;
3502: END IF;
3503: -- End of wraper code generated automatically by Debug code generator for OKL_VARIABLE_INTEREST_PUB.var_int_rent_level
3504: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN