DBA Data[Home] [Help]

APPS.OKL_PAY_INVOICES_DISB_PVT dependencies on OKL_API

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

253: lux_tapv_rec Okl_tap_pvt.tapv_rec_type;
254:
255: l_template_tbl Okl_Account_Dist_Pub.AVLV_TBL_TYPE;
256: l_amount_tbl Okl_Account_Dist_Pub.AMOUNT_TBL_TYPE;
257: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
258:
259: CURSOR pdt_id_csr ( p_khr_id NUMBER ) IS
260: SELECT khr.pdt_id
261: FROM okl_k_headers khr

Line 285: l_return_status := okl_api.start_activity(

281:
282: G_EXCEPTION_HALT_VALIDATION EXCEPTION;
283:
284: BEGIN
285: l_return_status := okl_api.start_activity(
286: p_api_name => l_api_name,
287: p_init_msg_list => p_init_msg_list,
288: p_api_type => '_PVT',
289: x_return_status => l_return_status);

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

287: p_init_msg_list => p_init_msg_list,
288: p_api_type => '_PVT',
289: x_return_status => l_return_status);
290:
291: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
293: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
294: RAISE OKL_API.G_EXCEPTION_ERROR;
295: END IF;

Line 292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

288: p_api_type => '_PVT',
289: x_return_status => l_return_status);
290:
291: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
293: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
294: RAISE OKL_API.G_EXCEPTION_ERROR;
295: END IF;
296:

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

289: x_return_status => l_return_status);
290:
291: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
293: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
294: RAISE OKL_API.G_EXCEPTION_ERROR;
295: END IF;
296:
297: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 294: RAISE OKL_API.G_EXCEPTION_ERROR;

290:
291: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
293: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
294: RAISE OKL_API.G_EXCEPTION_ERROR;
295: END IF;
296:
297: x_return_status := OKL_API.G_RET_STS_SUCCESS;
298: print_line ( '******** IN PROCEDURE INVOICE_INSERT ********');

Line 297: x_return_status := OKL_API.G_RET_STS_SUCCESS;

293: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
294: RAISE OKL_API.G_EXCEPTION_ERROR;
295: END IF;
296:
297: x_return_status := OKL_API.G_RET_STS_SUCCESS;
298: print_line ( '******** IN PROCEDURE INVOICE_INSERT ********');
299: ------------------------------------------------------------
300: -- Initialization of Parmaeters
301: ------------------------------------------------------------

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

364:
365: --Start code added by pgomes on 02/12/2003
366:
367: --Check for currency code
368: IF (NVL(l_tapv_rec.currency_code, okl_api.g_miss_char) = okl_api.g_miss_char) THEN
369: l_tapv_rec.currency_code := l_currency_code;
370: END IF;
371:
372: --Check for currency conversion type

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

369: l_tapv_rec.currency_code := l_currency_code;
370: END IF;
371:
372: --Check for currency conversion type
373: IF (NVL(l_tapv_rec.currency_conversion_type, okl_api.g_miss_char) = okl_api.g_miss_char) THEN
374: l_tapv_rec.currency_conversion_type := l_currency_conversion_type;
375: END IF;
376:
377: --Check for currency conversion date

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

374: l_tapv_rec.currency_conversion_type := l_currency_conversion_type;
375: END IF;
376:
377: --Check for currency conversion date
378: IF (NVL(l_tapv_rec.currency_conversion_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN
379: l_tapv_rec.currency_conversion_date := l_currency_conversion_date;
380: END IF;
381:
382:

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

384: IF (l_tapv_rec.currency_conversion_type = 'User') THEN
385: IF (l_tapv_rec.currency_code = okl_accounting_util.get_func_curr_code) THEN
386: l_tapv_rec.currency_conversion_rate := 1;
387: ELSE
388: IF (NVL(l_tapv_rec.currency_conversion_rate, okl_api.g_miss_num) = okl_api.g_miss_num) THEN
389: l_tapv_rec.currency_conversion_rate := l_currency_conversion_rate;
390: END IF;
391: END IF;
392: --pgomes 02/12/2003 added below code to get curr conv rate

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

420: END;
421: END IF;
422: -- End of wraper code generated automatically by Debug code generator for Okl_Trx_Ap_Invoices_Pub.insert_trx_ap_invoices
423:
424: IF ( x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
425: print_line ( ' -- Created Header Record with Id '||lx_tapv_rec.id);
426: lu_tapv_rec := lx_tapv_rec;
427: ELSE
428: print_line ( '*=> ERROR : Creating Header.');

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

455: END;
456: END IF;
457: -- End of wraper code generated automatically by Debug code generator for OKL_TXL_AP_INV_LNS_PUB.insert_txl_ap_inv_lns
458:
459: IF ( x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
460: print_line ( ' -- Created Line Record with Id '||lx_tplv_rec.id);
461: ELSE
462: print_line ( '*=> ERROR : Creating Line.');
463: END IF;

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

497: ,p_trx_date => p_tapv_rec.date_invoiced
498: ,x_fact_synd_code => l_tmpl_identify_rec.FACTORING_SYND_FLAG
499: ,x_inv_acct_code => l_tmpl_identify_rec.INVESTOR_CODE);
500:
501: IF ( x_return_status = okl_api.g_ret_sts_success) THEN
502: print_line ( ' -- Okl_Securitization_Pvt.check_khr_ia_associated called successfully ');
503: ELSE
504: print_line ( '*=> ERROR : Calling Okl_Securitization_Pvt.check_khr_ia_associated.');
505: END IF;

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

519:
520: --Check for currency code
521: l_dist_info_rec.currency_code := l_tapv_rec.currency_code;
522:
523: IF (NVL(l_dist_info_rec.currency_code, okl_api.g_miss_char) = okl_api.g_miss_char) IS NULL THEN
524: l_dist_info_rec.currency_code := l_currency_code;
525: END IF;
526:
527: --Check for currency conversion type

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

526:
527: --Check for currency conversion type
528: l_dist_info_rec.currency_conversion_type := l_tapv_rec.currency_conversion_type;
529:
530: IF (NVL(l_dist_info_rec.currency_conversion_type, okl_api.g_miss_char) = okl_api.g_miss_char) THEN
531: l_dist_info_rec.currency_conversion_type := l_currency_conversion_type;
532: END IF;
533:
534:

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

534:
535: --Check for currency conversion date
536: l_dist_info_rec.currency_conversion_date := l_tapv_rec.currency_conversion_date;
537:
538: IF (NVL(l_dist_info_rec.currency_conversion_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN
539: l_dist_info_rec.currency_conversion_date := l_currency_conversion_date;
540: END IF;
541:
542:

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

544: IF (l_dist_info_rec.currency_conversion_type = 'User') THEN
545: IF (l_dist_info_rec.currency_code = okl_accounting_util.get_func_curr_code) THEN
546: l_dist_info_rec.currency_conversion_rate := 1;
547: ELSE
548: IF (NVL(l_tapv_rec.currency_conversion_rate, okl_api.g_miss_num) = okl_api.g_miss_num) THEN
549: l_dist_info_rec.currency_conversion_rate := l_currency_conversion_rate;
550: ELSE
551: l_dist_info_rec.currency_conversion_rate := l_tapv_rec.currency_conversion_rate;
552: END IF;

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

582: END;
583: END IF;
584: -- End of wraper code generated automatically by Debug code generator for Okl_Acc_Call_Pvt.Okl_Populate_Acc_Gen
585:
586: IF ( x_return_status = okl_api.g_ret_sts_success) THEN
587: print_line ( ' -- Accounting engine called successfully ');
588: ELSE
589: print_line ( '*=> ERROR : Calling Accounting engine.');
590: END IF;

Line 619: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN

615: END;
616: END IF;
617: -- End of wraper code generated automatically by Debug code generator for Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST
618:
619: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
620: --RAISE G_EXCEPTION_HALT_VALIDATION;
621: print_line ( '*=> ERROR: Accounting distributions not created.');
622:
623: --l_return_status := x_return_status;

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

626: UPDATE Okl_Trx_Ap_Invoices_B
627: SET TRX_STATUS_CODE = 'ERROR'
628: WHERE id = lx_tapv_rec.id;
629:
630: IF ( x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
631: print_line ( ' -- Updated Header Record with Id '||lx_tapv_rec.id || ' with ERROR Status');
632: ELSE
633: print_line ( '*=> ERROR : Updating Header with ERROR Status.');
634: END IF;

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

672: ,p_tplv_tbl => l_tplv_tbl
673: ,x_tapv_rec => lx_tapv_rec
674: ,x_tplv_tbl => lx_tplv_tbl);
675:
676: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
677: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
678: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
679: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
680: END IF;

Line 677: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

673: ,x_tapv_rec => lx_tapv_rec
674: ,x_tplv_tbl => lx_tplv_tbl);
675:
676: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
677: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
678: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
679: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
680: END IF;
681:

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

674: ,x_tplv_tbl => lx_tplv_tbl);
675:
676: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
677: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
678: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
679: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
680: END IF;
681:
682: IF(IS_DEBUG_PROCEDURE_ON) THEN

Line 679: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

675:
676: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
677: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
678: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
679: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
680: END IF;
681:
682: IF(IS_DEBUG_PROCEDURE_ON) THEN
683: BEGIN

Line 693: okl_api.end_activity(x_msg_count => x_msg_count

689: --end:| 18-May-07 cklee -- Accounting API CR, Disbursement Central API uptake |
690:
691: print_line ( '******** EXITING PROCEDURE INVOICE_INSERT ********');
692:
693: okl_api.end_activity(x_msg_count => x_msg_count
694: ,x_msg_data => x_msg_data);
695: EXCEPTION
696: WHEN G_EXCEPTION_HALT_VALIDATION THEN
697: print_line ( '*=> ERROR: '||SQLERRM);

Line 698: Okl_Api.SET_MESSAGE(p_app_name => g_app_name

694: ,x_msg_data => x_msg_data);
695: EXCEPTION
696: WHEN G_EXCEPTION_HALT_VALIDATION THEN
697: print_line ( '*=> ERROR: '||SQLERRM);
698: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
699: ,p_msg_name => g_unexpected_error
700: ,p_token1 => g_sqlcode_token
701: ,p_token1_value => SQLCODE
702: ,p_token2 => g_sqlerrm_token

Line 704: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

700: ,p_token1 => g_sqlcode_token
701: ,p_token1_value => SQLCODE
702: ,p_token2 => g_sqlerrm_token
703: ,p_token2_value => SQLERRM);
704: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
705:
706: WHEN OTHERS THEN
707: print_line ( '*=> ERROR: '||SQLERRM);
708: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

Line 708: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

704: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
705:
706: WHEN OTHERS THEN
707: print_line ( '*=> ERROR: '||SQLERRM);
708: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
709:
710: END invoice_insert;
711:
712: PROCEDURE invoice_disbursement (

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

794:
795: --Local Variables
796: l_ar_inv_number ra_customer_trx_all.trx_number%TYPE;
797: l_try_id okl_trx_ap_invoices_b.try_id%TYPE;
798: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
799: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
800:
801: TYPE tap_id_tbl_type IS TABLE OF okl_trx_ap_invoices_b.id%type
802: INDEX BY BINARY_INTEGER;

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

795: --Local Variables
796: l_ar_inv_number ra_customer_trx_all.trx_number%TYPE;
797: l_try_id okl_trx_ap_invoices_b.try_id%TYPE;
798: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
799: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
800:
801: TYPE tap_id_tbl_type IS TABLE OF okl_trx_ap_invoices_b.id%type
802: INDEX BY BINARY_INTEGER;
803:

Line 812: l_return_status := okl_api.start_activity(

808: l_lsm_rcpt_tbl lsm_rcpt_tbl_type;
809: lsm_rcpt_id_ind NUMBER;
810: BEGIN
811:
812: l_return_status := okl_api.start_activity(
813: p_api_name => l_api_name,
814: p_init_msg_list => p_init_msg_list,
815: p_api_type => '_PVT',
816: x_return_status => l_return_status);

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

814: p_init_msg_list => p_init_msg_list,
815: p_api_type => '_PVT',
816: x_return_status => l_return_status);
817:
818: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
819: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
820: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
821: RAISE OKL_API.G_EXCEPTION_ERROR;
822: END IF;

Line 819: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

815: p_api_type => '_PVT',
816: x_return_status => l_return_status);
817:
818: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
819: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
820: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
821: RAISE OKL_API.G_EXCEPTION_ERROR;
822: END IF;
823:

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

816: x_return_status => l_return_status);
817:
818: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
819: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
820: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
821: RAISE OKL_API.G_EXCEPTION_ERROR;
822: END IF;
823:
824: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 821: RAISE OKL_API.G_EXCEPTION_ERROR;

817:
818: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
819: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
820: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
821: RAISE OKL_API.G_EXCEPTION_ERROR;
822: END IF;
823:
824: x_return_status := OKL_API.G_RET_STS_SUCCESS;
825: l_overall_status := x_return_status;

Line 824: x_return_status := OKL_API.G_RET_STS_SUCCESS;

820: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
821: RAISE OKL_API.G_EXCEPTION_ERROR;
822: END IF;
823:
824: x_return_status := OKL_API.G_RET_STS_SUCCESS;
825: l_overall_status := x_return_status;
826: print_line ( '******** IN PROCEDURE INVOICE_DISBURSEMENT ********');
827:
828: ------------------------------------------------------------

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

917: ,p_line_id =>l_disb_rec.kle_id
918: ,x_value =>l_amount_pass
919: );
920:
921: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
922: print_line ('*=>ERROR: Evaluating Payout Basis of FORMULA.');
923: l_overall_status := x_return_status;
924: END IF;
925:

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

1042: print_line (' passthrough amount = passthru amount - passthru processing fee amount');
1043: print_line (' *************************************************');
1044: ELSE
1045:
1046: IF (NVL(l_overall_status, OKL_API.G_RET_STS_ERROR) = OKL_API.G_RET_STS_SUCCESS) THEN
1047: invoice_insert (
1048: p_api_version => p_api_version,
1049: p_init_msg_list => p_init_msg_list,
1050: x_return_status => x_return_status,

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

1057:
1058: id_ind := id_ind + 1;
1059: l_tap_id_tbl(id_ind) := lx_tapv_rec.id;
1060:
1061: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1062: print_line ( ' -- Inserted Pay Invoices');
1063: ELSE
1064: l_overall_status := x_return_status;
1065: print_line ( '*=> ERROR : Inserting Pay Invoices');

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

1073: END IF;
1074: END IF;
1075: END LOOP;
1076:
1077: IF (l_overall_status <> OKL_API.G_RET_STS_SUCCESS AND l_tap_id_tbl.count > 0 ) THEN
1078: print_line (' -- Updating pay invoices TRX_STATUS_CODE with ERROR status since l_overall_status = ' || l_overall_status);
1079: FOR id_ind IN l_tap_id_tbl.first..l_tap_id_tbl.last LOOP
1080: update okl_trx_ap_invoices_b
1081: set TRX_STATUS_CODE = 'ERROR'

Line 1091: IF (l_overall_status = OKL_API.G_RET_STS_SUCCESS

1087: where id = l_tap_id_tbl(id_ind);
1088: END LOOP;
1089: END IF;
1090:
1091: IF (l_overall_status = OKL_API.G_RET_STS_SUCCESS
1092: AND l_disb_rec.payout_basis = 'PARTIAL_RECEIPT'
1093: AND l_lsm_rcpt_tbl.count > 0 ) THEN
1094: FOR lsm_rcpt_id_ind IN l_lsm_rcpt_tbl.first..l_lsm_rcpt_tbl.last LOOP
1095: ------------------------------

Line 1140: okl_api.end_activity(x_msg_count => x_msg_count

1136:
1137: x_return_status := l_overall_status;
1138: print_line ( '******** EXITING PROCEDURE INVOICE_DISBURSEMENT ********');
1139:
1140: okl_api.end_activity(x_msg_count => x_msg_count
1141: ,x_msg_data => x_msg_data);
1142: EXCEPTION
1143: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1144:

Line 1143: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1139:
1140: okl_api.end_activity(x_msg_count => x_msg_count
1141: ,x_msg_data => x_msg_data);
1142: EXCEPTION
1143: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1144:
1145: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1146: p_api_name => l_api_name,
1147: p_pkg_name => G_PKG_NAME,

Line 1145: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1141: ,x_msg_data => x_msg_data);
1142: EXCEPTION
1143: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1144:
1145: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1146: p_api_name => l_api_name,
1147: p_pkg_name => G_PKG_NAME,
1148: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1149: x_msg_count => x_msg_count,

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

1144:
1145: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1146: p_api_name => l_api_name,
1147: p_pkg_name => G_PKG_NAME,
1148: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1149: x_msg_count => x_msg_count,
1150: x_msg_data => x_msg_data,
1151: p_api_type => '_PVT');
1152:

Line 1153: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1149: x_msg_count => x_msg_count,
1150: x_msg_data => x_msg_data,
1151: p_api_type => '_PVT');
1152:
1153: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1154:
1155: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1156: p_api_name => l_api_name,
1157: p_pkg_name => G_PKG_NAME,

Line 1155: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1151: p_api_type => '_PVT');
1152:
1153: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1154:
1155: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1156: p_api_name => l_api_name,
1157: p_pkg_name => G_PKG_NAME,
1158: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1159: x_msg_count => x_msg_count,

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

1154:
1155: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1156: p_api_name => l_api_name,
1157: p_pkg_name => G_PKG_NAME,
1158: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1159: x_msg_count => x_msg_count,
1160: x_msg_data => x_msg_data,
1161: p_api_type => '_PVT');
1162:

Line 1165: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1161: p_api_type => '_PVT');
1162:
1163: WHEN OTHERS THEN
1164:
1165: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1166: p_api_name => l_api_name,
1167: p_pkg_name => G_PKG_NAME,
1168: p_exc_name => 'OTHERS',
1169: x_msg_count => x_msg_count,

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

1190: ,p_tld_id IN NUMBER
1191: ,p_status IN VARCHAR2)
1192: IS
1193: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_INVOICE_PAY_STATUS';
1194: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1195:
1196: --rkuttiya R12 B BIlling Architecture commented out following
1197: /*
1198: u_lsmv_rec Okl_Cnsld_Ar_Strms_Pub.lsmv_rec_type;

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

1206: i NUMBER;
1207: BEGIN
1208: print_line ( '******** IN PROCEDURE UPDATE_INVOICE_PAY_STATUS ********');
1209: print_line (' -- Updating okl_txd_ar_ln_dtls_pub with status : '||p_status);
1210: IF NVL(p_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN
1211:
1212: --rkuttiya R12 B Billing Architecture commented out following
1213: -- u_lsmv_rec.id := p_lsm_id;
1214: -- u_lsmv_rec.pay_status_code := 'PROCESSED';

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

1238: ,x_msg_data
1239: ,l_txdv_rec
1240: ,lx_txdv_rec);
1241: --
1242: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
1243: print_line ('*=>ERROR: Updating Invoice Lines .');
1244: END IF;
1245: ELSE
1246: IF x_msg_count >= 1 THEN

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

1280: ,x_msg_data
1281: ,l_txdv_rec
1282: ,lx_txdv_rec);
1283: --
1284: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
1285: print_line ('*=>ERROR: Updating Invoice Lines.');
1286: END IF;
1287:
1288: END IF;

Line 1297: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1293: ------------------------------------------------------------
1294: -- Exception handling
1295: ------------------------------------------------------------
1296:
1297: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1298:
1299: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1300: p_api_name => l_api_name,
1301: p_pkg_name => G_PKG_NAME,

Line 1299: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1295: ------------------------------------------------------------
1296:
1297: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1298:
1299: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1300: p_api_name => l_api_name,
1301: p_pkg_name => G_PKG_NAME,
1302: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1303: x_msg_count => x_msg_count,

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

1298:
1299: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1300: p_api_name => l_api_name,
1301: p_pkg_name => G_PKG_NAME,
1302: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1303: x_msg_count => x_msg_count,
1304: x_msg_data => x_msg_data,
1305: p_api_type => '_PVT');
1306:

Line 1307: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1303: x_msg_count => x_msg_count,
1304: x_msg_data => x_msg_data,
1305: p_api_type => '_PVT');
1306:
1307: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1308:
1309: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1310: p_api_name => l_api_name,
1311: p_pkg_name => G_PKG_NAME,

Line 1309: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1305: p_api_type => '_PVT');
1306:
1307: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1308:
1309: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1310: p_api_name => l_api_name,
1311: p_pkg_name => G_PKG_NAME,
1312: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1313: x_msg_count => x_msg_count,

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

1308:
1309: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1310: p_api_name => l_api_name,
1311: p_pkg_name => G_PKG_NAME,
1312: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1313: x_msg_count => x_msg_count,
1314: x_msg_data => x_msg_data,
1315: p_api_type => '_PVT');
1316:

Line 1319: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1315: p_api_type => '_PVT');
1316:
1317: WHEN OTHERS THEN
1318:
1319: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1320: p_api_name => l_api_name,
1321: p_pkg_name => G_PKG_NAME,
1322: p_exc_name => 'OTHERS',
1323: x_msg_count => x_msg_count,

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

1338: -- Declare Variables required by APIs
1339: ------------------------------------------------------------
1340: l_api_version CONSTANT NUMBER := 1;
1341: l_api_name CONSTANT VARCHAR2(30) := 'AUTO_DISBURSEMENT_TBL';
1342: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1343:
1344: l_disb_rec disb_rec_type;
1345: l_disb_tbl disb_tbl_type;
1346:

Line 1351: l_return_status := okl_api.start_activity(

1347: ind NUMBER;
1348: BEGIN
1349: print_line ( '******** IN PROCEDURE AUTO_DISBURSEMENT_TBL ********');
1350:
1351: l_return_status := okl_api.start_activity(
1352: p_api_name => l_api_name,
1353: p_init_msg_list => p_init_msg_list,
1354: p_api_type => '_PVT',
1355: x_return_status => l_return_status);

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

1353: p_init_msg_list => p_init_msg_list,
1354: p_api_type => '_PVT',
1355: x_return_status => l_return_status);
1356:
1357: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1358: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1359: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1360: RAISE OKL_API.G_EXCEPTION_ERROR;
1361: END IF;

Line 1358: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1354: p_api_type => '_PVT',
1355: x_return_status => l_return_status);
1356:
1357: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1358: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1359: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1360: RAISE OKL_API.G_EXCEPTION_ERROR;
1361: END IF;
1362:

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

1355: x_return_status => l_return_status);
1356:
1357: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1358: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1359: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1360: RAISE OKL_API.G_EXCEPTION_ERROR;
1361: END IF;
1362:
1363: l_disb_tbl := p_disb_tbl;

Line 1360: RAISE OKL_API.G_EXCEPTION_ERROR;

1356:
1357: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1358: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1359: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1360: RAISE OKL_API.G_EXCEPTION_ERROR;
1361: END IF;
1362:
1363: l_disb_tbl := p_disb_tbl;
1364: FOR ind in l_disb_tbl.first..l_disb_tbl.last LOOP

Line 1367: l_return_status := OKL_API.G_RET_STS_SUCCESS;

1363: l_disb_tbl := p_disb_tbl;
1364: FOR ind in l_disb_tbl.first..l_disb_tbl.last LOOP
1365: G_commit_count := G_commit_count + 1;
1366:
1367: l_return_status := OKL_API.G_RET_STS_SUCCESS;
1368: l_disb_rec := null_disb_rec;
1369:
1370: fnd_msg_pub.initialize;
1371:

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

1435: x_msg_data => x_msg_data,
1436: p_disb_rec => l_disb_rec);
1437:
1438:
1439: IF NVL(l_return_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN
1440: print_line ('=====> Successfully Proccesed Passthrough Transaction');
1441: ELSE
1442: print_line ('*=>ERROR: Processing Passthrough Transaction');
1443: END IF;

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

1452: x_msg_data => x_msg_data,
1453: p_tld_id => l_disb_rec.tld_id,
1454: p_status => l_return_status);
1455:
1456: IF NVL(x_return_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN
1457: print_line ('=====> Successfully Updated Consolidated Invoice Stream : pay status code');
1458: ELSE
1459: print_line ('*=>ERROR: Updating Consolidated Invoice Stream : pay status code');
1460: END IF;

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

1459: print_line ('*=>ERROR: Updating Consolidated Invoice Stream : pay status code');
1460: END IF;
1461: ELSIF (l_disb_rec.payout_basis IN ('DUE_DATE')) THEN
1462: --update stream element with status of passthru transaction creation
1463: IF NVL(l_return_status, 'E') = OKL_API.G_RET_STS_SUCCESS THEN
1464: update okl_strm_elements
1465: set date_disbursed = trunc(sysdate)
1466: ,object_version_number = object_version_number + 1
1467: ,last_updated_by = FND_GLOBAL.USER_ID

Line 1496: okl_api.end_activity(x_msg_count => x_msg_count

1492: END LOOP;
1493:
1494: print_line ( '******** EXITING PROCEDURE AUTO_DISBURSEMENT_TBL ********');
1495:
1496: okl_api.end_activity(x_msg_count => x_msg_count
1497: ,x_msg_data => x_msg_data);
1498: EXCEPTION
1499: ------------------------------------------------------------
1500: -- Exception handling

Line 1503: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1499: ------------------------------------------------------------
1500: -- Exception handling
1501: ------------------------------------------------------------
1502:
1503: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1504:
1505: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1506: p_api_name => l_api_name,
1507: p_pkg_name => G_PKG_NAME,

Line 1505: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1501: ------------------------------------------------------------
1502:
1503: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1504:
1505: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1506: p_api_name => l_api_name,
1507: p_pkg_name => G_PKG_NAME,
1508: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1509: x_msg_count => x_msg_count,

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

1504:
1505: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1506: p_api_name => l_api_name,
1507: p_pkg_name => G_PKG_NAME,
1508: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1509: x_msg_count => x_msg_count,
1510: x_msg_data => x_msg_data,
1511: p_api_type => '_PVT');
1512:

Line 1513: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1509: x_msg_count => x_msg_count,
1510: x_msg_data => x_msg_data,
1511: p_api_type => '_PVT');
1512:
1513: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1514:
1515: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1516: p_api_name => l_api_name,
1517: p_pkg_name => G_PKG_NAME,

Line 1515: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1511: p_api_type => '_PVT');
1512:
1513: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1514:
1515: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1516: p_api_name => l_api_name,
1517: p_pkg_name => G_PKG_NAME,
1518: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1519: x_msg_count => x_msg_count,

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

1514:
1515: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1516: p_api_name => l_api_name,
1517: p_pkg_name => G_PKG_NAME,
1518: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1519: x_msg_count => x_msg_count,
1520: x_msg_data => x_msg_data,
1521: p_api_type => '_PVT');
1522:

Line 1525: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

1521: p_api_type => '_PVT');
1522:
1523: WHEN OTHERS THEN
1524:
1525: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
1526: p_api_name => l_api_name,
1527: p_pkg_name => G_PKG_NAME,
1528: p_exc_name => 'OTHERS',
1529: x_msg_count => x_msg_count,

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

1547: -- Declare Variables required by APIs
1548: ------------------------------------------------------------
1549: l_api_version CONSTANT NUMBER := 1;
1550: l_api_name CONSTANT VARCHAR2(30) := 'AUTO_DISBURSEMENT';
1551: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1552:
1553: --------------------------------------------------------------------
1554: --Declare Cursor: Receivable Invoices eligible for disbursement with
1555: --payout_basis = 'BILLING' ,passthru_term = 'BASE', 'EVERGREEN'

Line 2280: x_return_status := OKL_API.G_RET_STS_SUCCESS;

2276: -- Start processing
2277: ------------------------------------------------------------
2278: print_line ( '=====*** START PROCEDURE AUTO_DISBURSEMENT ***=====');
2279:
2280: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2281:
2282: l_return_status := OKL_API.START_ACTIVITY(
2283: p_api_name => l_api_name,
2284: p_pkg_name => g_pkg_name,

Line 2282: l_return_status := OKL_API.START_ACTIVITY(

2278: print_line ( '=====*** START PROCEDURE AUTO_DISBURSEMENT ***=====');
2279:
2280: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2281:
2282: l_return_status := OKL_API.START_ACTIVITY(
2283: p_api_name => l_api_name,
2284: p_pkg_name => g_pkg_name,
2285: p_init_msg_list => p_init_msg_list,
2286: l_api_version => l_api_version,

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

2287: p_api_version => p_api_version,
2288: p_api_type => '_PVT',
2289: x_return_status => l_return_status);
2290:
2291: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2293: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2294: RAISE OKL_API.G_EXCEPTION_ERROR;
2295: END IF;

Line 2292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2288: p_api_type => '_PVT',
2289: x_return_status => l_return_status);
2290:
2291: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2293: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2294: RAISE OKL_API.G_EXCEPTION_ERROR;
2295: END IF;
2296:

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

2289: x_return_status => l_return_status);
2290:
2291: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2293: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2294: RAISE OKL_API.G_EXCEPTION_ERROR;
2295: END IF;
2296:
2297: G_commit_count := 0;

Line 2294: RAISE OKL_API.G_EXCEPTION_ERROR;

2290:
2291: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2293: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2294: RAISE OKL_API.G_EXCEPTION_ERROR;
2295: END IF;
2296:
2297: G_commit_count := 0;
2298:

Line 2477: okl_api.end_activity(x_msg_count => x_msg_count

2473:
2474: COMMIT;
2475: print_line ( '=====*** EXITING PROCEDURE AUTO_DISBURSEMENT ***=====');
2476:
2477: okl_api.end_activity(x_msg_count => x_msg_count
2478: ,x_msg_data => x_msg_data);
2479: EXCEPTION
2480: ------------------------------------------------------------
2481: -- Exception handling

Line 2484: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2480: ------------------------------------------------------------
2481: -- Exception handling
2482: ------------------------------------------------------------
2483:
2484: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2485:
2486: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2487: p_api_name => l_api_name,
2488: p_pkg_name => G_PKG_NAME,

Line 2486: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

2482: ------------------------------------------------------------
2483:
2484: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2485:
2486: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2487: p_api_name => l_api_name,
2488: p_pkg_name => G_PKG_NAME,
2489: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
2490: x_msg_count => x_msg_count,

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

2485:
2486: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2487: p_api_name => l_api_name,
2488: p_pkg_name => G_PKG_NAME,
2489: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
2490: x_msg_count => x_msg_count,
2491: x_msg_data => x_msg_data,
2492: p_api_type => '_PVT');
2493:

Line 2494: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2490: x_msg_count => x_msg_count,
2491: x_msg_data => x_msg_data,
2492: p_api_type => '_PVT');
2493:
2494: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2495:
2496: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2497: p_api_name => l_api_name,
2498: p_pkg_name => G_PKG_NAME,

Line 2496: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

2492: p_api_type => '_PVT');
2493:
2494: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2495:
2496: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2497: p_api_name => l_api_name,
2498: p_pkg_name => G_PKG_NAME,
2499: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
2500: x_msg_count => x_msg_count,

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

2495:
2496: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2497: p_api_name => l_api_name,
2498: p_pkg_name => G_PKG_NAME,
2499: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
2500: x_msg_count => x_msg_count,
2501: x_msg_data => x_msg_data,
2502: p_api_type => '_PVT');
2503:

Line 2506: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

2502: p_api_type => '_PVT');
2503:
2504: WHEN OTHERS THEN
2505:
2506: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2507: p_api_name => l_api_name,
2508: p_pkg_name => G_PKG_NAME,
2509: p_exc_name => 'OTHERS',
2510: x_msg_count => x_msg_count,

Line 2697: x_return_status := okl_api.G_RET_STS_SUCCESS;

2693: ELSE
2694: l_credit_remain := p_credit_max - l_disbursement_tot;
2695: END IF;
2696:
2697: x_return_status := okl_api.G_RET_STS_SUCCESS;
2698: RETURN l_credit_remain;
2699:
2700: EXCEPTION
2701: WHEN OTHERS THEN

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

2698: RETURN l_credit_remain;
2699:
2700: EXCEPTION
2701: WHEN OTHERS THEN
2702: OKL_API.Set_Message(p_app_name => OKL_API.G_APP_NAME,
2703: p_msg_name => 'OKL_UNEXPECTED_ERROR',
2704: p_token1 => 'OKL_SQLCODE',
2705: p_token1_value => SQLCODE,
2706: p_token2 => 'OKL_SQLERRM',

Line 2708: x_return_status := okl_api.G_RET_STS_UNEXP_ERROR;

2704: p_token1 => 'OKL_SQLCODE',
2705: p_token1_value => SQLCODE,
2706: p_token2 => 'OKL_SQLERRM',
2707: p_token2_value => SQLERRM);
2708: x_return_status := okl_api.G_RET_STS_UNEXP_ERROR;
2709: RETURN NULL;
2710:
2711:
2712: END credit_check;