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 2100: x_return_status := okl_api.g_ret_sts_success;

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

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

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

Line 2222: p_init_msg_list => okl_api.g_true,

2218: );
2219: END IF;
2220:
2221: process_termination (p_api_version => p_api_version,
2222: p_init_msg_list => okl_api.g_true,
2223: x_return_status => l_return_status,
2224: x_msg_count => x_msg_count,
2225: x_msg_data => x_msg_data,
2226: p_term_rec => lp_term_rec,

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

2316: -- set the out tbl termination date
2317: lx_term_tbl (i) := lx_term_rec;
2318:
2319: -- update the overall status only if l_return_status is not success
2320: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
2321: l_overall_status := l_return_status;
2322: END IF;
2323:
2324: -- rmunjulu 4016497

Line 2444: p_init_msg_list => okl_api.g_true,

2440: );
2441: END IF;
2442:
2443: process_termination (p_api_version => p_api_version,
2444: p_init_msg_list => okl_api.g_true,
2445: x_return_status => l_return_status,
2446: x_msg_count => x_msg_count,
2447: x_msg_data => x_msg_data,
2448: p_term_rec => lp_term_rec,

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

2558: -- set the out tbl termination date
2559: lx_term_tbl (i) := lx_term_rec;
2560:
2561: -- update the overall status only if l_return_status is not success
2562: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
2563: l_overall_status := l_return_status;
2564: END IF;
2565:
2566: -- rmunjulu 4016497

Line 2740: p_init_msg_list => okl_api.g_true,

2736: );
2737: END IF;
2738:
2739: process_termination (p_api_version => p_api_version,
2740: p_init_msg_list => okl_api.g_true,
2741: x_return_status => l_return_status,
2742: x_msg_count => x_msg_count,
2743: x_msg_data => x_msg_data,
2744: p_term_rec => lp_term_rec,

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

2853: -- set the out tbl termination date
2854: lx_term_tbl (i) := lx_term_rec;
2855:
2856: -- update the overall status only if l_return_status is not success
2857: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
2858: l_overall_status := l_return_status;
2859: END IF;
2860:
2861: -- increment i

Line 2907: p_init_msg_list => okl_api.g_true,

2903: );
2904: END IF;
2905:
2906: process_termination (p_api_version => p_api_version,
2907: p_init_msg_list => okl_api.g_true,
2908: x_return_status => l_return_status,
2909: x_msg_count => x_msg_count,
2910: x_msg_data => x_msg_data,
2911: p_term_rec => lp_term_rec,

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

3018: -- set the out tbl termination date
3019: lx_term_tbl (i + j) := lx_term_rec;
3020:
3021: -- update the overall status only if l_return_status is not success
3022: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
3023: l_overall_status := l_return_status;
3024: END IF;
3025:
3026: -- increment i

Line 3039: WHEN okl_api.g_exception_error THEN

3035: IF (is_debug_procedure_on) THEN
3036: okl_debug_pub.log_debug (g_level_procedure, l_module_name, 'End(-)');
3037: END IF;
3038: EXCEPTION
3039: WHEN okl_api.g_exception_error THEN
3040: IF (is_debug_exception_on) THEN
3041: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_ERROR :' );
3042: END IF;
3043: x_return_status := okl_api.g_ret_sts_error;

Line 3043: x_return_status := okl_api.g_ret_sts_error;

3039: WHEN okl_api.g_exception_error THEN
3040: IF (is_debug_exception_on) THEN
3041: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_ERROR :' );
3042: END IF;
3043: x_return_status := okl_api.g_ret_sts_error;
3044: WHEN okl_api.g_exception_unexpected_error THEN
3045: IF (is_debug_exception_on) THEN
3046: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_UNEXPECTED_ERROR' );
3047: END IF;

Line 3044: WHEN okl_api.g_exception_unexpected_error THEN

3040: IF (is_debug_exception_on) THEN
3041: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_ERROR :' );
3042: END IF;
3043: x_return_status := okl_api.g_ret_sts_error;
3044: WHEN okl_api.g_exception_unexpected_error THEN
3045: IF (is_debug_exception_on) THEN
3046: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_UNEXPECTED_ERROR' );
3047: END IF;
3048: x_return_status := okl_api.g_ret_sts_unexp_error;

Line 3048: x_return_status := okl_api.g_ret_sts_unexp_error;

3044: WHEN okl_api.g_exception_unexpected_error THEN
3045: IF (is_debug_exception_on) THEN
3046: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'G_EXCEPTION_UNEXPECTED_ERROR' );
3047: END IF;
3048: x_return_status := okl_api.g_ret_sts_unexp_error;
3049: WHEN OTHERS THEN
3050: IF (is_debug_exception_on) THEN
3051: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
3052: || sqlcode || ' , SQLERRM : ' || sqlerrm);

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

3050: IF (is_debug_exception_on) THEN
3051: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
3052: || sqlcode || ' , SQLERRM : ' || sqlerrm);
3053: END IF;
3054: okl_api.set_message (p_app_name => g_app_name_1,
3055: p_msg_name => g_unexpected_error,
3056: p_token1 => g_sqlcode_token,
3057: p_token1_value => SQLCODE,
3058: p_token2 => g_sqlerrm_token,

Line 3061: x_return_status := okl_api.g_ret_sts_unexp_error;

3057: p_token1_value => SQLCODE,
3058: p_token2 => g_sqlerrm_token,
3059: p_token2_value => SQLERRM
3060: );
3061: x_return_status := okl_api.g_ret_sts_unexp_error;
3062: END batch_expire_lease_loan;
3063:
3064: -- Start of comments
3065: --

Line 3078: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,

3074: PROCEDURE concurrent_expire_lease_loan (
3075: errbuf OUT NOCOPY VARCHAR2,
3076: retcode OUT NOCOPY VARCHAR2,
3077: p_api_version IN NUMBER,
3078: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,
3079: p_contract_id IN NUMBER DEFAULT okl_api.g_miss_num
3080: ) IS
3081: l_return_status VARCHAR2 (1);
3082: l_msg_count NUMBER;

Line 3079: p_contract_id IN NUMBER DEFAULT okl_api.g_miss_num

3075: errbuf OUT NOCOPY VARCHAR2,
3076: retcode OUT NOCOPY VARCHAR2,
3077: p_api_version IN NUMBER,
3078: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,
3079: p_contract_id IN NUMBER DEFAULT okl_api.g_miss_num
3080: ) IS
3081: l_return_status VARCHAR2 (1);
3082: l_msg_count NUMBER;
3083: l_msg_data VARCHAR2 (2000);

Line 3088: lx_error_rec okl_api.error_rec_type;

3084: l_mesg VARCHAR2 (4000);
3085: l_mesg_len NUMBER;
3086: l_term_tbl term_tbl_type;
3087: lx_contract_status VARCHAR2 (200);
3088: lx_error_rec okl_api.error_rec_type;
3089: l_msg_idx INTEGER := fnd_msg_pub.g_first;
3090: -- akrangan added for debug feature start
3091: l_module_name VARCHAR2 (500)
3092: := g_module_name || 'concurrent_expire_lease_loan';

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

3112: );
3113: END IF;
3114:
3115: -- Check if a single contract termination request
3116: IF p_contract_id IS NOT NULL AND p_contract_id <> okl_api.g_miss_num THEN
3117: /* -- rmunjulu BUG 4016497
3118: -- Check the validity of the contract
3119: OKL_AM_LEASE_LOAN_TRMNT_PUB.validate_contract(
3120: p_api_version => p_api_version,

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

3128: */
3129:
3130: /*
3131: -- Check if contract valid or not
3132: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN -- Contract validity failed
3133:
3134: fnd_file.put_line(fnd_file.log, 'Processing termination request from concurrent manager.');
3135: fnd_file.put_line(fnd_file.output, 'Processing termination request from concurrent manager.');
3136:

Line 3301: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,

3297:
3298: -- RMUNJULU PERF
3299: PROCEDURE batch_expire_lease_loan (
3300: p_api_version IN NUMBER,
3301: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false,
3302: x_return_status OUT NOCOPY VARCHAR2,
3303: x_msg_count OUT NOCOPY NUMBER,
3304: x_msg_data OUT NOCOPY VARCHAR2,
3305: p_assigned_processes IN VARCHAR2,

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

3327: db_sysdate DATE;
3328: i NUMBER := 1;
3329: j NUMBER := 1;
3330: l_chr_id NUMBER;
3331: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
3332: l_api_name VARCHAR2 (200) := 'batch_expire_lease_loan';
3333: l_overall_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
3334: l_start_date DATE;
3335: l_end_date DATE;

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

3329: j NUMBER := 1;
3330: l_chr_id NUMBER;
3331: l_return_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
3332: l_api_name VARCHAR2 (200) := 'batch_expire_lease_loan';
3333: l_overall_status VARCHAR2 (1) := okl_api.g_ret_sts_success;
3334: l_start_date DATE;
3335: l_end_date DATE;
3336: l_status VARCHAR2 (200);
3337: l_control_flag VARCHAR2 (10);

Line 3447: p_init_msg_list => okl_api.g_true,

3443: END IF;
3444:
3445: process_termination
3446: (p_api_version => p_api_version,
3447: p_init_msg_list => okl_api.g_true,
3448: x_return_status => l_return_status,
3449: x_msg_count => x_msg_count,
3450: x_msg_data => x_msg_data,
3451: p_term_rec => lp_term_rec,

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

3514: END IF;
3515:
3516: -- rmunjulu for proper output need to tell if recy or exp
3517: IF get_contracts_of_process_rec.trx_id IS NOT NULL
3518: AND get_contracts_of_process_rec.trx_id <> okl_api.g_miss_num THEN
3519: IF (is_debug_statement_on) THEN
3520: okl_debug_pub.log_debug (g_level_statement,
3521: l_module_name,
3522: 'before fnd_output '

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

3578: -- set the out tbl termination date
3579: lx_term_tbl (i) := lx_term_rec;
3580:
3581: -- update the overall status only if l_return_status is not success
3582: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
3583: l_overall_status := l_return_status;
3584: END IF;
3585:
3586: -- increment i

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

3603: errbuf OUT NOCOPY VARCHAR2,
3604: retcode OUT NOCOPY NUMBER,
3605: p_assigned_processes IN VARCHAR2 --,
3606: --p_api_version IN NUMBER,
3607: --p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
3608: ) IS
3609: l_return_status VARCHAR2 (1);
3610: l_msg_count NUMBER;
3611: l_msg_data VARCHAR2 (2000);

Line 3641: p_init_msg_list => okl_api.g_true,

3637: END IF;
3638:
3639: -- Terminate the contract -- call the new batch_expire procedure
3640: batch_expire_lease_loan (p_api_version => l_api_version,
3641: p_init_msg_list => okl_api.g_true,
3642: x_return_status => l_return_status,
3643: x_msg_count => l_msg_count,
3644: x_msg_data => l_msg_data,
3645: p_assigned_processes => p_assigned_processes,