DBA Data[Home] [Help]

APPS.OKL_INTEREST_CALC_PVT dependencies on OKL_API

Line 47: l_init_msg_list VARCHAR2(1) := OKL_API.G_FALSE;

43: l_sty_id NUMBER;
44: l_product_id NUMBER;
45: l_amount NUMBER := 0;
46:
47: l_init_msg_list VARCHAR2(1) := OKL_API.G_FALSE;
48: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
49: l_msg_count NUMBER;
50: l_msg_data VARCHAR2(2000);
51:

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

44: l_product_id NUMBER;
45: l_amount NUMBER := 0;
46:
47: l_init_msg_list VARCHAR2(1) := OKL_API.G_FALSE;
48: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
49: l_msg_count NUMBER;
50: l_msg_data VARCHAR2(2000);
51:
52: -- Code added by HKPATEL for billing transaction

Line 180: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN

176: -- Bug 3940088
177:
178: Okl_Streams_Util.get_primary_stream_type(p_khr_id,'PREFUNDING_INTEREST_PAYMENT',l_return_status,l_sty_id);
179:
180: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
181: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN
183: RAISE OKL_API.G_EXCEPTION_ERROR;
184: END IF;

Line 181: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

177:
178: Okl_Streams_Util.get_primary_stream_type(p_khr_id,'PREFUNDING_INTEREST_PAYMENT',l_return_status,l_sty_id);
179:
180: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
181: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN
183: RAISE OKL_API.G_EXCEPTION_ERROR;
184: END IF;
185:

Line 182: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN

178: Okl_Streams_Util.get_primary_stream_type(p_khr_id,'PREFUNDING_INTEREST_PAYMENT',l_return_status,l_sty_id);
179:
180: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
181: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN
183: RAISE OKL_API.G_EXCEPTION_ERROR;
184: END IF;
185:
186: -- Fetch the functional currency

Line 183: RAISE OKL_API.G_EXCEPTION_ERROR;

179:
180: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
181: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN
183: RAISE OKL_API.G_EXCEPTION_ERROR;
184: END IF;
185:
186: -- Fetch the functional currency
187: l_functional_currency := OKL_ACCOUNTING_UTIL.GET_FUNC_CURR_CODE;

Line 232: Okl_Api.set_message(p_app_name => g_app_name,

228: ELSE
229: OPEN contract_num_csr(p_khr_id);
230: FETCH contract_num_csr INTO l_cntrct_number;
231: CLOSE contract_num_csr;
232: Okl_Api.set_message(p_app_name => g_app_name,
233: p_msg_name => 'OKL_LE_NOT_EXIST_CNTRCT',
234: p_token1 => 'CONTRACT_NUMBER',
235: p_token1_value => l_cntrct_number);
236: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 236: RAISE OKL_API.G_EXCEPTION_ERROR;

232: Okl_Api.set_message(p_app_name => g_app_name,
233: p_msg_name => 'OKL_LE_NOT_EXIST_CNTRCT',
234: p_token1 => 'CONTRACT_NUMBER',
235: p_token1_value => l_cntrct_number);
236: RAISE OKL_API.G_EXCEPTION_ERROR;
237: END IF;
238:
239: i_taiv_rec.try_id := l_try_id;
240: i_taiv_rec.khr_id := p_khr_id;

Line 289: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN

285: ,x_taiv_rec => lx_taiv_rec
286: ,x_tilv_tbl => lx_tilv_tbl
287: ,x_tldv_tbl => lx_tldv_tbl);
288:
289: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
290: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
291: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN
292: RAISE OKL_API.G_EXCEPTION_ERROR;
293: END IF;

Line 290: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

286: ,x_tilv_tbl => lx_tilv_tbl
287: ,x_tldv_tbl => lx_tldv_tbl);
288:
289: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
290: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
291: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN
292: RAISE OKL_API.G_EXCEPTION_ERROR;
293: END IF;
294:

Line 291: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN

287: ,x_tldv_tbl => lx_tldv_tbl);
288:
289: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
290: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
291: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN
292: RAISE OKL_API.G_EXCEPTION_ERROR;
293: END IF;
294:
295: IF(IS_DEBUG_PROCEDURE_ON) THEN

Line 292: RAISE OKL_API.G_EXCEPTION_ERROR;

288:
289: IF l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
290: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
291: ELSIF l_return_status = OKL_API.G_RET_STS_ERROR THEN
292: RAISE OKL_API.G_EXCEPTION_ERROR;
293: END IF;
294:
295: IF(IS_DEBUG_PROCEDURE_ON) THEN
296: BEGIN

Line 304: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

300:
301: -- Code needed for billing transaction ends here - HKPATEL
302:
303:
304: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
305:
306: l_khrv_rec_in.ID := p_khr_id;
307: l_khrv_rec_in.DATE_LAST_INTERIM_INTEREST_CAL := p_calc_date;
308: l_chrv_rec_in.ID := p_khr_id;

Line 321: p_restricted_update => OKL_API.G_TRUE,

317: p_init_msg_list => l_init_msg_list,
318: x_return_status => l_return_status,
319: x_msg_count => l_msg_count,
320: x_msg_data => l_msg_data,
321: p_restricted_update => OKL_API.G_TRUE,
322: p_chrv_rec => l_chrv_rec_in,
323: p_khrv_rec => l_khrv_rec_in,
324: p_edit_mode => 'N',
325: x_chrv_rec => l_chrv_rec_out,

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

484: l_interest_rate NUMBER := 0;
485: l_khr_id NUMBER := 0;
486: l_no_of_days_in_year VARCHAR2(450);
487: -- gboomina Bug 4900213 - Added - Start
488: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
489: -- though l_no_of_days_in_month is not used, need to pass this to OKL_PRICING_UTILS_PVT.get_day_convention method.
490: l_no_of_days_in_month VARCHAR2(450);
491: -- gboomina Bug 4900213 - Added - End
492:

Line 531: OKL_API.SET_MESSAGE(p_app_name => g_app_name,

527: FETCH cont_csr INTO l_khr_id;
528: IF (cont_csr%NOTFOUND) THEN
529: -- Abort the process.
530: IF (p_mode = 'ONLINE') THEN
531: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
532: p_msg_name => 'OKL_CNTR_NO_INVALID',
533: p_token1 => 'CONTRACT_NUMBER',
534: p_token1_value => p_contract_number);
535: ELSE

Line 542: RAISE OKL_API.G_EXCEPTION_ERROR;

538:
539: END IF;
540:
541: CLOSE cont_csr;
542: RAISE OKL_API.G_EXCEPTION_ERROR;
543: END IF;
544: CLOSE cont_csr;
545:
546: -- Find out number of days in Year

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

551: x_days_in_month => l_no_of_days_in_month,
552: x_days_in_year => l_no_of_days_in_year,
553: x_return_status => l_return_status);
554:
555: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
556: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
557: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
558: RAISE OKL_API.G_EXCEPTION_ERROR;
559: END IF;

Line 556: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

552: x_days_in_year => l_no_of_days_in_year,
553: x_return_status => l_return_status);
554:
555: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
556: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
557: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
558: RAISE OKL_API.G_EXCEPTION_ERROR;
559: END IF;
560:

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

553: x_return_status => l_return_status);
554:
555: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
556: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
557: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
558: RAISE OKL_API.G_EXCEPTION_ERROR;
559: END IF;
560:
561: IF l_no_of_days_in_year IS NULL THEN

Line 558: RAISE OKL_API.G_EXCEPTION_ERROR;

554:
555: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
556: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
557: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
558: RAISE OKL_API.G_EXCEPTION_ERROR;
559: END IF;
560:
561: IF l_no_of_days_in_year IS NULL THEN
562: IF (p_mode = 'ONLINE') THEN

Line 563: OKL_API.SET_MESSAGE(p_app_name => g_app_name,

559: END IF;
560:
561: IF l_no_of_days_in_year IS NULL THEN
562: IF (p_mode = 'ONLINE') THEN
563: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
564: p_msg_name => 'OKL_DAYS_IN_YEAR_NOT_FOUND');
565: ELSE
566: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error : Could not get Number of Days in Year');
567: END IF;

Line 568: RAISE OKL_API.G_EXCEPTION_ERROR;

564: p_msg_name => 'OKL_DAYS_IN_YEAR_NOT_FOUND');
565: ELSE
566: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error : Could not get Number of Days in Year');
567: END IF;
568: RAISE OKL_API.G_EXCEPTION_ERROR;
569: END IF;
570: -- gboomina bug 4900213 - End
571:
572: -- Find out the interest Name.

Line 579: OKL_API.SET_MESSAGE(p_app_name => g_app_name,

575: FETCH indx_csr INTO l_name;
576: IF (indx_csr%NOTFOUND) THEN
577: -- Cannot Continue. Must Stop
578: IF (p_mode = 'ONLINE') THEN
579: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
580: p_msg_name => 'OKL_INTR_NAME_NOT_FOUND');
581: ELSE
582: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error : Could not get Interest Rate '
583: || 'Name in the Rules');

Line 587: RAISE OKL_API.G_EXCEPTION_ERROR;

583: || 'Name in the Rules');
584:
585: END IF;
586: CLOSE indx_csr;
587: RAISE OKL_API.G_EXCEPTION_ERROR;
588: END IF;
589: CLOSE indx_csr;
590:
591: l_prev_start_date := p_start_date;

Line 602: OKL_API.SET_MESSAGE(p_app_name => g_app_name,

598: OPEN int_max_csr(l_name, change_rec.change_date - 1);
599: FETCH int_max_csr INTO l_interest_rate;
600: IF (int_max_csr%NOTFOUND) THEN
601: IF (p_mode = 'ONLINE') THEN
602: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
603: p_msg_name => 'OKL_INTR_RATE_NOT_FOUND',
604: p_token1 => 'INTR_DATE',
605: p_token1_value => to_char(change_rec.change_date - 1,'DD-MM-YY'));
606: ELSE

Line 612: RAISE OKL_API.G_EXCEPTION_ERROR;

608: to_char(change_rec.change_date-1,'DD-MON-YY'));
609: END IF;
610:
611: CLOSE int_max_csr;
612: RAISE OKL_API.G_EXCEPTION_ERROR;
613:
614: END IF;
615:
616: CLOSE int_max_csr;

Line 634: OKL_API.SET_MESSAGE(p_app_name => g_app_name,

630: OPEN int_max_csr(l_name, p_end_date);
631: FETCH int_max_csr INTO l_interest_rate;
632: IF (int_max_csr%NOTFOUND) THEN
633: IF (p_mode = 'ONLINE') THEN
634: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
635: p_msg_name => 'OKL_INTR_RATE_NOT_FOUND',
636: p_token1 => 'INTR_DATE',
637: p_token1_value => to_char(p_end_date,'DD-MM-YY'));
638: ELSE

Line 644: RAISE OKL_API.G_EXCEPTION_ERROR;

640: to_char(p_end_date,'DD-MON-YY'));
641: END IF;
642:
643: CLOSE int_max_csr;
644: RAISE OKL_API.G_EXCEPTION_ERROR;
645: END IF;
646:
647: CLOSE int_max_csr;
648:

Line 660: x_return_status := OKL_API.G_RET_STS_SUCCESS;

656:
657: l_total_interest := nvl(l_total_interest,0) + nvl(l_temp_interest,0);
658:
659: x_amount := l_total_interest;
660: x_return_status := OKL_API.G_RET_STS_SUCCESS;
661:
662: EXCEPTION
663: WHEN OKL_API.G_EXCEPTION_ERROR THEN
664: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 663: WHEN OKL_API.G_EXCEPTION_ERROR THEN

659: x_amount := l_total_interest;
660: x_return_status := OKL_API.G_RET_STS_SUCCESS;
661:
662: EXCEPTION
663: WHEN OKL_API.G_EXCEPTION_ERROR THEN
664: x_return_status := OKL_API.G_RET_STS_ERROR;
665: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
666: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
667: WHEN OTHERS THEN

Line 664: x_return_status := OKL_API.G_RET_STS_ERROR;

660: x_return_status := OKL_API.G_RET_STS_SUCCESS;
661:
662: EXCEPTION
663: WHEN OKL_API.G_EXCEPTION_ERROR THEN
664: x_return_status := OKL_API.G_RET_STS_ERROR;
665: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
666: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
667: WHEN OTHERS THEN
668: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 665: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

661:
662: EXCEPTION
663: WHEN OKL_API.G_EXCEPTION_ERROR THEN
664: x_return_status := OKL_API.G_RET_STS_ERROR;
665: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
666: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
667: WHEN OTHERS THEN
668: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
669:

Line 666: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

662: EXCEPTION
663: WHEN OKL_API.G_EXCEPTION_ERROR THEN
664: x_return_status := OKL_API.G_RET_STS_ERROR;
665: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
666: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
667: WHEN OTHERS THEN
668: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
669:
670: END CALC_INTEREST;

Line 668: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

664: x_return_status := OKL_API.G_RET_STS_ERROR;
665: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
666: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
667: WHEN OTHERS THEN
668: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
669:
670: END CALC_INTEREST;
671:
672:

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

675: p_retcode OUT NOCOPY NUMBER,
676: p_calc_upto IN VARCHAR2)
677: IS
678: l_api_name CONSTANT VARCHAR2(40) := 'CALC_INTEREST_PERD';
679: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
680: l_init_msg_list VARCHAR2(1);
681: l_msg_data VARCHAR2(2000);
682: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
683:

Line 682: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

678: l_api_name CONSTANT VARCHAR2(40) := 'CALC_INTEREST_PERD';
679: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
680: l_init_msg_list VARCHAR2(1);
681: l_msg_data VARCHAR2(2000);
682: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
683:
684: l_api_version CONSTANT NUMBER := 1.0;
685: p_api_version CONSTANT NUMBER := 1.0;
686: l_row_count NUMBER;

Line 794: RAISE OKL_API.G_EXCEPTION_ERROR;

790:
791: IF (l_start_date IS NULL) THEN
792:
793: FND_FILE.PUT_LINE(FND_FILE.LOG, 'The Period ' || l_period_name || ' is Invalid');
794: RAISE OKL_API.G_EXCEPTION_ERROR;
795:
796: END IF;
797:
798: FOR cont_head_rec IN cont_head_csr

Line 841: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

837:
838: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Total amount calculated was ' || l_amount);
839: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation was made upto ' || l_end_date);
840:
841: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
842:
843: SAVEPOINT CREATE_TRX_ACCT;
844:
845: CREATE_TRX_ACCT(p_khr_id => cont_head_rec.khr_id,

Line 853: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

849: x_source_id => l_source_id,
850: x_return_status => l_return_status);
851:
852:
853: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
854: l_count := l_count + 1;
855: COMMIT WORK;
856: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Successfully Calculated. ' ||
857: 'Total Amount was ' || OKL_ACCOUNTING_UTIL.ROUND_AMOUNT(p_amount => l_amount,

Line 914: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

910: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');
911:
912: EXCEPTION
913:
914: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
915:
916: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation Process Aborted');
917: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
918: IF (l_error_msg_rec.COUNT > 0) THEN

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

953:
954: IS
955:
956: l_api_name CONSTANT VARCHAR2(40) := 'CALC_INTEREST_ACTIVATE';
957: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
958: l_captl_flag VARCHAR2(1);
959: l_init_msg_list VARCHAR2(1);
960: l_msg_data VARCHAR2(2000);
961:

Line 1066: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1062: --Bug 4899328 - End of Changes
1063:
1064: BEGIN
1065:
1066: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1067: G_PKG_NAME,
1068: p_init_msg_list,
1069: l_api_version,
1070: p_api_version,

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

1070: p_api_version,
1071: '_PVT',
1072: x_return_status);
1073:
1074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1077: RAISE OKL_API.G_EXCEPTION_ERROR;
1078: END IF;

Line 1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1071: '_PVT',
1072: x_return_status);
1073:
1074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1077: RAISE OKL_API.G_EXCEPTION_ERROR;
1078: END IF;
1079:

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

1072: x_return_status);
1073:
1074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1077: RAISE OKL_API.G_EXCEPTION_ERROR;
1078: END IF;
1079:
1080:

Line 1077: RAISE OKL_API.G_EXCEPTION_ERROR;

1073:
1074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1077: RAISE OKL_API.G_EXCEPTION_ERROR;
1078: END IF;
1079:
1080:
1081: -- First Get the last calculation Date

Line 1088: OKL_API.set_message('OKC', G_INVALID_VALUE, G_COL_NAME_TOKEN,'CONTRACT_NUMBER');

1084: FETCH cont_head_csr INTO l_last_calc_date,
1085: l_product_id,
1086: l_khr_id;
1087: IF (cont_head_csr%NOTFOUND) THEN
1088: OKL_API.set_message('OKC', G_INVALID_VALUE, G_COL_NAME_TOKEN,'CONTRACT_NUMBER');
1089: CLOSE cont_head_csr;
1090: RAISE OKL_API.G_EXCEPTION_ERROR;
1091: END IF;
1092:

Line 1090: RAISE OKL_API.G_EXCEPTION_ERROR;

1086: l_khr_id;
1087: IF (cont_head_csr%NOTFOUND) THEN
1088: OKL_API.set_message('OKC', G_INVALID_VALUE, G_COL_NAME_TOKEN,'CONTRACT_NUMBER');
1089: CLOSE cont_head_csr;
1090: RAISE OKL_API.G_EXCEPTION_ERROR;
1091: END IF;
1092:
1093: CLOSE cont_head_csr;
1094:

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

1114: p_mode => 'ONLINE',
1115: x_amount => l_amount,
1116: x_return_status => l_return_status);
1117:
1118: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1119: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1120: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1121: RAISE OKL_API.G_EXCEPTION_ERROR;
1122: END IF;

Line 1119: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1115: x_amount => l_amount,
1116: x_return_status => l_return_status);
1117:
1118: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1119: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1120: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1121: RAISE OKL_API.G_EXCEPTION_ERROR;
1122: END IF;
1123: ELSE

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

1116: x_return_status => l_return_status);
1117:
1118: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1119: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1120: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1121: RAISE OKL_API.G_EXCEPTION_ERROR;
1122: END IF;
1123: ELSE
1124: l_amount := 0;

Line 1121: RAISE OKL_API.G_EXCEPTION_ERROR;

1117:
1118: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1119: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1120: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1121: RAISE OKL_API.G_EXCEPTION_ERROR;
1122: END IF;
1123: ELSE
1124: l_amount := 0;
1125:

Line 1136: OKL_API.SET_MESSAGE(p_app_name => g_app_name,

1132: FETCH captl_csr INTO l_captl_flag;
1133: IF (captl_csr%NOTFOUND) THEN
1134: /*
1135: Changed by HKPATEL for bug 3589126
1136: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
1137: p_msg_name => 'OKL_CAPTL_INFO_NOT_FOUND',
1138: p_token1 => 'CONTRACT_NUMBER',
1139: p_token1_value => p_contract_number);
1140: */

Line 1144: --RAISE OKL_API.G_EXCEPTION_ERROR;

1140: */
1141: l_captl_flag := 'N';
1142: --CLOSE captl_csr;
1143:
1144: --RAISE OKL_API.G_EXCEPTION_ERROR;
1145: END IF;
1146:
1147: CLOSE captl_csr;
1148:

Line 1210: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1206: x_amount := l_amount;
1207: x_source_id := l_source_id;
1208: x_return_status := l_return_status;
1209:
1210: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1211:
1212: EXCEPTION
1213:
1214: WHEN OKL_API.G_EXCEPTION_ERROR THEN

Line 1214: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1210: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1211:
1212: EXCEPTION
1213:
1214: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1215: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1216: (
1217: l_api_name,
1218: G_PKG_NAME,

Line 1215: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1211:
1212: EXCEPTION
1213:
1214: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1215: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1216: (
1217: l_api_name,
1218: G_PKG_NAME,
1219: 'OKL_API.G_RET_STS_ERROR',

Line 1219: 'OKL_API.G_RET_STS_ERROR',

1215: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1216: (
1217: l_api_name,
1218: G_PKG_NAME,
1219: 'OKL_API.G_RET_STS_ERROR',
1220: x_msg_count,
1221: x_msg_data,
1222: '_PVT'
1223: );

Line 1224: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1220: x_msg_count,
1221: x_msg_data,
1222: '_PVT'
1223: );
1224: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1225: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1226: (
1227: l_api_name,
1228: G_PKG_NAME,

Line 1225: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1221: x_msg_data,
1222: '_PVT'
1223: );
1224: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1225: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1226: (
1227: l_api_name,
1228: G_PKG_NAME,
1229: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1229: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1225: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1226: (
1227: l_api_name,
1228: G_PKG_NAME,
1229: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1230: x_msg_count,
1231: x_msg_data,
1232: '_PVT'
1233: );

Line 1235: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1231: x_msg_data,
1232: '_PVT'
1233: );
1234: WHEN OTHERS THEN
1235: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1236: (
1237: l_api_name,
1238: G_PKG_NAME,
1239: 'OTHERS',

Line 1261: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

1257: RETURN NUMBER IS
1258:
1259: l_api_version CONSTANT NUMBER := 1.0;
1260: l_api_name CONSTANT VARCHAR2(30) := 'SUBMIT_CALCULATE_INTEREST';
1261: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1262: l_init_msg_list VARCHAR2(20) DEFAULT Okl_Api.G_FALSE;
1263: l_msg_count NUMBER;
1264: l_msg_data VARCHAR2(2000);
1265: x_request_id NUMBER;

Line 1262: l_init_msg_list VARCHAR2(20) DEFAULT Okl_Api.G_FALSE;

1258:
1259: l_api_version CONSTANT NUMBER := 1.0;
1260: l_api_name CONSTANT VARCHAR2(30) := 'SUBMIT_CALCULATE_INTEREST';
1261: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1262: l_init_msg_list VARCHAR2(20) DEFAULT Okl_Api.G_FALSE;
1263: l_msg_count NUMBER;
1264: l_msg_data VARCHAR2(2000);
1265: x_request_id NUMBER;
1266:

Line 1269: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1265: x_request_id NUMBER;
1266:
1267: BEGIN
1268:
1269: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1270:
1271: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1272: G_PKG_NAME,
1273: p_init_msg_list,

Line 1271: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1267: BEGIN
1268:
1269: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1270:
1271: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1272: G_PKG_NAME,
1273: p_init_msg_list,
1274: l_api_version,
1275: p_api_version,

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

1274: l_api_version,
1275: p_api_version,
1276: '_PVT',
1277: x_return_status);
1278: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1280: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1281: RAISE OKL_API.G_EXCEPTION_ERROR;
1282: END IF;

Line 1279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1275: p_api_version,
1276: '_PVT',
1277: x_return_status);
1278: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1280: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1281: RAISE OKL_API.G_EXCEPTION_ERROR;
1282: END IF;
1283:

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

1276: '_PVT',
1277: x_return_status);
1278: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1280: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1281: RAISE OKL_API.G_EXCEPTION_ERROR;
1282: END IF;
1283:
1284:

Line 1281: RAISE OKL_API.G_EXCEPTION_ERROR;

1277: x_return_status);
1278: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1280: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1281: RAISE OKL_API.G_EXCEPTION_ERROR;
1282: END IF;
1283:
1284:
1285: -- check for period name before submitting the request.

Line 1286: IF (p_period_name IS NULL) OR (p_period_name = Okl_Api.G_MISS_CHAR) THEN

1282: END IF;
1283:
1284:
1285: -- check for period name before submitting the request.
1286: IF (p_period_name IS NULL) OR (p_period_name = Okl_Api.G_MISS_CHAR) THEN
1287: OKL_API.set_message('OKC', G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Period Name');
1288: RAISE Okl_Api.G_EXCEPTION_ERROR;
1289: END IF;
1290:

Line 1287: OKL_API.set_message('OKC', G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Period Name');

1283:
1284:
1285: -- check for period name before submitting the request.
1286: IF (p_period_name IS NULL) OR (p_period_name = Okl_Api.G_MISS_CHAR) THEN
1287: OKL_API.set_message('OKC', G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Period Name');
1288: RAISE Okl_Api.G_EXCEPTION_ERROR;
1289: END IF;
1290:
1291: -- Submit Concurrent Program Request for interest calculation

Line 1288: RAISE Okl_Api.G_EXCEPTION_ERROR;

1284:
1285: -- check for period name before submitting the request.
1286: IF (p_period_name IS NULL) OR (p_period_name = Okl_Api.G_MISS_CHAR) THEN
1287: OKL_API.set_message('OKC', G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Period Name');
1288: RAISE Okl_Api.G_EXCEPTION_ERROR;
1289: END IF;
1290:
1291: -- Submit Concurrent Program Request for interest calculation
1292:

Line 1301: OKL_API.set_message(p_app_name => 'OFA',

1297: argument1 => p_period_name);
1298:
1299: IF (x_request_id = 0) THEN
1300:
1301: OKL_API.set_message(p_app_name => 'OFA',
1302: p_msg_name => 'FA_DEPRN_TAX_ERROR',
1303: p_token1 => 'REQUEST_ID',
1304: p_token1_value => x_request_id);
1305: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1305: RAISE OKL_API.G_EXCEPTION_ERROR;

1301: OKL_API.set_message(p_app_name => 'OFA',
1302: p_msg_name => 'FA_DEPRN_TAX_ERROR',
1303: p_token1 => 'REQUEST_ID',
1304: p_token1_value => x_request_id);
1305: RAISE OKL_API.G_EXCEPTION_ERROR;
1306:
1307: END IF;
1308:
1309: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1309: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1305: RAISE OKL_API.G_EXCEPTION_ERROR;
1306:
1307: END IF;
1308:
1309: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1310:
1311: RETURN x_request_id;
1312:
1313: EXCEPTION

Line 1314: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1310:
1311: RETURN x_request_id;
1312:
1313: EXCEPTION
1314: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1315: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1316: (
1317: l_api_name,
1318: G_PKG_NAME,

Line 1315: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1311: RETURN x_request_id;
1312:
1313: EXCEPTION
1314: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1315: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1316: (
1317: l_api_name,
1318: G_PKG_NAME,
1319: 'OKL_API.G_RET_STS_ERROR',

Line 1319: 'OKL_API.G_RET_STS_ERROR',

1315: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1316: (
1317: l_api_name,
1318: G_PKG_NAME,
1319: 'OKL_API.G_RET_STS_ERROR',
1320: x_msg_count,
1321: x_msg_data,
1322: '_PVT'
1323: );

Line 1325: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1321: x_msg_data,
1322: '_PVT'
1323: );
1324: RETURN x_request_id;
1325: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1326: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1327: (
1328: l_api_name,
1329: G_PKG_NAME,

Line 1326: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1322: '_PVT'
1323: );
1324: RETURN x_request_id;
1325: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1326: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1327: (
1328: l_api_name,
1329: G_PKG_NAME,
1330: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1330: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1326: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1327: (
1328: l_api_name,
1329: G_PKG_NAME,
1330: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1331: x_msg_count,
1332: x_msg_data,
1333: '_PVT'
1334: );

Line 1337: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1333: '_PVT'
1334: );
1335: RETURN x_request_id;
1336: WHEN OTHERS THEN
1337: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1338: (
1339: l_api_name,
1340: G_PKG_NAME,
1341: 'OTHERS',