1439: IS
1440: l_fee_types_rec OKL_MAINTAIN_FEE_PVT.fee_types_rec_type;
1441: lx_fee_types_rec OKL_MAINTAIN_FEE_PVT.fee_types_rec_type;
1442:
1443: l_u_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1444: lx_u_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1445:
1446: l_c_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1447: lx_c_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1440: l_fee_types_rec OKL_MAINTAIN_FEE_PVT.fee_types_rec_type;
1441: lx_fee_types_rec OKL_MAINTAIN_FEE_PVT.fee_types_rec_type;
1442:
1443: l_u_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1444: lx_u_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1445:
1446: l_c_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1447: lx_c_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1448:
1442:
1443: l_u_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1444: lx_u_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1445:
1446: l_c_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1447: lx_c_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1448:
1449: l_rgpv_rec rgpv_rec_type;
1450: l_rulv_rec rulv_rec_type;
1443: l_u_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1444: lx_u_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1445:
1446: l_c_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1447: lx_c_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1448:
1449: l_rgpv_rec rgpv_rec_type;
1450: l_rulv_rec rulv_rec_type;
1451: l_rulv_tbl rulv_tbl_type;
1653: AND NVL(rul.rule_information11,'BILLED') = 'BILLED'
1654: AND cleb_fin.sts_code <> 'ABANDONED'
1655: AND cleb_cov_asset.sts_code <> 'ABANDONED';
1656:
1657: l_d_line_item_tbl OKL_CONTRACT_LINE_ITEM_PVT.line_item_tbl_type;
1658:
1659: l_asset_tax_amt NUMBER;
1660: update_fee_exception exception;
1661:
1939: -- Associate Assets to the fee
1940: IF (l_c_line_item_tbl.COUNT > 0) THEN
1941:
1942: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1943: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Update Fee Procedure: before okl_contract_line_item_pvt.create_contract_line_item ');
1944: END IF;
1945:
1946: okl_contract_line_item_pvt.create_contract_line_item(
1947: p_api_version => p_api_version,
1942: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1943: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Update Fee Procedure: before okl_contract_line_item_pvt.create_contract_line_item ');
1944: END IF;
1945:
1946: okl_contract_line_item_pvt.create_contract_line_item(
1947: p_api_version => p_api_version,
1948: p_init_msg_list => p_init_msg_list,
1949: x_return_status => x_return_status,
1950: x_msg_count => x_msg_count,
1965:
1966: IF (l_u_line_item_tbl.COUNT > 0) THEN
1967:
1968: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1969: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Update Fee Procedure: before okl_contract_line_item_pvt.update_contract_line_item ');
1970: END IF;
1971:
1972: okl_contract_line_item_pvt.update_contract_line_item(
1973: p_api_version => p_api_version,
1968: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1969: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Update Fee Procedure: before okl_contract_line_item_pvt.update_contract_line_item ');
1970: END IF;
1971:
1972: okl_contract_line_item_pvt.update_contract_line_item(
1973: p_api_version => p_api_version,
1974: p_init_msg_list => p_init_msg_list,
1975: x_return_status => x_return_status,
1976: x_msg_count => x_msg_count,
1990:
1991: IF (l_d_line_item_tbl.COUNT > 0) THEN
1992:
1993: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1994: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Update Fee Procedure: before okl_contract_line_item_pvt.delete_contract_line_item ');
1995: END IF;
1996:
1997: okl_contract_line_item_pvt.delete_contract_line_item(
1998: p_api_version => p_api_version,
1993: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1994: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Update Fee Procedure: before okl_contract_line_item_pvt.delete_contract_line_item ');
1995: END IF;
1996:
1997: okl_contract_line_item_pvt.delete_contract_line_item(
1998: p_api_version => p_api_version,
1999: p_init_msg_list => p_init_msg_list,
2000: x_return_status => x_return_status,
2001: x_msg_count => x_msg_count,
2309: )
2310: IS
2311: l_fee_types_rec OKL_MAINTAIN_FEE_PVT.fee_types_rec_type;
2312: lx_fee_types_rec OKL_MAINTAIN_FEE_PVT.fee_types_rec_type;
2313: l_line_item_tbl okl_contract_line_item_pvt.line_item_tbl_type;
2314: lx_line_item_tbl okl_contract_line_item_pvt.line_item_tbl_type;
2315:
2316: l_rgpv_rec rgpv_rec_type;
2317: l_rulv_rec rulv_rec_type;
2310: IS
2311: l_fee_types_rec OKL_MAINTAIN_FEE_PVT.fee_types_rec_type;
2312: lx_fee_types_rec OKL_MAINTAIN_FEE_PVT.fee_types_rec_type;
2313: l_line_item_tbl okl_contract_line_item_pvt.line_item_tbl_type;
2314: lx_line_item_tbl okl_contract_line_item_pvt.line_item_tbl_type;
2315:
2316: l_rgpv_rec rgpv_rec_type;
2317: l_rulv_rec rulv_rec_type;
2318: l_rulv_tbl rulv_tbl_type;
2613:
2614:
2615:
2616: IF (G_IS_DEBUG_STATEMENT_ON = TRUE) THEN
2617: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Create Fee Procedure: FINANCE segment: before okl_contract_line_item_pvt ');
2618: END IF;
2619: -- Associate Assets to the fee
2620: okl_contract_line_item_pvt.create_contract_line_item(
2621: p_api_version => p_api_version,
2616: IF (G_IS_DEBUG_STATEMENT_ON = TRUE) THEN
2617: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Create Fee Procedure: FINANCE segment: before okl_contract_line_item_pvt ');
2618: END IF;
2619: -- Associate Assets to the fee
2620: okl_contract_line_item_pvt.create_contract_line_item(
2621: p_api_version => p_api_version,
2622: p_init_msg_list => p_init_msg_list,
2623: --p_init_msg_list => 'T',
2624: x_return_status => x_return_status,
2905:
2906:
2907:
2908: IF (G_IS_DEBUG_STATEMENT_ON = TRUE) THEN
2909: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Pre Book Procedure: CAPITALIZE segment: before okl_contract_line_item_pvt ');
2910: END IF;
2911: -- Associate Assets to the fee
2912: okl_contract_line_item_pvt.create_contract_line_item(
2913: p_api_version => p_api_version,
2908: IF (G_IS_DEBUG_STATEMENT_ON = TRUE) THEN
2909: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'OKL: Pre Book Procedure: CAPITALIZE segment: before okl_contract_line_item_pvt ');
2910: END IF;
2911: -- Associate Assets to the fee
2912: okl_contract_line_item_pvt.create_contract_line_item(
2913: p_api_version => p_api_version,
2914: p_init_msg_list => p_init_msg_list,
2915: x_return_status => x_return_status,
2916: x_msg_count => x_msg_count,