eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKL_VARIABLE_INTEREST_PVT dependencies on OKL_API

Line 7: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;

3:
4: G_DEBUG CONSTANT VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
5: G_INIT_NUMBER CONSTANT NUMBER := -9999;
6: G_API_TYPE CONSTANT VARCHAR2(4) := '_PVT';
7: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
8: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
9: --G_FIN_LINE_LTY_ID CONSTANT NUMBER := 33;
10: rule_failed EXCEPTION;
11:

Line 8: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;

4: G_DEBUG CONSTANT VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
5: G_INIT_NUMBER CONSTANT NUMBER := -9999;
6: G_API_TYPE CONSTANT VARCHAR2(4) := '_PVT';
7: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
8: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
9: --G_FIN_LINE_LTY_ID CONSTANT NUMBER := 33;
10: rule_failed EXCEPTION;
11:
12: --Bug# 14799218

Line 180: okl_api.end_activity(

176: x_msg_out VARCHAR2(2000);
177:
178: BEGIN
179:
180: okl_api.end_activity(
181: X_msg_count => x_msg_count,
182: X_msg_data => x_msg_data
183: );
184:

Line 233: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

229:
230: ------------------------------------------------------------------------------
231: PROCEDURE initialize_contract_params (
232: p_api_version IN NUMBER,
233: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
234: x_return_status OUT NOCOPY VARCHAR2,
235: x_msg_count OUT NOCOPY NUMBER,
236: x_msg_data OUT NOCOPY VARCHAR2,
237: p_contract_id IN NUMBER) IS

Line 274: x_return_status := OKL_API.G_RET_STS_SUCCESS;

270: FROM okl_product_parameters_v ppm
271: WHERE ppm.id = p_product_id;
272:
273: BEGIN
274: x_return_status := OKL_API.G_RET_STS_SUCCESS;
275:
276: print_debug('Executing procedure INITIALIZE_CONTRACT_PARAMS using following parameters : ');
277: print_debug(' p_contract_id : '|| p_contract_id );
278:

Line 356: x_return_status := OKL_API.G_RET_STS_ERROR;

352:
353: EXCEPTION
354: WHEN init_ctr_params_failed THEN
355: print_error_message('init_ctr_params_failed Exception raised in procedure INITIALIZE_CONTRACT_PARAMS');
356: x_return_status := OKL_API.G_RET_STS_ERROR;
357:
358: WHEN OTHERS THEN
359: print_error_message('Exception raised in procedure INITIALIZE_CONTRACT_PARAMS');
360: Okl_Api.SET_MESSAGE(

Line 360: Okl_Api.SET_MESSAGE(

356: x_return_status := OKL_API.G_RET_STS_ERROR;
357:
358: WHEN OTHERS THEN
359: print_error_message('Exception raised in procedure INITIALIZE_CONTRACT_PARAMS');
360: Okl_Api.SET_MESSAGE(
361: p_app_name => G_APP_NAME,
362: p_msg_name => G_UNEXPECTED_ERROR,
363: p_token1 => G_SQLCODE_TOKEN,
364: p_token1_value => SQLCODE,

Line 368: x_return_status := OKL_API.G_RET_STS_ERROR;

364: p_token1_value => SQLCODE,
365: p_token2 => G_SQLERRM_TOKEN,
366: p_token2_value => SQLERRM);
367:
368: x_return_status := OKL_API.G_RET_STS_ERROR;
369:
370: END initialize_contract_params;
371:
372: ------------------------------------------------------------------------------

Line 385: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

381:
382: ------------------------------------------------------------------------------
383: PROCEDURE get_contract_financed_amount (
384: p_api_version IN NUMBER,
385: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
386: x_return_status OUT NOCOPY VARCHAR2,
387: x_msg_count OUT NOCOPY NUMBER,
388: x_msg_data OUT NOCOPY VARCHAR2,
389: p_contract_id IN NUMBER,

Line 398: x_return_status := OKL_API.G_RET_STS_SUCCESS;

394: get_ctr_fin_amt_failed EXCEPTION;
395:
396:
397: BEGIN
398: x_return_status := OKL_API.G_RET_STS_SUCCESS;
399:
400: print_debug('Executing procedure GET_CONTRACT_FINANCED_AMOUNT using following parameters : ');
401: print_debug(' p_contract_id : '|| p_contract_id );
402: print_debug(' G_CONTRACT_ID : '|| G_CONTRACT_ID );

Line 416: p_init_msg_list => OKL_API.G_FALSE,

412: --Bug# 13809156: Changed Formula to CONTRACT_CAP_AMNT_PRICE to reduce
413: -- capitalized downpayment when computing contract cap amount
414: -- Derive Principal Balance
415: Okl_Execute_Formula_Pub.EXECUTE(p_api_version => 1.0,
416: p_init_msg_list => OKL_API.G_FALSE,
417: x_return_status => x_return_status,
418: x_msg_count => x_msg_count,
419: x_msg_data => x_msg_data,
420: p_formula_name => 'CONTRACT_CAP_AMNT_PRICE',

Line 427: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

423: p_additional_parameters => Okl_Execute_Formula_Pub.g_additional_parameters, -- vsgandhi Bug 13106699
424: x_value => x_principal_balance
425: );
426:
427: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
428: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE completed successfully');
429: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
430: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
431: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');

Line 429: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

425: );
426:
427: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
428: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE completed successfully');
429: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
430: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
431: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
432: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
433: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 432: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

428: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE completed successfully');
429: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
430: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
431: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
432: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
433: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
434: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
435: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
436: RAISE get_ctr_fin_amt_failed;

Line 433: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

429: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
430: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
431: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
432: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
433: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
434: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
435: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
436: RAISE get_ctr_fin_amt_failed;
437: END IF;

Line 452: x_return_status := OKL_API.G_RET_STS_ERROR;

448:
449: EXCEPTION
450: WHEN get_ctr_fin_amt_failed THEN
451: print_error_message('get_ctr_fin_amt_failed Exception raised in procedure GET_CONTRACT_FINANCED_AMOUNT');
452: x_return_status := OKL_API.G_RET_STS_ERROR;
453:
454: WHEN OTHERS THEN
455: print_error_message('Exception raised in procedure GET_CONTRACT_FINANCED_AMOUNT');
456: Okl_Api.SET_MESSAGE(

Line 456: Okl_Api.SET_MESSAGE(

452: x_return_status := OKL_API.G_RET_STS_ERROR;
453:
454: WHEN OTHERS THEN
455: print_error_message('Exception raised in procedure GET_CONTRACT_FINANCED_AMOUNT');
456: Okl_Api.SET_MESSAGE(
457: p_app_name => G_APP_NAME,
458: p_msg_name => G_UNEXPECTED_ERROR,
459: p_token1 => G_SQLCODE_TOKEN,
460: p_token1_value => SQLCODE,

Line 464: x_return_status := OKL_API.G_RET_STS_ERROR;

460: p_token1_value => SQLCODE,
461: p_token2 => G_SQLERRM_TOKEN,
462: p_token2_value => SQLERRM);
463:
464: x_return_status := OKL_API.G_RET_STS_ERROR;
465:
466: END get_contract_financed_amount;
467:
468: ------------------------------------------------------------------------------

Line 481: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

477:
478: ------------------------------------------------------------------------------
479: PROCEDURE get_asset_financed_amount (
480: p_api_version IN NUMBER,
481: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
482: x_return_status OUT NOCOPY VARCHAR2,
483: x_msg_count OUT NOCOPY NUMBER,
484: x_msg_data OUT NOCOPY VARCHAR2,
485: p_contract_id IN NUMBER,

Line 495: x_return_status := OKL_API.G_RET_STS_SUCCESS;

491: get_asset_fin_amt_failed EXCEPTION;
492:
493:
494: BEGIN
495: x_return_status := OKL_API.G_RET_STS_SUCCESS;
496:
497: print_debug('Executing procedure GET_ASSET_FINANCED_AMOUNT using following parameters : ');
498: print_debug(' p_contract_id : '|| p_contract_id );
499: print_debug(' p_line_id : '|| p_line_id );

Line 517: p_init_msg_list => OKL_API.G_FALSE,

513: --Bug# 14637671: Changed Formula to LINE_CAP_AMNT_PRICE to reduce
514: -- capitalized downpayment when computing line cap amount
515: -- Derive Principal Balance
516: Okl_Execute_Formula_Pub.EXECUTE(p_api_version => 1.0,
517: p_init_msg_list => OKL_API.G_FALSE,
518: x_return_status => x_return_status,
519: x_msg_count => x_msg_count,
520: x_msg_data => x_msg_data,
521: p_formula_name => 'LINE_CAP_AMNT_PRICE',

Line 528: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

524: p_additional_parameters => Okl_Execute_Formula_Pub.g_additional_parameters, -- vsgandhi bug13106699
525: x_value => x_principal_balance
526: );
527:
528: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
529: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE completed successfully');
530: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
531: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
532: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');

Line 530: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

526: );
527:
528: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
529: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE completed successfully');
530: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
531: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
532: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
533: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
534: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 533: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

529: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE completed successfully');
530: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
531: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
532: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
533: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
534: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
535: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
536: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
537: RAISE get_asset_fin_amt_failed;

Line 534: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

530: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
531: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
532: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
533: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
534: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
535: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
536: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
537: RAISE get_asset_fin_amt_failed;
538: END IF;

Line 554: x_return_status := OKL_API.G_RET_STS_ERROR;

550:
551: EXCEPTION
552: WHEN get_asset_fin_amt_failed THEN
553: print_error_message('get_asset_fin_amt_failed Exception raised in procedure GET_ASSET_FINANCED_AMOUNT');
554: x_return_status := OKL_API.G_RET_STS_ERROR;
555:
556: WHEN OTHERS THEN
557: print_error_message('Exception raised in procedure GET_ASSET_FINANCED_AMOUNT');
558: Okl_Api.SET_MESSAGE(

Line 558: Okl_Api.SET_MESSAGE(

554: x_return_status := OKL_API.G_RET_STS_ERROR;
555:
556: WHEN OTHERS THEN
557: print_error_message('Exception raised in procedure GET_ASSET_FINANCED_AMOUNT');
558: Okl_Api.SET_MESSAGE(
559: p_app_name => G_APP_NAME,
560: p_msg_name => G_UNEXPECTED_ERROR,
561: p_token1 => G_SQLCODE_TOKEN,
562: p_token1_value => SQLCODE,

Line 566: x_return_status := OKL_API.G_RET_STS_ERROR;

562: p_token1_value => SQLCODE,
563: p_token2 => G_SQLERRM_TOKEN,
564: p_token2_value => SQLERRM);
565:
566: x_return_status := OKL_API.G_RET_STS_ERROR;
567:
568: END get_asset_financed_amount;
569:
570: ------------------------------------------------------------------------------

Line 1389: Okl_Api.SET_MESSAGE(

1385: l_index := p_principal_balance_tbl.NEXT(l_index);
1386: END LOOP;
1387: EXCEPTION
1388: WHEN OTHERS THEN
1389: Okl_Api.SET_MESSAGE(
1390: p_app_name => G_APP_NAME,
1391: p_msg_name => G_UNEXPECTED_ERROR,
1392: p_token1 => G_SQLCODE_TOKEN,
1393: p_token1_value => SQLCODE,

Line 1431: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1427:
1428: ------------------------------------------------------------------------------
1429: PROCEDURE prin_date_range_var_int_loan (
1430: p_api_version IN NUMBER,
1431: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1432: x_return_status OUT NOCOPY VARCHAR2,
1433: x_msg_count OUT NOCOPY NUMBER,
1434: x_msg_data OUT NOCOPY VARCHAR2,
1435: p_contract_id IN NUMBER,

Line 1824: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1820: ORDER BY receipt_date asc;
1821:
1822:
1823: BEGIN
1824: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1825:
1826: print_debug('Executing procedure PRIN_DATE_RANGE_VAR_INT_LOAN using following parameters : ');
1827: print_debug(' p_contract_id : '|| p_contract_id );
1828: print_debug(' p_line_id : '|| p_line_id );

Line 1834: p_init_msg_list => OKL_API.G_FALSE,

1830: print_debug(' p_due_date : '|| to_char(p_due_date));
1831: print_debug(' p_principal_basis : '|| p_principal_basis);
1832:
1833: Initialize_contract_params( p_api_version => 1.0,
1834: p_init_msg_list => OKL_API.G_FALSE,
1835: x_return_status => x_return_status,
1836: x_msg_count => x_msg_count,
1837: x_msg_data => x_msg_data,
1838: p_contract_id => p_contract_id

Line 1840: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

1836: x_msg_count => x_msg_count,
1837: x_msg_data => x_msg_data,
1838: p_contract_id => p_contract_id
1839: );
1840: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
1841: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
1842: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1843: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
1844: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');

Line 1842: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

1838: p_contract_id => p_contract_id
1839: );
1840: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
1841: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
1842: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1843: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
1844: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
1845: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1846: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 1845: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

1841: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
1842: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1843: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
1844: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
1845: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1846: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1847: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
1848: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
1849: RAISE prin_date_range_loan_failed;

Line 1846: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

1842: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1843: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
1844: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
1845: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1846: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1847: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
1848: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
1849: RAISE prin_date_range_loan_failed;
1850: END IF;

Line 1869: p_init_msg_list => OKL_API.G_FALSE,

1865: IF (l_principal_basis = 'ACTUAL') THEN
1866: IF (p_line_id IS NULL) THEN
1867: get_contract_financed_amount (
1868: p_api_version => 1.0,
1869: p_init_msg_list => OKL_API.G_FALSE,
1870: x_return_status => x_return_status,
1871: x_msg_count => x_msg_count,
1872: x_msg_data => x_msg_data,
1873: p_contract_id => p_contract_id,

Line 1876: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

1872: x_msg_data => x_msg_data,
1873: p_contract_id => p_contract_id,
1874: x_principal_balance => l_principal_balance);
1875:
1876: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
1877: print_debug ('Procedure GET_CONTRACT_FINANCED_AMOUNT completed successfully');
1878: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1879: print_debug ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned unexpected error');
1880: print_error_message ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned unexpected error');

Line 1878: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

1874: x_principal_balance => l_principal_balance);
1875:
1876: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
1877: print_debug ('Procedure GET_CONTRACT_FINANCED_AMOUNT completed successfully');
1878: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1879: print_debug ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned unexpected error');
1880: print_error_message ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned unexpected error');
1881: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1882: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 1881: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

1877: print_debug ('Procedure GET_CONTRACT_FINANCED_AMOUNT completed successfully');
1878: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1879: print_debug ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned unexpected error');
1880: print_error_message ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned unexpected error');
1881: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1882: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1883: print_debug ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned exception');
1884: print_error_message ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned exception');
1885: RAISE prin_date_range_loan_failed;

Line 1882: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

1878: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1879: print_debug ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned unexpected error');
1880: print_error_message ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned unexpected error');
1881: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1882: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1883: print_debug ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned exception');
1884: print_error_message ('Procedure GET_CONTRACT_FINANCED_AMOUNT returned exception');
1885: RAISE prin_date_range_loan_failed;
1886: END IF;

Line 1890: p_init_msg_list => OKL_API.G_FALSE,

1886: END IF;
1887: ELSE
1888: get_asset_financed_amount (
1889: p_api_version => 1.0,
1890: p_init_msg_list => OKL_API.G_FALSE,
1891: x_return_status => x_return_status,
1892: x_msg_count => x_msg_count,
1893: x_msg_data => x_msg_data,
1894: p_contract_id => p_contract_id,

Line 1898: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

1894: p_contract_id => p_contract_id,
1895: p_line_id => p_line_id,
1896: x_principal_balance => l_principal_balance);
1897:
1898: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
1899: print_debug ('Procedure GET_ASSET_FINANCED_AMOUNT completed successfully');
1900: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1901: print_debug ('Procedure GET_ASSET_FINANCED_AMOUNT returned unexpected error');
1902: print_error_message ('Procedure GET_ASSET_FINANCED_AMOUNT returned unexpected error');

Line 1900: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

1896: x_principal_balance => l_principal_balance);
1897:
1898: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
1899: print_debug ('Procedure GET_ASSET_FINANCED_AMOUNT completed successfully');
1900: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1901: print_debug ('Procedure GET_ASSET_FINANCED_AMOUNT returned unexpected error');
1902: print_error_message ('Procedure GET_ASSET_FINANCED_AMOUNT returned unexpected error');
1903: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1904: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 1903: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

1899: print_debug ('Procedure GET_ASSET_FINANCED_AMOUNT completed successfully');
1900: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1901: print_debug ('Procedure GET_ASSET_FINANCED_AMOUNT returned unexpected error');
1902: print_error_message ('Procedure GET_ASSET_FINANCED_AMOUNT returned unexpected error');
1903: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1904: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1905: print_debug ('Procedure GET_ASSET_FINANCED_AMOUNT returned exception');
1906: print_error_message ('Procedure GET_ASSET_FINANCED_AMOUNT returned exception');
1907: RAISE prin_date_range_loan_failed;

Line 1904: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

1900: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1901: print_debug ('Procedure GET_ASSET_FINANCED_AMOUNT returned unexpected error');
1902: print_error_message ('Procedure GET_ASSET_FINANCED_AMOUNT returned unexpected error');
1903: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1904: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1905: print_debug ('Procedure GET_ASSET_FINANCED_AMOUNT returned exception');
1906: print_error_message ('Procedure GET_ASSET_FINANCED_AMOUNT returned exception');
1907: RAISE prin_date_range_loan_failed;
1908: END IF;

Line 2201: x_return_status := OKL_API.G_RET_STS_ERROR;

2197:
2198: EXCEPTION
2199: WHEN prin_date_range_loan_failed THEN
2200: print_error_message('prin_date_range_loan_failed Exception Raised in procedure PRIN_DATE_RANGE_VAR_INT_LOAN ');
2201: x_return_status := OKL_API.G_RET_STS_ERROR;
2202: WHEN OTHERS THEN
2203: print_error_message('Exception Raised in procedure PRIN_DATE_RANGE_VAR_INT_LOAN ');
2204: Okl_Api.SET_MESSAGE(
2205: p_app_name => G_APP_NAME,

Line 2204: Okl_Api.SET_MESSAGE(

2200: print_error_message('prin_date_range_loan_failed Exception Raised in procedure PRIN_DATE_RANGE_VAR_INT_LOAN ');
2201: x_return_status := OKL_API.G_RET_STS_ERROR;
2202: WHEN OTHERS THEN
2203: print_error_message('Exception Raised in procedure PRIN_DATE_RANGE_VAR_INT_LOAN ');
2204: Okl_Api.SET_MESSAGE(
2205: p_app_name => G_APP_NAME,
2206: p_msg_name => G_UNEXPECTED_ERROR,
2207: p_token1 => G_SQLCODE_TOKEN,
2208: p_token1_value => SQLCODE,

Line 2211: x_return_status := OKL_API.G_RET_STS_ERROR;

2207: p_token1 => G_SQLCODE_TOKEN,
2208: p_token1_value => SQLCODE,
2209: p_token2 => G_SQLERRM_TOKEN,
2210: p_token2_value => SQLERRM);
2211: x_return_status := OKL_API.G_RET_STS_ERROR;
2212: END prin_date_range_var_int_loan;
2213:
2214: ------------------------------------------------------------------------------
2215:

Line 2230: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2226:
2227: ------------------------------------------------------------------------------
2228: PROCEDURE prin_date_range_var_int_rloan (
2229: p_api_version IN NUMBER,
2230: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2231: x_return_status OUT NOCOPY VARCHAR2,
2232: x_msg_count OUT NOCOPY NUMBER,
2233: x_msg_data OUT NOCOPY VARCHAR2,
2234: p_contract_id IN NUMBER,

Line 2393: x_return_status := OKL_API.G_RET_STS_SUCCESS;

2389: -- End - Billing Inline changes - Bug#5898792 - varangan - 23/2/2007
2390:
2391:
2392: BEGIN
2393: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2394:
2395: print_debug('Executing procedure PRIN_DATE_RANGE_VAR_INT_RLOAN using following parameters : ');
2396: print_debug(' p_contract_id : '|| p_contract_id);
2397: print_debug(' p_line_id : '|| p_line_id );

Line 2401: p_init_msg_list => OKL_API.G_FALSE,

2397: print_debug(' p_line_id : '|| p_line_id );
2398: print_debug(' p_due_date : '|| to_char(p_due_date));
2399:
2400: Initialize_contract_params( p_api_version => 1.0,
2401: p_init_msg_list => OKL_API.G_FALSE,
2402: x_return_status => x_return_status,
2403: x_msg_count => x_msg_count,
2404: x_msg_data => x_msg_data,
2405: p_contract_id => p_contract_id

Line 2407: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

2403: x_msg_count => x_msg_count,
2404: x_msg_data => x_msg_data,
2405: p_contract_id => p_contract_id
2406: );
2407: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
2408: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
2409: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2410: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
2411: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');

Line 2409: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

2405: p_contract_id => p_contract_id
2406: );
2407: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
2408: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
2409: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2410: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
2411: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
2412: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2413: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 2412: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

2408: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
2409: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2410: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
2411: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
2412: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2413: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2414: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
2415: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
2416: RAISE prin_date_range_rloan_failed;

Line 2413: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

2409: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2410: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
2411: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
2412: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2413: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2414: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
2415: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
2416: RAISE prin_date_range_rloan_failed;
2417: END IF;

Line 2614: x_return_status := OKL_API.G_RET_STS_ERROR;

2610:
2611: EXCEPTION
2612: WHEN prin_date_range_rloan_failed THEN
2613: print_error_message('print_date_range_rloan_failed Exception raised inside procedure PRIN_DATE_RANGE_VAR_INT_RLOAN');
2614: x_return_status := OKL_API.G_RET_STS_ERROR;
2615:
2616: WHEN OTHERS THEN
2617: print_error_message('Exception raised inside procedure PRIN_DATE_RANGE_VAR_INT_RLOAN');
2618: Okl_Api.SET_MESSAGE(

Line 2618: Okl_Api.SET_MESSAGE(

2614: x_return_status := OKL_API.G_RET_STS_ERROR;
2615:
2616: WHEN OTHERS THEN
2617: print_error_message('Exception raised inside procedure PRIN_DATE_RANGE_VAR_INT_RLOAN');
2618: Okl_Api.SET_MESSAGE(
2619: p_app_name => G_APP_NAME,
2620: p_msg_name => G_UNEXPECTED_ERROR,
2621: p_token1 => G_SQLCODE_TOKEN,
2622: p_token1_value => SQLCODE,

Line 2626: x_return_status := OKL_API.G_RET_STS_ERROR;

2622: p_token1_value => SQLCODE,
2623: p_token2 => G_SQLERRM_TOKEN,
2624: p_token2_value => SQLERRM);
2625:
2626: x_return_status := OKL_API.G_RET_STS_ERROR;
2627:
2628: END prin_date_range_var_int_rloan;
2629:
2630: ------------------------------------------------------------------------------

Line 2661: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2657:
2658: ------------------------------------------------------------------------------
2659: PROCEDURE prin_date_range_var_rate_ctr (
2660: p_api_version IN NUMBER,
2661: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2662: x_return_status OUT NOCOPY VARCHAR2,
2663: x_msg_count OUT NOCOPY NUMBER,
2664: x_msg_data OUT NOCOPY VARCHAR2,
2665: p_contract_id IN NUMBER,

Line 2686: x_return_status := OKL_API.G_RET_STS_SUCCESS;

2682: WHERE id = p_contract_id;
2683:
2684:
2685: BEGIN
2686: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2687:
2688: print_debug('Executing procedure PRIN_DATE_RANGE_VAR_RATE_CTR using following parameters : ');
2689: print_debug(' p_contract_id : '|| p_contract_id );
2690: print_debug(' p_line_id : '|| p_line_id );

Line 2714: p_init_msg_list => OKL_API.G_FALSE,

2710:
2711: IF (l_deal_type = 'LOAN') THEN
2712: prin_date_range_var_int_loan (
2713: p_api_version => 1.0,
2714: p_init_msg_list => OKL_API.G_FALSE,
2715: x_return_status => x_return_status,
2716: x_msg_count => x_msg_count,
2717: x_msg_data => x_msg_data,
2718: p_contract_id => p_contract_id,

Line 2725: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

2721: p_due_date => p_due_date,
2722: p_principal_basis => p_principal_basis,
2723: x_principal_balance_tbl => r_principal_balance_tbl);
2724:
2725: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2726: print_error_message('Unexpected error raised in call to PRIN_DATE_RANGE_VAR_INT_LOAN');
2727: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2728: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2729: print_error_message('Error raised in call to PRIN_DATE_RANGE_VAR_INT_LOAN');

Line 2727: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

2723: x_principal_balance_tbl => r_principal_balance_tbl);
2724:
2725: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2726: print_error_message('Unexpected error raised in call to PRIN_DATE_RANGE_VAR_INT_LOAN');
2727: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2728: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2729: print_error_message('Error raised in call to PRIN_DATE_RANGE_VAR_INT_LOAN');
2730: RAISE prin_date_range_failed;
2731: END IF;

Line 2728: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

2724:
2725: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2726: print_error_message('Unexpected error raised in call to PRIN_DATE_RANGE_VAR_INT_LOAN');
2727: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2728: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2729: print_error_message('Error raised in call to PRIN_DATE_RANGE_VAR_INT_LOAN');
2730: RAISE prin_date_range_failed;
2731: END IF;
2732:

Line 2736: p_init_msg_list => OKL_API.G_FALSE,

2732:
2733: ELSIF (l_deal_type = 'LOAN-REVOLVING') THEN
2734: prin_date_range_var_int_rloan (
2735: p_api_version => 1.0,
2736: p_init_msg_list => OKL_API.G_FALSE,
2737: x_return_status => x_return_status,
2738: x_msg_count => x_msg_count,
2739: x_msg_data => x_msg_data,
2740: p_contract_id => p_contract_id,

Line 2745: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

2741: p_line_id => p_line_id,
2742: p_start_date => p_start_date,
2743: p_due_date => p_due_date,
2744: x_principal_balance_tbl => r_principal_balance_tbl);
2745: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2746: print_error_message('Unexpected error raised in call to PRIN_DATE_RANGE_VAR_INT_RLOAN');
2747: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2748: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2749: print_error_message('Error raised in call to PRIN_DATE_RANGE_VAR_INT_LOAN');

Line 2747: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

2743: p_due_date => p_due_date,
2744: x_principal_balance_tbl => r_principal_balance_tbl);
2745: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2746: print_error_message('Unexpected error raised in call to PRIN_DATE_RANGE_VAR_INT_RLOAN');
2747: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2748: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2749: print_error_message('Error raised in call to PRIN_DATE_RANGE_VAR_INT_LOAN');
2750: RAISE prin_date_range_failed;
2751: END IF;

Line 2748: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

2744: x_principal_balance_tbl => r_principal_balance_tbl);
2745: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2746: print_error_message('Unexpected error raised in call to PRIN_DATE_RANGE_VAR_INT_RLOAN');
2747: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2748: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2749: print_error_message('Error raised in call to PRIN_DATE_RANGE_VAR_INT_LOAN');
2750: RAISE prin_date_range_failed;
2751: END IF;
2752: END IF;

Line 2759: x_return_status := OKL_API.G_RET_STS_ERROR;

2755:
2756: EXCEPTION
2757: WHEN prin_date_range_failed THEN
2758: print_error_message('prin_date_range_failed Exception raised in procedure PRIN_DATE_RANGE_VAR_INT_CTR');
2759: x_return_status := OKL_API.G_RET_STS_ERROR;
2760:
2761: WHEN OTHERS THEN
2762: print_error_message('Exception raised in procedure PRIN_DATE_RANGE_VAR_INT_CTR');
2763: Okl_Api.SET_MESSAGE(

Line 2763: Okl_Api.SET_MESSAGE(

2759: x_return_status := OKL_API.G_RET_STS_ERROR;
2760:
2761: WHEN OTHERS THEN
2762: print_error_message('Exception raised in procedure PRIN_DATE_RANGE_VAR_INT_CTR');
2763: Okl_Api.SET_MESSAGE(
2764: p_app_name => G_APP_NAME,
2765: p_msg_name => G_UNEXPECTED_ERROR,
2766: p_token1 => G_SQLCODE_TOKEN,
2767: p_token1_value => SQLCODE,

Line 2771: x_return_status := OKL_API.G_RET_STS_ERROR;

2767: p_token1_value => SQLCODE,
2768: p_token2 => G_SQLERRM_TOKEN,
2769: p_token2_value => SQLERRM);
2770:
2771: x_return_status := OKL_API.G_RET_STS_ERROR;
2772:
2773: END prin_date_range_var_rate_ctr;
2774: ------------------------------------------------------------------------------
2775: FUNCTION get_last_int_calc_date(p_khr_id IN NUMBER) RETURN DATE IS

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

2846: AND sty.lty_code = 'FREE_FORM1'
2847: AND cle.sts_code = sts.code
2848: AND sts.ste_code NOT IN ( 'HOLD', 'TERMINATED', 'EXPIRED', 'CANCELLED');
2849:
2850: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2851: l_next_start_date DATE := p_start_date;
2852: l_sel_date DATE;
2853: l_recurrence_date DATE := NULL;
2854: l_frequency okc_rules_b.object1_id1%type;

Line 2899: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS)THEN

2895: x_date => l_sel_date,
2896: x_return_status => l_return_status,
2897: p_recurrence_date => l_recurrence_date,
2898: p_arrears_pay_dates_option => 'FIRST_DAY_OF_NEXT_PERIOD');
2899: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS)THEN
2900: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2901: END IF;
2902:
2903: IF(l_sel_date > p_start_date) THEN

Line 2900: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2896: x_return_status => l_return_status,
2897: p_recurrence_date => l_recurrence_date,
2898: p_arrears_pay_dates_option => 'FIRST_DAY_OF_NEXT_PERIOD');
2899: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS)THEN
2900: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2901: END IF;
2902:
2903: IF(l_sel_date > p_start_date) THEN
2904: l_next_start_date := l_sel_date;

Line 2919: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2915:
2916:
2917: PROCEDURE interest_date_range (
2918: p_api_version IN NUMBER,
2919: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2920: x_return_status OUT NOCOPY VARCHAR2,
2921: x_msg_count OUT NOCOPY NUMBER,
2922: x_msg_data OUT NOCOPY VARCHAR2,
2923: p_contract_id IN NUMBER,

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

2930: -----------------------------------------------------------------
2931: -- Declare Process Variable
2932: -----------------------------------------------------------------
2933: l_api_name CONSTANT VARCHAR2(30) := 'interest_date_range';
2934: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2935:
2936: l_interest_rate_tbl interest_rate_tbl_type;
2937: l_start_date DATE;
2938: l_end_date DATE;

Line 3118: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

3114: CLOSE c_last_interest_calc_date;
3115:
3116: l_icx_date_format := NVL(fnd_profile.value('ICX_DATE_FORMAT_MASK'),'DD-MON-RRRR');
3117:
3118: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
3119: p_msg_name => 'OKL_VAR_INT_RATE_NOT_DEF',
3120: p_token1 => 'START_DATE',
3121: p_token1_value => TO_CHAR(p_start_date,l_icx_date_format),
3122: p_token2 => 'END_DATE',

Line 3128: RAISE Okl_Api.G_EXCEPTION_ERROR;

3124: p_token3 => 'LAST_INTEREST_CALC_DATE',
3125: p_token3_value => TO_CHAR(l_last_interest_calc_date,l_icx_date_format));
3126:
3127: print_error_message('Interest Rates not defined - Error raised in procedure get_eff_int_rate');
3128: RAISE Okl_Api.G_EXCEPTION_ERROR;
3129: END IF;
3130: --Bug# 14528742
3131:
3132: l_int_param_row := l_int_param_tbl.next(l_int_param_row);

Line 3140: WHEN OKL_API.G_EXCEPTION_ERROR THEN

3136: x_eff_int_tbl := l_eff_int_tbl;
3137: EXCEPTION
3138:
3139: --Bug# 14528742
3140: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3141: RAISE;
3142:
3143: WHEN OTHERS THEN
3144: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

Line 3144: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

3140: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3141: RAISE;
3142:
3143: WHEN OTHERS THEN
3144: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
3145: ,p_msg_name => G_UNEXPECTED_ERROR
3146: ,p_token1 => G_SQLCODE_TOKEN
3147: ,p_token1_value => SQLCODE
3148: ,p_token2 => G_SQLERRM_TOKEN

Line 3237: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

3233: print_debug('exiting function get_next_rate_change_date');
3234: RETURN l_next_rate_change_date;
3235: EXCEPTION
3236: WHEN OTHERS THEN
3237: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
3238: ,p_msg_name => G_UNEXPECTED_ERROR
3239: ,p_token1 => G_SQLCODE_TOKEN
3240: ,p_token1_value => SQLCODE
3241: ,p_token2 => G_SQLERRM_TOKEN

Line 3338: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

3334: x_eff_int_with_tol_tbl := l_eff_int_with_tol_tbl;
3335: print_debug('exiting procedure apply_tolerance');
3336: EXCEPTION
3337: WHEN OTHERS THEN
3338: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
3339: ,p_msg_name => G_UNEXPECTED_ERROR
3340: ,p_token1 => G_SQLCODE_TOKEN
3341: ,p_token1_value => SQLCODE
3342: ,p_token2 => G_SQLERRM_TOKEN

Line 3798: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

3794: x_return_status := l_return_status;
3795: Exception
3796:
3797: --Bug# 14528742
3798: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
3799: print_error_message('Exception raised in procedure interest_date_range');
3800: x_return_status := OKL_API.G_RET_STS_ERROR;
3801:
3802: WHEN OTHERS THEN

Line 3800: x_return_status := OKL_API.G_RET_STS_ERROR;

3796:
3797: --Bug# 14528742
3798: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
3799: print_error_message('Exception raised in procedure interest_date_range');
3800: x_return_status := OKL_API.G_RET_STS_ERROR;
3801:
3802: WHEN OTHERS THEN
3803: print_debug('sqlcode : ' || sqlcode || ' $ sqlerrm : ' || sqlerrm);
3804: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

Line 3804: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

3800: x_return_status := OKL_API.G_RET_STS_ERROR;
3801:
3802: WHEN OTHERS THEN
3803: print_debug('sqlcode : ' || sqlcode || ' $ sqlerrm : ' || sqlerrm);
3804: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
3805: p_api_name => l_api_name,
3806: p_pkg_name => G_PKG_NAME,
3807: p_exc_name => 'OTHERS',
3808: x_msg_count => x_msg_count,

Line 3818: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

3814: ------------------------------------------------------------------------------
3815:
3816: PROCEDURE interest_date_range (
3817: p_api_version IN NUMBER,
3818: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
3819: x_return_status OUT NOCOPY VARCHAR2,
3820: x_msg_count OUT NOCOPY NUMBER,
3821: x_msg_data OUT NOCOPY VARCHAR2,
3822: p_contract_id IN NUMBER,

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

3828: -----------------------------------------------------------------
3829: -- Declare Process Variable
3830: -----------------------------------------------------------------
3831: l_api_name CONSTANT VARCHAR2(30) := 'interest_date_range';
3832: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3833:
3834: l_interest_rate_tbl interest_rate_tbl_type;
3835: l_interest_rate_tbl_out interest_rate_tbl_type;
3836: l_int_tbl_row NUMBER := 0;

Line 3869: p_init_msg_list => OKL_API.G_FALSE,

3865: print_debug('end_date: ' || cur_param_rate.end_date);
3866: print_debug('rate_param_rowid: ' || cur_param_rate.rate_param_rowid);
3867: interest_date_range (
3868: p_api_version => 1.0,
3869: p_init_msg_list => OKL_API.G_FALSE,
3870: x_return_status => x_return_status,
3871: x_msg_count => x_msg_count,
3872: x_msg_data => x_msg_data,
3873: p_contract_id => p_contract_id,

Line 3880: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

3876: p_process_flag => p_process_flag,
3877: p_rate_param_rowid => cur_param_rate.rate_param_rowid,
3878: x_interest_rate_tbl => l_interest_rate_tbl);
3879:
3880: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3881: print_error_message('Unexpected error raised in call to INTEREST_DATE_RANGE');
3882: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3883: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3884: print_error_message('Error raised in call to INTEREST_DATE_RANGE');

Line 3882: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

3878: x_interest_rate_tbl => l_interest_rate_tbl);
3879:
3880: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3881: print_error_message('Unexpected error raised in call to INTEREST_DATE_RANGE');
3882: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3883: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3884: print_error_message('Error raised in call to INTEREST_DATE_RANGE');
3885: RAISE Okl_Api.G_EXCEPTION_ERROR;
3886: END IF;

Line 3883: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

3879:
3880: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3881: print_error_message('Unexpected error raised in call to INTEREST_DATE_RANGE');
3882: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3883: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3884: print_error_message('Error raised in call to INTEREST_DATE_RANGE');
3885: RAISE Okl_Api.G_EXCEPTION_ERROR;
3886: END IF;
3887:

Line 3885: RAISE Okl_Api.G_EXCEPTION_ERROR;

3881: print_error_message('Unexpected error raised in call to INTEREST_DATE_RANGE');
3882: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3883: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3884: print_error_message('Error raised in call to INTEREST_DATE_RANGE');
3885: RAISE Okl_Api.G_EXCEPTION_ERROR;
3886: END IF;
3887:
3888: print_debug('count in l_interest_rate_tbl: ' || l_interest_rate_tbl.count);
3889: l_int_tbl_row := l_interest_rate_tbl.first;

Line 3906: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

3902: print_debug('exiting procedure interest_date_range outer');
3903: Exception
3904:
3905: --Bug# 14528742
3906: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
3907: print_error_message('Exception raised in procedure interest_date_range');
3908: x_return_status := OKL_API.G_RET_STS_ERROR;
3909:
3910: WHEN OTHERS THEN

Line 3908: x_return_status := OKL_API.G_RET_STS_ERROR;

3904:
3905: --Bug# 14528742
3906: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
3907: print_error_message('Exception raised in procedure interest_date_range');
3908: x_return_status := OKL_API.G_RET_STS_ERROR;
3909:
3910: WHEN OTHERS THEN
3911: print_debug('sqlcode : ' || sqlcode || ' $ sqlerrm : ' || sqlerrm);
3912: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

Line 3912: x_return_status := OKL_API.HANDLE_EXCEPTIONS (

3908: x_return_status := OKL_API.G_RET_STS_ERROR;
3909:
3910: WHEN OTHERS THEN
3911: print_debug('sqlcode : ' || sqlcode || ' $ sqlerrm : ' || sqlerrm);
3912: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
3913: p_api_name => l_api_name,
3914: p_pkg_name => G_PKG_NAME,
3915: p_exc_name => 'OTHERS',
3916: x_msg_count => x_msg_count,

Line 3937: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

3933:
3934: ------------------------------------------------------------------------------
3935: Function calculate_interest (
3936: p_api_version IN NUMBER,
3937: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
3938: x_return_status OUT NOCOPY VARCHAR2,
3939: x_msg_count OUT NOCOPY NUMBER,
3940: x_msg_data OUT NOCOPY VARCHAR2,
3941: p_contract_id IN NUMBER,

Line 3973: x_return_status := OKL_API.G_RET_STS_SUCCESS;

3969: calculate_interest_failed EXCEPTION;
3970:
3971:
3972: BEGIN
3973: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3974:
3975: print_debug('Executing procedure CALCULATE_INTEREST using following parameters : ');
3976: print_debug(' p_contract_id : '|| p_contract_id );
3977: print_debug(' p_from_date : '|| to_char(p_from_date));

Line 3985: p_init_msg_list => OKL_API.G_FALSE,

3981:
3982: print_debug(' g_contract_id : '|| G_CONTRACT_ID );
3983:
3984: Initialize_contract_params( p_api_version => 1.0,
3985: p_init_msg_list => OKL_API.G_FALSE,
3986: x_return_status => x_return_status,
3987: x_msg_count => x_msg_count,
3988: x_msg_data => x_msg_data,
3989: p_contract_id => p_contract_id

Line 3991: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

3987: x_msg_count => x_msg_count,
3988: x_msg_data => x_msg_data,
3989: p_contract_id => p_contract_id
3990: );
3991: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
3992: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
3993: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3994: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
3995: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');

Line 3993: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

3989: p_contract_id => p_contract_id
3990: );
3991: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
3992: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
3993: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3994: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
3995: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
3996: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3997: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 3996: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

3992: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
3993: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3994: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
3995: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
3996: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3997: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3998: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
3999: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
4000: RAISE calculate_interest_failed;

Line 3997: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

3993: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3994: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
3995: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
3996: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3997: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3998: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
3999: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
4000: RAISE calculate_interest_failed;
4001: END IF;

Line 4016: p_init_msg_list => OKL_API.G_FALSE,

4012:
4013: --Bug# 14165508: Always pass the actual date
4014: interest_date_range (
4015: p_api_version => 1.0,
4016: p_init_msg_list => OKL_API.G_FALSE,
4017: x_return_status => x_return_status,
4018: x_msg_count => x_msg_count,
4019: x_msg_data => x_msg_data,
4020: p_contract_id => p_contract_id,

Line 4028: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

4024: x_interest_rate_tbl => l_interest_rate_tbl);
4025:
4026: -- end prasjain bug#5645266
4027:
4028: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
4029: print_error_message('Unexpected error raised in call to INTEREST_DATE_RANGE');
4030: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4031: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
4032: print_error_message('Error raised in call to INTEREST_DATE_RANGE');

Line 4030: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

4026: -- end prasjain bug#5645266
4027:
4028: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
4029: print_error_message('Unexpected error raised in call to INTEREST_DATE_RANGE');
4030: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4031: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
4032: print_error_message('Error raised in call to INTEREST_DATE_RANGE');
4033: RAISE calculate_interest_failed;
4034: END IF;

Line 4031: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

4027:
4028: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
4029: print_error_message('Unexpected error raised in call to INTEREST_DATE_RANGE');
4030: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4031: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
4032: print_error_message('Error raised in call to INTEREST_DATE_RANGE');
4033: RAISE calculate_interest_failed;
4034: END IF;
4035:

Line 4155: x_return_status := OKL_API.G_RET_STS_ERROR;

4151:
4152: EXCEPTION
4153: WHEN calculate_interest_failed THEN
4154: print_error_message('Exception calculate_interest_failed raised in function CALCULATE_INTEREST');
4155: x_return_status := OKL_API.G_RET_STS_ERROR;
4156: RETURN NULL;
4157: WHEN OTHERS THEN
4158: print_error_message('Exception raised in function CALCULATE_INTEREST');
4159: Okl_Api.SET_MESSAGE(

Line 4159: Okl_Api.SET_MESSAGE(

4155: x_return_status := OKL_API.G_RET_STS_ERROR;
4156: RETURN NULL;
4157: WHEN OTHERS THEN
4158: print_error_message('Exception raised in function CALCULATE_INTEREST');
4159: Okl_Api.SET_MESSAGE(
4160: p_app_name => G_APP_NAME,
4161: p_msg_name => G_UNEXPECTED_ERROR,
4162: p_token1 => G_SQLCODE_TOKEN,
4163: p_token1_value => SQLCODE,

Line 4166: x_return_status := OKL_API.G_RET_STS_ERROR;

4162: p_token1 => G_SQLCODE_TOKEN,
4163: p_token1_value => SQLCODE,
4164: p_token2 => G_SQLERRM_TOKEN,
4165: p_token2_value => SQLERRM);
4166: x_return_status := OKL_API.G_RET_STS_ERROR;
4167: RETURN NULL;
4168:
4169: END calculate_interest;
4170:

Line 4187: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

4183:
4184: ------------------------------------------------------------------------------
4185: Function Calc_Variable_Rate_Interest (
4186: p_api_version IN NUMBER,
4187: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
4188: x_return_status OUT NOCOPY VARCHAR2,
4189: x_msg_count OUT NOCOPY NUMBER,
4190: x_msg_data OUT NOCOPY VARCHAR2,
4191: p_contract_id IN NUMBER,

Line 4217: x_return_status := OKL_API.G_RET_STS_SUCCESS;

4213: print_debug('Executing function CALC_VARIABLE_RATE_INTEREST using following parameters : ');
4214: print_debug('p_contract_id : '|| p_contract_id );
4215: print_debug('p_currency_code : '|| p_currency_code);
4216:
4217: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4218: l_principal_balance_tbl := p_principal_balance_tbl;
4219: l_principal_bal_tbl_count := l_principal_balance_tbl.COUNT;
4220:
4221: print_debug ('No. of records in Principal balance table: '|| l_principal_bal_tbl_count);

Line 4235: p_init_msg_list => OKL_API.G_FALSE,

4231:
4232: IF (l_principal_balance_tbl(l_principal_bal_tbl_index).principal_balance > 0) THEN
4233: l_interest_amt := calculate_interest (
4234: p_api_version => 1.0,
4235: p_init_msg_list => OKL_API.G_FALSE,
4236: x_return_status => x_return_status,
4237: x_msg_count => x_msg_count,
4238: x_msg_data => x_msg_data,
4239: p_contract_id => p_contract_id,

Line 4247: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

4243: p_currency_code => p_currency_code,
4244: --Bug# 14165508
4245: p_conversion_factor => p_conversion_factor);
4246:
4247: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
4248: print_error_message('Unexpected error raised in call to CALCULATE_INTEREST');
4249: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4250: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
4251: print_error_message('Error raised in call to CALCULATE_INTEREST');

Line 4249: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

4245: p_conversion_factor => p_conversion_factor);
4246:
4247: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
4248: print_error_message('Unexpected error raised in call to CALCULATE_INTEREST');
4249: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4250: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
4251: print_error_message('Error raised in call to CALCULATE_INTEREST');
4252: RAISE Calc_Var_Rate_Int_failed;
4253: END IF;

Line 4250: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

4246:
4247: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
4248: print_error_message('Unexpected error raised in call to CALCULATE_INTEREST');
4249: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4250: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
4251: print_error_message('Error raised in call to CALCULATE_INTEREST');
4252: RAISE Calc_Var_Rate_Int_failed;
4253: END IF;
4254: ELSE

Line 4269: x_return_status := OKL_API.G_RET_STS_ERROR;

4265:
4266: EXCEPTION
4267: WHEN Calc_Var_Rate_Int_failed THEN
4268: print_error_message('Exception Calc_Var_Rate_Int_failed raised in function CALC_VARIABLE_RATE_INTEREST');
4269: x_return_status := OKL_API.G_RET_STS_ERROR;
4270: RETURN NULL;
4271:
4272: WHEN OTHERS THEN
4273: print_error_message('Exception raised in function CALC_VARIABLE_RATE_INTEREST');

Line 4274: Okl_Api.SET_MESSAGE(

4270: RETURN NULL;
4271:
4272: WHEN OTHERS THEN
4273: print_error_message('Exception raised in function CALC_VARIABLE_RATE_INTEREST');
4274: Okl_Api.SET_MESSAGE(
4275: p_app_name => G_APP_NAME,
4276: p_msg_name => G_UNEXPECTED_ERROR,
4277: p_token1 => G_SQLCODE_TOKEN,
4278: p_token1_value => SQLCODE,

Line 4281: x_return_status := OKL_API.G_RET_STS_ERROR;

4277: p_token1 => G_SQLCODE_TOKEN,
4278: p_token1_value => SQLCODE,
4279: p_token2 => G_SQLERRM_TOKEN,
4280: p_token2_value => SQLERRM);
4281: x_return_status := OKL_API.G_RET_STS_ERROR;
4282: RETURN NULL;
4283:
4284:
4285: END Calc_Variable_Rate_Interest;

Line 4303: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

4299:
4300: ------------------------------------------------------------------------------
4301: Procedure upd_vir_params_with_invoice (
4302: p_api_version IN NUMBER,
4303: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
4304: x_return_status OUT NOCOPY VARCHAR2,
4305: x_msg_count OUT NOCOPY NUMBER,
4306: x_msg_data OUT NOCOPY VARCHAR2,
4307: p_source_id IN NUMBER,

Line 4320: x_return_status := OKL_API.G_RET_STS_SUCCESS;

4316: l_api_version CONSTANT NUMBER := 1.0;
4317: l_index NUMBER := 0;
4318:
4319: BEGIN
4320: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4321: x_vir_tbl := p_vir_tbl;
4322:
4323: print_debug('Executing procedure UPD_VIR_PARAMS_WITH_INVOICE using following parameters : ');
4324: print_debug(' p_source_id : '|| p_source_id );

Line 4361: x_return_status := OKL_API.G_RET_STS_ERROR;

4357: EXCEPTION
4358:
4359: WHEN OTHERS THEN
4360: print_error_message('Exception raised in procedure UPD_VIR_PARAMS_WITH_INVOICE');
4361: x_return_status := OKL_API.G_RET_STS_ERROR;
4362: Okl_Api.SET_MESSAGE(
4363: p_app_name => G_APP_NAME,
4364: p_msg_name => G_UNEXPECTED_ERROR,
4365: p_token1 => G_SQLCODE_TOKEN,

Line 4362: Okl_Api.SET_MESSAGE(

4358:
4359: WHEN OTHERS THEN
4360: print_error_message('Exception raised in procedure UPD_VIR_PARAMS_WITH_INVOICE');
4361: x_return_status := OKL_API.G_RET_STS_ERROR;
4362: Okl_Api.SET_MESSAGE(
4363: p_app_name => G_APP_NAME,
4364: p_msg_name => G_UNEXPECTED_ERROR,
4365: p_token1 => G_SQLCODE_TOKEN,
4366: p_token1_value => SQLCODE,

Line 4447: Okl_Api.SET_MESSAGE(

4443: END LOOP;
4444: EXCEPTION
4445: WHEN OTHERS THEN
4446: print_error_message('Exception raised in procedure PRINT_VIR_TBL');
4447: Okl_Api.SET_MESSAGE(
4448: p_app_name => G_APP_NAME,
4449: p_msg_name => G_UNEXPECTED_ERROR,
4450: p_token1 => G_SQLCODE_TOKEN,
4451: p_token1_value => SQLCODE,

Line 4867: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

4863:
4864: ------------------------------------------------------------------------------
4865:
4866: PROCEDURE populate_txns ( p_api_version IN NUMBER,
4867: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
4868: p_khr_id IN NUMBER,
4869: p_from_date IN DATE,
4870: p_to_date IN DATE,
4871: x_return_status OUT NOCOPY VARCHAR2,

Line 5103: x_return_status := OKL_API.G_RET_STS_SUCCESS;

5099: AND vpb.int_cal_process = 'VARIABLE_INTEREST'
5100: AND vpb.source_id = adj.adjustment_id);
5101:
5102: BEGIN
5103: x_return_status := OKL_API.G_RET_STS_SUCCESS;
5104: print_debug('Executing procedure populate_txns');
5105:
5106: print_debug('Before fetching Rebook Transactions g_vpb_tbl count is: '|| g_vpb_tbl.COUNT);
5107: OPEN l_rebook_csr(p_khr_id);

Line 5882: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

5878: END IF;
5879: EXCEPTION
5880: WHEN OTHERS THEN
5881: print_error_message('Exception raised in procedure POPULATE_TXNS');
5882: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
5883: Okl_Api.SET_MESSAGE(
5884: p_app_name => G_APP_NAME,
5885: p_msg_name => G_UNEXPECTED_ERROR,
5886: p_token1 => G_SQLCODE_TOKEN,

Line 5883: Okl_Api.SET_MESSAGE(

5879: EXCEPTION
5880: WHEN OTHERS THEN
5881: print_error_message('Exception raised in procedure POPULATE_TXNS');
5882: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
5883: Okl_Api.SET_MESSAGE(
5884: p_app_name => G_APP_NAME,
5885: p_msg_name => G_UNEXPECTED_ERROR,
5886: p_token1 => G_SQLCODE_TOKEN,
5887: p_token1_value => SQLCODE,

Line 5954: Okl_Api.SET_MESSAGE(

5950: print_debug('End => Contents of p_vpb_tbl');
5951: EXCEPTION
5952: WHEN OTHERS THEN
5953: print_error_message('Exception raised in procedure PRINT_VPB_TBL');
5954: Okl_Api.SET_MESSAGE(
5955: p_app_name => G_APP_NAME,
5956: p_msg_name => G_UNEXPECTED_ERROR,
5957: p_token1 => G_SQLCODE_TOKEN,
5958: p_token1_value => SQLCODE,

Line 5979: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

5975:
5976: ------------------------------------------------------------------------------
5977: Procedure Create_Daily_Interest_Streams (
5978: p_api_version IN NUMBER,
5979: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
5980: x_return_status OUT NOCOPY VARCHAR2,
5981: x_msg_count OUT NOCOPY NUMBER,
5982: x_msg_data OUT NOCOPY VARCHAR2,
5983: p_contract_id IN NUMBER,

Line 5988: p_create_invoice_flag IN VARCHAR2 DEFAULT OKL_API.G_TRUE,

5984: p_line_id IN NUMBER DEFAULT NULL, -- not currently used
5985: p_amount IN NUMBER,
5986: p_due_date IN DATE,
5987: p_stream_type_purpose IN VARCHAR2,
5988: p_create_invoice_flag IN VARCHAR2 DEFAULT OKL_API.G_TRUE,
5989: p_process_flag IN VARCHAR2 DEFAULT NULL,
5990: p_currency_code IN VARCHAR2 DEFAULT NULL ) IS
5991:
5992: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_DAILY_INTEREST_STREAMS';

Line 6028: x_return_status := OKL_API.G_RET_STS_SUCCESS;

6024: print_debug(' p_stream_type_purpose : '||p_stream_type_purpose);
6025: print_debug(' p_create_invoice_flag: '|| p_create_invoice_flag);
6026: print_debug(' p_process_flag : '|| p_process_flag);
6027:
6028: x_return_status := OKL_API.G_RET_STS_SUCCESS;
6029:
6030: Initialize_contract_params( p_api_version => 1.0,
6031: p_init_msg_list => OKL_API.G_FALSE,
6032: x_return_status => x_return_status,

Line 6031: p_init_msg_list => OKL_API.G_FALSE,

6027:
6028: x_return_status := OKL_API.G_RET_STS_SUCCESS;
6029:
6030: Initialize_contract_params( p_api_version => 1.0,
6031: p_init_msg_list => OKL_API.G_FALSE,
6032: x_return_status => x_return_status,
6033: x_msg_count => x_msg_count,
6034: x_msg_data => x_msg_data,
6035: p_contract_id => p_contract_id

Line 6037: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

6033: x_msg_count => x_msg_count,
6034: x_msg_data => x_msg_data,
6035: p_contract_id => p_contract_id
6036: );
6037: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
6038: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
6039: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6040: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6041: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');

Line 6039: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6035: p_contract_id => p_contract_id
6036: );
6037: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
6038: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
6039: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6040: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6041: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6042: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6043: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 6042: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6038: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
6039: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6040: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6041: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6042: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6043: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6044: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
6045: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
6046: RAISE Create_Daily_Int_Str_failed;

Line 6043: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6039: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6040: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6041: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6042: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6043: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6044: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
6045: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
6046: RAISE Create_Daily_Int_Str_failed;
6047: END IF;

Line 6053: p_init_msg_list => OKL_API.G_FALSE,

6049: IF (p_stream_type_purpose = 'DAILY_INTEREST_INTEREST') THEN
6050:
6051: OKL_VR_DOCUMENT_PVT.Create_Stream_Invoice (
6052: p_api_version => 1.0,
6053: p_init_msg_list => OKL_API.G_FALSE,
6054: x_return_status => x_return_status,
6055: x_msg_count => x_msg_count,
6056: x_msg_data => x_msg_data,
6057: p_contract_id => p_contract_id,

Line 6068: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6064: p_parent_strm_element_id => NULL,
6065: x_invoice_id => l_invoice_id,
6066: x_stream_element_id => l_stream_element_id);
6067:
6068: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6069: print_error_message('Unexpected error raised in call to CREATE_STREAM_INVOICE');
6070: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6071: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6072: print_error_message('Error raised in call to CREATE_STREAM_INVOICE');

Line 6070: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6066: x_stream_element_id => l_stream_element_id);
6067:
6068: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6069: print_error_message('Unexpected error raised in call to CREATE_STREAM_INVOICE');
6070: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6071: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6072: print_error_message('Error raised in call to CREATE_STREAM_INVOICE');
6073: RAISE Create_Daily_Int_Str_failed;
6074: END IF;

Line 6071: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6067:
6068: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6069: print_error_message('Unexpected error raised in call to CREATE_STREAM_INVOICE');
6070: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6071: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6072: print_error_message('Error raised in call to CREATE_STREAM_INVOICE');
6073: RAISE Create_Daily_Int_Str_failed;
6074: END IF;
6075:

Line 6080: p_init_msg_list => OKL_API.G_TRUE,

6076: i_vir_tbl := g_vir_tbl;
6077:
6078: upd_vir_params_with_invoice (
6079: p_api_version => 1.0,
6080: p_init_msg_list => OKL_API.G_TRUE,
6081: x_return_status => x_return_status,
6082: x_msg_count => x_msg_count,
6083: x_msg_data => x_msg_data,
6084: p_source_id => l_stream_element_id,

Line 6087: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6083: x_msg_data => x_msg_data,
6084: p_source_id => l_stream_element_id,
6085: p_vir_tbl => i_vir_tbl,
6086: x_vir_tbl => r_vir_tbl);
6087: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6088: print_error_message('Unexpected error raised in call to UPD_VIR_PARAMS_WITH_INVOICE');
6089: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6090: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6091: print_error_message('Error raised in call to UPD_VIR_PARAMS_WITH_INVOICE');

Line 6089: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6085: p_vir_tbl => i_vir_tbl,
6086: x_vir_tbl => r_vir_tbl);
6087: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6088: print_error_message('Unexpected error raised in call to UPD_VIR_PARAMS_WITH_INVOICE');
6089: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6090: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6091: print_error_message('Error raised in call to UPD_VIR_PARAMS_WITH_INVOICE');
6092: RAISE Create_Daily_Int_Str_failed;
6093: END IF;

Line 6090: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6086: x_vir_tbl => r_vir_tbl);
6087: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6088: print_error_message('Unexpected error raised in call to UPD_VIR_PARAMS_WITH_INVOICE');
6089: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6090: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6091: print_error_message('Error raised in call to UPD_VIR_PARAMS_WITH_INVOICE');
6092: RAISE Create_Daily_Int_Str_failed;
6093: END IF;
6094:

Line 6099: p_init_msg_list => OKL_API.G_TRUE,

6095: g_vir_tbl := r_vir_tbl;
6096:
6097: OKL_VR_DATA_HANDLER_PVT.insert_vir_params(
6098: p_api_version => 1.0,
6099: p_init_msg_list => OKL_API.G_TRUE,
6100: x_return_status => x_return_status,
6101: x_msg_count => x_msg_count,
6102: x_msg_data => x_msg_data,
6103: p_vir_tbl => g_vir_tbl);

Line 6104: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6100: x_return_status => x_return_status,
6101: x_msg_count => x_msg_count,
6102: x_msg_data => x_msg_data,
6103: p_vir_tbl => g_vir_tbl);
6104: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6105: print_error_message('Unexpected error raised in call to POPULATE_VIR_PARAMS');
6106: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6107: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6108: print_error_message('Error raised in call to POPULATE_VIR_PARAMS');

Line 6106: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6102: x_msg_data => x_msg_data,
6103: p_vir_tbl => g_vir_tbl);
6104: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6105: print_error_message('Unexpected error raised in call to POPULATE_VIR_PARAMS');
6106: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6107: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6108: print_error_message('Error raised in call to POPULATE_VIR_PARAMS');
6109: RAISE Create_Daily_Int_Str_failed;
6110: END IF;

Line 6107: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6103: p_vir_tbl => g_vir_tbl);
6104: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6105: print_error_message('Unexpected error raised in call to POPULATE_VIR_PARAMS');
6106: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6107: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6108: print_error_message('Error raised in call to POPULATE_VIR_PARAMS');
6109: RAISE Create_Daily_Int_Str_failed;
6110: END IF;
6111:

Line 6122: p_init_msg_list => OKL_API.G_FALSE,

6118: LOOP
6119: -- Derive Asset Cost
6120: Okl_Execute_Formula_Pub.EXECUTE(
6121: p_api_version => 1.0,
6122: p_init_msg_list => OKL_API.G_FALSE,
6123: x_return_status => x_return_status,
6124: x_msg_count => x_msg_count,
6125: x_msg_data => x_msg_data,
6126: p_formula_name => 'LINE_OEC',

Line 6130: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

6126: p_formula_name => 'LINE_OEC',
6127: p_contract_id => p_contract_id,
6128: p_line_id => current_line.id,
6129: x_value => l_asset_cost);
6130: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
6131: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE completed successfully');
6132: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6133: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
6134: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');

Line 6132: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6128: p_line_id => current_line.id,
6129: x_value => l_asset_cost);
6130: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
6131: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE completed successfully');
6132: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6133: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
6134: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
6135: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6136: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 6135: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6131: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE completed successfully');
6132: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6133: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
6134: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
6135: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6136: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6137: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
6138: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
6139: RAISE Create_Daily_Int_Str_failed;

Line 6136: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6132: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6133: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
6134: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned unexpected error');
6135: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6136: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6137: print_debug ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
6138: print_error_message ('Procedure OKL_EXECUTE_FORMULA_PUB.EXECUTE returned exception');
6139: RAISE Create_Daily_Int_Str_failed;
6140: END IF;

Line 6165: p_init_msg_list => OKL_API.G_FALSE,

6161: print_debug('Creating DAILY_INTEREST_PRINCIPAL streams for asset id : ' || l_asset_line_tbl(l_index).id || ' for Amount :' || l_prorated_invoice_amt);
6162:
6163: OKL_VR_DOCUMENT_PVT.Create_Stream_Invoice (
6164: p_api_version => 1.0,
6165: p_init_msg_list => OKL_API.G_FALSE,
6166: x_return_status => x_return_status,
6167: x_msg_count => x_msg_count,
6168: x_msg_data => x_msg_data,
6169: p_contract_id => p_contract_id,

Line 6180: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6176: p_parent_strm_element_id => NULL,
6177: x_invoice_id => l_invoice_id,
6178: x_stream_element_id => l_stream_element_id);
6179:
6180: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6181: print_error_message('Unexpected error raised in call to CREATE_STREAM_INVOICE');
6182: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6183: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6184: print_error_message('Error raised in call to CREATE_STREAM_INVOICE');

Line 6182: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6178: x_stream_element_id => l_stream_element_id);
6179:
6180: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6181: print_error_message('Unexpected error raised in call to CREATE_STREAM_INVOICE');
6182: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6183: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6184: print_error_message('Error raised in call to CREATE_STREAM_INVOICE');
6185: RAISE Create_Daily_Int_Str_failed;
6186: END IF;

Line 6183: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6179:
6180: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6181: print_error_message('Unexpected error raised in call to CREATE_STREAM_INVOICE');
6182: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6183: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6184: print_error_message('Error raised in call to CREATE_STREAM_INVOICE');
6185: RAISE Create_Daily_Int_Str_failed;
6186: END IF;
6187: print_debug('Successfully created DAILY_INTEREST_PRINCIPAL streams for asset id : ' || l_asset_line_tbl(l_index).id || ' for Amount :' || l_prorated_invoice_amt);

Line 6196: p_init_msg_list => OKL_API.G_FALSE,

6192: print_debug('Creating DAILY_INTEREST_PRINCIPAL streams '|| ' for Amount :' || l_invoice_amt);
6193:
6194: OKL_VR_DOCUMENT_PVT.Create_Stream_Invoice (
6195: p_api_version => 1.0,
6196: p_init_msg_list => OKL_API.G_FALSE,
6197: x_return_status => x_return_status,
6198: x_msg_count => x_msg_count,
6199: x_msg_data => x_msg_data,
6200: p_contract_id => p_contract_id,

Line 6211: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6207: p_parent_strm_element_id => NULL,
6208: x_invoice_id => l_invoice_id,
6209: x_stream_element_id => l_stream_element_id);
6210:
6211: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6212: print_error_message('Unexpected error raised in call to CREATE_STREAM_INVOICE');
6213: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6214: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6215: print_error_message('Error raised in call to CREATE_STREAM_INVOICE');

Line 6213: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6209: x_stream_element_id => l_stream_element_id);
6210:
6211: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6212: print_error_message('Unexpected error raised in call to CREATE_STREAM_INVOICE');
6213: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6214: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6215: print_error_message('Error raised in call to CREATE_STREAM_INVOICE');
6216: RAISE Create_Daily_Int_Str_failed;
6217: END IF;

Line 6214: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6210:
6211: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6212: print_error_message('Unexpected error raised in call to CREATE_STREAM_INVOICE');
6213: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6214: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6215: print_error_message('Error raised in call to CREATE_STREAM_INVOICE');
6216: RAISE Create_Daily_Int_Str_failed;
6217: END IF;
6218: print_debug('Successfully created DAILY_INTEREST_PRINCIPAL streams ' || ' for Amount :' || l_invoice_amt);

Line 6226: x_return_status := OKL_API.G_RET_STS_ERROR;

6222:
6223: EXCEPTION
6224: WHEN Create_Daily_Int_Str_failed THEN
6225: print_error_message('Exception Create_Daily_Int_Str_failed raised in procedure CREATE_DAILY_INTEREST_STREAMS');
6226: x_return_status := OKL_API.G_RET_STS_ERROR;
6227: WHEN OTHERS THEN
6228: print_error_message('Exception raised in procedure CREATE_DAILY_INTEREST_STREAMS');
6229: x_return_status := OKL_API.G_RET_STS_ERROR;
6230: Okl_Api.SET_MESSAGE(

Line 6229: x_return_status := OKL_API.G_RET_STS_ERROR;

6225: print_error_message('Exception Create_Daily_Int_Str_failed raised in procedure CREATE_DAILY_INTEREST_STREAMS');
6226: x_return_status := OKL_API.G_RET_STS_ERROR;
6227: WHEN OTHERS THEN
6228: print_error_message('Exception raised in procedure CREATE_DAILY_INTEREST_STREAMS');
6229: x_return_status := OKL_API.G_RET_STS_ERROR;
6230: Okl_Api.SET_MESSAGE(
6231: p_app_name => G_APP_NAME,
6232: p_msg_name => G_UNEXPECTED_ERROR,
6233: p_token1 => G_SQLCODE_TOKEN,

Line 6230: Okl_Api.SET_MESSAGE(

6226: x_return_status := OKL_API.G_RET_STS_ERROR;
6227: WHEN OTHERS THEN
6228: print_error_message('Exception raised in procedure CREATE_DAILY_INTEREST_STREAMS');
6229: x_return_status := OKL_API.G_RET_STS_ERROR;
6230: Okl_Api.SET_MESSAGE(
6231: p_app_name => G_APP_NAME,
6232: p_msg_name => G_UNEXPECTED_ERROR,
6233: p_token1 => G_SQLCODE_TOKEN,
6234: p_token1_value => SQLCODE,

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

6267: p_conversion_factor IN NUMBER DEFAULT NULL) RETURN NUMBER IS
6268:
6269: l_api_version CONSTANT NUMBER := 1.0;
6270: l_api_name CONSTANT VARCHAR2(30) := 'CALCULATE_TOTAL_INTEREST_DUE';
6271: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
6272: l_interest_calculated NUMBER := 0;
6273: r_principal_balance_tbl principal_balance_tbl_typ;
6274: l_formula_name OKL_FORMULAE_V.name%TYPE;
6275: calc_total_int_due_failed EXCEPTION;

Line 6287: x_return_status := OKL_API.G_RET_STS_SUCCESS;

6283: ------------------------------------------------------------
6284: -- Start processing
6285: ------------------------------------------------------------
6286:
6287: x_return_status := OKL_API.G_RET_STS_SUCCESS;
6288:
6289: print_debug('Executing function CALCULATE_TOTAL_INTEREST_DUE using following parameters : ');
6290: print_debug('contract ID : '|| p_contract_id);
6291: print_debug('Currency Code : '|| p_currency_code);

Line 6300: p_init_msg_list => OKL_API.G_FALSE,

6296:
6297: G_CONTRACT_LINE_ID := p_line_id;
6298:
6299: Initialize_contract_params( p_api_version => 1.0,
6300: p_init_msg_list => OKL_API.G_FALSE,
6301: x_return_status => x_return_status,
6302: x_msg_count => x_msg_count,
6303: x_msg_data => x_msg_data,
6304: p_contract_id => p_contract_id

Line 6306: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

6302: x_msg_count => x_msg_count,
6303: x_msg_data => x_msg_data,
6304: p_contract_id => p_contract_id
6305: );
6306: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
6307: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
6308: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6309: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6310: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');

Line 6308: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6304: p_contract_id => p_contract_id
6305: );
6306: IF (x_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
6307: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
6308: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6309: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6310: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6311: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6312: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 6311: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6307: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS completed successfully');
6308: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6309: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6310: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6311: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6312: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6313: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
6314: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
6315: RAISE calc_total_int_due_failed;

Line 6312: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6308: ELSIF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6309: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6310: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned unexpected error');
6311: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6312: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6313: print_debug ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
6314: print_error_message ('Procedure INITIALIZE_CONTRACT_PARAMS returned exception');
6315: RAISE calc_total_int_due_failed;
6316: END IF;

Line 6324: p_init_msg_list => OKL_API.G_FALSE,

6320: IF (G_INTEREST_BASIS_CODE = 'SIMPLE') THEN
6321:
6322: prin_date_range_var_rate_ctr (
6323: p_api_version => 1.0,
6324: p_init_msg_list => OKL_API.G_FALSE,
6325: x_return_status => x_return_status,
6326: x_msg_count => x_msg_count,
6327: x_msg_data => x_msg_data,
6328: p_contract_id => p_contract_id,

Line 6334: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6330: p_start_date => p_start_date,
6331: p_due_date => p_due_date,
6332: p_principal_basis => p_principal_basis,
6333: x_principal_balance_tbl => r_principal_balance_tbl);
6334: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6335: print_error_message('Unexpected error raised in call to PRIN_DATE_RANGE_VAR_RATE_CTR');
6336: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6337: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6338: print_error_message('Error raised in call to PRIN_DATE_RANGE_VAR_RATE_CTR');

Line 6336: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6332: p_principal_basis => p_principal_basis,
6333: x_principal_balance_tbl => r_principal_balance_tbl);
6334: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6335: print_error_message('Unexpected error raised in call to PRIN_DATE_RANGE_VAR_RATE_CTR');
6336: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6337: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6338: print_error_message('Error raised in call to PRIN_DATE_RANGE_VAR_RATE_CTR');
6339: RAISE calc_total_int_due_failed;
6340: END IF;

Line 6337: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6333: x_principal_balance_tbl => r_principal_balance_tbl);
6334: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6335: print_error_message('Unexpected error raised in call to PRIN_DATE_RANGE_VAR_RATE_CTR');
6336: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6337: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6338: print_error_message('Error raised in call to PRIN_DATE_RANGE_VAR_RATE_CTR');
6339: RAISE calc_total_int_due_failed;
6340: END IF;
6341: print_debug ('Before call to Calc_Variable_Rate_Interest');

Line 6345: p_init_msg_list => OKL_API.G_FALSE,

6341: print_debug ('Before call to Calc_Variable_Rate_Interest');
6342:
6343: l_interest_calculated := Calc_Variable_Rate_Interest (
6344: p_api_version => p_api_version,
6345: p_init_msg_list => OKL_API.G_FALSE,
6346: x_return_status => x_return_status,
6347: x_msg_count => x_msg_count,
6348: x_msg_data => x_msg_data,
6349: p_contract_id => p_contract_id,

Line 6354: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6350: p_currency_code => p_currency_code,
6351: p_principal_balance_tbl => r_principal_balance_tbl,
6352: --Bug# 14165508
6353: p_conversion_factor => p_conversion_factor);
6354: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6355: print_error_message('Unexpected error raised in call to CALC_VARIABLE_RATE_INTEREST');
6356: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6357: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6358: print_error_message('Error raised in call to CALC_VARIABLE_RATE_INTEREST');

Line 6356: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6352: --Bug# 14165508
6353: p_conversion_factor => p_conversion_factor);
6354: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6355: print_error_message('Unexpected error raised in call to CALC_VARIABLE_RATE_INTEREST');
6356: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6357: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6358: print_error_message('Error raised in call to CALC_VARIABLE_RATE_INTEREST');
6359: RAISE calc_total_int_due_failed;
6360: END IF;

Line 6357: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6353: p_conversion_factor => p_conversion_factor);
6354: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6355: print_error_message('Unexpected error raised in call to CALC_VARIABLE_RATE_INTEREST');
6356: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6357: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6358: print_error_message('Error raised in call to CALC_VARIABLE_RATE_INTEREST');
6359: RAISE calc_total_int_due_failed;
6360: END IF;
6361: ELSE

Line 6373: p_init_msg_list => OKL_API.G_TRUE,

6369: CLOSE formula_csr;
6370:
6371: -- Derive Interest using formula
6372: Okl_Execute_Formula_Pub.EXECUTE(p_api_version => 1.0,
6373: p_init_msg_list => OKL_API.G_TRUE,
6374: x_return_status => x_return_status,
6375: x_msg_count => x_msg_count,
6376: x_msg_data => x_msg_data,
6377: p_formula_name => l_formula_name,

Line 6383: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6379: p_line_id => p_line_id,
6380: p_additional_parameters => Okl_Execute_Formula_Pub.g_additional_parameters, -- vsgandhi bug 13106699
6381: x_value => l_interest_calculated
6382: );
6383: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6384: print_error_message('Unexpected error raised in call to OKL_EXECUTE_FORMULA_PUB.EXECUTE');
6385: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6386: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6387: print_error_message('Error raised in call to OKL_EXECUTE_FORMULA_PUB.EXECUTE');

Line 6385: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6381: x_value => l_interest_calculated
6382: );
6383: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6384: print_error_message('Unexpected error raised in call to OKL_EXECUTE_FORMULA_PUB.EXECUTE');
6385: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6386: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6387: print_error_message('Error raised in call to OKL_EXECUTE_FORMULA_PUB.EXECUTE');
6388: RAISE calc_total_int_due_failed;
6389: END IF;

Line 6386: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6382: );
6383: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6384: print_error_message('Unexpected error raised in call to OKL_EXECUTE_FORMULA_PUB.EXECUTE');
6385: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6386: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6387: print_error_message('Error raised in call to OKL_EXECUTE_FORMULA_PUB.EXECUTE');
6388: RAISE calc_total_int_due_failed;
6389: END IF;
6390: END IF;

Line 6395: x_return_status := OKL_API.G_RET_STS_ERROR;

6391: RETURN l_interest_calculated;
6392: EXCEPTION
6393: WHEN calc_total_int_due_failed THEN
6394: print_error_message('Exception calc_total_int_due_failed raised in function CALCULATE_TOTAL_INTEREST_DUE');
6395: x_return_status := OKL_API.G_RET_STS_ERROR;
6396: RETURN -1;
6397: WHEN OTHERS THEN
6398: print_error_message('Exception raised in function CALCULATE_TOTAL_INTEREST_DUE');
6399: Okl_Api.SET_MESSAGE(

Line 6399: Okl_Api.SET_MESSAGE(

6395: x_return_status := OKL_API.G_RET_STS_ERROR;
6396: RETURN -1;
6397: WHEN OTHERS THEN
6398: print_error_message('Exception raised in function CALCULATE_TOTAL_INTEREST_DUE');
6399: Okl_Api.SET_MESSAGE(
6400: p_app_name => G_APP_NAME,
6401: p_msg_name => G_UNEXPECTED_ERROR,
6402: p_token1 => G_SQLCODE_TOKEN,
6403: p_token1_value => SQLCODE,

Line 6407: x_return_status := OKL_API.G_RET_STS_ERROR;

6403: p_token1_value => SQLCODE,
6404: p_token2 => G_SQLERRM_TOKEN,
6405: p_token2_value => SQLERRM);
6406:
6407: x_return_status := OKL_API.G_RET_STS_ERROR;
6408: RETURN -1;
6409: END calculate_total_interest_due;
6410:
6411: -----------------------------------------------------------------

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

6424: ------------------------------------------------------------
6425:
6426: l_api_version CONSTANT NUMBER := 1.0;
6427: l_api_name CONSTANT VARCHAR2(30) := 'VARIABLE_INTEREST';
6428: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
6429: l_msg_data VARCHAR2(2000);
6430: l_def_no_val CONSTANT NUMBER := -1;
6431: l_bill_date OKL_TRX_AR_INVOICES_V.date_invoiced%TYPE;
6432: l_kle_id OKL_TXL_AR_INV_LNS_V.kle_id%TYPE;

Line 6553: x_return_status := OKL_API.G_RET_STS_SUCCESS;

6549: ------------------------------------------------------------
6550: -- Start processing
6551: ------------------------------------------------------------
6552:
6553: x_return_status := OKL_API.G_RET_STS_SUCCESS;
6554:
6555: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
6556:
6557: print_debug ('g_request_id : '|| g_request_id);

Line 6667: p_init_msg_list => OKL_API.G_TRUE,

6663: BEGIN
6664: --Bug# 13447258: New API For Float Factor calculations
6665: OKL_VAR_INT_FLOAT_FACTOR_PVT.process_interest_float_factor(
6666: p_api_version => 1.0,
6667: p_init_msg_list => OKL_API.G_TRUE,
6668: x_return_status => l_return_status,
6669: x_msg_count => l_msg_count,
6670: x_msg_data => l_msg_data,
6671: p_contract_id => G_CONTRACT_ID,

Line 6675: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6671: p_contract_id => G_CONTRACT_ID,
6672: p_to_date => p_to_date,
6673: p_last_interest_cal_date => l_last_interest_cal_date,
6674: p_print_lead_days => l_print_lead_days);
6675: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6676: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_FLOAT_FACTOR');
6677: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6678: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6679: print_error_message('Error raised in call to PROCESS_INTEREST_FLOAT_FACTOR');

Line 6677: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6673: p_last_interest_cal_date => l_last_interest_cal_date,
6674: p_print_lead_days => l_print_lead_days);
6675: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6676: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_FLOAT_FACTOR');
6677: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6678: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6679: print_error_message('Error raised in call to PROCESS_INTEREST_FLOAT_FACTOR');
6680: RAISE variable_interest_failed;
6681: END IF;

Line 6678: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6674: p_print_lead_days => l_print_lead_days);
6675: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6676: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_FLOAT_FACTOR');
6677: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6678: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6679: print_error_message('Error raised in call to PROCESS_INTEREST_FLOAT_FACTOR');
6680: RAISE variable_interest_failed;
6681: END IF;
6682:

Line 6696: x_return_status := OKL_API.G_RET_STS_ERROR;

6692: p_last_int_calc_date => l_last_interest_cal_date,
6693: x_msg_count => x_msg_count,
6694: x_msg_data => x_msg_data);
6695:
6696: x_return_status := OKL_API.G_RET_STS_ERROR;
6697: END;
6698: ELSIF (G_INTEREST_CALCULATION_BASIS = G_INT_CALC_BASIS_REAMORT) THEN
6699: BEGIN
6700: --Bug# 13447258: New API For Reamort calculations

Line 6703: p_init_msg_list => OKL_API.G_TRUE,

6699: BEGIN
6700: --Bug# 13447258: New API For Reamort calculations
6701: OKL_VAR_INT_REAMORT_PVT.process_interest_reamort(
6702: p_api_version => 1.0,
6703: p_init_msg_list => OKL_API.G_TRUE,
6704: x_return_status => l_return_status,
6705: x_msg_count => l_msg_count,
6706: x_msg_data => l_msg_data,
6707: p_contract_id => G_CONTRACT_ID,

Line 6711: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6707: p_contract_id => G_CONTRACT_ID,
6708: p_to_date => p_to_date,
6709: p_last_interest_cal_date => l_last_interest_cal_date,
6710: p_print_lead_days => l_print_lead_days);
6711: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6712: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_REAMORT');
6713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6714: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6715: print_error_message('Error raised in call to PROCESS_INTEREST_REAMORT');

Line 6713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6709: p_last_interest_cal_date => l_last_interest_cal_date,
6710: p_print_lead_days => l_print_lead_days);
6711: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6712: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_REAMORT');
6713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6714: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6715: print_error_message('Error raised in call to PROCESS_INTEREST_REAMORT');
6716: RAISE variable_interest_failed;
6717: END IF;

Line 6714: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6710: p_print_lead_days => l_print_lead_days);
6711: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6712: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_REAMORT');
6713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6714: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6715: print_error_message('Error raised in call to PROCESS_INTEREST_REAMORT');
6716: RAISE variable_interest_failed;
6717: END IF;
6718:

Line 6732: x_return_status := OKL_API.G_RET_STS_ERROR;

6728: p_last_int_calc_date => l_last_interest_cal_date,
6729: x_msg_count => x_msg_count,
6730: x_msg_data => x_msg_data);
6731:
6732: x_return_status := OKL_API.G_RET_STS_ERROR;
6733: END;
6734: ELSIF (G_INTEREST_CALCULATION_BASIS = G_INT_CALC_BASIS_FLOAT) THEN
6735: BEGIN
6736: --Bug# 13447258: New API For Float calculations

Line 6739: p_init_msg_list => OKL_API.G_TRUE,

6735: BEGIN
6736: --Bug# 13447258: New API For Float calculations
6737: OKL_VAR_INT_FLOAT_PVT.process_interest_float(
6738: p_api_version => 1.0,
6739: p_init_msg_list => OKL_API.G_TRUE,
6740: x_return_status => l_return_status,
6741: x_msg_count => l_msg_count,
6742: x_msg_data => l_msg_data,
6743: p_contract_id => G_CONTRACT_ID,

Line 6747: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6743: p_contract_id => G_CONTRACT_ID,
6744: p_to_date => p_to_date,
6745: p_last_interest_cal_date => l_last_interest_cal_date,
6746: p_print_lead_days => l_print_lead_days);
6747: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6748: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_FLOAT');
6749: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6750: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6751: print_error_message('Error raised in call to PROCESS_INTEREST_FLOAT');

Line 6749: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6745: p_last_interest_cal_date => l_last_interest_cal_date,
6746: p_print_lead_days => l_print_lead_days);
6747: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6748: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_FLOAT');
6749: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6750: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6751: print_error_message('Error raised in call to PROCESS_INTEREST_FLOAT');
6752: RAISE variable_interest_failed;
6753: END IF;

Line 6750: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6746: p_print_lead_days => l_print_lead_days);
6747: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6748: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_FLOAT');
6749: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6750: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6751: print_error_message('Error raised in call to PROCESS_INTEREST_FLOAT');
6752: RAISE variable_interest_failed;
6753: END IF;
6754:

Line 6759: x_return_status := OKL_API.G_RET_STS_ERROR;

6755: g_no_of_successful_contracts := g_no_of_successful_contracts + 1;
6756: EXCEPTION
6757: WHEN OTHERS THEN
6758: g_no_of_rejected_contracts := g_no_of_rejected_contracts + 1;
6759: x_return_status := OKL_API.G_RET_STS_ERROR;
6760: l_end_of_process := TRUE;
6761: report_error (
6762: p_contract_number => l_contract_number,
6763: p_product_name => l_product_name,

Line 6775: p_init_msg_list => OKL_API.G_TRUE,

6771: BEGIN
6772: --Bug# 13447258: New API For Catchup-Cleanup calculations
6773: OKL_VAR_INT_CATCHUP_PVT.process_interest_catchup(
6774: p_api_version => 1.0,
6775: p_init_msg_list => OKL_API.G_TRUE,
6776: x_return_status => l_return_status,
6777: x_msg_count => l_msg_count,
6778: x_msg_data => l_msg_data,
6779: p_contract_id => G_CONTRACT_ID,

Line 6783: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

6779: p_contract_id => G_CONTRACT_ID,
6780: p_to_date => p_to_date,
6781: p_last_interest_cal_date => l_last_interest_cal_date,
6782: p_print_lead_days => l_print_lead_days);
6783: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6784: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_CATCHUP');
6785: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6786: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6787: print_error_message('Error raised in call to PROCESS_INTEREST_CATCHUP');

Line 6785: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

6781: p_last_interest_cal_date => l_last_interest_cal_date,
6782: p_print_lead_days => l_print_lead_days);
6783: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6784: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_CATCHUP');
6785: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6786: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6787: print_error_message('Error raised in call to PROCESS_INTEREST_CATCHUP');
6788: RAISE variable_interest_failed;
6789: END IF;

Line 6786: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

6782: p_print_lead_days => l_print_lead_days);
6783: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
6784: print_error_message('Unexpected error raised in call to PROCESS_INTEREST_CATCHUP');
6785: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
6786: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
6787: print_error_message('Error raised in call to PROCESS_INTEREST_CATCHUP');
6788: RAISE variable_interest_failed;
6789: END IF;
6790:

Line 6795: x_return_status := OKL_API.G_RET_STS_ERROR;

6791: g_no_of_successful_contracts := g_no_of_successful_contracts + 1;
6792: EXCEPTION
6793: WHEN OTHERS THEN
6794: g_no_of_rejected_contracts := g_no_of_rejected_contracts + 1;
6795: x_return_status := OKL_API.G_RET_STS_ERROR;
6796: l_end_of_process := TRUE;
6797: report_error (
6798: p_contract_number => l_contract_number,
6799: p_product_name => l_product_name,

Line 6877: x_return_status := OKL_API.G_RET_STS_ERROR;

6873: p_interest_calc_basis => G_INTEREST_CALCULATION_BASIS,
6874: p_last_int_calc_date => l_last_interest_cal_date,
6875: x_msg_count => x_msg_count,
6876: x_msg_data => x_msg_data);
6877: x_return_status := OKL_API.G_RET_STS_ERROR;
6878: ROLLBACK;
6879: END variable_interest;
6880: END;