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.12 2009/05/15 19:57:27 sechawla ship $ */
3:
4:
5: -- *** Is there a need to check for POC.kle_id = STM.kle_id -- *** --

Line 477: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',

473: BEGIN
474:
475: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
476: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
477: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
478: 'Begin(+)');
479: END IF;
480:
481: -- Populate the Lease tbl

Line 500: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',

496: x_ia_k_tbl := l_ia_k_tbl;
497:
498: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
499: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
500: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
501: 'End(-)');
502: END IF;
503:
504: EXCEPTION

Line 518: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',

514: p_token2_value => SQLERRM);
515:
516: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
517: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
518: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
519: 'EXP - OTHERS');
520: END IF;
521:
522: END get_ia_leases;

Line 588: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

584: BEGIN
585:
586: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
587: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
588: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
589: 'Begin(+)');
590: END IF;
591:
592: SAVEPOINT validate_ia_pool_trx;

Line 646: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

642: x_return_status := l_return_status;
643:
644: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
645: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
646: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
647: 'End(-)');
648: END IF;
649:
650: EXCEPTION

Line 658: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

654: x_return_status := G_RET_STS_ERROR;
655:
656: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
657: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
658: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
659: 'EXP - G_EXCEPTION_ERROR');
660: END IF;
661:
662: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 668: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

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

Line 688: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',

684: x_return_status := G_RET_STS_UNEXP_ERROR;
685:
686: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
687: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
688: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
689: 'EXP - OTHERS');
690: END IF;
691:
692: END validate_ia_pool;

Line 742: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

738: BEGIN
739:
740: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
741: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
742: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
743: 'Begin(+)');
744: END IF;
745:
746: -- *********

Line 777: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

773: x_return_status := l_return_status;
774:
775: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
776: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
777: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
778: 'End(-)');
779: END IF;
780:
781: EXCEPTION

Line 790: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

786: x_return_status := G_RET_STS_ERROR;
787:
788: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
789: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
790: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
791: 'EXP - G_EXCEPTION_ERROR');
792: END IF;
793:
794: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 801: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

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

Line 822: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',

818: x_return_status := G_RET_STS_UNEXP_ERROR;
819:
820: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
821: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
822: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
823: 'EXP - OTHERS');
824: END IF;
825:
826: END check_unbilled_streams_of_pool;

Line 940: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

936: BEGIN
937:
938: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
939: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
940: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
941: 'Begin(+)');
942: END IF;
943:
944: -- *********

Line 1056: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

1052: x_return_status := l_return_status;
1053:
1054: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1055: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1056: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1057: 'End(-)');
1058: END IF;
1059:
1060: EXCEPTION

Line 1069: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

1065: x_return_status := G_RET_STS_ERROR;
1066:
1067: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1068: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1069: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1070: 'EXP - G_EXCEPTION_ERROR');
1071: END IF;
1072:
1073: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1080: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

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

Line 1101: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',

1097: x_return_status := G_RET_STS_UNEXP_ERROR;
1098:
1099: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1100: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1101: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1102: 'EXP - OTHERS');
1103: END IF;
1104:
1105: END check_pending_disb_for_ia;

Line 1153: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',

1149: BEGIN
1150:
1151: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1152: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1153: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1154: 'Begin(+)');
1155: END IF;
1156:
1157: -- **********

Line 1179: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',

1175: x_return_status := l_return_status;
1176:
1177: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1178: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1179: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1180: 'End(-)');
1181: END IF;
1182:
1183: EXCEPTION

Line 1200: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',

1196: x_return_status := G_RET_STS_UNEXP_ERROR;
1197:
1198: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1199: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1200: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1201: 'EXP - OTHERS');
1202: END IF;
1203:
1204: END pop_investor_agreement;

Line 1298: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',

1294: -- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1295:
1296: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1298: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1299: 'Begin(+)');
1300: END IF;
1301:
1302: SAVEPOINT validate_ia_trx;

Line 1495: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',

1491: x_ia_rec := l_ia_rec;
1492:
1493: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1494: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1495: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1496: 'End(-)');
1497: END IF;
1498:
1499: EXCEPTION

Line 1510: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',

1506: x_ia_rec := l_ia_rec;
1507:
1508: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1509: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1510: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1511: 'EXP - G_EXCEPTION_ERROR');
1512: END IF;
1513:
1514: WHEN G_EXCEPTION_UNEXPECTED_ERROR 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 - G_EXCEPTION_UNEXPECTED_ERROR');
1525: END IF;
1526:
1527: WHEN OTHERS THEN

Line 1545: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',

1541: x_ia_rec := l_ia_rec;
1542:
1543: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1544: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1545: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1546: 'EXP - OTHERS');
1547: END IF;
1548:
1549: END val_pop_investor_agreement;

Line 1615: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

1611: BEGIN
1612:
1613: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1614: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1615: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1616: 'Begin(+)');
1617: END IF;
1618:
1619: SAVEPOINT pop_insert_trn_trx;

Line 1744: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

1740: x_trn_already_yn := l_trn_already_yn;
1741:
1742: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1743: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1744: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1745: 'End(-)');
1746: END IF;
1747:
1748: EXCEPTION

Line 1756: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

1752: x_return_status := G_RET_STS_ERROR;
1753:
1754: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1755: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1756: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1757: 'EXP - G_EXCEPTION_ERROR');
1758: END IF;
1759:
1760: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1766: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

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

Line 1786: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

1782: x_return_status := G_RET_STS_UNEXP_ERROR;
1783:
1784: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1785: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1786: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1787: 'EXP - OTHERS');
1788: END IF;
1789:
1790: END pop_or_insert_transaction;

Line 1819: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

1815: BEGIN
1816:
1817: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1818: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1819: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1820: 'Begin(+)');
1821: END IF;
1822:
1823: -- *********

Line 1871: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

1867: x_return_status := l_return_status;
1868:
1869: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1870: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1871: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1872: 'End(-)');
1873: END IF;
1874:
1875: EXCEPTION

Line 1883: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

1879: x_return_status := G_RET_STS_ERROR;
1880:
1881: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1882: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1883: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1884: 'EXP - G_EXCEPTION_ERROR');
1885: END IF;
1886:
1887: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1893: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

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

Line 1913: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',

1909: x_return_status := G_RET_STS_UNEXP_ERROR;
1910:
1911: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1912: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1913: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1914: 'EXP - OTHERS');
1915: END IF;
1916:
1917: END reverse_loss_provisions;

Line 1942: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

1938: BEGIN
1939:
1940: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1941: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1942: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1943: 'Begin(+)');
1944: END IF;
1945:
1946: SAVEPOINT accounting_entries_trx;

Line 1976: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

1972: END IF;
1973:
1974: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1975: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1976: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1977: 'End(-)');
1978: END IF;
1979:
1980: EXCEPTION

Line 1990: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

1986: px_tcnv_rec.tsu_code := 'ERROR';
1987:
1988: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1989: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1990: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1991: 'EXP - G_EXCEPTION_ERROR');
1992: END IF;
1993:
1994: WHEN G_EXCEPTION_UNEXPECTED_ERROR 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 - G_EXCEPTION_UNEXPECTED_ERROR');
2004: END IF;
2005:
2006: WHEN OTHERS THEN

Line 2024: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

2020: px_tcnv_rec.tsu_code := 'ERROR';
2021:
2022: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2024: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2025: 'EXP - OTHERS');
2026: END IF;
2027:
2028: END accounting_entries;

Line 2068: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

2064: BEGIN
2065:
2066: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2068: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2069: 'Begin(+)');
2070: END IF;
2071:
2072: -- *********

Line 2168: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

2164: x_return_status := l_return_status;
2165:
2166: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2167: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2168: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2169: 'End(-)');
2170: END IF;
2171:
2172: EXCEPTION

Line 2180: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

2176: x_return_status := G_RET_STS_ERROR;
2177:
2178: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2179: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2180: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2181: 'EXP - G_EXCEPTION_ERROR');
2182: END IF;
2183:
2184: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2190: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

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

Line 2210: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',

2206: x_return_status := G_RET_STS_UNEXP_ERROR;
2207:
2208: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2209: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2210: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2211: 'EXP - OTHERS');
2212: END IF;
2213:
2214: END update_ia_and_lines;

Line 2304: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

2300: BEGIN
2301:
2302: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2303: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2304: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2305: 'Begin(+)');
2306: END IF;
2307:
2308: SAVEPOINT update_pools_trx;

Line 2482: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

2478: x_return_status := l_return_status;
2479:
2480: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2481: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2482: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2483: 'End(-)');
2484: END IF;
2485:
2486: EXCEPTION

Line 2494: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

2490: x_return_status := G_RET_STS_ERROR;
2491:
2492: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2493: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2494: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2495: 'EXP - G_EXCEPTION_ERROR');
2496: END IF;
2497:
2498: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2504: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

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

Line 2524: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',

2520: x_return_status := G_RET_STS_UNEXP_ERROR;
2521:
2522: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2523: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2524: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2525: 'EXP - OTHERS');
2526: END IF;
2527:
2528: END update_pools;

Line 2554: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2550: BEGIN
2551:
2552: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2553: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2554: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2555: 'Begin(+)');
2556: END IF;
2557:
2558: SAVEPOINT update_ia_trx;

Line 2614: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2610: END IF;
2611:
2612: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2613: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2614: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2615: 'End(-)');
2616: END IF;
2617:
2618: EXCEPTION

Line 2628: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2624: px_tcnv_rec.tsu_code := 'ERROR';
2625:
2626: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2627: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2628: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2629: 'EXP - G_EXCEPTION_ERROR');
2630: END IF;
2631:
2632: WHEN G_EXCEPTION_UNEXPECTED_ERROR 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 - G_EXCEPTION_UNEXPECTED_ERROR');
2642: END IF;
2643:
2644: WHEN OTHERS THEN

Line 2662: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2658: px_tcnv_rec.tsu_code := 'ERROR';
2659:
2660: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2661: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2662: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2663: 'EXP - OTHERS');
2664: END IF;
2665:
2666: END update_investor_agreement;

Line 2696: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

2692: BEGIN
2693:
2694: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2695: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2696: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2697: 'Begin(+)');
2698: END IF;
2699:
2700: SAVEPOINT update_transaction_trx;

Line 2735: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

2731: x_return_status := l_return_status;
2732:
2733: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2734: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2735: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2736: 'End(-)');
2737: END IF;
2738:
2739: EXCEPTION

Line 2747: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

2743: x_return_status := G_RET_STS_ERROR;
2744:
2745: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2746: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2747: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2748: 'EXP - G_EXCEPTION_ERROR');
2749: END IF;
2750:
2751: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2757: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

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

Line 2777: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',

2773: x_return_status := G_RET_STS_UNEXP_ERROR;
2774:
2775: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2776: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2777: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2778: 'EXP - OTHERS');
2779: END IF;
2780:
2781: END update_transaction;

Line 2841: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

2837: -- will not do Accounting Entries if already done
2838:
2839: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2840: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2841: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2842: 'Begin(+)');
2843: END IF;
2844:
2845: -- *************

Line 2883: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

2879: x_return_status => l_return_status);
2880:
2881: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2882: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2883: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2884: 'val_pop_investor_agreement = '||l_return_status );
2885: END IF;
2886:
2887: -- Set Overall Status

Line 2906: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',

2902: x_return_status => l_return_status);
2903:
2904: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2905: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2906: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
2907: 'pop_or_insert_transaction = '||l_return_status );
2908: END IF;
2909:
2910: -- raise exception if api failed

Line 2932: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

2928: x_return_status => l_return_status);
2929:
2930: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2931: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2932: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2933: 'update_transaction = '||l_return_status );
2934: END IF;
2935:
2936: -- raise exception if api failed

Line 2960: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',

2956: x_return_status => l_return_status);
2957:
2958: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2959: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2960: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2961: 'accounting_entries = '||l_return_status );
2962: END IF;
2963:
2964: -- Set Overall Status

Line 2984: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',

2980: x_return_status => l_return_status);
2981:
2982: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2983: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2984: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2985: 'update_investor_agreement = '||l_return_status );
2986: END IF;
2987:
2988: -- *************

Line 3000: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

2996: x_return_status => l_return_status);
2997:
2998: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2999: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3000: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3001: 'update_transaction = '||l_return_status );
3002: END IF;
3003:
3004: -- raise exception if api failed

Line 3039: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

3035: OKL_API.end_activity (x_msg_count, x_msg_data);
3036:
3037: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3038: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3039: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3040: 'End(-)');
3041: END IF;
3042:
3043: EXCEPTION

Line 3064: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

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

Line 3087: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

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

Line 3110: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

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

Line 3133: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',

3129: p_api_type => '_PVT');
3130:
3131: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3132: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3133: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3134: 'EXP - OTHERS');
3135: END IF;
3136:
3137: END terminate_investor_agreement;

Line 3268: END OKL_AM_TERMINATE_INV_AGMT_PVT;

3264: p_token2_value => SQLERRM);
3265:
3266: END concurrent_expire_inv_agrmt;
3267:
3268: END OKL_AM_TERMINATE_INV_AGMT_PVT;