[Home] [Help]
3:
4:
5: -- Start of wraper code generated automatically by Debug code generator
6: L_MODULE VARCHAR2(40) := 'LEASE.INSURANCE';
7: L_DEBUG_ENABLED CONSTANT VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
8: L_LEVEL_PROCEDURE NUMBER;
9: IS_DEBUG_PROCEDURE_ON BOOLEAN;
10: -- End of wraper code generated automatically by Debug code generator
11: --------------------------------------------------------
173:
174: -- Start of Debug code generator for okl_acc_call_pub.create_acc_trans
175: IF(L_DEBUG_ENABLED='Y') THEN
176: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
177: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
178: END IF;
179:
180: IF(IS_DEBUG_PROCEDURE_ON) THEN
181: BEGIN
178: END IF;
179:
180: IF(IS_DEBUG_PROCEDURE_ON) THEN
181: BEGIN
182: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call okl_trx_ar_invoices_pub.insert_trx_ar_invoices ');
183: END;
184: END IF;
185:
186: okl_trx_ar_invoices_pub.insert_trx_ar_invoices(p_api_version,
191: l_taiv_rec,
192: lx_taiv_rec);
193: IF(IS_DEBUG_PROCEDURE_ON) THEN
194: BEGIN
195: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call okl_trx_ar_invoices_pub.insert_trx_ar_invoices ');
196: END;
197: END IF;
198:
199: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
223:
224: -- Start of Debug code generator for okl_acc_call_pub.create_acc_trans
225: IF(L_DEBUG_ENABLED='Y') THEN
226: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
227: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
228: END IF;
229:
230: IF(IS_DEBUG_PROCEDURE_ON) THEN
231: BEGIN
228: END IF;
229:
230: IF(IS_DEBUG_PROCEDURE_ON) THEN
231: BEGIN
232: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call okl_txl_ar_inv_lns_pub.insert_txl_ar_inv_lns ');
233: END;
234: END IF;
235:
236:
244: lx_tilv_rec);
245:
246: IF(IS_DEBUG_PROCEDURE_ON) THEN
247: BEGIN
248: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call okl_txl_ar_inv_lns_pub.insert_txl_ar_inv_lns ');
249: END;
250: END IF;
251:
252: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
271:
272: -- Start of Debug code generator for okl_acc_call_pub.create_acc_trans
273: IF(L_DEBUG_ENABLED='Y') THEN
274: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
275: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
276: END IF;
277:
278: IF(IS_DEBUG_PROCEDURE_ON) THEN
279: BEGIN
276: END IF;
277:
278: IF(IS_DEBUG_PROCEDURE_ON) THEN
279: BEGIN
280: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call okl_acc_call_pub.create_acc_trans ');
281: END;
282: END IF;
283:
284: OKL_ACC_CALL_PUB.CREATE_ACC_TRANS(
290: ,p_bpd_acc_rec => l_bpd_acc_rec);
291:
292: IF(IS_DEBUG_PROCEDURE_ON) THEN
293: BEGIN
294: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call okl_acc_call_pub.create_acc_trans ');
295: END;
296: END IF;
297: -- End of Debug for okl_acc_call_pub.create_acc_trans
298: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
670: /* 22-JAN-2007 ANSETHUR BUILD: R12 B DISBURSEMENT Start changes */
671:
672: IF(IS_DEBUG_PROCEDURE_ON) THEN
673: BEGIN
674: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_CREATE_DISB_TRANS_PVT.create_disb_trx ');
675: END;
676: END IF;
677:
678: l_tplv_tbl(0) := l_tplv_rec;
688: ,x_tplv_tbl =>x_tplv_tbl
689: );
690: IF(IS_DEBUG_PROCEDURE_ON) THEN
691: BEGIN
692: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_CREATE_DISB_TRANS_PVT.create_disb_trx ');
693: END;
694: END IF;
695:
696: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1012: ------------------------------------------------------------------------------------
1013: /* 22-JAN-2007 ANSETHUR BUILD: R12 B DISBURSEMENT Start changes */
1014: IF(IS_DEBUG_PROCEDURE_ON) THEN
1015: BEGIN
1016: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_CREATE_DISB_TRANS_PVT.create_disb_trx ');
1017: END;
1018: END IF;
1019:
1020: l_tplv_tbl(0) := l_tplv_rec;
1030: ,x_tplv_tbl =>x_tplv_tbl
1031: );
1032: IF(IS_DEBUG_PROCEDURE_ON) THEN
1033: BEGIN
1034: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_CREATE_DISB_TRANS_PVT.create_disb_trx ');
1035: END;
1036: END IF;
1037:
1038: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1222: -- Call API to create Credit Memo
1223: -- Start of wraper code generated automatically by Debug code generator for okl_credit_memo_pub.insert_request
1224: IF(L_DEBUG_ENABLED='Y') THEN
1225: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
1226: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
1227: END IF;
1228: IF(IS_DEBUG_PROCEDURE_ON) THEN
1229: BEGIN
1230: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call on_account_credit_memo');
1226: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
1227: END IF;
1228: IF(IS_DEBUG_PROCEDURE_ON) THEN
1229: BEGIN
1230: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call on_account_credit_memo');
1231: END;
1232: END IF;
1233: on_account_credit_memo
1234: (
1248:
1249: IF(IS_DEBUG_PROCEDURE_ON) THEN
1250:
1251: BEGIN
1252: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call on_account_credit_memo ');
1253: END;
1254: END IF;
1255: -- End of wraper code generated automatically by Debug code generator for okl_credit_memo_pub.insert_request
1256:
1501:
1502: -- Start of wraper code generated automatically by Debug code generator for Okl_Ins_Policies_Pub.update_ins_policies
1503: IF(L_DEBUG_ENABLED='Y') THEN
1504: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
1505: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
1506: END IF;
1507: IF(IS_DEBUG_PROCEDURE_ON) THEN
1508: BEGIN
1509: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call Okl_Ins_Policies_Pub.update_ins_policies ');
1505: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
1506: END IF;
1507: IF(IS_DEBUG_PROCEDURE_ON) THEN
1508: BEGIN
1509: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call Okl_Ins_Policies_Pub.update_ins_policies ');
1510: END;
1511: END IF;
1512: Okl_Ins_Policies_Pub.update_ins_policies(
1513: p_api_version => p_api_version,
1519: x_ipyv_rec => x_ipyv_rec
1520: );
1521: IF(IS_DEBUG_PROCEDURE_ON) THEN
1522: BEGIN
1523: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call Okl_Ins_Policies_Pub.update_ins_policies ');
1524: END;
1525: END IF;
1526: -- End of wraper code generated automatically by Debug code generator for Okl_Ins_Policies_Pub.update_ins_policies
1527:
2074:
2075: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2076: IF(L_DEBUG_ENABLED='Y') THEN
2077: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
2078: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2079: END IF;
2080: IF(IS_DEBUG_PROCEDURE_ON) THEN
2081: BEGIN
2082: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2078: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
2079: END IF;
2080: IF(IS_DEBUG_PROCEDURE_ON) THEN
2081: BEGIN
2082: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2083: END;
2084: END IF;
2085: OKL_STREAMS_PUB.update_streams(
2086: p_api_version
2092: ,x_stmv_rec
2093: );
2094: IF(IS_DEBUG_PROCEDURE_ON) THEN
2095: BEGIN
2096: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2097: END;
2098: END IF;
2099: -- End of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2100:
2143: IF(p_stmv_rec.id IS NOT NULL AND p_stmv_rec.id <> OKC_API.G_MISS_NUM) THEN
2144: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2145: IF(IS_DEBUG_PROCEDURE_ON) THEN
2146: BEGIN
2147: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2148: END;
2149: END IF;
2150: OKL_STREAMS_PUB.update_streams(
2151: p_api_version
2157: ,x_stmv_rec
2158: );
2159: IF(IS_DEBUG_PROCEDURE_ON) THEN
2160: BEGIN
2161: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2162: END;
2163: END IF;
2164: -- End of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2165:
2180: IF(p_stmv_rec.id IS NOT NULL AND p_stmv_rec.id <> OKC_API.G_MISS_NUM) THEN
2181: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2182: IF(IS_DEBUG_PROCEDURE_ON) THEN
2183: BEGIN
2184: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2185: END;
2186: END IF;
2187: OKL_STREAMS_PUB.update_streams(
2188: p_api_version
2194: ,x_stmv_rec
2195: );
2196: IF(IS_DEBUG_PROCEDURE_ON) THEN
2197: BEGIN
2198: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2199: END;
2200: END IF;
2201: -- End of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2202:
2243: IF(p_stmv_rec.id IS NOT NULL AND p_stmv_rec.id <> OKC_API.G_MISS_NUM) THEN
2244: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2245: IF(IS_DEBUG_PROCEDURE_ON) THEN
2246: BEGIN
2247: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2248: END;
2249: END IF;
2250: OKL_STREAMS_PUB.update_streams(
2251: p_api_version
2257: ,x_stmv_rec
2258: );
2259: IF(IS_DEBUG_PROCEDURE_ON) THEN
2260: BEGIN
2261: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2262: END;
2263: END IF;
2264: -- End of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2265:
2309: IF(p_stmv_rec.id IS NOT NULL AND p_stmv_rec.id <> OKC_API.G_MISS_NUM) THEN
2310: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2311: IF(IS_DEBUG_PROCEDURE_ON) THEN
2312: BEGIN
2313: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2314: END;
2315: END IF;
2316: OKL_STREAMS_PUB.update_streams(
2317: p_api_version
2323: ,x_stmv_rec
2324: );
2325: IF(IS_DEBUG_PROCEDURE_ON) THEN
2326: BEGIN
2327: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2328: END;
2329: END IF;
2330: -- End of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2331:
2347: IF(p_stmv_rec.id IS NOT NULL AND p_stmv_rec.id <> OKC_API.G_MISS_NUM) THEN
2348: -- Start of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2349: IF(IS_DEBUG_PROCEDURE_ON) THEN
2350: BEGIN
2351: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2352: END;
2353: END IF;
2354: OKL_STREAMS_PUB.update_streams(
2355: p_api_version
2361: ,x_stmv_rec
2362: );
2363: IF(IS_DEBUG_PROCEDURE_ON) THEN
2364: BEGIN
2365: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_STREAMS_PUB.update_streams ');
2366: END;
2367: END IF;
2368: -- End of wraper code generated automatically by Debug code generator for OKL_STREAMS_PUB.update_streams
2369:
3172: END IF ;
3173: CLOSE c_trx_type ;
3174: IF(L_DEBUG_ENABLED='Y') THEN
3175: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
3176: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3177: END IF;
3178: IF(IS_DEBUG_PROCEDURE_ON) THEN
3179: BEGIN
3180: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug call insert_ap_request');
3176: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3177: END IF;
3178: IF(IS_DEBUG_PROCEDURE_ON) THEN
3179: BEGIN
3180: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug call insert_ap_request');
3181: END;
3182: END IF;
3183: insert_ap_request(p_api_version => l_api_version,
3184: p_init_msg_list => OKL_API.G_FALSE,
3193: p_invoice_date => SYSDATE,
3194: p_trx_id => l_trx_type_id );
3195: IF(IS_DEBUG_PROCEDURE_ON) THEN
3196: BEGIN
3197: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug call insert_ap_request');
3198: END;
3199: END IF;
3200: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3201: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3591:
3592: -- Start of wraper code generated automatically by Debug code generator for OKL_TRX_CONTRACTS_PUB.create_trx_contracts
3593: IF(L_DEBUG_ENABLED='Y') THEN
3594: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
3595: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3596: END IF;
3597: IF(IS_DEBUG_PROCEDURE_ON) THEN
3598: BEGIN
3599: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
3595: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3596: END IF;
3597: IF(IS_DEBUG_PROCEDURE_ON) THEN
3598: BEGIN
3599: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
3600: END;
3601: END IF;
3602: OKL_TRX_CONTRACTS_PUB.create_trx_contracts(
3603: p_api_version => l_api_version,
3610: x_tcnv_rec => x_tcnv_rec_in,
3611: x_tclv_tbl => x_tclv_tbl );
3612: IF(IS_DEBUG_PROCEDURE_ON) THEN
3613: BEGIN
3614: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
3615: END;
3616: END IF;
3617: -- End of wraper code generated automatically by Debug code generator for OKL_TRX_CONTRACTS_PUB.create_trx_contracts
3618:
3685: IF (l_adjustment_amount > 0 )THEN
3686: -- Start of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
3687: IF(IS_DEBUG_PROCEDURE_ON) THEN
3688: BEGIN
3689: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
3690: END;
3691: END IF;
3692:
3693: Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST(
3704: ,x_amount_tbl => l_amount_tbl);
3705:
3706: IF(IS_DEBUG_PROCEDURE_ON) THEN
3707: BEGIN
3708: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
3709: END;
3710: END IF;
3711: -- End of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
3712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3757:
3758: -- Start of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
3759: IF(IS_DEBUG_PROCEDURE_ON) THEN
3760: BEGIN
3761: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS ');
3762: END;
3763: END IF;
3764: OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS(
3765: p_api_version => p_api_version
3773: ,p_stream_tbl => l_stream_tbl);
3774:
3775: IF(IS_DEBUG_PROCEDURE_ON) THEN
3776: BEGIN
3777: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS ');
3778: END;
3779: END IF;
3780: -- End of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
3781: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3821:
3822: -- Start of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
3823: IF(IS_DEBUG_PROCEDURE_ON) THEN
3824: BEGIN
3825: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS ');
3826: END;
3827: END IF;
3828:
3829: --l_accrual_rec.trx_number := l_trx_number; -- bug 9191475
3841:
3842: OKL_STREAMS_SEC_PVT.RESET_REPO_STREAMS;
3843: IF(IS_DEBUG_PROCEDURE_ON) THEN
3844: BEGIN
3845: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS ');
3846: END;
3847: END IF;
3848:
3849:
4224:
4225: -- Start of wraper code generated automatically by Debug code generator for OKL_TRX_CONTRACTS_PUB.create_trx_contracts
4226: IF(IS_DEBUG_PROCEDURE_ON) THEN
4227: BEGIN
4228: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
4229: END;
4230: END IF;
4231: OKL_TRX_CONTRACTS_PUB.create_trx_contracts(
4232: p_api_version => l_api_version,
4240: x_tclv_tbl => x_tclv_tbl
4241: );
4242: IF(IS_DEBUG_PROCEDURE_ON) THEN
4243: BEGIN
4244: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
4245: END;
4246: END IF;
4247: -- End of wraper code generated automatically by Debug code generator for OKL_TRX_CONTRACTS_PUB.create_trx_contracts
4248: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4321:
4322: -- Start of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
4323: IF(IS_DEBUG_PROCEDURE_ON) THEN
4324: BEGIN
4325: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
4326: END;
4327: END IF;
4328: Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST(
4329: p_api_version => p_api_version
4338: ,x_template_tbl => l_template_tbl
4339: ,x_amount_tbl => l_amount_tbl);
4340: IF(IS_DEBUG_PROCEDURE_ON) THEN
4341: BEGIN
4342: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
4343: END;
4344: END IF;
4345: -- End of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
4346: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4392:
4393: -- Start of wraper code generated automatically by Debug code generator for OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS
4394: IF(IS_DEBUG_PROCEDURE_ON) THEN
4395: BEGIN
4396: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS ');
4397: END;
4398: END IF;
4399:
4400: OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS(
4409: ,p_stream_tbl => l_stream_tbl);
4410:
4411: IF(IS_DEBUG_PROCEDURE_ON) THEN
4412: BEGIN
4413: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
4414: END;
4415: END IF;
4416: -- End of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
4417: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4459:
4460: -- Start of wraper code generated automatically by Debug code generator for OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS
4461: IF(IS_DEBUG_PROCEDURE_ON) THEN
4462: BEGIN
4463: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS ');
4464: END;
4465: END IF;
4466:
4467: --l_accrual_rec.trx_number := l_trx_number; -- bug 9191475
4478: ,p_representation_type => 'SECONDARY');
4479:
4480: IF(IS_DEBUG_PROCEDURE_ON) THEN
4481: BEGIN
4482: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_GENERATE_ACCRUALS_PVT.ADJUST_ACCRUALS ');
4483: END;
4484: END IF;
4485: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4486: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4615: lp_tilv_tbl(1) := lp_tilv_rec;
4616:
4617: IF(L_DEBUG_ENABLED='Y') THEN
4618: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
4619: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
4620: END IF;
4621: IF(IS_DEBUG_PROCEDURE_ON) THEN
4622: BEGIN
4623: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug call Okl_Internal_Billing_Pvt.create_billing_trx');
4619: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
4620: END IF;
4621: IF(IS_DEBUG_PROCEDURE_ON) THEN
4622: BEGIN
4623: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug call Okl_Internal_Billing_Pvt.create_billing_trx');
4624: END;
4625: END IF;
4626:
4627: okl_internal_billing_pvt.create_billing_trx(
4638: x_tldv_tbl => lx_tldv_tbl);
4639:
4640: IF(IS_DEBUG_PROCEDURE_ON) THEN
4641: BEGIN
4642: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug call Okl_Internal_Billing_Pvt.create_billing_trx');
4643: END;
4644: END IF;
4645:
4646: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4822: -- Call API to create Credit Memo
4823: -- Start of Debug code generator for on_account_credit_memo
4824: IF(L_DEBUG_ENABLED='Y') THEN
4825: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
4826: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
4827: END IF;
4828: IF(IS_DEBUG_PROCEDURE_ON) THEN
4829: BEGIN
4830: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call okl_credit_memo_pub.insert_request ');
4826: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
4827: END IF;
4828: IF(IS_DEBUG_PROCEDURE_ON) THEN
4829: BEGIN
4830: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call okl_credit_memo_pub.insert_request ');
4831: END;
4832: END IF;
4833: --- Creating credit memo
4834: on_account_credit_memo
4848: x_tai_id => l_tai_id
4849: );
4850: IF(IS_DEBUG_PROCEDURE_ON) THEN
4851: BEGIN
4852: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call on_account_credit_memo ');
4853: END;
4854: END IF;
4855: -- End of wraper code generated automatically by Debug code generator for okl_credit_memo_pub.insert_request
4856: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4864: l_pro_refund_amount := -l_cust_refund_amount; --for making positive invoice amount
4865: -- Start of Debug code generator for Rebook_manual_invoice
4866: IF(L_DEBUG_ENABLED='Y') THEN
4867: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
4868: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
4869: END IF;
4870: IF(IS_DEBUG_PROCEDURE_ON) THEN
4871: BEGIN
4872: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug call Rebook_manual_invoice');
4868: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
4869: END IF;
4870: IF(IS_DEBUG_PROCEDURE_ON) THEN
4871: BEGIN
4872: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug call Rebook_manual_invoice');
4873: END;
4874: END IF;
4875: Rebook_manual_invoice( p_api_version
4876: ,p_init_msg_list
4884: --Bug 8810880
4885: ,l_ipyv_rec.id);
4886: IF(IS_DEBUG_PROCEDURE_ON) THEN
4887: BEGIN
4888: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug call Rebook_manual_invoice');
4889: END;
4890: END IF;
4891: l_return_status := x_return_status;
4892: -- End of wraper code generated automatically by Debug code generator for Rebook_manual_invoice
5028: --Update Policy
5029: -- Start of wraper code generated automatically by Debug code generator for Okl_Ins_Policies_Pub.update_ins_policies
5030: IF(IS_DEBUG_PROCEDURE_ON) THEN
5031: BEGIN
5032: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call Okl_Ins_Policies_Pub.update_ins_policies ');
5033: END;
5034: END IF;
5035: Okl_Ins_Policies_Pub.update_ins_policies(
5036: p_api_version => p_api_version,
5042: x_ipyv_rec => x_ipyv_rec
5043: );
5044: IF(IS_DEBUG_PROCEDURE_ON) THEN
5045: BEGIN
5046: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call Okl_Ins_Policies_Pub.update_ins_policies ');
5047: END;
5048: END IF;
5049: -- End of wraper code generated automatically by Debug code generator for Okl_Ins_Policies_Pub.update_ins_policies
5050: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5524: lx_ipyv_newrec.adjustment := 0;
5525: -- Start of wraper code generated automatically by Debug code generator for okl_ins_quote_pub.save_quote
5526: IF(L_DEBUG_ENABLED='Y') THEN
5527: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
5528: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
5529: END IF;
5530: IF(IS_DEBUG_PROCEDURE_ON) THEN
5531: BEGIN
5532: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call okl_ins_quote_pub.save_quote ');
5528: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
5529: END IF;
5530: IF(IS_DEBUG_PROCEDURE_ON) THEN
5531: BEGIN
5532: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call okl_ins_quote_pub.save_quote ');
5533: END;
5534: END IF;
5535: okl_ins_quote_pub.save_quote(
5536: p_api_version => l_api_version,
5541: px_ipyv_rec => lx_ipyv_newrec,
5542: x_message => x_message );
5543: IF(IS_DEBUG_PROCEDURE_ON) THEN
5544: BEGIN
5545: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call okl_ins_quote_pub.save_quote ');
5546: END;
5547: END IF;
5548: -- End of wraper code generated automatically by Debug code generator for okl_ins_quote_pub.save_quote
5549: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5560: lx_ipyv_newrec.adjustment := 0;
5561: -- Start of wraper code generated automatically by Debug code generator for okl_ins_quote_pub.accept_quote
5562: IF(IS_DEBUG_PROCEDURE_ON) THEN
5563: BEGIN
5564: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call okl_ins_quote_pub.accept_quote ');
5565: END;
5566: END IF;
5567: okl_ins_quote_pub.accept_quote(
5568: p_api_version => l_api_version,
5573: p_quote_id => lx_ipyv_newrec.ID
5574: );
5575: IF(IS_DEBUG_PROCEDURE_ON) THEN
5576: BEGIN
5577: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call okl_ins_quote_pub.accept_quote ');
5578: END;
5579: END IF;
5580: -- End of wraper code generated automatically by Debug code generator for okl_ins_quote_pub.accept_quote
5581: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5626: IF (l_contract_status = 'ACTIVE') THEN --[4]
5627: -- Start of wraper code generated automatically by Debug code generator for okl_ins_quote_pub.activate_ins_policy
5628: IF(IS_DEBUG_PROCEDURE_ON) THEN
5629: BEGIN
5630: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call okl_ins_quote_pub.activate_ins_policy ');
5631: END;
5632: END IF;
5633: okl_ins_quote_pub.activate_ins_policy(
5634: p_api_version => l_api_version ,
5638: x_msg_data => l_msg_data,
5639: p_ins_policy_id => l_ipy_id );
5640: IF(IS_DEBUG_PROCEDURE_ON) THEN
5641: BEGIN
5642: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call okl_ins_quote_pub.activate_ins_policy ');
5643: END;
5644: END IF;
5645: -- End of wraper code generated automatically by Debug code generator for okl_ins_quote_pub.activate_ins_policy
5646: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
6387:
6388: -- Start of wraper code generated automatically by Debug code generator for OKL_TRX_CONTRACTS_PUB.create_trx_contracts
6389: IF(L_DEBUG_ENABLED='Y') THEN
6390: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
6391: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
6392: END IF;
6393: IF(IS_DEBUG_PROCEDURE_ON) THEN
6394: BEGIN
6395: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
6391: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
6392: END IF;
6393: IF(IS_DEBUG_PROCEDURE_ON) THEN
6394: BEGIN
6395: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
6396: END;
6397: END IF;
6398: OKL_TRX_CONTRACTS_PUB.create_trx_contracts(
6399: p_api_version => l_api_version,
6407: x_tclv_tbl => x_tclv_tbl
6408: );
6409: IF(IS_DEBUG_PROCEDURE_ON) THEN
6410: BEGIN
6411: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
6412: END;
6413: END IF;
6414: -- End of wraper code generated automatically by Debug code generator for OKL_TRX_CONTRACTS_PUB.create_trx_contracts
6415:
6521:
6522: -- Start of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
6523: IF(IS_DEBUG_PROCEDURE_ON) THEN
6524: BEGIN
6525: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
6526: END;
6527: END IF;
6528:
6529:
6542: ,x_template_tbl => l_template_tbl
6543: ,x_amount_tbl => l_amount_tbl);
6544: IF(IS_DEBUG_PROCEDURE_ON) THEN
6545: BEGIN
6546: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
6547: END;
6548: END IF;
6549: -- End of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
6550:
6651:
6652: -- Start of wraper code generated automatically by Debug code generator for OKL_TRX_CONTRACTS_PUB.create_trx_contracts
6653: IF(IS_DEBUG_PROCEDURE_ON) THEN
6654: BEGIN
6655: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
6656: END;
6657: END IF;
6658: OKL_TRX_CONTRACTS_PUB.create_trx_contracts(
6659: p_api_version => l_api_version,
6667: x_tclv_tbl => x_tclv_tbl
6668: );
6669: IF(IS_DEBUG_PROCEDURE_ON) THEN
6670: BEGIN
6671: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_TRX_CONTRACTS_PUB.create_trx_contracts ');
6672: END;
6673: END IF;
6674: -- End of wraper code generated automatically by Debug code generator for OKL_TRX_CONTRACTS_PUB.create_trx_contracts
6675:
6742:
6743: -- Start of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
6744: IF(IS_DEBUG_PROCEDURE_ON) THEN
6745: BEGIN
6746: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
6747: END;
6748: END IF;
6749: Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST(
6750: p_api_version => p_api_version
6759: ,x_template_tbl => l_template_tbl
6760: ,x_amount_tbl => l_amount_tbl);
6761: IF(IS_DEBUG_PROCEDURE_ON) THEN
6762: BEGIN
6763: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
6764: END;
6765: END IF;
6766: -- End of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
6767:
6786:
6787: -- Start of wraper code generated automatically by Debug code generator for Okl_Ins_Policies_Pub.update_ins_policies
6788: IF(IS_DEBUG_PROCEDURE_ON) THEN
6789: BEGIN
6790: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call Okl_Ins_Policies_Pub.update_ins_policies ');
6791: END;
6792: END IF;
6793: Okl_Ins_Policies_Pub.update_ins_policies(
6794: p_api_version => p_api_version,
6801: );
6802:
6803: IF(IS_DEBUG_PROCEDURE_ON) THEN
6804: BEGIN
6805: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call Okl_Ins_Policies_Pub.update_ins_policies ');
6806: END;
6807: END IF;
6808: -- End of wraper code generated automatically by Debug code generator for Okl_Ins_Policies_Pub.update_ins_policies
6809:
6910: CLOSE okl_ipy_rec ;
6911: -- Start of wraper code generated automatically by Debug code generator for OKL_EXECUTE_FORMULA_PUB.EXECUTE
6912: IF(L_DEBUG_ENABLED='Y') THEN
6913: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
6914: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
6915: END IF;
6916: IF(IS_DEBUG_PROCEDURE_ON) THEN
6917: BEGIN
6918: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_EXECUTE_FORMULA_PUB.EXECUTE ');
6914: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
6915: END IF;
6916: IF(IS_DEBUG_PROCEDURE_ON) THEN
6917: BEGIN
6918: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call OKL_EXECUTE_FORMULA_PUB.EXECUTE ');
6919: END;
6920: END IF;
6921: --++ Effective Dated Termination ++----
6922: l_params(1).name := G_FORMULA_PARAM_1;
6936: p_additional_parameters => l_params, ---+++ Eff Dated Term changes ++----
6937: x_value => x_refund_amount );
6938: IF(IS_DEBUG_PROCEDURE_ON) THEN
6939: BEGIN
6940: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call OKL_EXECUTE_FORMULA_PUB.EXECUTE ');
6941: END;
6942: END IF;
6943: -- End of wraper code generated automatically by Debug code generator for OKL_EXECUTE_FORMULA_PUB.EXECUTE
6944: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
7168: -- Call API to create Credit Memo
7169: -- Start of wraper code generated automatically by Debug code generator for on_account_credit_memo
7170: IF(L_DEBUG_ENABLED='Y') THEN
7171: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
7172: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
7173: END IF;
7174: IF(IS_DEBUG_PROCEDURE_ON) THEN
7175: BEGIN
7176: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call on_account_credit_memo ');
7172: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
7173: END IF;
7174: IF(IS_DEBUG_PROCEDURE_ON) THEN
7175: BEGIN
7176: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRIPXB.pls call on_account_credit_memo ');
7177: END;
7178: END IF;
7179:
7180: --bug 3923601
7198:
7199:
7200: IF(IS_DEBUG_PROCEDURE_ON) THEN
7201: BEGIN
7202: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRIPXB.pls call on_account_credit_memo ');
7203: END;
7204: END IF;
7205: -- End of wraper code generated automatically by Debug code generator for on_account_credit_memo.
7206: