DBA Data[Home] [Help]

APPS.OKL_PAY_INVOICES_DISB_PVT dependencies on OKL_API

Line 302: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

298: lux_tapv_rec Okl_tap_pvt.tapv_rec_type;
299:
300: l_template_tbl Okl_Account_Dist_Pub.AVLV_TBL_TYPE;
301: l_amount_tbl Okl_Account_Dist_Pub.AMOUNT_TBL_TYPE;
302: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
303:
304: CURSOR pdt_id_csr ( p_khr_id NUMBER ) IS
305: SELECT khr.pdt_id
306: FROM okl_k_headers khr

Line 330: l_return_status := okl_api.start_activity(

326:
327: G_EXCEPTION_HALT_VALIDATION EXCEPTION;
328:
329: BEGIN
330: l_return_status := okl_api.start_activity(
331: p_api_name => l_api_name,
332: p_init_msg_list => p_init_msg_list,
333: p_api_type => '_PVT',
334: x_return_status => l_return_status);

Line 336: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

332: p_init_msg_list => p_init_msg_list,
333: p_api_type => '_PVT',
334: x_return_status => l_return_status);
335:
336: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
337: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
338: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
339: RAISE OKL_API.G_EXCEPTION_ERROR;
340: END IF;

Line 337: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

333: p_api_type => '_PVT',
334: x_return_status => l_return_status);
335:
336: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
337: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
338: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
339: RAISE OKL_API.G_EXCEPTION_ERROR;
340: END IF;
341:

Line 338: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

334: x_return_status => l_return_status);
335:
336: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
337: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
338: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
339: RAISE OKL_API.G_EXCEPTION_ERROR;
340: END IF;
341:
342: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 339: RAISE OKL_API.G_EXCEPTION_ERROR;

335:
336: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
337: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
338: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
339: RAISE OKL_API.G_EXCEPTION_ERROR;
340: END IF;
341:
342: x_return_status := OKL_API.G_RET_STS_SUCCESS;
343: print_line ( '******** IN PROCEDURE INVOICE_INSERT ********');

Line 342: x_return_status := OKL_API.G_RET_STS_SUCCESS;

338: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
339: RAISE OKL_API.G_EXCEPTION_ERROR;
340: END IF;
341:
342: x_return_status := OKL_API.G_RET_STS_SUCCESS;
343: print_line ( '******** IN PROCEDURE INVOICE_INSERT ********');
344: ------------------------------------------------------------
345: -- Initialization of Parmaeters
346: ------------------------------------------------------------

Line 413: IF (NVL(l_tapv_rec.currency_code, okl_api.g_miss_char) = okl_api.g_miss_char) THEN

409:
410: --Start code added by pgomes on 02/12/2003
411:
412: --Check for currency code
413: IF (NVL(l_tapv_rec.currency_code, okl_api.g_miss_char) = okl_api.g_miss_char) THEN
414: l_tapv_rec.currency_code := l_currency_code;
415: END IF;
416:
417: --Check for currency conversion type

Line 418: IF (NVL(l_tapv_rec.currency_conversion_type, okl_api.g_miss_char) = okl_api.g_miss_char) THEN

414: l_tapv_rec.currency_code := l_currency_code;
415: END IF;
416:
417: --Check for currency conversion type
418: IF (NVL(l_tapv_rec.currency_conversion_type, okl_api.g_miss_char) = okl_api.g_miss_char) THEN
419: l_tapv_rec.currency_conversion_type := l_currency_conversion_type;
420: END IF;
421:
422: --Check for currency conversion date

Line 423: IF (NVL(l_tapv_rec.currency_conversion_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN

419: l_tapv_rec.currency_conversion_type := l_currency_conversion_type;
420: END IF;
421:
422: --Check for currency conversion date
423: IF (NVL(l_tapv_rec.currency_conversion_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN
424: l_tapv_rec.currency_conversion_date := l_currency_conversion_date;
425: END IF;
426:
427:

Line 433: IF (NVL(l_tapv_rec.currency_conversion_rate, okl_api.g_miss_num) = okl_api.g_miss_num) THEN

429: IF (l_tapv_rec.currency_conversion_type = 'User') THEN
430: IF (l_tapv_rec.currency_code = okl_accounting_util.get_func_curr_code) THEN
431: l_tapv_rec.currency_conversion_rate := 1;
432: ELSE
433: IF (NVL(l_tapv_rec.currency_conversion_rate, okl_api.g_miss_num) = okl_api.g_miss_num) THEN
434: l_tapv_rec.currency_conversion_rate := l_currency_conversion_rate;
435: END IF;
436: END IF;
437: --pgomes 02/12/2003 added below code to get curr conv rate

Line 469: IF ( x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

465: END;
466: END IF;
467: -- End of wraper code generated automatically by Debug code generator for Okl_Trx_Ap_Invoices_Pub.insert_trx_ap_invoices
468:
469: IF ( x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
470: print_line ( ' -- Created Header Record with Id '||lx_tapv_rec.id);
471: lu_tapv_rec := lx_tapv_rec;
472: ELSE
473: print_line ( '*=> ERROR : Creating Header.');

Line 504: IF ( x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

500: END;
501: END IF;
502: -- End of wraper code generated automatically by Debug code generator for OKL_TXL_AP_INV_LNS_PUB.insert_txl_ap_inv_lns
503:
504: IF ( x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
505: print_line ( ' -- Created Line Record with Id '||lx_tplv_rec.id);
506: ELSE
507: print_line ( '*=> ERROR : Creating Line.');
508: END IF;

Line 546: IF ( x_return_status = okl_api.g_ret_sts_success) THEN

542: ,p_trx_date => p_tapv_rec.date_invoiced
543: ,x_fact_synd_code => l_tmpl_identify_rec.FACTORING_SYND_FLAG
544: ,x_inv_acct_code => l_tmpl_identify_rec.INVESTOR_CODE);
545:
546: IF ( x_return_status = okl_api.g_ret_sts_success) THEN
547: print_line ( ' -- Okl_Securitization_Pvt.check_khr_ia_associated called successfully ');
548: ELSE
549: print_line ( '*=> ERROR : Calling Okl_Securitization_Pvt.check_khr_ia_associated.');
550: END IF;

Line 568: IF (NVL(l_dist_info_rec.currency_code, okl_api.g_miss_char) = okl_api.g_miss_char) IS NULL THEN

564:
565: --Check for currency code
566: l_dist_info_rec.currency_code := l_tapv_rec.currency_code;
567:
568: IF (NVL(l_dist_info_rec.currency_code, okl_api.g_miss_char) = okl_api.g_miss_char) IS NULL THEN
569: l_dist_info_rec.currency_code := l_currency_code;
570: END IF;
571:
572: --Check for currency conversion type

Line 575: IF (NVL(l_dist_info_rec.currency_conversion_type, okl_api.g_miss_char) = okl_api.g_miss_char) THEN

571:
572: --Check for currency conversion type
573: l_dist_info_rec.currency_conversion_type := l_tapv_rec.currency_conversion_type;
574:
575: IF (NVL(l_dist_info_rec.currency_conversion_type, okl_api.g_miss_char) = okl_api.g_miss_char) THEN
576: l_dist_info_rec.currency_conversion_type := l_currency_conversion_type;
577: END IF;
578:
579:

Line 583: IF (NVL(l_dist_info_rec.currency_conversion_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN

579:
580: --Check for currency conversion date
581: l_dist_info_rec.currency_conversion_date := l_tapv_rec.currency_conversion_date;
582:
583: IF (NVL(l_dist_info_rec.currency_conversion_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN
584: l_dist_info_rec.currency_conversion_date := l_currency_conversion_date;
585: END IF;
586:
587:

Line 593: IF (NVL(l_tapv_rec.currency_conversion_rate, okl_api.g_miss_num) = okl_api.g_miss_num) THEN

589: IF (l_dist_info_rec.currency_conversion_type = 'User') THEN
590: IF (l_dist_info_rec.currency_code = okl_accounting_util.get_func_curr_code) THEN
591: l_dist_info_rec.currency_conversion_rate := 1;
592: ELSE
593: IF (NVL(l_tapv_rec.currency_conversion_rate, okl_api.g_miss_num) = okl_api.g_miss_num) THEN
594: l_dist_info_rec.currency_conversion_rate := l_currency_conversion_rate;
595: ELSE
596: l_dist_info_rec.currency_conversion_rate := l_tapv_rec.currency_conversion_rate;
597: END IF;

Line 631: IF ( x_return_status = okl_api.g_ret_sts_success) THEN

627: END;
628: END IF;
629: -- End of wraper code generated automatically by Debug code generator for Okl_Acc_Call_Pvt.Okl_Populate_Acc_Gen
630:
631: IF ( x_return_status = okl_api.g_ret_sts_success) THEN
632: print_line ( ' -- Accounting engine called successfully ');
633: ELSE
634: print_line ( '*=> ERROR : Calling Accounting engine.');
635: END IF;

Line 664: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN

660: END;
661: END IF;
662: -- End of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
663:
664: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
665: --RAISE G_EXCEPTION_HALT_VALIDATION;
666: print_line ( '*=> ERROR: Accounting distributions not created.');
667:
668: --l_return_status := x_return_status;

Line 675: IF ( x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

671: UPDATE Okl_Trx_Ap_Invoices_B
672: SET TRX_STATUS_CODE = 'ERROR'
673: WHERE id = lx_tapv_rec.id;
674:
675: IF ( x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
676: print_line ( ' -- Updated Header Record with Id '||lx_tapv_rec.id || ' with ERROR Status');
677: ELSE
678: print_line ( '*=> ERROR : Updating Header with ERROR Status.');
679: END IF;

Line 721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

717: ,p_tplv_tbl => l_tplv_tbl
718: ,x_tapv_rec => lx_tapv_rec
719: ,x_tplv_tbl => lx_tplv_tbl);
720:
721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
724: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
725: END IF;

Line 722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

718: ,x_tapv_rec => lx_tapv_rec
719: ,x_tplv_tbl => lx_tplv_tbl);
720:
721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
724: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
725: END IF;
726:

Line 723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

719: ,x_tplv_tbl => lx_tplv_tbl);
720:
721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
724: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
725: END IF;
726:
727: IF(IS_DEBUG_PROCEDURE_ON) THEN

Line 724: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

720:
721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
724: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
725: END IF;
726:
727: IF(IS_DEBUG_PROCEDURE_ON) THEN
728: BEGIN

Line 738: okl_api.end_activity(x_msg_count => x_msg_count

734: --end:| 18-May-07 cklee -- Accounting API CR, Disbursement Central API uptake |
735:
736: print_line ( '******** EXITING PROCEDURE INVOICE_INSERT ********');
737:
738: okl_api.end_activity(x_msg_count => x_msg_count
739: ,x_msg_data => x_msg_data);
740: EXCEPTION
741: WHEN G_EXCEPTION_HALT_VALIDATION THEN
742: print_line ( '*=> ERROR: '||SQLERRM);

Line 743: Okl_Api.SET_MESSAGE(p_app_name => g_app_name

739: ,x_msg_data => x_msg_data);
740: EXCEPTION
741: WHEN G_EXCEPTION_HALT_VALIDATION THEN
742: print_line ( '*=> ERROR: '||SQLERRM);
743: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
744: ,p_msg_name => g_unexpected_error
745: ,p_token1 => g_sqlcode_token
746: ,p_token1_value => SQLCODE
747: ,p_token2 => g_sqlerrm_token

Line 749: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

745: ,p_token1 => g_sqlcode_token
746: ,p_token1_value => SQLCODE
747: ,p_token2 => g_sqlerrm_token
748: ,p_token2_value => SQLERRM);
749: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
750:
751: WHEN OTHERS THEN
752: print_line ( '*=> ERROR: '||SQLERRM);
753: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

Line 753: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

749: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
750:
751: WHEN OTHERS THEN
752: print_line ( '*=> ERROR: '||SQLERRM);
753: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
754:
755: END invoice_insert;
756:
757: PROCEDURE invoice_disbursement (

Line 843: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

839:
840: --Local Variables
841: l_ar_inv_number ra_customer_trx_all.trx_number%TYPE;
842: l_try_id okl_trx_ap_invoices_b.try_id%TYPE;
843: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
844: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
845:
846: TYPE tap_id_tbl_type IS TABLE OF okl_trx_ap_invoices_b.id%type
847: INDEX BY BINARY_INTEGER;

Line 844: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

840: --Local Variables
841: l_ar_inv_number ra_customer_trx_all.trx_number%TYPE;
842: l_try_id okl_trx_ap_invoices_b.try_id%TYPE;
843: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
844: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
845:
846: TYPE tap_id_tbl_type IS TABLE OF okl_trx_ap_invoices_b.id%type
847: INDEX BY BINARY_INTEGER;
848:

Line 857: l_return_status := okl_api.start_activity(

853: l_lsm_rcpt_tbl lsm_rcpt_tbl_type;
854: lsm_rcpt_id_ind NUMBER;
855: BEGIN
856:
857: l_return_status := okl_api.start_activity(
858: p_api_name => l_api_name,
859: p_init_msg_list => p_init_msg_list,
860: p_api_type => '_PVT',
861: x_return_status => l_return_status);

Line 863: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

859: p_init_msg_list => p_init_msg_list,
860: p_api_type => '_PVT',
861: x_return_status => l_return_status);
862:
863: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
865: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
866: RAISE OKL_API.G_EXCEPTION_ERROR;
867: END IF;

Line 864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

860: p_api_type => '_PVT',
861: x_return_status => l_return_status);
862:
863: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
865: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
866: RAISE OKL_API.G_EXCEPTION_ERROR;
867: END IF;
868:

Line 865: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

861: x_return_status => l_return_status);
862:
863: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
865: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
866: RAISE OKL_API.G_EXCEPTION_ERROR;
867: END IF;
868:
869: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 866: RAISE OKL_API.G_EXCEPTION_ERROR;

862:
863: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
865: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
866: RAISE OKL_API.G_EXCEPTION_ERROR;
867: END IF;
868:
869: x_return_status := OKL_API.G_RET_STS_SUCCESS;
870: l_overall_status := x_return_status;

Line 869: x_return_status := OKL_API.G_RET_STS_SUCCESS;

865: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
866: RAISE OKL_API.G_EXCEPTION_ERROR;
867: END IF;
868:
869: x_return_status := OKL_API.G_RET_STS_SUCCESS;
870: l_overall_status := x_return_status;
871: print_line ( '******** IN PROCEDURE INVOICE_DISBURSEMENT ********');
872:
873: ------------------------------------------------------------

Line 966: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

962: ,p_line_id =>l_disb_rec.kle_id
963: ,x_value =>l_amount_pass
964: );
965:
966: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
967: print_line ('*=>ERROR: Evaluating Payout Basis of FORMULA.');
968: l_overall_status := x_return_status;
969: END IF;
970:

Line 1093: IF (NVL(l_overall_status, OKL_API.G_RET_STS_ERROR) = OKL_API.G_RET_STS_SUCCESS) THEN

1089: print_line (' passthrough amount = passthru amount - passthru processing fee amount');
1090: print_line (' *************************************************');
1091: ELSE
1092:
1093: IF (NVL(l_overall_status, OKL_API.G_RET_STS_ERROR) = OKL_API.G_RET_STS_SUCCESS) THEN
1094: invoice_insert (
1095: p_api_version => p_api_version,
1096: p_init_msg_list => p_init_msg_list,
1097: x_return_status => x_return_status,

Line 1108: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

1104:
1105: id_ind := id_ind + 1;
1106: l_tap_id_tbl(id_ind) := lx_tapv_rec.id;
1107:
1108: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1109: print_line ( ' -- Inserted Pay Invoices');
1110: ELSE
1111: l_overall_status := x_return_status;
1112: print_line ( '*=> ERROR : Inserting Pay Invoices');

Line 1124: IF (l_overall_status <> OKL_API.G_RET_STS_SUCCESS AND l_tap_id_tbl.count > 0 ) THEN

1120: END IF;
1121: END IF;
1122: END LOOP;
1123:
1124: IF (l_overall_status <> OKL_API.G_RET_STS_SUCCESS AND l_tap_id_tbl.count > 0 ) THEN
1125: print_line (' -- Updating pay invoices TRX_STATUS_CODE with ERROR status since l_overall_status = ' || l_overall_status);
1126: FOR id_ind IN l_tap_id_tbl.first..l_tap_id_tbl.last LOOP
1127: update okl_trx_ap_invoices_b
1128: set TRX_STATUS_CODE = 'ERROR'

Line 1138: IF (l_overall_status = OKL_API.G_RET_STS_SUCCESS

1134: where id = l_tap_id_tbl(id_ind);
1135: END LOOP;
1136: END IF;
1137:
1138: IF (l_overall_status = OKL_API.G_RET_STS_SUCCESS
1139: AND l_disb_rec.payout_basis = 'PARTIAL_RECEIPT'
1140: AND l_lsm_rcpt_tbl.count > 0 ) THEN
1141: FOR lsm_rcpt_id_ind IN l_lsm_rcpt_tbl.first..l_lsm_rcpt_tbl.last LOOP
1142: ------------------------------

Line 1190: okl_api.end_activity(x_msg_count => x_msg_count

1186:
1187: x_return_status := l_overall_status;
1188: print_line ( '******** EXITING PROCEDURE INVOICE_DISBURSEMENT ********');
1189:
1190: okl_api.end_activity(x_msg_count => x_msg_count
1191: ,x_msg_data => x_msg_data);
1192: EXCEPTION
1193: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1194:

Line 1193: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1189:
1190: okl_api.end_activity(x_msg_count => x_msg_count
1191: ,x_msg_data => x_msg_data);
1192: EXCEPTION
1193: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1194:
1195: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1196: p_api_name => l_api_name,
1197: p_pkg_name => G_PKG_NAME,

Line 1195: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1191: ,x_msg_data => x_msg_data);
1192: EXCEPTION
1193: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1194:
1195: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1196: p_api_name => l_api_name,
1197: p_pkg_name => G_PKG_NAME,
1198: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1199: x_msg_count => x_msg_count,

Line 1198: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

1194:
1195: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1196: p_api_name => l_api_name,
1197: p_pkg_name => G_PKG_NAME,
1198: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1199: x_msg_count => x_msg_count,
1200: x_msg_data => x_msg_data,
1201: p_api_type => '_PVT');
1202:

Line 1203: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1199: x_msg_count => x_msg_count,
1200: x_msg_data => x_msg_data,
1201: p_api_type => '_PVT');
1202:
1203: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1204:
1205: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1206: p_api_name => l_api_name,
1207: p_pkg_name => G_PKG_NAME,

Line 1205: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1201: p_api_type => '_PVT');
1202:
1203: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1204:
1205: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1206: p_api_name => l_api_name,
1207: p_pkg_name => G_PKG_NAME,
1208: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1209: x_msg_count => x_msg_count,

Line 1208: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

1204:
1205: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1206: p_api_name => l_api_name,
1207: p_pkg_name => G_PKG_NAME,
1208: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1209: x_msg_count => x_msg_count,
1210: x_msg_data => x_msg_data,
1211: p_api_type => '_PVT');
1212:

Line 1215: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1211: p_api_type => '_PVT');
1212:
1213: WHEN OTHERS THEN
1214:
1215: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1216: p_api_name => l_api_name,
1217: p_pkg_name => G_PKG_NAME,
1218: p_exc_name => 'OTHERS',
1219: x_msg_count => x_msg_count,

Line 1244: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1240: ,p_tld_id IN NUMBER
1241: ,p_status IN VARCHAR2)
1242: IS
1243: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_INVOICE_PAY_STATUS';
1244: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1245:
1246: --rkuttiya R12 B BIlling Architecture commented out following
1247: /*
1248: u_lsmv_rec Okl_Cnsld_Ar_Strms_Pub.lsmv_rec_type;

Line 1260: IF NVL(p_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN

1256: i NUMBER;
1257: BEGIN
1258: print_line ( '******** IN PROCEDURE UPDATE_INVOICE_PAY_STATUS ********');
1259: print_line (' -- Updating okl_txd_ar_ln_dtls_pub with status : '||p_status);
1260: IF NVL(p_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN
1261:
1262: --rkuttiya R12 B Billing Architecture commented out following
1263: -- u_lsmv_rec.id := p_lsm_id;
1264: -- u_lsmv_rec.pay_status_code := 'PROCESSED';

Line 1292: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

1288: ,x_msg_data
1289: ,l_txdv_rec
1290: ,lx_txdv_rec);
1291: --
1292: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
1293: print_line ('*=>ERROR: Updating Invoice Lines .');
1294: END IF;
1295: ELSE
1296: IF x_msg_count >= 1 THEN

Line 1334: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

1330: ,x_msg_data
1331: ,l_txdv_rec
1332: ,lx_txdv_rec);
1333: --
1334: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
1335: print_line ('*=>ERROR: Updating Invoice Lines.');
1336: END IF;
1337:
1338: END IF;

Line 1347: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1343: ------------------------------------------------------------
1344: -- Exception handling
1345: ------------------------------------------------------------
1346:
1347: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1348:
1349: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1350: p_api_name => l_api_name,
1351: p_pkg_name => G_PKG_NAME,

Line 1349: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1345: ------------------------------------------------------------
1346:
1347: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1348:
1349: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1350: p_api_name => l_api_name,
1351: p_pkg_name => G_PKG_NAME,
1352: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1353: x_msg_count => x_msg_count,

Line 1352: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

1348:
1349: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1350: p_api_name => l_api_name,
1351: p_pkg_name => G_PKG_NAME,
1352: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1353: x_msg_count => x_msg_count,
1354: x_msg_data => x_msg_data,
1355: p_api_type => '_PVT');
1356:

Line 1357: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1353: x_msg_count => x_msg_count,
1354: x_msg_data => x_msg_data,
1355: p_api_type => '_PVT');
1356:
1357: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1358:
1359: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1360: p_api_name => l_api_name,
1361: p_pkg_name => G_PKG_NAME,

Line 1359: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1355: p_api_type => '_PVT');
1356:
1357: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1358:
1359: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1360: p_api_name => l_api_name,
1361: p_pkg_name => G_PKG_NAME,
1362: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1363: x_msg_count => x_msg_count,

Line 1362: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

1358:
1359: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1360: p_api_name => l_api_name,
1361: p_pkg_name => G_PKG_NAME,
1362: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1363: x_msg_count => x_msg_count,
1364: x_msg_data => x_msg_data,
1365: p_api_type => '_PVT');
1366:

Line 1369: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1365: p_api_type => '_PVT');
1366:
1367: WHEN OTHERS THEN
1368:
1369: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1370: p_api_name => l_api_name,
1371: p_pkg_name => G_PKG_NAME,
1372: p_exc_name => 'OTHERS',
1373: x_msg_count => x_msg_count,

Line 1392: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1388: -- Declare Variables required by APIs
1389: ------------------------------------------------------------
1390: l_api_version CONSTANT NUMBER := 1;
1391: l_api_name CONSTANT VARCHAR2(30) := 'AUTO_DISBURSEMENT_TBL';
1392: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1393:
1394: l_disb_rec disb_rec_type;
1395: l_disb_tbl disb_tbl_type;
1396:

Line 1401: l_return_status := okl_api.start_activity(

1397: ind NUMBER;
1398: BEGIN
1399: print_line ( '******** IN PROCEDURE AUTO_DISBURSEMENT_TBL ********');
1400:
1401: l_return_status := okl_api.start_activity(
1402: p_api_name => l_api_name,
1403: p_init_msg_list => p_init_msg_list,
1404: p_api_type => '_PVT',
1405: x_return_status => l_return_status);

Line 1407: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1403: p_init_msg_list => p_init_msg_list,
1404: p_api_type => '_PVT',
1405: x_return_status => l_return_status);
1406:
1407: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1408: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1409: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1410: RAISE OKL_API.G_EXCEPTION_ERROR;
1411: END IF;

Line 1408: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1404: p_api_type => '_PVT',
1405: x_return_status => l_return_status);
1406:
1407: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1408: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1409: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1410: RAISE OKL_API.G_EXCEPTION_ERROR;
1411: END IF;
1412:

Line 1409: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1405: x_return_status => l_return_status);
1406:
1407: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1408: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1409: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1410: RAISE OKL_API.G_EXCEPTION_ERROR;
1411: END IF;
1412:
1413: l_disb_tbl := p_disb_tbl;

Line 1410: RAISE OKL_API.G_EXCEPTION_ERROR;

1406:
1407: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1408: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1409: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1410: RAISE OKL_API.G_EXCEPTION_ERROR;
1411: END IF;
1412:
1413: l_disb_tbl := p_disb_tbl;
1414: FOR ind in l_disb_tbl.first..l_disb_tbl.last LOOP

Line 1417: l_return_status := OKL_API.G_RET_STS_SUCCESS;

1413: l_disb_tbl := p_disb_tbl;
1414: FOR ind in l_disb_tbl.first..l_disb_tbl.last LOOP
1415: G_commit_count := G_commit_count + 1;
1416:
1417: l_return_status := OKL_API.G_RET_STS_SUCCESS;
1418: l_disb_rec := null_disb_rec;
1419:
1420: fnd_msg_pub.initialize;
1421:

Line 1489: IF NVL(l_return_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN

1485: x_msg_data => x_msg_data,
1486: p_disb_rec => l_disb_rec);
1487:
1488:
1489: IF NVL(l_return_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN
1490: print_line ('=====> Successfully Proccesed Passthrough Transaction');
1491: ELSE
1492: print_line ('*=>ERROR: Processing Passthrough Transaction');
1493: END IF;

Line 1506: IF NVL(x_return_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN

1502: x_msg_data => x_msg_data,
1503: p_tld_id => l_disb_rec.tld_id,
1504: p_status => l_return_status);
1505:
1506: IF NVL(x_return_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN
1507: print_line ('=====> Successfully Updated Consolidated Invoice Stream : pay status code');
1508: ELSE
1509: print_line ('*=>ERROR: Updating Consolidated Invoice Stream : pay status code');
1510: END IF;

Line 1513: IF NVL(l_return_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN

1509: print_line ('*=>ERROR: Updating Consolidated Invoice Stream : pay status code');
1510: END IF;
1511: ELSIF (l_disb_rec.payout_basis IN ('DUE_DATE')) THEN
1512: --update stream element with status of passthru transaction creation
1513: IF NVL(l_return_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN
1514: update okl_strm_elements
1515: set date_disbursed = trunc(sysdate)
1516: ,object_version_number = object_version_number + 1
1517: ,last_updated_by = FND_GLOBAL.USER_ID

Line 1546: okl_api.end_activity(x_msg_count => x_msg_count

1542: END LOOP;
1543:
1544: print_line ( '******** EXITING PROCEDURE AUTO_DISBURSEMENT_TBL ********');
1545:
1546: okl_api.end_activity(x_msg_count => x_msg_count
1547: ,x_msg_data => x_msg_data);
1548: EXCEPTION
1549: ------------------------------------------------------------
1550: -- Exception handling

Line 1553: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1549: ------------------------------------------------------------
1550: -- Exception handling
1551: ------------------------------------------------------------
1552:
1553: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1554:
1555: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1556: p_api_name => l_api_name,
1557: p_pkg_name => G_PKG_NAME,

Line 1555: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1551: ------------------------------------------------------------
1552:
1553: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1554:
1555: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1556: p_api_name => l_api_name,
1557: p_pkg_name => G_PKG_NAME,
1558: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1559: x_msg_count => x_msg_count,

Line 1558: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

1554:
1555: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1556: p_api_name => l_api_name,
1557: p_pkg_name => G_PKG_NAME,
1558: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1559: x_msg_count => x_msg_count,
1560: x_msg_data => x_msg_data,
1561: p_api_type => '_PVT');
1562:

Line 1563: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1559: x_msg_count => x_msg_count,
1560: x_msg_data => x_msg_data,
1561: p_api_type => '_PVT');
1562:
1563: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1564:
1565: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1566: p_api_name => l_api_name,
1567: p_pkg_name => G_PKG_NAME,

Line 1565: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1561: p_api_type => '_PVT');
1562:
1563: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1564:
1565: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1566: p_api_name => l_api_name,
1567: p_pkg_name => G_PKG_NAME,
1568: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1569: x_msg_count => x_msg_count,

Line 1568: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

1564:
1565: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1566: p_api_name => l_api_name,
1567: p_pkg_name => G_PKG_NAME,
1568: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1569: x_msg_count => x_msg_count,
1570: x_msg_data => x_msg_data,
1571: p_api_type => '_PVT');
1572:

Line 1575: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1571: p_api_type => '_PVT');
1572:
1573: WHEN OTHERS THEN
1574:
1575: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1576: p_api_name => l_api_name,
1577: p_pkg_name => G_PKG_NAME,
1578: p_exc_name => 'OTHERS',
1579: x_msg_count => x_msg_count,

Line 1601: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1597: -- Declare Variables required by APIs
1598: ------------------------------------------------------------
1599: l_api_version CONSTANT NUMBER := 1;
1600: l_api_name CONSTANT VARCHAR2(30) := 'AUTO_DISBURSEMENT';
1601: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1602:
1603: --------------------------------------------------------------------
1604: --Declare Cursor: Receivable Invoices eligible for disbursement with
1605: --payout_basis = 'BILLING' ,passthru_term = 'BASE', 'EVERGREEN'

Line 2333: x_return_status := OKL_API.G_RET_STS_SUCCESS;

2329: -- Start processing
2330: ------------------------------------------------------------
2331: print_line ( '=====*** START PROCEDURE AUTO_DISBURSEMENT ***=====');
2332:
2333: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2334:
2335: l_return_status := OKL_API.START_ACTIVITY(
2336: p_api_name => l_api_name,
2337: p_pkg_name => g_pkg_name,

Line 2335: l_return_status := OKL_API.START_ACTIVITY(

2331: print_line ( '=====*** START PROCEDURE AUTO_DISBURSEMENT ***=====');
2332:
2333: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2334:
2335: l_return_status := OKL_API.START_ACTIVITY(
2336: p_api_name => l_api_name,
2337: p_pkg_name => g_pkg_name,
2338: p_init_msg_list => p_init_msg_list,
2339: l_api_version => l_api_version,

Line 2344: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2340: p_api_version => p_api_version,
2341: p_api_type => '_PVT',
2342: x_return_status => l_return_status);
2343:
2344: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2345: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2346: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2347: RAISE OKL_API.G_EXCEPTION_ERROR;
2348: END IF;

Line 2345: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2341: p_api_type => '_PVT',
2342: x_return_status => l_return_status);
2343:
2344: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2345: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2346: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2347: RAISE OKL_API.G_EXCEPTION_ERROR;
2348: END IF;
2349:

Line 2346: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2342: x_return_status => l_return_status);
2343:
2344: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2345: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2346: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2347: RAISE OKL_API.G_EXCEPTION_ERROR;
2348: END IF;
2349:
2350: G_commit_count := 0;

Line 2347: RAISE OKL_API.G_EXCEPTION_ERROR;

2343:
2344: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2345: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2346: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2347: RAISE OKL_API.G_EXCEPTION_ERROR;
2348: END IF;
2349:
2350: G_commit_count := 0;
2351:

Line 2530: okl_api.end_activity(x_msg_count => x_msg_count

2526:
2527: COMMIT;
2528: print_line ( '=====*** EXITING PROCEDURE AUTO_DISBURSEMENT ***=====');
2529:
2530: okl_api.end_activity(x_msg_count => x_msg_count
2531: ,x_msg_data => x_msg_data);
2532: EXCEPTION
2533: ------------------------------------------------------------
2534: -- Exception handling

Line 2537: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2533: ------------------------------------------------------------
2534: -- Exception handling
2535: ------------------------------------------------------------
2536:
2537: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2538:
2539: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2540: p_api_name => l_api_name,
2541: p_pkg_name => G_PKG_NAME,

Line 2539: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

2535: ------------------------------------------------------------
2536:
2537: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2538:
2539: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2540: p_api_name => l_api_name,
2541: p_pkg_name => G_PKG_NAME,
2542: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
2543: x_msg_count => x_msg_count,

Line 2542: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

2538:
2539: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2540: p_api_name => l_api_name,
2541: p_pkg_name => G_PKG_NAME,
2542: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
2543: x_msg_count => x_msg_count,
2544: x_msg_data => x_msg_data,
2545: p_api_type => '_PVT');
2546:

Line 2547: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2543: x_msg_count => x_msg_count,
2544: x_msg_data => x_msg_data,
2545: p_api_type => '_PVT');
2546:
2547: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2548:
2549: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2550: p_api_name => l_api_name,
2551: p_pkg_name => G_PKG_NAME,

Line 2549: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

2545: p_api_type => '_PVT');
2546:
2547: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2548:
2549: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2550: p_api_name => l_api_name,
2551: p_pkg_name => G_PKG_NAME,
2552: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
2553: x_msg_count => x_msg_count,

Line 2552: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

2548:
2549: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2550: p_api_name => l_api_name,
2551: p_pkg_name => G_PKG_NAME,
2552: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
2553: x_msg_count => x_msg_count,
2554: x_msg_data => x_msg_data,
2555: p_api_type => '_PVT');
2556:

Line 2559: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

2555: p_api_type => '_PVT');
2556:
2557: WHEN OTHERS THEN
2558:
2559: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2560: p_api_name => l_api_name,
2561: p_pkg_name => G_PKG_NAME,
2562: p_exc_name => 'OTHERS',
2563: x_msg_count => x_msg_count,

Line 2750: x_return_status := okl_api.G_RET_STS_SUCCESS;

2746: ELSE
2747: l_credit_remain := p_credit_max - l_disbursement_tot;
2748: END IF;
2749:
2750: x_return_status := okl_api.G_RET_STS_SUCCESS;
2751: RETURN l_credit_remain;
2752:
2753: EXCEPTION
2754: WHEN OTHERS THEN

Line 2755: OKL_API.Set_Message(p_app_name => OKL_API.G_APP_NAME,

2751: RETURN l_credit_remain;
2752:
2753: EXCEPTION
2754: WHEN OTHERS THEN
2755: OKL_API.Set_Message(p_app_name => OKL_API.G_APP_NAME,
2756: p_msg_name => 'OKL_UNEXPECTED_ERROR',
2757: p_token1 => 'OKL_SQLCODE',
2758: p_token1_value => SQLCODE,
2759: p_token2 => 'OKL_SQLERRM',

Line 2761: x_return_status := okl_api.G_RET_STS_UNEXP_ERROR;

2757: p_token1 => 'OKL_SQLCODE',
2758: p_token1_value => SQLCODE,
2759: p_token2 => 'OKL_SQLERRM',
2760: p_token2_value => SQLERRM);
2761: x_return_status := okl_api.G_RET_STS_UNEXP_ERROR;
2762: RETURN NULL;
2763:
2764:
2765: END credit_check;