DBA Data[Home] [Help]

APPS.OKL_AM_BAL_WRITEOFF_PVT dependencies on OKL_AM_BAL_WRITEOFF_PVT

Line 1: PACKAGE BODY OKL_AM_BAL_WRITEOFF_PVT AS

1: PACKAGE BODY OKL_AM_BAL_WRITEOFF_PVT AS
2: /* $Header: OKLRBWRB.pls 120.11 2007/08/10 11:53:42 dpsingh noship $ */
3:
4: -- *********************
5: -- GLOBAL DATASTRUCTURES

Line 39: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_AM_BAL_WRITEOFF_PVT';

35: G_CONTRACT_NUMBER_TOKEN CONSTANT VARCHAR2(2000) := 'CONTRACT_NUMBER';
36: -- *********************
37: -- GLOBAL VARIABLES
38: -- *********************
39: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_AM_BAL_WRITEOFF_PVT';
40: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
41: G_APP_NAME_1 CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
42: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
43: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;

Line 478: 'OKL_AM_BAL_WRITEOFF_PVT.populate_khr_prg.',

474: BEGIN
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_BAL_WRITEOFF_PVT.populate_khr_prg.',
479: 'Begin(+)');
480: END IF;
481:
482: SAVEPOINT populate_khr_trx;

Line 504: 'OKL_AM_BAL_WRITEOFF_PVT.populate_khr_prg.',

500: x_khr_rec := l_khr_rec;
501:
502: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
503: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
504: 'OKL_AM_BAL_WRITEOFF_PVT.populate_khr_prg.',
505: 'End(-)');
506: END IF;
507:
508: EXCEPTION

Line 525: 'OKL_AM_BAL_WRITEOFF_PVT.populate_khr_prg.',

521: x_return_status := G_RET_STS_UNEXP_ERROR;
522:
523: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
524: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
525: 'OKL_AM_BAL_WRITEOFF_PVT.populate_khr_prg.',
526: 'EXP - OTHERS');
527: END IF;
528:
529: END populate_khr_prg;

Line 578: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',

574: BEGIN
575:
576: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
577: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
578: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',
579: 'Begin(+)');
580: END IF;
581:
582: SAVEPOINT validate_khr_trx;

Line 683: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',

679: x_return_status := l_return_status;
680:
681: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
682: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
683: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',
684: 'End(-)');
685: END IF;
686:
687: EXCEPTION

Line 695: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',

691: x_return_status := G_RET_STS_ERROR;
692:
693: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
694: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
695: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',
696: 'EXP - G_EXCEPTION_ERROR');
697: END IF;
698:
699: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 705: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',

701: x_return_status := G_RET_STS_UNEXP_ERROR;
702:
703: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
704: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
705: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',
706: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
707: END IF;
708:
709: WHEN OTHERS THEN

Line 724: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',

720: x_return_status := G_RET_STS_UNEXP_ERROR;
721:
722: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
723: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
724: 'OKL_AM_BAL_WRITEOFF_PVT.validate_khr_prg.',
725: 'EXP - OTHERS');
726: END IF;
727:
728: END validate_khr_prg;

Line 934: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

930: -- end if
931:
932: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
933: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
934: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
935: 'Begin(+)');
936: END IF;
937:
938: -- *************

Line 1015: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1011: p_token1_value => l_tol_profile_name);
1012:
1013: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1014: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1015: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1016: 'NO TOLERANCE');
1017: END IF;
1018:
1019: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1042: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1038: p_token1_value=> p_khr_rec.contract_number);
1039:
1040: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1041: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1042: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1043: 'product_id_error = '||l_return_status );
1044: END IF;
1045:
1046: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1077: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1073: p_token1_value => l_trans_meaning);
1074:
1075: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1076: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1077: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1078: 'balance_writeoff_trn_error = '||l_return_status );
1079: END IF;
1080:
1081: END IF;

Line 1127: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1123: p_token1_value => l_trans_meaning);
1124:
1125: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1126: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1127: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1128: 'currency_conv_error = '||l_return_status );
1129: END IF;
1130:
1131: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1168: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1164: END IF;
1165:
1166: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1167: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1168: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1169: 'OKL_TRX_CONTRACTS_PUB.create_trx_contracts = '||l_return_status );
1170: END IF;
1171:
1172: -- Raise exception to rollback this whole block

Line 1211: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1207: END IF;
1208:
1209: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1210: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1211: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1212: 'OKL_TRX_AR_ADJSTS_PUB.insert_trx_ar_adjsts = '||l_return_status );
1213: END IF;
1214:
1215: -- Raise exception to rollback this whole block

Line 1267: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1263: END IF;
1264:
1265: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1267: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1268: 'OKL_TRX_AR_ADJSTS_PUB.insert_txl_adjsts_lns = '||l_return_status );
1269: END IF;
1270:
1271: -- Raise exception to rollback this whole block

Line 1332: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1328: END IF;
1329:
1330: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1331: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1332: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1333: 'OKL_ACC_CALL_PVT.okl_populate_acc_gen = '||l_return_status );
1334: END IF;
1335:
1336: -- Raise exception to rollback to savepoint for this block

Line 1438: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1434: p_token1_value=> p_khr_rec.contract_number);
1435:
1436: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1437: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1438: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1439: 'code_comb_err = '||l_return_status );
1440: END IF;
1441:
1442: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1477: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1473: END IF;
1474:
1475: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1476: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1477: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1478: 'OKL_TXL_ADJSTS_LNS_PUB.update_txl_adjsts_lns = '||l_return_status );
1479: END IF;
1480:
1481: -- Raise exception to rollback this whole block

Line 1521: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1517: ELSE --(cannot close all balances since tolerance amt is less)
1518:
1519: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1520: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1521: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1522: 'cannot_close_bal = '||'E' );
1523: END IF;
1524:
1525: -- Get the currency code for contract

Line 1554: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1550: ELSE
1551:
1552: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1553: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1554: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1555: 'no_balance = '||'E' );
1556: END IF;
1557:
1558: -- No outstanding balance.

Line 1572: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1568: OKL_API.end_activity (x_msg_count, x_msg_data);
1569:
1570: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1571: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1572: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1573: 'End(-)');
1574: END IF;
1575:
1576: EXCEPTION

Line 1598: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1594: p_api_type => '_PVT');
1595:
1596: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1597: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1598: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1599: 'EXP - ERROR');
1600: END IF;
1601:
1602:

Line 1624: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1620: p_api_type => '_PVT');
1621:
1622: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1623: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1624: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1625: 'EXP - UNEXCP ERROR');
1626: END IF;
1627:
1628: WHEN OTHERS THEN

Line 1649: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',

1645: p_api_type => '_PVT');
1646:
1647: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1648: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1649: 'OKL_AM_BAL_WRITEOFF_PVT.write_off_balances.',
1650: 'EXP - OTHERS');
1651: END IF;
1652:
1653: END write_off_balances;

Line 1703: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',

1699: BEGIN
1700:
1701: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1702: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1703: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',
1704: 'Begin(+)');
1705: END IF;
1706:
1707: -- *************

Line 1736: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',

1732: x_return_status => l_return_status);
1733:
1734: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1735: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1736: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',
1737: 'populate_khr_prg = '||l_return_status );
1738: END IF;
1739:
1740: IF l_return_status <> G_RET_STS_SUCCESS THEN

Line 1759: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',

1755: x_return_status => l_return_status);
1756:
1757: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1758: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1759: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',
1760: 'validate_khr_prg = '||l_return_status );
1761: END IF;
1762:
1763: -- raise exception if api failed

Line 1783: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',

1779: p_control_flag => p_control_flag);
1780:
1781: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1782: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1783: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',
1784: 'write_off_balances = '||l_return_status );
1785: END IF;
1786:
1787: -- raise exception if api failed

Line 1811: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',

1807: OKL_API.end_activity (x_msg_count, x_msg_data);
1808:
1809: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1810: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1811: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',
1812: 'End(-)');
1813: END IF;
1814:
1815: EXCEPTION

Line 1836: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',

1832: p_api_type => '_PVT');
1833:
1834: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1835: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1836: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',
1837: 'EXP - G_EXCEPTION_ERROR');
1838: END IF;
1839:
1840: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1859: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',

1855: p_api_type => '_PVT');
1856:
1857: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1858: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1859: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',
1860: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1861: END IF;
1862:
1863: WHEN OTHERS THEN

Line 1882: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',

1878: p_api_type => '_PVT');
1879:
1880: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1881: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1882: 'OKL_AM_BAL_WRITEOFF_PVT.do_write_off_balances.',
1883: 'EXP - OTHERS');
1884: END IF;
1885:
1886: END do_write_off_balances;

Line 2045: END OKL_AM_BAL_WRITEOFF_PVT;

2041: p_token2_value => SQLERRM);
2042:
2043: END concurrent_bal_writeoff_prg;
2044:
2045: END OKL_AM_BAL_WRITEOFF_PVT;