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_AM_BTCH_EXP_LEASE_LOAN_PVT dependencies on OKL_API

Line 61: lx_error_rec okl_api.error_rec_type;

57: -- History : RMUNJULU 2730738 created for proper output file
58: --
59: -- End of comments
60: PROCEDURE pop_asset_msg_tbl IS
61: lx_error_rec okl_api.error_rec_type;
62: l_msg_idx INTEGER := g_first;
63: l_msg_tbl msg_tbl_type;
64: BEGIN
65: -- Get the messages in the log

Line 105: lx_error_rec okl_api.error_rec_type;

101: p_status IN VARCHAR2,
102: p_exp_recy IN VARCHAR2,
103: p_control_flag IN VARCHAR2
104: ) IS
105: lx_error_rec okl_api.error_rec_type;
106: l_msg_idx INTEGER := g_first;
107: l_msg_tbl msg_tbl_type;
108: -- akrangan added for debug feature start
109: l_module_name VARCHAR2 (500) := g_module_name || 'fnd_output';

Line 303: okl_api.set_message (p_app_name => okc_api.g_app_name,

299: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
300: || sqlcode || ' , SQLERRM : ' || sqlerrm);
301: END IF;
302: -- Set the oracle error message
303: okl_api.set_message (p_app_name => okc_api.g_app_name,
304: p_msg_name => g_unexpected_error,
305: p_token1 => g_sqlcode_token,
306: p_token1_value => SQLCODE,
307: p_token2 => g_sqlerrm_token,

Line 1090: okl_api.set_message (p_app_name => okc_api.g_app_name,

1086: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
1087: || sqlcode || ' , SQLERRM : ' || sqlerrm);
1088: END IF;
1089: -- Set the oracle error message
1090: okl_api.set_message (p_app_name => okc_api.g_app_name,
1091: p_msg_name => g_unexpected_error,
1092: p_token1 => g_sqlcode_token,
1093: p_token1_value => SQLCODE,
1094: p_token2 => g_sqlerrm_token,

Line 1189: okl_api.set_message (p_app_name => okc_api.g_app_name,

1185: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
1186: || sqlcode || ' , SQLERRM : ' || sqlerrm);
1187: END IF;
1188: -- Set the oracle error message
1189: okl_api.set_message (p_app_name => okc_api.g_app_name,
1190: p_msg_name => g_unexpected_error,
1191: p_token1 => g_sqlcode_token,
1192: p_token1_value => SQLCODE,
1193: p_token2 => g_sqlerrm_token,

Line 1220: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;

1216: WHERE khr_id = p_khr_id
1217: AND qst_code = 'ACCEPTED'
1218: AND (qtp_code LIKE 'TER%' OR qtp_code LIKE 'RES%');
1219:
1220: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
1221: l_id NUMBER;
1222: l_quotes_found VARCHAR2 (1) := 'N';
1223: -- akrangan added for debug feature start
1224: l_module_name VARCHAR2 (500)

Line 1277: okl_api.set_message (p_app_name => g_app_name_1,

1273: IF k_quotes_csr%ISOPEN THEN
1274: CLOSE k_quotes_csr;
1275: END IF;
1276:
1277: okl_api.set_message (p_app_name => g_app_name_1,
1278: p_msg_name => g_unexpected_error,
1279: p_token1 => g_sqlcode_token,
1280: p_token1_value => SQLCODE,
1281: p_token2 => g_sqlerrm_token,

Line 1284: x_return_status := okl_api.g_ret_sts_unexp_error;

1280: p_token1_value => SQLCODE,
1281: p_token2 => g_sqlerrm_token,
1282: p_token2_value => SQLERRM
1283: );
1284: x_return_status := okl_api.g_ret_sts_unexp_error;
1285: END check_if_quotes_existing;
1286:
1287: -- Start of comments
1288: --

Line 1371: x_return_status := okl_api.g_ret_sts_success;

1367: 'p_contract_id =' || p_contract_id
1368: );
1369: END IF;
1370:
1371: x_return_status := okl_api.g_ret_sts_success;
1372:
1373: -- set the trn_rec
1374: OPEN trn_rec_csr (p_contract_id);
1375:

Line 1424: x_return_status := okl_api.g_ret_sts_error;

1420: IF trn_rec_csr%ISOPEN THEN
1421: CLOSE trn_rec_csr;
1422: END IF;
1423:
1424: x_return_status := okl_api.g_ret_sts_error;
1425: x_tcnv_rec := lp_tcnv_rec;
1426: x_trn_exists := l_trn_exists;
1427: END get_trn_rec;
1428:

Line 1487: x_return_status := okl_api.g_ret_sts_success;

1483: is_debug_statement_on BOOLEAN
1484: := okl_debug_pub.check_log_on (l_module_name, g_level_statement);
1485: -- akrangan added for debug feature end
1486: BEGIN
1487: x_return_status := okl_api.g_ret_sts_success;
1488:
1489: IF (is_debug_procedure_on) THEN
1490: okl_debug_pub.log_debug (g_level_procedure,
1491: l_module_name,

Line 1553: x_return_status := okl_api.g_ret_sts_error;

1549: IF trn_rec_csr%ISOPEN THEN
1550: CLOSE trn_rec_csr;
1551: END IF;
1552:
1553: x_return_status := okl_api.g_ret_sts_error;
1554: x_tcnv_rec := lp_tcnv_rec;
1555: x_trn_exists := l_trn_exists;
1556: END get_trn_rec;
1557:

Line 1571: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,

1567: -- if trn_id is passed
1568: -- End of comments
1569: PROCEDURE process_termination (
1570: p_api_version IN NUMBER,
1571: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,
1572: x_return_status OUT NOCOPY VARCHAR2,
1573: x_msg_count OUT NOCOPY NUMBER,
1574: x_msg_data OUT NOCOPY VARCHAR2,
1575: p_term_rec IN term_rec_type,

Line 1586: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;

1582: lx_term_rec term_rec_type;
1583: lp_tcnv_rec tcnv_rec_type;
1584: lx_tcnv_rec tcnv_rec_type;
1585: l_quotes_found VARCHAR2 (1) := 'N';
1586: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
1587: l_trn_exists VARCHAR2 (1);
1588: lx_error_rec okl_api.error_rec_type;
1589: l_msg_idx INTEGER := fnd_msg_pub.g_first;
1590: l_quote_type VARCHAR2 (200);

Line 1588: lx_error_rec okl_api.error_rec_type;

1584: lx_tcnv_rec tcnv_rec_type;
1585: l_quotes_found VARCHAR2 (1) := 'N';
1586: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
1587: l_trn_exists VARCHAR2 (1);
1588: lx_error_rec okl_api.error_rec_type;
1589: l_msg_idx INTEGER := fnd_msg_pub.g_first;
1590: l_quote_type VARCHAR2 (200);
1591: l_quote_reason VARCHAR2 (200);
1592: -- akrangan added for debug feature start

Line 1603: okl_api.init_msg_list (p_init_msg_list);

1599: is_debug_statement_on BOOLEAN
1600: := okl_debug_pub.check_log_on (l_module_name, g_level_statement);
1601: -- akrangan added for debug feature end
1602: BEGIN
1603: okl_api.init_msg_list (p_init_msg_list);
1604:
1605: IF (is_debug_procedure_on) THEN
1606: okl_debug_pub.log_debug (g_level_procedure,
1607: l_module_name,

Line 1688: IF p_trn_id IS NOT NULL AND p_trn_id <> okl_api.g_miss_num THEN

1684: END IF;
1685:
1686: -- RMUNJULU 17-NOV-02 Bug # 2484327 Added the if condition
1687: -- If the p_trn_id is passed then from recycle
1688: IF p_trn_id IS NOT NULL AND p_trn_id <> okl_api.g_miss_num THEN
1689: IF (is_debug_statement_on) THEN
1690: okl_debug_pub.log_debug
1691: (g_level_statement,
1692: l_module_name,

Line 1741: IF (l_return_status <> okl_api.g_ret_sts_success) THEN

1737: END IF;
1738: END IF;
1739:
1740: -- If error then abort this contract
1741: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
1742: -- Error retrieving transactions for the contract CONTRACT_NUMBER.
1743: okl_api.set_message (p_app_name => 'OKL',
1744: p_msg_name => 'OKL_AM_ERR_GETTING_TRN',
1745: p_token1 => 'CONTRACT_NUMBER',

Line 1743: okl_api.set_message (p_app_name => 'OKL',

1739:
1740: -- If error then abort this contract
1741: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
1742: -- Error retrieving transactions for the contract CONTRACT_NUMBER.
1743: okl_api.set_message (p_app_name => 'OKL',
1744: p_msg_name => 'OKL_AM_ERR_GETTING_TRN',
1745: p_token1 => 'CONTRACT_NUMBER',
1746: p_token1_value => p_term_rec.p_contract_number
1747: );

Line 1758: lx_tcnv_rec.ID := okl_api.g_miss_num;

1754: lx_tcnv_rec := lp_tcnv_rec;
1755: -- Also set the qte_id of term_Rec
1756: lp_term_rec.p_quote_id := lx_tcnv_rec.qte_id;
1757: ELSE
1758: lx_tcnv_rec.ID := okl_api.g_miss_num;
1759: END IF;
1760:
1761: IF (is_debug_statement_on) THEN
1762: okl_debug_pub.log_debug (g_level_statement,

Line 1781: p_init_msg_list => okl_api.g_false,

1777:
1778: -- Call the lease loan terminate api
1779: okl_am_lease_loan_trmnt_pub.lease_loan_termination
1780: (p_api_version => p_api_version,
1781: p_init_msg_list => okl_api.g_false,
1782: x_return_status => l_return_status,
1783: x_msg_count => x_msg_count,
1784: x_msg_data => x_msg_data,
1785: p_term_rec => lp_term_rec,

Line 1829: IF (l_return_status <> okl_api.g_ret_sts_success) THEN

1825: END LOOP;
1826: */
1827:
1828: -- If error then abort this contract
1829: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
1830: RAISE g_exception_halt;
1831: END IF;
1832:
1833: x_return_status := l_return_status;

Line 1880: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,

1876: -- : rmunjulu 01-Dec-04 4016497 Added code to do processing when single K
1877: -- End of comments
1878: PROCEDURE batch_expire_lease_loan (
1879: p_api_version IN NUMBER,
1880: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,
1881: x_return_status OUT NOCOPY VARCHAR2,
1882: x_msg_count OUT NOCOPY NUMBER,
1883: x_msg_data OUT NOCOPY VARCHAR2,
1884: p_contract_id IN NUMBER DEFAULT okl_api.g_miss_num,

Line 1884: p_contract_id IN NUMBER DEFAULT okl_api.g_miss_num,

1880: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,
1881: x_return_status OUT NOCOPY VARCHAR2,
1882: x_msg_count OUT NOCOPY NUMBER,
1883: x_msg_data OUT NOCOPY VARCHAR2,
1884: p_contract_id IN NUMBER DEFAULT okl_api.g_miss_num,
1885: x_term_tbl OUT NOCOPY term_tbl_type
1886: ) IS
1887: -- Get the contract details for contract number passed
1888: -- RMUNJULU 05-MAR-03 Performance Fix Replaced K_HDR_FULL

Line 2059: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;

2055: db_sysdate DATE;
2056: i NUMBER := 1;
2057: j NUMBER := 1;
2058: l_chr_id NUMBER;
2059: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
2060: l_api_name VARCHAR2 (200) := 'batch_expire_lease_loan';
2061: l_overall_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
2062: -- RMUNJULU 2730738
2063: l_start_date DATE;

Line 2061: l_overall_status VARCHAR2 (1) := okl_api.g_ret_sts_success;

2057: j NUMBER := 1;
2058: l_chr_id NUMBER;
2059: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
2060: l_api_name VARCHAR2 (200) := 'batch_expire_lease_loan';
2061: l_overall_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
2062: -- RMUNJULU 2730738
2063: l_start_date DATE;
2064: l_end_date DATE;
2065: l_status VARCHAR2 (200);

Line 2101: x_return_status := okl_api.g_ret_sts_success;

2097: 'p_contract_id =' || p_contract_id
2098: );
2099: END IF;
2100:
2101: x_return_status := okl_api.g_ret_sts_success;
2102:
2103: SELECT SYSDATE
2104: INTO db_sysdate
2105: FROM DUAL;

Line 2108: IF p_contract_id IS NOT NULL AND p_contract_id <> okl_api.g_miss_num THEN

2104: INTO db_sysdate
2105: FROM DUAL;
2106:
2107: -- Check if value passed for contract number
2108: IF p_contract_id IS NOT NULL AND p_contract_id <> okl_api.g_miss_num THEN
2109: FOR single_k_rec IN single_k_csr (p_contract_id)
2110: LOOP
2111: -- set the term_rec_type of terminate_contract
2112: lp_term_rec.p_contract_id := p_contract_id;

Line 2250: p_init_msg_list => okl_api.g_true,

2246: );
2247: END IF;
2248:
2249: process_termination (p_api_version => p_api_version,
2250: p_init_msg_list => okl_api.g_true,
2251: x_return_status => l_return_status,
2252: x_msg_count => x_msg_count,
2253: x_msg_data => x_msg_data,
2254: p_term_rec => lp_term_rec,

Line 2348: IF (l_return_status <> okl_api.g_ret_sts_success) THEN

2344: -- set the out tbl termination date
2345: lx_term_tbl (i) := lx_term_rec;
2346:
2347: -- update the overall status only if l_return_status is not success
2348: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
2349: l_overall_status := l_return_status;
2350: END IF;
2351:
2352: -- rmunjulu 4016497

Line 2472: p_init_msg_list => okl_api.g_true,

2468: );
2469: END IF;
2470:
2471: process_termination (p_api_version => p_api_version,
2472: p_init_msg_list => okl_api.g_true,
2473: x_return_status => l_return_status,
2474: x_msg_count => x_msg_count,
2475: x_msg_data => x_msg_data,
2476: p_term_rec => lp_term_rec,

Line 2590: IF (l_return_status <> okl_api.g_ret_sts_success) THEN

2586: -- set the out tbl termination date
2587: lx_term_tbl (i) := lx_term_rec;
2588:
2589: -- update the overall status only if l_return_status is not success
2590: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
2591: l_overall_status := l_return_status;
2592: END IF;
2593:
2594: -- rmunjulu 4016497

Line 2795: p_init_msg_list => okl_api.g_true,

2791: );
2792: END IF;
2793:
2794: process_termination (p_api_version => p_api_version,
2795: p_init_msg_list => okl_api.g_true,
2796: x_return_status => l_return_status,
2797: x_msg_count => x_msg_count,
2798: x_msg_data => x_msg_data,
2799: p_term_rec => lp_term_rec,

Line 2912: IF (l_return_status <> okl_api.g_ret_sts_success) THEN

2908: -- set the out tbl termination date
2909: lx_term_tbl (i) := lx_term_rec;
2910:
2911: -- update the overall status only if l_return_status is not success
2912: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
2913: l_overall_status := l_return_status;
2914: END IF;
2915:
2916: -- increment i

Line 2962: p_init_msg_list => okl_api.g_true,

2958: );
2959: END IF;
2960:
2961: process_termination (p_api_version => p_api_version,
2962: p_init_msg_list => okl_api.g_true,
2963: x_return_status => l_return_status,
2964: x_msg_count => x_msg_count,
2965: x_msg_data => x_msg_data,
2966: p_term_rec => lp_term_rec,

Line 3077: IF (l_return_status <> okl_api.g_ret_sts_success) THEN

3073: -- set the out tbl termination date
3074: lx_term_tbl (i + j) := lx_term_rec;
3075:
3076: -- update the overall status only if l_return_status is not success
3077: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
3078: l_overall_status := l_return_status;
3079: END IF;
3080:
3081: -- increment i

Line 3094: WHEN okl_api.g_exception_error THEN

3090: IF (is_debug_procedure_on) THEN
3091: okl_debug_pub.log_debug (g_level_procedure, l_module_name, 'End(-)');
3092: END IF;
3093: EXCEPTION
3094: WHEN okl_api.g_exception_error THEN
3095: IF (is_debug_exception_on) THEN
3096: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_ERROR :' );
3097: END IF;
3098: x_return_status := okl_api.g_ret_sts_error;

Line 3098: x_return_status := okl_api.g_ret_sts_error;

3094: WHEN okl_api.g_exception_error THEN
3095: IF (is_debug_exception_on) THEN
3096: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_ERROR :' );
3097: END IF;
3098: x_return_status := okl_api.g_ret_sts_error;
3099: WHEN okl_api.g_exception_unexpected_error THEN
3100: IF (is_debug_exception_on) THEN
3101: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_UNEXPECTED_ERROR' );
3102: END IF;

Line 3099: WHEN okl_api.g_exception_unexpected_error THEN

3095: IF (is_debug_exception_on) THEN
3096: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_ERROR :' );
3097: END IF;
3098: x_return_status := okl_api.g_ret_sts_error;
3099: WHEN okl_api.g_exception_unexpected_error THEN
3100: IF (is_debug_exception_on) THEN
3101: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_UNEXPECTED_ERROR' );
3102: END IF;
3103: x_return_status := okl_api.g_ret_sts_unexp_error;

Line 3103: x_return_status := okl_api.g_ret_sts_unexp_error;

3099: WHEN okl_api.g_exception_unexpected_error THEN
3100: IF (is_debug_exception_on) THEN
3101: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_UNEXPECTED_ERROR' );
3102: END IF;
3103: x_return_status := okl_api.g_ret_sts_unexp_error;
3104: WHEN OTHERS THEN
3105: IF (is_debug_exception_on) THEN
3106: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
3107: || sqlcode || ' , SQLERRM : ' || sqlerrm);

Line 3109: okl_api.set_message (p_app_name => g_app_name_1,

3105: IF (is_debug_exception_on) THEN
3106: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
3107: || sqlcode || ' , SQLERRM : ' || sqlerrm);
3108: END IF;
3109: okl_api.set_message (p_app_name => g_app_name_1,
3110: p_msg_name => g_unexpected_error,
3111: p_token1 => g_sqlcode_token,
3112: p_token1_value => SQLCODE,
3113: p_token2 => g_sqlerrm_token,

Line 3116: x_return_status := okl_api.g_ret_sts_unexp_error;

3112: p_token1_value => SQLCODE,
3113: p_token2 => g_sqlerrm_token,
3114: p_token2_value => SQLERRM
3115: );
3116: x_return_status := okl_api.g_ret_sts_unexp_error;
3117: END batch_expire_lease_loan;
3118:
3119: -- Start of comments
3120: --

Line 3133: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,

3129: PROCEDURE concurrent_expire_lease_loan (
3130: errbuf OUT NOCOPY VARCHAR2,
3131: retcode OUT NOCOPY VARCHAR2,
3132: p_api_version IN NUMBER,
3133: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,
3134: p_contract_id IN NUMBER DEFAULT okl_api.g_miss_num
3135: ) IS
3136: l_return_status VARCHAR2 (1);
3137: l_msg_count NUMBER;

Line 3134: p_contract_id IN NUMBER DEFAULT okl_api.g_miss_num

3130: errbuf OUT NOCOPY VARCHAR2,
3131: retcode OUT NOCOPY VARCHAR2,
3132: p_api_version IN NUMBER,
3133: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,
3134: p_contract_id IN NUMBER DEFAULT okl_api.g_miss_num
3135: ) IS
3136: l_return_status VARCHAR2 (1);
3137: l_msg_count NUMBER;
3138: l_msg_data VARCHAR2 (2000);

Line 3143: lx_error_rec okl_api.error_rec_type;

3139: l_mesg VARCHAR2 (4000);
3140: l_mesg_len NUMBER;
3141: l_term_tbl term_tbl_type;
3142: lx_contract_status VARCHAR2 (200);
3143: lx_error_rec okl_api.error_rec_type;
3144: l_msg_idx INTEGER := fnd_msg_pub.g_first;
3145: -- akrangan added for debug feature start
3146: l_module_name VARCHAR2 (500)
3147: := g_module_name || 'concurrent_expire_lease_loan';

Line 3171: IF p_contract_id IS NOT NULL AND p_contract_id <> okl_api.g_miss_num THEN

3167: );
3168: END IF;
3169:
3170: -- Check if a single contract termination request
3171: IF p_contract_id IS NOT NULL AND p_contract_id <> okl_api.g_miss_num THEN
3172: /* -- rmunjulu BUG 4016497
3173: -- Check the validity of the contract
3174: OKL_AM_LEASE_LOAN_TRMNT_PUB.validate_contract(
3175: p_api_version => p_api_version,

Line 3187: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN -- Contract validity failed

3183: */
3184:
3185: /*
3186: -- Check if contract valid or not
3187: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN -- Contract validity failed
3188:
3189: fnd_file.put_line(fnd_file.log, 'Processing termination request from concurrent manager.');
3190: fnd_file.put_line(fnd_file.output, 'Processing termination request from concurrent manager.');
3191:

Line 3356: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,

3352:
3353: -- RMUNJULU PERF
3354: PROCEDURE batch_expire_lease_loan (
3355: p_api_version IN NUMBER,
3356: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,
3357: x_return_status OUT NOCOPY VARCHAR2,
3358: x_msg_count OUT NOCOPY NUMBER,
3359: x_msg_data OUT NOCOPY VARCHAR2,
3360: p_assigned_processes IN VARCHAR2,

Line 3386: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;

3382: db_sysdate DATE;
3383: i NUMBER := 1;
3384: j NUMBER := 1;
3385: l_chr_id NUMBER;
3386: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
3387: l_api_name VARCHAR2 (200) := 'batch_expire_lease_loan';
3388: l_overall_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
3389: l_start_date DATE;
3390: l_end_date DATE;

Line 3388: l_overall_status VARCHAR2 (1) := okl_api.g_ret_sts_success;

3384: j NUMBER := 1;
3385: l_chr_id NUMBER;
3386: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
3387: l_api_name VARCHAR2 (200) := 'batch_expire_lease_loan';
3388: l_overall_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
3389: l_start_date DATE;
3390: l_end_date DATE;
3391: l_status VARCHAR2 (200);
3392: l_control_flag VARCHAR2 (10);

Line 3530: p_init_msg_list => okl_api.g_true,

3526: END IF;
3527:
3528: process_termination
3529: (p_api_version => p_api_version,
3530: p_init_msg_list => okl_api.g_true,
3531: x_return_status => l_return_status,
3532: x_msg_count => x_msg_count,
3533: x_msg_data => x_msg_data,
3534: p_term_rec => lp_term_rec,

Line 3601: AND get_contracts_of_process_rec.trx_id <> okl_api.g_miss_num THEN

3597: END IF;
3598:
3599: -- rmunjulu for proper output need to tell if recy or exp
3600: IF get_contracts_of_process_rec.trx_id IS NOT NULL
3601: AND get_contracts_of_process_rec.trx_id <> okl_api.g_miss_num THEN
3602: IF (is_debug_statement_on) THEN
3603: okl_debug_pub.log_debug (g_level_statement,
3604: l_module_name,
3605: 'before fnd_output '

Line 3665: IF (l_return_status <> okl_api.g_ret_sts_success) THEN

3661: -- set the out tbl termination date
3662: lx_term_tbl (i) := lx_term_rec;
3663:
3664: -- update the overall status only if l_return_status is not success
3665: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
3666: l_overall_status := l_return_status;
3667: END IF;
3668:
3669: -- increment i

Line 3690: --p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

3686: errbuf OUT NOCOPY VARCHAR2,
3687: retcode OUT NOCOPY NUMBER,
3688: p_assigned_processes IN VARCHAR2 --,
3689: --p_api_version IN NUMBER,
3690: --p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
3691: ) IS
3692: l_return_status VARCHAR2 (1);
3693: l_msg_count NUMBER;
3694: l_msg_data VARCHAR2 (2000);

Line 3724: p_init_msg_list => okl_api.g_true,

3720: END IF;
3721:
3722: -- Terminate the contract -- call the new batch_expire procedure
3723: batch_expire_lease_loan (p_api_version => l_api_version,
3724: p_init_msg_list => okl_api.g_true,
3725: x_return_status => l_return_status,
3726: x_msg_count => l_msg_count,
3727: x_msg_data => l_msg_data,
3728: p_assigned_processes => p_assigned_processes,