DBA Data[Home] [Help]

APPS.OKL_AM_TERMINATE_INV_AGMT_PVT dependencies on OKL_AM_TERMINATE_INV_AGMT_PVT

Line 1: PACKAGE BODY OKL_AM_TERMINATE_INV_AGMT_PVT AS

1: PACKAGE BODY OKL_AM_TERMINATE_INV_AGMT_PVT AS
2: /* $Header: OKLRTIAB.pls 120.10.12010000.2 2008/10/01 22:51:12 rkuttiya ship $ */
3:
4:
5: -- *** Is there a need to check for POC.kle_id = STM.kle_id -- *** --

Line 455: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',

451: BEGIN
452:
453: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
454: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
455: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
456: 'Begin(+)');
457: END IF;
458:
459: -- Populate the Lease tbl

Line 478: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',

474: x_ia_k_tbl := l_ia_k_tbl;
475:
476: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
477: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
478: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
479: 'End(-)');
480: END IF;
481:
482: EXCEPTION

Line 496: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',

492: p_token2_value => SQLERRM);
493:
494: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
495: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
496: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
497: 'EXP - OTHERS');
498: END IF;
499:
500: END get_ia_leases;

Line 566: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

562: BEGIN
563:
564: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
565: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
566: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
567: 'Begin(+)');
568: END IF;
569:
570: SAVEPOINT validate_ia_pool_trx;

Line 624: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

620: x_return_status := l_return_status;
621:
622: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
623: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
624: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
625: 'End(-)');
626: END IF;
627:
628: EXCEPTION

Line 636: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

632: x_return_status := G_RET_STS_ERROR;
633:
634: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
636: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
637: 'EXP - G_EXCEPTION_ERROR');
638: END IF;
639:
640: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 646: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

642: x_return_status := G_RET_STS_UNEXP_ERROR;
643:
644: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
645: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
646: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
647: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
648: END IF;
649:
650: WHEN OTHERS THEN

Line 666: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

662: x_return_status := G_RET_STS_UNEXP_ERROR;
663:
664: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
665: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
666: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
667: 'EXP - OTHERS');
668: END IF;
669:
670: END validate_ia_pool;

Line 720: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

716: BEGIN
717:
718: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
719: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
720: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
721: 'Begin(+)');
722: END IF;
723:
724: -- *********

Line 755: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

751: x_return_status := l_return_status;
752:
753: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
754: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
755: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
756: 'End(-)');
757: END IF;
758:
759: EXCEPTION

Line 768: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

764: x_return_status := G_RET_STS_ERROR;
765:
766: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
767: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
768: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
769: 'EXP - G_EXCEPTION_ERROR');
770: END IF;
771:
772: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 779: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

775: x_return_status := G_RET_STS_UNEXP_ERROR;
776:
777: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
778: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
779: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
780: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
781: END IF;
782:
783: WHEN OTHERS THEN

Line 800: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

796: x_return_status := G_RET_STS_UNEXP_ERROR;
797:
798: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
799: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
800: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
801: 'EXP - OTHERS');
802: END IF;
803:
804: END check_unbilled_streams_of_pool;

Line 918: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

914: BEGIN
915:
916: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
917: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
918: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
919: 'Begin(+)');
920: END IF;
921:
922: -- *********

Line 1034: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

1030: x_return_status := l_return_status;
1031:
1032: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1033: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1034: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1035: 'End(-)');
1036: END IF;
1037:
1038: EXCEPTION

Line 1047: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

1043: x_return_status := G_RET_STS_ERROR;
1044:
1045: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1046: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1047: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1048: 'EXP - G_EXCEPTION_ERROR');
1049: END IF;
1050:
1051: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1058: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

1054: x_return_status := G_RET_STS_UNEXP_ERROR;
1055:
1056: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1057: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1058: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1059: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1060: END IF;
1061:
1062: WHEN OTHERS THEN

Line 1079: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

1075: x_return_status := G_RET_STS_UNEXP_ERROR;
1076:
1077: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1078: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1079: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1080: 'EXP - OTHERS');
1081: END IF;
1082:
1083: END check_pending_disb_for_ia;

Line 1131: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',

1127: BEGIN
1128:
1129: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1130: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1131: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1132: 'Begin(+)');
1133: END IF;
1134:
1135: -- **********

Line 1157: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',

1153: x_return_status := l_return_status;
1154:
1155: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1156: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1157: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1158: 'End(-)');
1159: END IF;
1160:
1161: EXCEPTION

Line 1178: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',

1174: x_return_status := G_RET_STS_UNEXP_ERROR;
1175:
1176: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1177: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1178: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1179: 'EXP - OTHERS');
1180: END IF;
1181:
1182: END pop_investor_agreement;

Line 1276: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',

1272: -- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1273:
1274: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1275: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1276: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1277: 'Begin(+)');
1278: END IF;
1279:
1280: SAVEPOINT validate_ia_trx;

Line 1473: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',

1469: x_ia_rec := l_ia_rec;
1470:
1471: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1472: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1473: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1474: 'End(-)');
1475: END IF;
1476:
1477: EXCEPTION

Line 1488: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',

1484: x_ia_rec := l_ia_rec;
1485:
1486: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1487: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1488: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1489: 'EXP - G_EXCEPTION_ERROR');
1490: END IF;
1491:
1492: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1501: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',

1497: x_ia_rec := l_ia_rec;
1498:
1499: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1500: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1501: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1502: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1503: END IF;
1504:
1505: WHEN OTHERS THEN

Line 1523: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',

1519: x_ia_rec := l_ia_rec;
1520:
1521: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1522: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1523: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1524: 'EXP - OTHERS');
1525: END IF;
1526:
1527: END val_pop_investor_agreement;

Line 1593: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

1589: BEGIN
1590:
1591: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1592: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1593: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1594: 'Begin(+)');
1595: END IF;
1596:
1597: SAVEPOINT pop_insert_trn_trx;

Line 1722: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

1718: x_trn_already_yn := l_trn_already_yn;
1719:
1720: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1721: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1722: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1723: 'End(-)');
1724: END IF;
1725:
1726: EXCEPTION

Line 1734: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

1730: x_return_status := G_RET_STS_ERROR;
1731:
1732: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1733: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1734: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1735: 'EXP - G_EXCEPTION_ERROR');
1736: END IF;
1737:
1738: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1744: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

1740: x_return_status := G_RET_STS_UNEXP_ERROR;
1741:
1742: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1743: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1744: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1745: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1746: END IF;
1747:
1748: WHEN OTHERS THEN

Line 1764: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

1760: x_return_status := G_RET_STS_UNEXP_ERROR;
1761:
1762: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1763: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1764: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1765: 'EXP - OTHERS');
1766: END IF;
1767:
1768: END pop_or_insert_transaction;

Line 1797: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

1793: BEGIN
1794:
1795: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1796: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1797: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1798: 'Begin(+)');
1799: END IF;
1800:
1801: -- *********

Line 1849: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

1845: x_return_status := l_return_status;
1846:
1847: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1848: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1849: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1850: 'End(-)');
1851: END IF;
1852:
1853: EXCEPTION

Line 1861: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

1857: x_return_status := G_RET_STS_ERROR;
1858:
1859: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1860: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1861: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1862: 'EXP - G_EXCEPTION_ERROR');
1863: END IF;
1864:
1865: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1871: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

1867: x_return_status := G_RET_STS_UNEXP_ERROR;
1868:
1869: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1870: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1871: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1872: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1873: END IF;
1874:
1875: WHEN OTHERS THEN

Line 1891: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

1887: x_return_status := G_RET_STS_UNEXP_ERROR;
1888:
1889: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1890: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1891: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1892: 'EXP - OTHERS');
1893: END IF;
1894:
1895: END reverse_loss_provisions;

Line 1920: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

1916: BEGIN
1917:
1918: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1919: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1920: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1921: 'Begin(+)');
1922: END IF;
1923:
1924: SAVEPOINT accounting_entries_trx;

Line 1954: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

1950: END IF;
1951:
1952: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1953: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1954: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1955: 'End(-)');
1956: END IF;
1957:
1958: EXCEPTION

Line 1968: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

1964: px_tcnv_rec.tsu_code := 'ERROR';
1965:
1966: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1967: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1968: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1969: 'EXP - G_EXCEPTION_ERROR');
1970: END IF;
1971:
1972: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1980: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

1976: px_tcnv_rec.tsu_code := 'ERROR';
1977:
1978: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1979: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1980: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1981: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1982: END IF;
1983:
1984: WHEN OTHERS THEN

Line 2002: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

1998: px_tcnv_rec.tsu_code := 'ERROR';
1999:
2000: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2001: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2002: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2003: 'EXP - OTHERS');
2004: END IF;
2005:
2006: END accounting_entries;

Line 2046: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

2042: BEGIN
2043:
2044: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2045: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2046: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2047: 'Begin(+)');
2048: END IF;
2049:
2050: -- *********

Line 2146: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

2142: x_return_status := l_return_status;
2143:
2144: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2145: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2146: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2147: 'End(-)');
2148: END IF;
2149:
2150: EXCEPTION

Line 2158: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

2154: x_return_status := G_RET_STS_ERROR;
2155:
2156: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2157: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2158: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2159: 'EXP - G_EXCEPTION_ERROR');
2160: END IF;
2161:
2162: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2168: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

2164: x_return_status := G_RET_STS_UNEXP_ERROR;
2165:
2166: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2167: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2168: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2169: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2170: END IF;
2171:
2172: WHEN OTHERS THEN

Line 2188: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

2184: x_return_status := G_RET_STS_UNEXP_ERROR;
2185:
2186: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2187: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2188: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2189: 'EXP - OTHERS');
2190: END IF;
2191:
2192: END update_ia_and_lines;

Line 2282: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

2278: BEGIN
2279:
2280: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2281: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2282: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2283: 'Begin(+)');
2284: END IF;
2285:
2286: SAVEPOINT update_pools_trx;

Line 2460: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

2456: x_return_status := l_return_status;
2457:
2458: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2459: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2460: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2461: 'End(-)');
2462: END IF;
2463:
2464: EXCEPTION

Line 2472: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

2468: x_return_status := G_RET_STS_ERROR;
2469:
2470: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2471: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2472: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2473: 'EXP - G_EXCEPTION_ERROR');
2474: END IF;
2475:
2476: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2482: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

2478: x_return_status := G_RET_STS_UNEXP_ERROR;
2479:
2480: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2481: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2482: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2483: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2484: END IF;
2485:
2486: WHEN OTHERS THEN

Line 2502: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

2498: x_return_status := G_RET_STS_UNEXP_ERROR;
2499:
2500: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2501: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2502: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2503: 'EXP - OTHERS');
2504: END IF;
2505:
2506: END update_pools;

Line 2532: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2528: BEGIN
2529:
2530: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2531: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2532: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2533: 'Begin(+)');
2534: END IF;
2535:
2536: SAVEPOINT update_ia_trx;

Line 2592: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2588: END IF;
2589:
2590: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2591: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2592: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2593: 'End(-)');
2594: END IF;
2595:
2596: EXCEPTION

Line 2606: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2602: px_tcnv_rec.tsu_code := 'ERROR';
2603:
2604: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2605: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2606: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2607: 'EXP - G_EXCEPTION_ERROR');
2608: END IF;
2609:
2610: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2618: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2614: px_tcnv_rec.tsu_code := 'ERROR';
2615:
2616: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2617: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2618: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2619: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2620: END IF;
2621:
2622: WHEN OTHERS THEN

Line 2640: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2636: px_tcnv_rec.tsu_code := 'ERROR';
2637:
2638: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2639: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2640: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2641: 'EXP - OTHERS');
2642: END IF;
2643:
2644: END update_investor_agreement;

Line 2674: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

2670: BEGIN
2671:
2672: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2673: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2674: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2675: 'Begin(+)');
2676: END IF;
2677:
2678: SAVEPOINT update_transaction_trx;

Line 2713: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

2709: x_return_status := l_return_status;
2710:
2711: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2712: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2713: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2714: 'End(-)');
2715: END IF;
2716:
2717: EXCEPTION

Line 2725: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

2721: x_return_status := G_RET_STS_ERROR;
2722:
2723: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2724: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2725: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2726: 'EXP - G_EXCEPTION_ERROR');
2727: END IF;
2728:
2729: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2735: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

2731: x_return_status := G_RET_STS_UNEXP_ERROR;
2732:
2733: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2734: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2735: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2736: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2737: END IF;
2738:
2739: WHEN OTHERS THEN

Line 2755: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

2751: x_return_status := G_RET_STS_UNEXP_ERROR;
2752:
2753: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2754: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2755: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2756: 'EXP - OTHERS');
2757: END IF;
2758:
2759: END update_transaction;

Line 2819: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

2815: -- will not do Accounting Entries if already done
2816:
2817: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2818: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2819: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2820: 'Begin(+)');
2821: END IF;
2822:
2823: -- *************

Line 2861: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

2857: x_return_status => l_return_status);
2858:
2859: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2860: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2861: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2862: 'val_pop_investor_agreement = '||l_return_status );
2863: END IF;
2864:
2865: -- Set Overall Status

Line 2884: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

2880: x_return_status => l_return_status);
2881:
2882: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2883: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2884: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
2885: 'pop_or_insert_transaction = '||l_return_status );
2886: END IF;
2887:
2888: -- raise exception if api failed

Line 2910: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

2906: x_return_status => l_return_status);
2907:
2908: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2909: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2910: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2911: 'update_transaction = '||l_return_status );
2912: END IF;
2913:
2914: -- raise exception if api failed

Line 2938: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

2934: x_return_status => l_return_status);
2935:
2936: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2937: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2938: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2939: 'accounting_entries = '||l_return_status );
2940: END IF;
2941:
2942: -- Set Overall Status

Line 2962: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2958: x_return_status => l_return_status);
2959:
2960: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2961: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2962: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2963: 'update_investor_agreement = '||l_return_status );
2964: END IF;
2965:
2966: -- *************

Line 2978: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

2974: x_return_status => l_return_status);
2975:
2976: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2977: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2978: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2979: 'update_transaction = '||l_return_status );
2980: END IF;
2981:
2982: -- raise exception if api failed

Line 3017: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

3013: OKL_API.end_activity (x_msg_count, x_msg_data);
3014:
3015: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3016: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3017: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3018: 'End(-)');
3019: END IF;
3020:
3021: EXCEPTION

Line 3042: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

3038: END IF;
3039:
3040: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3041: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3042: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3043: 'EXP - G_EXCEPTION');
3044: END IF;
3045:
3046: WHEN G_EXCEPTION_ERROR THEN

Line 3065: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

3061: p_api_type => '_PVT');
3062:
3063: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3064: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3065: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3066: 'EXP - G_EXCEPTION_ERROR');
3067: END IF;
3068:
3069: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 3088: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

3084: p_api_type => '_PVT');
3085:
3086: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3087: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3088: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3089: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
3090: END IF;
3091:
3092: WHEN OTHERS THEN

Line 3111: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

3107: p_api_type => '_PVT');
3108:
3109: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3110: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3111: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3112: 'EXP - OTHERS');
3113: END IF;
3114:
3115: END terminate_investor_agreement;

Line 3246: END OKL_AM_TERMINATE_INV_AGMT_PVT;

3242: p_token2_value => SQLERRM);
3243:
3244: END concurrent_expire_inv_agrmt;
3245:
3246: END OKL_AM_TERMINATE_INV_AGMT_PVT;