[Home] [Help]
1: PACKAGE BODY OKL_PROCESS_STREAMS_PVT AS
2: /* $Header: OKLRPSRB.pls 120.46 2007/09/06 08:29:51 pagarg noship $ */
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
1039: --Bug 4346646-End of Changes
1040:
1041: BEGIN
1042: IF (G_DEBUG_ENABLED = 'Y') THEN
1043: G_IS_DEBUG_STATEMENT_ON := OKL_DEBUG_PUB.CHECK_LOG_ON(G_MODULE, FND_LOG.LEVEL_STATEMENT);
1044: END IF;
1045: --Added by kthiruva for Debugging
1046: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
1047: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1042: IF (G_DEBUG_ENABLED = 'Y') THEN
1043: G_IS_DEBUG_STATEMENT_ON := OKL_DEBUG_PUB.CHECK_LOG_ON(G_MODULE, FND_LOG.LEVEL_STATEMENT);
1044: END IF;
1045: --Added by kthiruva for Debugging
1046: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
1047: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1048: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Transaction number is :'||p_transaction_number);
1049: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Inside procedure process_stream_results');
1050: END IF;
1044: END IF;
1045: --Added by kthiruva for Debugging
1046: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
1047: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1048: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Transaction number is :'||p_transaction_number);
1049: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Inside procedure process_stream_results');
1050: END IF;
1051:
1052:
1045: --Added by kthiruva for Debugging
1046: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
1047: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1048: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Transaction number is :'||p_transaction_number);
1049: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Inside procedure process_stream_results');
1050: END IF;
1051:
1052:
1053: l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
1181: ELSE
1182: -- call the insert API for STREAMS
1183: IF(IS_DEBUG_PROCEDURE_ON) THEN
1184: BEGIN
1185: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
1186: END;
1187: END IF;
1188:
1189: --Modified by kthiruva for Streams Performance on 15-May-2005
1239: --Bug 4346646 - End of Changes
1240:
1241: IF(IS_DEBUG_PROCEDURE_ON) THEN
1242: BEGIN
1243: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
1244: END;
1245: END IF;
1246:
1247: j := 1 ;
1284: IF( l_khr_id IS NOT NULL )
1285: THEN
1286: IF(IS_DEBUG_PROCEDURE_ON) THEN
1287: BEGIN
1288: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
1289: END;
1290: END IF;
1291:
1292: --Modified by kthiruva on 15-May-2005 for Streams Performance
1293: --Bug 4346646 - Start of Changes
1294:
1295: --Added by kthiruva for Debug Logging
1296: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1297: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to the call to Okl_Streams_Util.round_streams_amount_esg');
1298: END IF;
1299: --Making the round amount call for the stream elements of the last stream header
1300: x_return_status := Okl_Streams_Util.round_streams_amount_esg(p_api_version => p_api_version,
1301: p_init_msg_list => p_init_msg_list,
1311: p_apply_rnd_diff => l_diff_lookup_code);
1312:
1313: --Added by kthiruva for Debug Logging
1314: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1315: 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);
1316: END IF;
1317:
1318: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1319: RAISE G_EXCEPTION_UNEXPECTED_ERROR;
1328: x_return_status => x_return_status
1329: );
1330: --Added by kthiruva for Debug Logging
1331: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1332: 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);
1333: END IF;
1334:
1335: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1336: RAISE G_EXCEPTION_UNEXPECTED_ERROR;
1351: ,x_selv_tbl);
1352: --Bug 4346646 - End of Changes
1353: --Added by kthiruva for Debug Logging
1354: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1355: 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);
1356: END IF;
1357:
1358:
1359: IF(IS_DEBUG_PROCEDURE_ON) THEN
1357:
1358:
1359: IF(IS_DEBUG_PROCEDURE_ON) THEN
1360: BEGIN
1361: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call Okl_Streams_Pub.create_streams ');
1362: END;
1363: END IF;
1364: -- End of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.create_streams
1365: IF (x_return_status = G_RET_STS_UNEXP_ERROR)
1374: FETCH chk_for_subsidy_csr INTO l_chk_subsidy;
1375: CLOSE chk_for_subsidy_csr;
1376: --Added by kthiruva for Debug Logging
1377: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1378: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Value of l_chk_subsidy is :'||l_chk_subsidy);
1379: END IF;
1380:
1381: -- TODO : check what yield has to be assigned
1382: -- Update Yields at contract header
1439: -- generate streams for the SERVICE LINES
1440: -- Start of wraper code generated automatically by Debug code generator for OKL_PROCESS_STREAMS_PVT.GEN_SERV_MAIN_LINE_STRMS
1441: IF(IS_DEBUG_PROCEDURE_ON) THEN
1442: BEGIN
1443: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_PROCESS_STREAMS_PVT.GEN_SERV_MAIN_LINE_STRMS ');
1444: END;
1445: END IF;
1446:
1447: --start smahapat bugfix# 2790695
1452: FETCH reporting_product_csr INTO reporting_product_rec;
1453: CLOSE reporting_product_csr;
1454: --Added by kthiruva for Debug Logging
1455: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1456: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Reporting Product present.Calling OKL_SETUPPRODUCTS_PVT.Getpdt_parameters');
1457: END IF;
1458:
1459: l_pdtv_rec.id := reporting_product_rec.reporting_pdt_id;
1460: OKL_SETUPPRODUCTS_PVT.Getpdt_parameters(
1468: p_pdt_parameter_rec => lx_pdt_parameter_rec);
1469:
1470: --Added by kthiruva for Debug Logging
1471: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1472: 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);
1473: END IF;
1474: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1475: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1476: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1488: IF SERVICE_LINES_EXIST%FOUND THEN
1489: --Bug 4346646 - End of Changes
1490: --Added by kthiruva for Debug Logging
1491: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1492: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Service Lines Exist');
1493: END IF;
1494: okl_stream_generator_pub.GENERATE_STREAMS(
1495: p_api_version => p_api_version,
1496: p_init_msg_list => p_init_msg_list,
1503: x_msg_count => x_msg_count,
1504: x_msg_data => x_msg_data);
1505: --Added by kthiruva for Debug Logging
1506: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1507: 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);
1508: END IF;
1509:
1510: IF (x_return_status = G_RET_STS_UNEXP_ERROR)
1511: THEN
1520: CLOSE SERVICE_LINES_EXIST;
1521: --Bug 4346646 - End of Changes
1522: --Added by kthiruva for Debug Logging
1523: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1524: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to generating Residual Value streams');
1525: END IF;
1526: --Generate accrual streams for residual streams internally
1527: okl_stream_generator_pub.GENERATE_STREAMS(
1528: p_api_version => p_api_version,
1536: x_msg_count => x_msg_count,
1537: x_msg_data => x_msg_data);
1538: --Added by kthiruva for Debug Logging
1539: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1540: 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);
1541: END IF;
1542:
1543: IF (x_return_status = G_RET_STS_UNEXP_ERROR)
1544: THEN
1561: -- generate streams for the SECURITY DEPOSIT FEES
1562: -- Start of wraper code generated automatically by Debug code generator for OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS
1563: IF(IS_DEBUG_PROCEDURE_ON) THEN
1564: BEGIN
1565: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS ');
1566: END;
1567: END IF;
1568: --Added by kthiruva for Debug Logging
1569: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1566: END;
1567: END IF;
1568: --Added by kthiruva for Debug Logging
1569: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1570: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Security deposit amount is not null');
1571: END IF;
1572:
1573: OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS(p_api_version => p_api_version
1574: ,p_init_msg_list => p_init_msg_list
1579: ,x_msg_count => x_msg_count
1580: ,x_msg_data => x_msg_data);
1581: --Added by kthiruva for Debug Logging
1582: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1583: 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);
1584: END IF;
1585:
1586: IF(IS_DEBUG_PROCEDURE_ON) THEN
1587: BEGIN
1584: END IF;
1585:
1586: IF(IS_DEBUG_PROCEDURE_ON) THEN
1587: BEGIN
1588: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS ');
1589: END;
1590: END IF;
1591: -- End of wraper code generated automatically by Debug code generator for OKL_PROCESS_STREAMS_PVT.GEN_SEC_DEP_STRMS
1592: IF (x_return_status = G_RET_STS_UNEXP_ERROR)
1625: -- Start of wraper code generated automatically by Debug code generator for OKL_LA_STREAM_PVT.process_streams
1626: IF(IS_DEBUG_PROCEDURE_ON) THEN
1627:
1628: BEGIN
1629: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_LA_STREAM_PVT.process_streams ');
1630: END;
1631: END IF;
1632: --Added by kthiruva for Debug Logging
1633: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1630: END;
1631: END IF;
1632: --Added by kthiruva for Debug Logging
1633: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1634: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to the call to OKL_LA_STREAM_PVT.process_streams');
1635: END IF;
1636:
1637: OKL_LA_STREAM_PVT.process_streams(
1638: p_api_version,
1644: l_process_yn,
1645: l_khr_yields_rec);
1646: --Added by kthiruva for Debug Logging
1647: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1648: 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);
1649: END IF;
1650:
1651: IF(IS_DEBUG_PROCEDURE_ON) THEN
1652: BEGIN
1649: END IF;
1650:
1651: IF(IS_DEBUG_PROCEDURE_ON) THEN
1652: BEGIN
1653: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_LA_STREAM_PVT.process_streams ');
1654: END;
1655: END IF;
1656: -- End of wraper code generated automatically by Debug code generator for OKL_LA_STREAM_PVT.process_streams
1657: /*
1684: l_sirv_rec.date_processed := to_date(to_char(SYSDATE,'YYYYMMDD HH24MISS'), 'YYYYMMDD HH24MISS');
1685: -- Start of wraper code generated automatically by Debug code generator for OKL_SIF_RETS_PUB.update_sif_rets
1686: IF(IS_DEBUG_PROCEDURE_ON) THEN
1687: BEGIN
1688: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
1689: END;
1690: END IF;
1691: --Added by kthiruva for Debug Logging
1692: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1689: END;
1690: END IF;
1691: --Added by kthiruva for Debug Logging
1692: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1693: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to the call to OKL_SIF_RETS_PUB.update_sif_rets');
1694: END IF;
1695: OKL_SIF_RETS_PUB.update_sif_rets(p_api_version => p_api_version,
1696: p_init_msg_list => p_init_msg_list,
1697: x_return_status => l_return_status,
1700: p_sirv_rec => l_sirv_rec,
1701: x_sirv_rec => p_sirv_rec);
1702: --Added by kthiruva for Debug Logging
1703: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1704: 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);
1705: END IF;
1706:
1707: IF(IS_DEBUG_PROCEDURE_ON) THEN
1708: BEGIN
1705: END IF;
1706:
1707: IF(IS_DEBUG_PROCEDURE_ON) THEN
1708: BEGIN
1709: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
1710: END;
1711: END IF;
1712: -- End of wraper code generated automatically by Debug code generator for OKL_SIF_RETS_PUB.update_sif_rets
1713:
1729: END IF;
1730: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAM_INTERFACES_PUB.update_stream_interfaces
1731: IF(IS_DEBUG_PROCEDURE_ON) THEN
1732: BEGIN
1733: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_STREAM_INTERFACES_PUB.update_stream_interfaces ');
1734: END;
1735: END IF;
1736: --Added by kthiruva for Debug Logging
1737: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1734: END;
1735: END IF;
1736: --Added by kthiruva for Debug Logging
1737: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1738: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Prior to the call to OKL_STREAM_INTERFACES_PUB.update_stream_interfaces');
1739: END IF;
1740: OKL_STREAM_INTERFACES_PUB.update_stream_interfaces(
1741: p_api_version => p_api_version
1742: ,p_init_msg_list => p_init_msg_list
1746: ,p_sifv_rec => lp_sifv_rec
1747: ,x_sifv_rec => lx_sifv_rec);
1748: --Added by kthiruva for Debug Logging
1749: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1750: 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);
1751: END IF;
1752:
1753: IF(IS_DEBUG_PROCEDURE_ON) THEN
1754: BEGIN
1751: END IF;
1752:
1753: IF(IS_DEBUG_PROCEDURE_ON) THEN
1754: BEGIN
1755: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_STREAM_INTERFACES_PUB.update_stream_interfaces ');
1756: END;
1757: END IF;
1758: -- End of wraper code generated automatically by Debug code generator for OKL_STREAM_INTERFACES_PUB.update_stream_interfaces
1759: IF l_return_status = G_RET_STS_ERROR THEN
1846: -- call the update for all the records
1847: -- Start of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.update_streams
1848: IF(L_DEBUG_ENABLED='Y') THEN
1849: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
1850: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
1851: END IF;
1852: IF(IS_DEBUG_PROCEDURE_ON) THEN
1853: BEGIN
1854: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.update_streams ');
1850: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
1851: END IF;
1852: IF(IS_DEBUG_PROCEDURE_ON) THEN
1853: BEGIN
1854: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call Okl_Streams_Pub.update_streams ');
1855: END;
1856: END IF;
1857: Okl_Streams_Pub.update_streams(l_api_version
1858: ,p_init_msg_list
1862: ,stmv_tbl
1863: ,x_stmv_tbl);
1864: IF(IS_DEBUG_PROCEDURE_ON) THEN
1865: BEGIN
1866: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call Okl_Streams_Pub.update_streams ');
1867: END;
1868: END IF;
1869: -- End of wraper code generated automatically by Debug code generator for Okl_Streams_Pub.update_streams
1870: EXCEPTION
2069: lp_sirv_rec.date_processed := to_date(to_char(SYSDATE,'YYYYMMDD HH24MISS'), 'YYYYMMDD HH24MISS');
2070: -- Start of wraper code generated automatically by Debug code generator for OKL_SIF_RETS_PUB.update_sif_rets
2071: IF(L_DEBUG_ENABLED='Y') THEN
2072: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
2073: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2074: END IF;
2075: IF(IS_DEBUG_PROCEDURE_ON) THEN
2076: BEGIN
2077: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
2073: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2074: END IF;
2075: IF(IS_DEBUG_PROCEDURE_ON) THEN
2076: BEGIN
2077: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
2078: END;
2079: END IF;
2080: OKL_SIF_RETS_PUB.update_sif_rets(p_api_version => lp_api_version,
2081: p_init_msg_list => lp_init_msg_list,
2085: p_sirv_rec => lp_sirv_rec,
2086: x_sirv_rec => lx_sirv_rec);
2087: IF(IS_DEBUG_PROCEDURE_ON) THEN
2088: BEGIN
2089: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_SIF_RETS_PUB.update_sif_rets ');
2090: END;
2091: END IF;
2092: -- End of wraper code generated automatically by Debug code generator for OKL_SIF_RETS_PUB.update_sif_rets
2093: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2113: END IF;
2114: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAM_INTERFACES_PUB.update_stream_interfaces
2115: IF(IS_DEBUG_PROCEDURE_ON) THEN
2116: BEGIN
2117: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_STREAM_INTERFACES_PUB.update_stream_interfaces ');
2118: END;
2119: END IF;
2120: OKL_STREAM_INTERFACES_PUB.update_stream_interfaces(p_api_version => lp_api_version
2121: ,p_init_msg_list => lp_init_msg_list
2126: ,x_sifv_rec => lx_sifv_rec);
2127:
2128: IF(IS_DEBUG_PROCEDURE_ON) THEN
2129: BEGIN
2130: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_STREAM_INTERFACES_PUB.update_stream_interfaces ');
2131: END;
2132: END IF;
2133: -- End of wraper code generated automatically by Debug code generator for OKL_STREAM_INTERFACES_PUB.update_stream_interfaces
2134: IF l_return_status = G_RET_STS_ERROR THEN
2315: -- call the restructure api for processing results
2316: -- Start of wraper code generated automatically by Debug code generator for OKL_AM_RESTRUCTURE_RENTS_PVT.process_results
2317: IF(L_DEBUG_ENABLED='Y') THEN
2318: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
2319: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2320: END IF;
2321: IF(IS_DEBUG_PROCEDURE_ON) THEN
2322: BEGIN
2323: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_AM_RESTRUCTURE_RENTS_PVT.process_results ');
2319: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2320: END IF;
2321: IF(IS_DEBUG_PROCEDURE_ON) THEN
2322: BEGIN
2323: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_AM_RESTRUCTURE_RENTS_PVT.process_results ');
2324: END;
2325: END IF;
2326: OKL_AM_RESTRUCTURE_RENTS_PVT.process_results(p_api_version => l_api_version,
2327:
2336: x_msg_count => x_msg_count,
2337: x_msg_data => x_msg_data);
2338: IF(IS_DEBUG_PROCEDURE_ON) THEN
2339: BEGIN
2340: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_AM_RESTRUCTURE_RENTS_PVT.process_results ');
2341: END;
2342: END IF;
2343: -- End of wraper code generated automatically by Debug code generator for OKL_AM_RESTRUCTURE_RENTS_PVT.process_results
2344: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2563: -- Start of wraper code generated automatically by Debug code generator for okl_solve_for_rent_pvt.process_results
2564: /*
2565: IF(L_DEBUG_ENABLED='Y') THEN
2566: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
2567: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2568: END IF;
2569: IF(IS_DEBUG_PROCEDURE_ON) THEN
2570: BEGIN
2571: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call okl_solve_for_rent_pvt.process_results ');
2567: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2568: END IF;
2569: IF(IS_DEBUG_PROCEDURE_ON) THEN
2570: BEGIN
2571: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call okl_solve_for_rent_pvt.process_results ');
2572: END;
2573: END IF;
2574: okl_solve_for_rent_pvt.process_results(p_api_version => l_api_version,
2575: p_init_msg_list => p_init_msg_list,
2582: x_msg_count => x_msg_count,
2583: x_msg_data => x_msg_data);
2584: IF(IS_DEBUG_PROCEDURE_ON) THEN
2585: BEGIN
2586: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call okl_solve_for_rent_pvt.process_results ');
2587: END;
2588: END IF;
2589: -- End of wraper code generated automatically by Debug code generator for okl_solve_for_rent_pvt.process_results
2590: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2937: -- call the restructure api for processing results
2938: -- Start of wraper code generated automatically by Debug code generator for okl_cs_lease_renewal_pub.update_lrnw_request
2939: IF(L_DEBUG_ENABLED='Y') THEN
2940: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
2941: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2942: END IF;
2943: IF(IS_DEBUG_PROCEDURE_ON) THEN
2944: BEGIN
2945: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call okl_cs_lease_renewal_pub.update_lrnw_request ');
2941: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2942: END IF;
2943: IF(IS_DEBUG_PROCEDURE_ON) THEN
2944: BEGIN
2945: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call okl_cs_lease_renewal_pub.update_lrnw_request ');
2946: END;
2947: END IF;
2948: okl_cs_lease_renewal_pub.update_lrnw_request(p_api_version => p_api_version
2949: ,p_init_msg_list => p_init_msg_list
2953: ,p_trqv_rec => p_trqv_rec
2954: ,x_trqv_rec => x_trqv_rec);
2955: IF(IS_DEBUG_PROCEDURE_ON) THEN
2956: BEGIN
2957: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call okl_cs_lease_renewal_pub.update_lrnw_request ');
2958: END;
2959: END IF;
2960: -- End of wraper code generated automatically by Debug code generator for okl_cs_lease_renewal_pub.update_lrnw_request
2961: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
3455: -- Start of wraper code generated automatically by Debug code generator for OKL_VARIABLE_INTEREST_PUB.var_int_rent_level
3456:
3457: IF(L_DEBUG_ENABLED='Y') THEN
3458: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
3459: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3460: END IF;
3461: IF(IS_DEBUG_PROCEDURE_ON) THEN
3462: BEGIN
3463: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_VARIABLE_INTEREST_PUB.var_int_rent_level ');
3459: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3460: END IF;
3461: IF(IS_DEBUG_PROCEDURE_ON) THEN
3462: BEGIN
3463: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRPSRB.pls call OKL_VARIABLE_INTEREST_PUB.var_int_rent_level ');
3464: END;
3465: END IF;
3466: OKL_VARIABLE_INTEREST_PUB.var_int_rent_level(p_api_version => p_api_version
3467: ,p_init_msg_list => p_init_msg_list
3473: ,p_trx_status => l_transaction_status
3474: ,p_rent_tbl => l_tmp_srlv_tbl );
3475: IF(IS_DEBUG_PROCEDURE_ON) THEN
3476: BEGIN
3477: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRPSRB.pls call OKL_VARIABLE_INTEREST_PUB.var_int_rent_level ');
3478: END;
3479: END IF;
3480: -- End of wraper code generated automatically by Debug code generator for OKL_VARIABLE_INTEREST_PUB.var_int_rent_level
3481: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN