DBA Data[Home] [Help]

APPS.OKL_CREATE_KLE_PVT dependencies on DUAL

Line 90: G_FORMULA_RES OKL_FORMULAE_V.NAME%TYPE := 'LINE_RESIDUAL_VALUE';

86: -- G_IB_TRY_NAME OKL_TRX_TYPES_V.NAME%TYPE := 'CREATE_IB_LINES';
87: -- G_TRY_TYPE OKL_TRX_TYPES_V.TRY_TYPE%TYPE := 'TIE';
88: G_FORMULA_OEC OKL_FORMULAE_V.NAME%TYPE := 'LINE_OEC';
89: G_FORMULA_CAP OKL_FORMULAE_V.NAME%TYPE := 'LINE_CAP_AMNT';
90: G_FORMULA_RES OKL_FORMULAE_V.NAME%TYPE := 'LINE_RESIDUAL_VALUE';
91: G_ID2 CONSTANT VARCHAR2(200) := '#';
92: G_TLS_TYPE OKC_LINE_STYLES_V.LSE_TYPE%TYPE := 'TLS';
93: G_SLS_TYPE OKC_LINE_STYLES_V.LSE_TYPE%TYPE := 'SLS';
94: G_LEASE_SCS_CODE OKC_K_HEADERS_V.SCS_CODE%TYPE := 'LEASE';

Line 166: FROM dual;

162: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
163: -- cursor to get sequence number for asset number
164: Cursor c_instance_no_ib IS
165: select TO_CHAR(OKL_IBN_SEQ.NEXTVAL)
166: FROM dual;
167: BEGIN
168: OPEN c_instance_no_ib;
169: FETCH c_instance_no_ib INTO x_instance_number_ib;
170: IF (c_instance_no_ib%NOTFOUND) Then

Line 206: FROM dual;

202: lv_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE;
203: -- cursor to get sequence number for asset number
204: Cursor c_asset_no IS
205: select 'OKL'||OKL_FAN_SEQ.NEXTVAL
206: FROM dual;
207:
208: -- cursor to get check the existence of asset number
209: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE)
210: IS

Line 212: --FROM DUAL

208: -- cursor to get check the existence of asset number
209: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE)
210: IS
211: SELECT 1
212: --FROM DUAL
213: --WHERE EXISTS (SELECT '1'
214: FROM OKL_TXL_ASSETS_B
215: WHERE asset_number = p_asset_number; --);
216:

Line 219: --FROM DUAL

215: WHERE asset_number = p_asset_number; --);
216:
217: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
218: SELECT 1
219: --FROM DUAL
220: --WHERE EXISTS (SELECT '1'
221: FROM OKX_ASSET_LINES_V
222: WHERE asset_number = p_asset_number; --); */
223:

Line 238: --FROM DUAL

234:
235:
236: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
237: SELECT 1
238: --FROM DUAL
239: --WHERE EXISTS (SELECT '1'
240: FROM OKX_ASSETS_V
241: WHERE asset_number = p_asset_number; --);
242:

Line 976: NEW_RESIDUAL_VALUE,

972: LAST_UPDATE_LOGIN,
973: DEPRECIATE_YN,
974: HOLD_PERIOD_DAYS,
975: OLD_SALVAGE_VALUE,
976: NEW_RESIDUAL_VALUE,
977: OLD_RESIDUAL_VALUE,
978: UNITS_RETIRED,
979: COST_RETIRED,
980: SALE_PROCEEDS,

Line 977: OLD_RESIDUAL_VALUE,

973: DEPRECIATE_YN,
974: HOLD_PERIOD_DAYS,
975: OLD_SALVAGE_VALUE,
976: NEW_RESIDUAL_VALUE,
977: OLD_RESIDUAL_VALUE,
978: UNITS_RETIRED,
979: COST_RETIRED,
980: SALE_PROCEEDS,
981: REMOVAL_COST,

Line 1061: x_txlv_rec.NEW_RESIDUAL_VALUE,

1057: x_txlv_rec.LAST_UPDATE_LOGIN,
1058: x_txlv_rec.DEPRECIATE_YN,
1059: x_txlv_rec.HOLD_PERIOD_DAYS,
1060: x_txlv_rec.OLD_SALVAGE_VALUE,
1061: x_txlv_rec.NEW_RESIDUAL_VALUE,
1062: x_txlv_rec.OLD_RESIDUAL_VALUE,
1063: x_txlv_rec.UNITS_RETIRED,
1064: x_txlv_rec.COST_RETIRED,
1065: x_txlv_rec.SALE_PROCEEDS,

Line 1062: x_txlv_rec.OLD_RESIDUAL_VALUE,

1058: x_txlv_rec.DEPRECIATE_YN,
1059: x_txlv_rec.HOLD_PERIOD_DAYS,
1060: x_txlv_rec.OLD_SALVAGE_VALUE,
1061: x_txlv_rec.NEW_RESIDUAL_VALUE,
1062: x_txlv_rec.OLD_RESIDUAL_VALUE,
1063: x_txlv_rec.UNITS_RETIRED,
1064: x_txlv_rec.COST_RETIRED,
1065: x_txlv_rec.SALE_PROCEEDS,
1066: x_txlv_rec.REMOVAL_COST,

Line 2197: RESIDUAL_PERCENTAGE,

2193: EVERGREEN_PERCENT,
2194: AMOUNT_STAKE,
2195: OCCUPANCY,
2196: COVERAGE,
2197: RESIDUAL_PERCENTAGE,
2198: DATE_LAST_INSPECTION,
2199: DATE_SOLD,
2200: LRV_AMOUNT,
2201: CAPITAL_REDUCTION,

Line 2203: DATE_RESIDUAL_LAST_REVIEW,

2199: DATE_SOLD,
2200: LRV_AMOUNT,
2201: CAPITAL_REDUCTION,
2202: DATE_NEXT_INSPECTION_DUE,
2203: DATE_RESIDUAL_LAST_REVIEW,
2204: DATE_LAST_REAMORTISATION,
2205: VENDOR_ADVANCE_PAID,
2206: WEIGHTED_AVERAGE_LIFE,
2207: TRADEIN_AMOUNT,

Line 2228: RESIDUAL_VALUE,

2224: REPURCHASED_AMOUNT,
2225: DATE_COMMITMENT_EXPIRATION,
2226: DATE_REPURCHASED,
2227: DATE_APPRAISAL,
2228: RESIDUAL_VALUE,
2229: APPRAISAL_VALUE,
2230: SECURED_DEAL_YN,
2231: GAIN_LOSS,
2232: FLOOR_AMOUNT,

Line 2235: TRACKED_RESIDUAL,

2231: GAIN_LOSS,
2232: FLOOR_AMOUNT,
2233: RE_LEASE_YN,
2234: PREVIOUS_CONTRACT,
2235: TRACKED_RESIDUAL,
2236: DATE_TITLE_RECEIVED,
2237: AMOUNT,
2238: ATTRIBUTE_CATEGORY,
2239: ATTRIBUTE1,

Line 2267: RESIDUAL_GRNTY_AMOUNT,

2263: DATE_ACCEPTED,
2264: DATE_DELIVERY_EXPECTED,
2265: OEC,
2266: CAPITAL_AMOUNT,
2267: RESIDUAL_GRNTY_AMOUNT,
2268: RESIDUAL_CODE,
2269: RVI_PREMIUM,
2270: CREDIT_NATURE,
2271: CAPITALIZED_INTEREST,

Line 2268: RESIDUAL_CODE,

2264: DATE_DELIVERY_EXPECTED,
2265: OEC,
2266: CAPITAL_AMOUNT,
2267: RESIDUAL_GRNTY_AMOUNT,
2268: RESIDUAL_CODE,
2269: RVI_PREMIUM,
2270: CREDIT_NATURE,
2271: CAPITALIZED_INTEREST,
2272: CAPITAL_REDUCTION_PERCENT,

Line 2340: x_klev_rec.RESIDUAL_PERCENTAGE,

2336: x_klev_rec.EVERGREEN_PERCENT,
2337: x_klev_rec.AMOUNT_STAKE,
2338: x_klev_rec.OCCUPANCY,
2339: x_klev_rec.COVERAGE,
2340: x_klev_rec.RESIDUAL_PERCENTAGE,
2341: x_klev_rec.DATE_LAST_INSPECTION,
2342: x_klev_rec.DATE_SOLD,
2343: x_klev_rec.LRV_AMOUNT,
2344: x_klev_rec.CAPITAL_REDUCTION,

Line 2346: x_klev_rec.DATE_RESIDUAL_LAST_REVIEW,

2342: x_klev_rec.DATE_SOLD,
2343: x_klev_rec.LRV_AMOUNT,
2344: x_klev_rec.CAPITAL_REDUCTION,
2345: x_klev_rec.DATE_NEXT_INSPECTION_DUE,
2346: x_klev_rec.DATE_RESIDUAL_LAST_REVIEW,
2347: x_klev_rec.DATE_LAST_REAMORTISATION,
2348: x_klev_rec.VENDOR_ADVANCE_PAID,
2349: x_klev_rec.WEIGHTED_AVERAGE_LIFE,
2350: x_klev_rec.TRADEIN_AMOUNT,

Line 2371: x_klev_rec.RESIDUAL_VALUE,

2367: x_klev_rec.REPURCHASED_AMOUNT,
2368: x_klev_rec.DATE_COMMITMENT_EXPIRATION,
2369: x_klev_rec.DATE_REPURCHASED,
2370: x_klev_rec.DATE_APPRAISAL,
2371: x_klev_rec.RESIDUAL_VALUE,
2372: x_klev_rec.APPRAISAL_VALUE,
2373: x_klev_rec.SECURED_DEAL_YN,
2374: x_klev_rec.GAIN_LOSS,
2375: x_klev_rec.FLOOR_AMOUNT,

Line 2378: x_klev_rec.TRACKED_RESIDUAL,

2374: x_klev_rec.GAIN_LOSS,
2375: x_klev_rec.FLOOR_AMOUNT,
2376: x_klev_rec.RE_LEASE_YN,
2377: x_klev_rec.PREVIOUS_CONTRACT,
2378: x_klev_rec.TRACKED_RESIDUAL,
2379: x_klev_rec.DATE_TITLE_RECEIVED,
2380: x_klev_rec.AMOUNT,
2381: x_klev_rec.ATTRIBUTE_CATEGORY,
2382: x_klev_rec.ATTRIBUTE1,

Line 2410: x_klev_rec.RESIDUAL_GRNTY_AMOUNT,

2406: x_klev_rec.DATE_ACCEPTED,
2407: x_klev_rec.DATE_DELIVERY_EXPECTED,
2408: x_klev_rec.OEC,
2409: x_klev_rec.CAPITAL_AMOUNT,
2410: x_klev_rec.RESIDUAL_GRNTY_AMOUNT,
2411: x_klev_rec.RESIDUAL_CODE,
2412: x_klev_rec.RVI_PREMIUM,
2413: x_klev_rec.CREDIT_NATURE,
2414: x_klev_rec.CAPITALIZED_INTEREST,

Line 2411: x_klev_rec.RESIDUAL_CODE,

2407: x_klev_rec.DATE_DELIVERY_EXPECTED,
2408: x_klev_rec.OEC,
2409: x_klev_rec.CAPITAL_AMOUNT,
2410: x_klev_rec.RESIDUAL_GRNTY_AMOUNT,
2411: x_klev_rec.RESIDUAL_CODE,
2412: x_klev_rec.RVI_PREMIUM,
2413: x_klev_rec.CREDIT_NATURE,
2414: x_klev_rec.CAPITALIZED_INTEREST,
2415: x_klev_rec.CAPITAL_REDUCTION_PERCENT,

Line 2517: --FROM DUAL

2513: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
2514: p_kle_Id OKL_TXL_ASSETS_V.KLE_ID%TYPE)
2515: IS
2516: SELECT 1
2517: --FROM DUAL
2518: --WHERE EXISTS (SELECT '1'
2519: FROM OKL_TXL_ASSETS_B
2520: WHERE asset_number = p_asset_number
2521: AND kle_id <> p_kle_id; --);

Line 2525: --FROM DUAL

2521: AND kle_id <> p_kle_id; --);
2522:
2523: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2524: SELECT 1
2525: --FROM DUAL
2526: --WHERE EXISTS (SELECT '1'
2527: FROM OKX_ASSET_LINES_V
2528: WHERE asset_number = p_asset_number; --);
2529:

Line 2532: --FROM DUAL

2528: WHERE asset_number = p_asset_number; --);
2529:
2530: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2531: SELECT 1
2532: --FROM DUAL
2533: --WHERE EXISTS (SELECT '1'
2534: FROM OKX_ASSETS_V
2535: WHERE asset_number = p_asset_number; --);
2536:

Line 2539: --FROM DUAL

2535: WHERE asset_number = p_asset_number; --);
2536:
2537: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2538: SELECT 1
2539: --FROM DUAL
2540: --WHERE EXISTS (SELECT '1'
2541: FROM OKL_TRX_ASSETS TAS,
2542: OKL_TXL_ASSETS_V TXL,
2543: OKL_TXD_ASSETS_V TXD

Line 2593: -- Check whether asset residual value is securitized

2589: END IF;
2590: CLOSE c_check_release_asset;
2591:
2592: --
2593: -- Check whether asset residual value is securitized
2594: -- If so, do not allow release of the asset
2595: --
2596: IF (upper(lv_release_asset) = 'Y') THEN
2597: okl_transaction_pvt.check_contract_securitized(

Line 2605: p_stream_type_class => 'RESIDUAL',

2601: x_msg_count => x_msg_count,
2602: x_msg_data => x_msg_data,
2603: p_chr_id => p_dnz_chr_id,
2604: p_cle_id => p_kle_id,
2605: p_stream_type_class => 'RESIDUAL',
2606: p_trx_date => SYSDATE
2607: );
2608:
2609: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

Line 2857: --FROM DUAL

2853: lv_release_asset OKC_RULES_V.RULE_INFORMATION1%TYPE := 'N';
2854:
2855: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2856: SELECT 1
2857: --FROM DUAL
2858: --WHERE EXISTS (SELECT '1'
2859: FROM OKL_TXL_ASSETS_B
2860: WHERE asset_number = p_asset_number; --);
2861: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

Line 2863: --FROM DUAL

2859: FROM OKL_TXL_ASSETS_B
2860: WHERE asset_number = p_asset_number; --);
2861: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2862: SELECT 1
2863: --FROM DUAL
2864: --WHERE EXISTS (SELECT '1'
2865: FROM OKX_ASSET_LINES_V
2866: WHERE asset_number = p_asset_number; --); */
2867: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

Line 2880: --FROM DUAL

2876: );
2877:
2878: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2879: SELECT 1
2880: --FROM DUAL
2881: --WHERE EXISTS (SELECT '1'
2882: FROM OKX_ASSETS_V
2883: WHERE asset_number = p_asset_number; --);
2884:

Line 2887: --FROM DUAL

2883: WHERE asset_number = p_asset_number; --);
2884:
2885: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2886: SELECT 1
2887: --FROM DUAL
2888: --WHERE EXISTS (SELECT '1'
2889: FROM OKL_TRX_ASSETS TAS,
2890: OKL_TXL_ASSETS_V TXL,
2891: OKL_TXD_ASSETS_V TXD

Line 3063: --FROM DUAL

3059: CURSOR c_asset_lines_dtls_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
3060: p_tax_book OKL_TXD_ASSETS_B.TAX_BOOK%TYPE,
3061: p_tal_id OKL_TXL_ASSETS_B.ID%TYPE) is
3062: SELECT 1
3063: --FROM DUAL
3064: --WHERE EXISTS (SELECT '1'
3065: FROM OKL_TXD_ASSETS_B txd,
3066: OKL_TXL_ASSETS_B txl
3067: WHERE txl.asset_number = p_asset_number

Line 3151: --FROM DUAL

3147: p_inst_num_ib IN OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) IS
3148: ln_dummy number := 0;
3149: CURSOR c_inst_num_ib_validate(p_inst_ib OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) is
3150: SELECT 1
3151: --FROM DUAL
3152: --WHERE EXISTS (SELECT '1'
3153: FROM OKL_TXL_ITM_INSTS
3154: WHERE instance_number_ib = p_inst_ib; --);
3155:

Line 3412: --FROM DUAL

3408: x_return_status OUT NOCOPY VARCHAR2) IS
3409: ln_dummy NUMBER := 0;
3410: CURSOR c_dnz_chr_id_validate(p_dnz_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE) IS
3411: SELECT 1
3412: --FROM DUAL
3413: --WHERE EXISTS (SELECT 1
3414: FROM OKC_K_HEADERS_B chrv
3415: WHERE chrv.id = p_dnz_chr_id; --);
3416: BEGIN

Line 3694: --FROM dual

3690: x_return_status OUT NOCOPY VARCHAR2) IS
3691: ln_dummy NUMBER := 0;
3692: CURSOR c_kle_id_validate(p_kle_id OKL_TXL_ASSETS_V.KLE_ID%TYPE) IS
3693: SELECT 1
3694: --FROM dual
3695: --WHERE EXISTS (SELECT '1'
3696: FROM OKL_TXL_ASSETS_V
3697: WHERE kle_id = p_kle_id; --);
3698: BEGIN

Line 3761: --FROM dual

3757: x_return_status OUT NOCOPY VARCHAR2) IS
3758: ln_dummy NUMBER := 0;
3759: CURSOR c_iti_kle_id_validate(p_kle_id OKL_TXL_ITM_INSTS_V.KLE_ID%TYPE) IS
3760: SELECT 1
3761: --FROM dual
3762: --WHERE EXISTS (SELECT '1'
3763: FROM OKL_TXL_ITM_INSTS_V
3764: WHERE kle_id = p_kle_id; --);
3765: BEGIN

Line 5903: --FROM DUAL

5899: p_id2 OKX_ASSETS_V.ID2%TYPE,
5900: p_dnz_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE)
5901: IS
5902: SELECT 1
5903: --FROM DUAL
5904: --WHERE EXISTS (SELECT '1'
5905: FROM OKX_ASSET_LINES_V
5906: WHERE id1 = p_id1
5907: AND id2 = p_id2

Line 9257: x_res_value OUT NOCOPY OKL_K_LINES_V.RESIDUAL_VALUE%TYPE,

9253: p_top_line_id IN OKC_K_LINES_V.ID%TYPE, -- 4414408
9254: p_dnz_chr_id IN OKC_K_LINES_V.DNZ_CHR_ID%TYPE,
9255: x_fin_clev_rec OUT NOCOPY clev_rec_type,
9256: x_fin_klev_rec OUT NOCOPY klev_rec_type,
9257: x_res_value OUT NOCOPY OKL_K_LINES_V.RESIDUAL_VALUE%TYPE,
9258: p_validate_fin_line IN VARCHAR2 DEFAULT OKL_API.G_TRUE) IS
9259:
9260: ln_res_value OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
9261: -- ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;

Line 9260: ln_res_value OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;

9256: x_fin_klev_rec OUT NOCOPY klev_rec_type,
9257: x_res_value OUT NOCOPY OKL_K_LINES_V.RESIDUAL_VALUE%TYPE,
9258: p_validate_fin_line IN VARCHAR2 DEFAULT OKL_API.G_TRUE) IS
9259:
9260: ln_res_value OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
9261: -- ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
9262: l_update_clev_rec clev_rec_type;
9263: l_update_klev_rec klev_rec_type;
9264: -- 4414408

Line 9311: -- to get the Residual value

9307: -- RAISE G_EXCEPTION_HALT_VALIDATION;
9308: -- END IF;
9309: CLOSE c_model_top_line;
9310: */
9311: -- to get the Residual value
9312: /*
9313: x_res_value := OKL_SEEDED_FUNCTIONS_PVT.line_residualvalue(p_chr_id => p_dnz_chr_id,
9314: p_line_id => ln_top_line_id);
9315: */

Line 9313: x_res_value := OKL_SEEDED_FUNCTIONS_PVT.line_residualvalue(p_chr_id => p_dnz_chr_id,

9309: CLOSE c_model_top_line;
9310: */
9311: -- to get the Residual value
9312: /*
9313: x_res_value := OKL_SEEDED_FUNCTIONS_PVT.line_residualvalue(p_chr_id => p_dnz_chr_id,
9314: p_line_id => ln_top_line_id);
9315: */
9316:
9317: OKL_EXECUTE_FORMULA_PUB.execute(p_api_version => p_api_version,

Line 9330: p_token1_value => 'Residual Value');

9326: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9327: OKL_API.set_message(p_app_name => G_APP_NAME,
9328: p_msg_name => G_CALC_AMOUNT,
9329: p_token1 => G_AMT_TOKEN,
9330: p_token1_value => 'Residual Value');
9331: RAISE G_EXCEPTION_HALT_VALIDATION;
9332: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9333: OKL_API.set_message(p_app_name => G_APP_NAME,
9334: p_msg_name => G_CALC_AMOUNT,

Line 9336: p_token1_value => 'Residual Value');

9332: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9333: OKL_API.set_message(p_app_name => G_APP_NAME,
9334: p_msg_name => G_CALC_AMOUNT,
9335: p_token1 => G_AMT_TOKEN,
9336: p_token1_value => 'Residual Value');
9337: RAISE G_EXCEPTION_HALT_VALIDATION;
9338: END IF;
9339: -- To Get the cle top Line Record
9340: x_return_status := get_rec_clev(p_top_line_id, -- 4414408

Line 9378: -- l_update_klev_rec.residual_value := round(x_res_value,2);

9374: RAISE G_EXCEPTION_HALT_VALIDATION;
9375: END IF;
9376: -- commented for multi currency requirement. No need to round the value, as
9377: -- it is taken care in the call to accounting util package called below.
9378: -- l_update_klev_rec.residual_value := round(x_res_value,2);
9379: l_update_klev_rec.residual_value := x_res_value;
9380:
9381: -- Modified by rravikir
9382: -- Call to Accounting Util package to address Multi Currency requirement

Line 9379: l_update_klev_rec.residual_value := x_res_value;

9375: END IF;
9376: -- commented for multi currency requirement. No need to round the value, as
9377: -- it is taken care in the call to accounting util package called below.
9378: -- l_update_klev_rec.residual_value := round(x_res_value,2);
9379: l_update_klev_rec.residual_value := x_res_value;
9380:
9381: -- Modified by rravikir
9382: -- Call to Accounting Util package to address Multi Currency requirement
9383: -- Start

Line 9384: l_update_klev_rec.residual_value :=

9380:
9381: -- Modified by rravikir
9382: -- Call to Accounting Util package to address Multi Currency requirement
9383: -- Start
9384: l_update_klev_rec.residual_value :=
9385: OKL_ACCOUNTING_UTIL.CROSS_CURRENCY_ROUND_AMOUNT(l_update_klev_rec.residual_value,
9386: l_update_clev_rec.currency_code);
9387:
9388: IF (x_res_value <> 0 AND l_update_klev_rec.residual_value = 0) THEN

Line 9385: OKL_ACCOUNTING_UTIL.CROSS_CURRENCY_ROUND_AMOUNT(l_update_klev_rec.residual_value,

9381: -- Modified by rravikir
9382: -- Call to Accounting Util package to address Multi Currency requirement
9383: -- Start
9384: l_update_klev_rec.residual_value :=
9385: OKL_ACCOUNTING_UTIL.CROSS_CURRENCY_ROUND_AMOUNT(l_update_klev_rec.residual_value,
9386: l_update_clev_rec.currency_code);
9387:
9388: IF (x_res_value <> 0 AND l_update_klev_rec.residual_value = 0) THEN
9389: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 9388: IF (x_res_value <> 0 AND l_update_klev_rec.residual_value = 0) THEN

9384: l_update_klev_rec.residual_value :=
9385: OKL_ACCOUNTING_UTIL.CROSS_CURRENCY_ROUND_AMOUNT(l_update_klev_rec.residual_value,
9386: l_update_clev_rec.currency_code);
9387:
9388: IF (x_res_value <> 0 AND l_update_klev_rec.residual_value = 0) THEN
9389: OKL_API.set_message(p_app_name => G_APP_NAME,
9390: p_msg_name => G_AMOUNT_ROUNDING,
9391: p_token1 => 'AMT',
9392: p_token1_value => to_char(x_res_value));

Line 9460: p_res_value IN OKL_K_LINES_V.RESIDUAL_VALUE%TYPE,

9456: x_msg_count OUT NOCOPY NUMBER,
9457: x_msg_data OUT NOCOPY VARCHAR2,
9458: P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
9459: p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
9460: p_res_value IN OKL_K_LINES_V.RESIDUAL_VALUE%TYPE,
9461: p_oec IN OKL_K_LINES_V.OEC%TYPE,
9462: p_top_line_id IN OKC_K_LINES_V.ID%TYPE,
9463: p_dnz_chr_id IN OKC_K_LINES_V.DNZ_CHR_ID%TYPE,
9464: x_fin_clev_rec OUT NOCOPY clev_rec_type,

Line 9468: ln_res_per OKL_K_LINES_V.RESIDUAL_PERCENTAGE%TYPE := 0;

9464: x_fin_clev_rec OUT NOCOPY clev_rec_type,
9465: x_fin_klev_rec OUT NOCOPY klev_rec_type,
9466: p_validate_fin_line IN VARCHAR2 DEFAULT OKL_API.G_TRUE) IS
9467:
9468: ln_res_per OKL_K_LINES_V.RESIDUAL_PERCENTAGE%TYPE := 0;
9469: ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
9470: l_update_clev_rec clev_rec_type;
9471: l_update_klev_rec klev_rec_type;
9472:

Line 9488: -- Modified this condition to calculate residual percent

9484: p_token1_value => 'Chr_id,top_line');
9485: RAISE G_EXCEPTION_STOP_VALIDATION;
9486: END IF;
9487: -- gboomina bug 6139003 - Start
9488: -- Modified this condition to calculate residual percent
9489: -- only for valid values
9490: IF (p_oec IS NOT NULL AND
9491: p_oec <> OKL_API.G_MISS_NUM) AND
9492: (p_res_value IS NOT NULL AND

Line 9539: l_update_klev_rec.residual_percentage := ln_res_per;

9535: OKL_API.set_message(p_app_name => G_APP_NAME,
9536: p_msg_name => G_LINE_RECORD);
9537: RAISE G_EXCEPTION_HALT_VALIDATION;
9538: END IF;
9539: l_update_klev_rec.residual_percentage := ln_res_per;
9540: Update_fin_line(p_api_version => p_api_version,
9541: p_init_msg_list => p_init_msg_list,
9542: x_return_status => x_return_status,
9543: x_msg_count => x_msg_count,

Line 10336: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;

10332: ln_add_cle_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10333: ln_add_dnz_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE := 0;
10334: ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10335: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
10336: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
10337: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
10338:
10339: -- To Find out the Top line ID
10340: CURSOR c_model_top_line(p_model_line_id OKC_K_LINES_V.ID%TYPE,

Line 10512: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

10508: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10509: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10510: RAISE OKL_API.G_EXCEPTION_ERROR;
10511: END IF;
10512: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
10513: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
10514: p_init_msg_list => p_init_msg_list,
10515: x_return_status => x_return_status,
10516: x_msg_count => x_msg_count,

Line 10621: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;

10617: ln_add_cle_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10618: ln_add_dnz_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE := 0;
10619: ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10620: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
10621: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
10622: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
10623:
10624: -- To Find out the Top line ID
10625: CURSOR c_model_top_line(p_model_line_id OKC_K_LINES_V.ID%TYPE,

Line 10759: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

10755: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10756: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10757: RAISE OKL_API.G_EXCEPTION_ERROR;
10758: END IF;
10759: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
10760: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
10761: p_init_msg_list => p_init_msg_list,
10762: x_return_status => x_return_status,
10763: x_msg_count => x_msg_count,

Line 10868: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;

10864: ln_add_dnz_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE := 0;
10865: ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10866: l_clev_tbl clev_tbl_type;
10867: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
10868: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
10869: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
10870:
10871: -- To Find out the Top line ID
10872: CURSOR c_model_top_line(p_model_line_id OKC_K_LINES_V.ID%TYPE,

Line 10994: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

10990: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10991: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10992: RAISE OKL_API.G_EXCEPTION_ERROR;
10993: END IF;
10994: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
10995: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
10996: p_init_msg_list => p_init_msg_list,
10997: x_return_status => x_return_status,
10998: x_msg_count => x_msg_count,

Line 13260: --update financial asset line for OEC and residual value

13256: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13257: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13258: END IF;
13259:
13260: --update financial asset line for OEC and residual value
13261: l_clev_rec.id := l_new_finasst_id;
13262: l_klev_rec.id := l_new_finasst_id;
13263: l_clev_rec.price_unit := OKL_API.G_MISS_NUM;
13264: l_klev_rec.residual_percentage := l_corpbook_rec.percent_salvage_value;

Line 13264: l_klev_rec.residual_percentage := l_corpbook_rec.percent_salvage_value;

13260: --update financial asset line for OEC and residual value
13261: l_clev_rec.id := l_new_finasst_id;
13262: l_klev_rec.id := l_new_finasst_id;
13263: l_clev_rec.price_unit := OKL_API.G_MISS_NUM;
13264: l_klev_rec.residual_percentage := l_corpbook_rec.percent_salvage_value;
13265: l_klev_rec.residual_value := l_corpbook_rec.salvage_value;
13266: --BUG : 3569441
13267: l_klev_rec.oec := l_nbv;
13268: --l_klev_rec.oec := l_corpbook_rec.depreciation_cost;

Line 13265: l_klev_rec.residual_value := l_corpbook_rec.salvage_value;

13261: l_clev_rec.id := l_new_finasst_id;
13262: l_klev_rec.id := l_new_finasst_id;
13263: l_clev_rec.price_unit := OKL_API.G_MISS_NUM;
13264: l_klev_rec.residual_percentage := l_corpbook_rec.percent_salvage_value;
13265: l_klev_rec.residual_value := l_corpbook_rec.salvage_value;
13266: --BUG : 3569441
13267: l_klev_rec.oec := l_nbv;
13268: --l_klev_rec.oec := l_corpbook_rec.depreciation_cost;
13269:

Line 14126: --Local procedure to resolve residual value on release

14122:
14123:
14124: --Bug# 3533936
14125: ---------------------------------------------------------
14126: --Local procedure to resolve residual value on release
14127: --asset line
14128: --------------------------------------------------------
14129: PROCEDURE Resolve_Residual_Value(
14130: p_api_version IN NUMBER,

Line 14129: PROCEDURE Resolve_Residual_Value(

14125: ---------------------------------------------------------
14126: --Local procedure to resolve residual value on release
14127: --asset line
14128: --------------------------------------------------------
14129: PROCEDURE Resolve_Residual_Value(
14130: p_api_version IN NUMBER,
14131: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
14132: x_return_status OUT NOCOPY VARCHAR2,
14133: x_msg_count OUT NOCOPY NUMBER,

Line 14150: l_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;

14146:
14147:
14148: l_top_line_id OKC_K_LINES_B.ID%TYPE;
14149: l_oec OKL_K_LINES.OEC%TYPE;
14150: l_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;
14151: lx_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;
14152:
14153:
14154: --cursor to get model line id

Line 14151: lx_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;

14147:
14148: l_top_line_id OKC_K_LINES_B.ID%TYPE;
14149: l_oec OKL_K_LINES.OEC%TYPE;
14150: l_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;
14151: lx_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;
14152:
14153:
14154: --cursor to get model line id
14155: CURSOR l_modelline_csr(p_cle_id IN NUMBER,

Line 14213: IF (p_klev_fin_rec.residual_percentage IS NOT NULL OR

14209: RAISE Okc_Api.G_EXCEPTION_ERROR;
14210: End If;
14211: Close l_modelline_csr;
14212:
14213: IF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14214: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14215: (p_klev_fin_rec.residual_value IS NOT NULL OR
14216: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14217:

Line 14214: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND

14210: End If;
14211: Close l_modelline_csr;
14212:
14213: IF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14214: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14215: (p_klev_fin_rec.residual_value IS NOT NULL OR
14216: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14217:
14218: l_top_line_id := p_clev_fin_rec.id;

Line 14215: (p_klev_fin_rec.residual_value IS NOT NULL OR

14211: Close l_modelline_csr;
14212:
14213: IF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14214: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14215: (p_klev_fin_rec.residual_value IS NOT NULL OR
14216: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14217:
14218: l_top_line_id := p_clev_fin_rec.id;
14219: --Bug# 4631549

Line 14216: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN

14212:
14213: IF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14214: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14215: (p_klev_fin_rec.residual_value IS NOT NULL OR
14216: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14217:
14218: l_top_line_id := p_clev_fin_rec.id;
14219: --Bug# 4631549
14220: If nvl(p_call_mode,okl_api.g_miss_char) = 'RELEASE_CONTRACT' then

Line 14225: l_residual_value := p_klev_fin_rec.residual_value;

14221: l_oec := l_exp_cost_rec.expected_asset_cost;
14222: else
14223: l_oec := p_klev_fin_rec.oec;
14224: end if;
14225: l_residual_value := p_klev_fin_rec.residual_value;
14226:
14227: get_res_per_upd_fin_rec(p_api_version => p_api_version,
14228: p_init_msg_list => p_init_msg_list,
14229: x_return_status => x_return_status,

Line 14234: p_res_value => l_residual_value,

14230: x_msg_count => x_msg_count,
14231: x_msg_data => x_msg_data,
14232: P_new_yn => 'N',
14233: p_asset_number => p_clev_fin_rec.name,
14234: p_res_value => l_residual_value,
14235: p_oec => l_oec,
14236: p_top_line_id => l_top_line_id,
14237: p_dnz_chr_id => p_clev_fin_rec.dnz_chr_id,
14238: x_fin_clev_rec => x_clev_fin_rec,

Line 14260: x_res_value => lx_residual_value,

14256: p_top_line_id => l_top_line_id,
14257: p_dnz_chr_id => p_clev_fin_rec.dnz_chr_id,
14258: x_fin_clev_rec => x_clev_fin_rec,
14259: x_fin_klev_rec => x_klev_fin_rec,
14260: x_res_value => lx_residual_value,
14261: p_validate_fin_line => OKL_API.G_TRUE); -- 4414408
14262:
14263: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14264: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 14269: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR

14265: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14266: RAISE OKL_API.G_EXCEPTION_ERROR;
14267: END IF;
14268:
14269: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR
14270: p_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
14271: (p_klev_fin_rec.residual_value IS NOT NULL OR
14272: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14273:

Line 14270: p_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND

14266: RAISE OKL_API.G_EXCEPTION_ERROR;
14267: END IF;
14268:
14269: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR
14270: p_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
14271: (p_klev_fin_rec.residual_value IS NOT NULL OR
14272: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14273:
14274: l_top_line_id := p_clev_fin_rec.id;

Line 14271: (p_klev_fin_rec.residual_value IS NOT NULL OR

14267: END IF;
14268:
14269: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR
14270: p_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
14271: (p_klev_fin_rec.residual_value IS NOT NULL OR
14272: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14273:
14274: l_top_line_id := p_clev_fin_rec.id;
14275: --Bug# 4631549

Line 14272: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN

14268:
14269: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR
14270: p_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
14271: (p_klev_fin_rec.residual_value IS NOT NULL OR
14272: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14273:
14274: l_top_line_id := p_clev_fin_rec.id;
14275: --Bug# 4631549
14276: If nvl(p_call_mode,okl_api.g_miss_char) = 'RELEASE_CONTRACT' then

Line 14281: l_residual_value := p_klev_fin_rec.residual_value;

14277: l_oec := l_exp_cost_rec.expected_asset_cost;
14278: else
14279: l_oec := p_klev_fin_rec.oec;
14280: end if;
14281: l_residual_value := p_klev_fin_rec.residual_value;
14282:
14283:
14284: get_res_per_upd_fin_rec(p_api_version => p_api_version,
14285: p_init_msg_list => p_init_msg_list,

Line 14291: p_res_value => l_residual_value,

14287: x_msg_count => x_msg_count,
14288: x_msg_data => x_msg_data,
14289: P_new_yn => 'N',
14290: p_asset_number => p_clev_fin_rec.name,
14291: p_res_value => l_residual_value,
14292: p_oec => l_oec,
14293: p_top_line_id => l_top_line_id,
14294: p_dnz_chr_id => p_clev_fin_rec.dnz_chr_id,
14295: x_fin_clev_rec => x_clev_fin_rec,

Line 14305: ELSIF (p_klev_fin_rec.residual_percentage IS NOT NULL OR

14301: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14302: RAISE OKL_API.G_EXCEPTION_ERROR;
14303: END IF;
14304:
14305: ELSIF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14306: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14307: (p_klev_fin_rec.residual_value IS NULL OR
14308: p_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
14309:

Line 14306: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND

14302: RAISE OKL_API.G_EXCEPTION_ERROR;
14303: END IF;
14304:
14305: ELSIF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14306: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14307: (p_klev_fin_rec.residual_value IS NULL OR
14308: p_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
14309:
14310: --Bug# 4631549

Line 14307: (p_klev_fin_rec.residual_value IS NULL OR

14303: END IF;
14304:
14305: ELSIF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14306: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14307: (p_klev_fin_rec.residual_value IS NULL OR
14308: p_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
14309:
14310: --Bug# 4631549
14311: l_top_line_id := p_clev_fin_rec.id;

Line 14308: p_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN

14304:
14305: ELSIF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14306: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14307: (p_klev_fin_rec.residual_value IS NULL OR
14308: p_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
14309:
14310: --Bug# 4631549
14311: l_top_line_id := p_clev_fin_rec.id;
14312:

Line 14325: x_res_value => lx_residual_value,

14321: p_top_line_id => p_clev_fin_rec.id,
14322: p_dnz_chr_id => p_clev_fin_rec.dnz_chr_id,
14323: x_fin_clev_rec => x_clev_fin_rec,
14324: x_fin_klev_rec => x_klev_fin_rec,
14325: x_res_value => lx_residual_value,
14326: p_validate_fin_line => OKL_API.G_TRUE);
14327: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14328: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14329: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 14361: End Resolve_Residual_Value;

14357: 'OTHERS',
14358: x_msg_count,
14359: x_msg_data,
14360: '_PVT');
14361: End Resolve_Residual_Value;
14362:
14363: --Bug# 3533936
14364: -----------------------------------------------------
14365: --Modify Release Asset line based on the user inputs

Line 14583: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := p_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT;

14579: l_clev_fin_rec.id := p_cle_id;
14580: l_klev_fin_rec.id := p_cle_id;
14581: l_klev_fin_rec.PRESCRIBED_ASSET_YN := p_klev_fin_rec.PRESCRIBED_ASSET_YN;
14582:
14583: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := p_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT;
14584:
14585: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14586:
14587: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and

Line 14585: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;

14581: l_klev_fin_rec.PRESCRIBED_ASSET_YN := p_klev_fin_rec.PRESCRIBED_ASSET_YN;
14582:
14583: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := p_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT;
14584:
14585: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14586:
14587: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14588: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14589: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;

Line 14587: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and

14583: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := p_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT;
14584:
14585: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14586:
14587: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14588: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14589: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14590: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14591: End If;

Line 14588: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then

14584:
14585: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14586:
14587: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14588: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14589: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14590: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14591: End If;
14592:

Line 14589: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;

14585: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14586:
14587: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14588: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14589: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14590: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14591: End If;
14592:
14593: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and

Line 14590: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;

14586:
14587: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14588: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14589: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14590: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14591: End If;
14592:
14593: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14594: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then

Line 14593: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and

14589: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14590: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14591: End If;
14592:
14593: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14594: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then
14595: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14596: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14597: End If;

Line 14594: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then

14590: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14591: End If;
14592:
14593: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14594: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then
14595: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14596: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14597: End If;
14598:

Line 14595: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;

14591: End If;
14592:
14593: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14594: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then
14595: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14596: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14597: End If;
14598:
14599: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and

Line 14596: l_klev_fin_rec.RESIDUAL_VALUE := NULL;

14592:
14593: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14594: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then
14595: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14596: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14597: End If;
14598:
14599: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14600: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then

Line 14599: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and

14595: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14596: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14597: End If;
14598:
14599: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14600: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14601: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14602: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;
14603: End If;

Line 14600: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then

14596: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14597: End If;
14598:
14599: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14600: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14601: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14602: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;
14603: End If;
14604:

Line 14601: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;

14597: End If;
14598:
14599: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14600: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14601: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14602: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;
14603: End If;
14604:
14605: --BUG# : NBV - update price unit on fixed asset and model lines

Line 14602: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;

14598:
14599: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14600: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14601: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14602: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;
14603: End If;
14604:
14605: --BUG# : NBV - update price unit on fixed asset and model lines
14606: rec_count := 0;

Line 14917: --update residual value as per standard

14913: END IF;
14914: End If;
14915:
14916: --------------------------------------------------
14917: --update residual value as per standard
14918: -------------------------------------------------
14919: Resolve_Residual_Value(
14920: p_api_version => p_api_version,
14921: p_init_msg_list => p_init_msg_list,

Line 14919: Resolve_Residual_Value(

14915:
14916: --------------------------------------------------
14917: --update residual value as per standard
14918: -------------------------------------------------
14919: Resolve_Residual_Value(
14920: p_api_version => p_api_version,
14921: p_init_msg_list => p_init_msg_list,
14922: x_return_status => x_return_status,
14923: x_msg_count => x_msg_count,

Line 15091: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;

15087: l_cimv_ib_rec_out cimv_rec_type;
15088: l_trxv_ib_rec_out trxv_rec_type;
15089: l_itiv_ib_tbl_out itiv_tbl_type;
15090: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
15091: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
15092: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
15093: ln_clev_model_price_unit OKC_K_LINES_V.PRICE_UNIT%TYPE := 0;
15094: ln_cimv_model_no_items OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
15095: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

Line 15142: l_residual_value NUMBER;

15138: AND cii.instance_id = ite.object1_id1 AND kle_fa.name = p_asset_number;
15139:
15140: l_top_line_id NUMBER;
15141: l_oec NUMBER;
15142: l_residual_value NUMBER;
15143:
15144: --Bug# 3533936:
15145: l_rel_ast_fin_cle_id NUMBER;
15146:

Line 15236: IF l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and

15232: p_token1_value => 'OKC_K_LINES_V.DNZ_CHR_ID for All Lines');
15233: RAISE OKL_API.G_EXCEPTION_ERROR;
15234: END IF;
15235: --start:| 14-May-2008 cklee Bug 6405415 |
15236: IF l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
15237: l_klev_fin_rec.residual_percentage IS NOT NULL THEN
15238: IF NOT l_klev_fin_rec.residual_percentage between 0 and 100 THEN
15239: OKL_API.set_message(p_app_name => G_APP_NAME,
15240: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');

Line 15237: l_klev_fin_rec.residual_percentage IS NOT NULL THEN

15233: RAISE OKL_API.G_EXCEPTION_ERROR;
15234: END IF;
15235: --start:| 14-May-2008 cklee Bug 6405415 |
15236: IF l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
15237: l_klev_fin_rec.residual_percentage IS NOT NULL THEN
15238: IF NOT l_klev_fin_rec.residual_percentage between 0 and 100 THEN
15239: OKL_API.set_message(p_app_name => G_APP_NAME,
15240: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
15241: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 15238: IF NOT l_klev_fin_rec.residual_percentage between 0 and 100 THEN

15234: END IF;
15235: --start:| 14-May-2008 cklee Bug 6405415 |
15236: IF l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
15237: l_klev_fin_rec.residual_percentage IS NOT NULL THEN
15238: IF NOT l_klev_fin_rec.residual_percentage between 0 and 100 THEN
15239: OKL_API.set_message(p_app_name => G_APP_NAME,
15240: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
15241: RAISE OKL_API.G_EXCEPTION_ERROR;
15242: END IF;

Line 15240: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');

15236: IF l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
15237: l_klev_fin_rec.residual_percentage IS NOT NULL THEN
15238: IF NOT l_klev_fin_rec.residual_percentage between 0 and 100 THEN
15239: OKL_API.set_message(p_app_name => G_APP_NAME,
15240: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
15241: RAISE OKL_API.G_EXCEPTION_ERROR;
15242: END IF;
15243: END IF;
15244: --end:| 14-May-2008 cklee Bug 6405415 |

Line 15583: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

15579: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15580: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15581: RAISE OKL_API.G_EXCEPTION_ERROR;
15582: END IF;
15583: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
15584: -- We need to Back calculate the Residual Percentage if value not given
15585: -- or if given should be in sync with residual value
15586:
15587: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN

Line 15584: -- We need to Back calculate the Residual Percentage if value not given

15580: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15581: RAISE OKL_API.G_EXCEPTION_ERROR;
15582: END IF;
15583: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
15584: -- We need to Back calculate the Residual Percentage if value not given
15585: -- or if given should be in sync with residual value
15586:
15587: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15588: l_klev_fin_rec_out.residual_percentage := null;

Line 15585: -- or if given should be in sync with residual value

15581: RAISE OKL_API.G_EXCEPTION_ERROR;
15582: END IF;
15583: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
15584: -- We need to Back calculate the Residual Percentage if value not given
15585: -- or if given should be in sync with residual value
15586:
15587: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15588: l_klev_fin_rec_out.residual_percentage := null;
15589: END IF;

Line 15587: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN

15583: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
15584: -- We need to Back calculate the Residual Percentage if value not given
15585: -- or if given should be in sync with residual value
15586:
15587: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15588: l_klev_fin_rec_out.residual_percentage := null;
15589: END IF;
15590:
15591: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN

Line 15588: l_klev_fin_rec_out.residual_percentage := null;

15584: -- We need to Back calculate the Residual Percentage if value not given
15585: -- or if given should be in sync with residual value
15586:
15587: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15588: l_klev_fin_rec_out.residual_percentage := null;
15589: END IF;
15590:
15591: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN
15592: l_klev_fin_rec_out.residual_value := null;

Line 15591: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN

15587: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15588: l_klev_fin_rec_out.residual_percentage := null;
15589: END IF;
15590:
15591: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN
15592: l_klev_fin_rec_out.residual_value := null;
15593: END IF;
15594:
15595: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR

Line 15592: l_klev_fin_rec_out.residual_value := null;

15588: l_klev_fin_rec_out.residual_percentage := null;
15589: END IF;
15590:
15591: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN
15592: l_klev_fin_rec_out.residual_value := null;
15593: END IF;
15594:
15595: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15596: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND

Line 15595: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR

15591: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN
15592: l_klev_fin_rec_out.residual_value := null;
15593: END IF;
15594:
15595: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15596: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15597: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15598: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15599:

Line 15596: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND

15592: l_klev_fin_rec_out.residual_value := null;
15593: END IF;
15594:
15595: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15596: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15597: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15598: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15599:
15600: l_top_line_id := x_clev_fin_rec.id;

Line 15597: (l_klev_fin_rec_out.residual_value IS NOT NULL OR

15593: END IF;
15594:
15595: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15596: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15597: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15598: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15599:
15600: l_top_line_id := x_clev_fin_rec.id;
15601: l_oec := l_klev_fin_rec_out.oec;

Line 15598: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN

15594:
15595: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15596: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15597: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15598: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15599:
15600: l_top_line_id := x_clev_fin_rec.id;
15601: l_oec := l_klev_fin_rec_out.oec;
15602: l_residual_value := l_klev_fin_rec_out.residual_value;

Line 15602: l_residual_value := l_klev_fin_rec_out.residual_value;

15598: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15599:
15600: l_top_line_id := x_clev_fin_rec.id;
15601: l_oec := l_klev_fin_rec_out.oec;
15602: l_residual_value := l_klev_fin_rec_out.residual_value;
15603:
15604: get_res_per_upd_fin_rec(p_api_version => p_api_version,
15605: p_init_msg_list => p_init_msg_list,
15606: x_return_status => x_return_status,

Line 15611: p_res_value => l_residual_value, --l_klev_fin_rec_out.residual_value

15607: x_msg_count => x_msg_count,
15608: x_msg_data => x_msg_data,
15609: P_new_yn => P_new_yn,
15610: p_asset_number => l_asset_number,
15611: p_res_value => l_residual_value, --l_klev_fin_rec_out.residual_value
15612: p_oec => l_oec, --l_klev_fin_rec_out.oec
15613: p_top_line_id => l_top_line_id, --x_clev_fin_rec.id,
15614: p_dnz_chr_id => x_clev_model_rec.dnz_chr_id,
15615: x_fin_clev_rec => x_clev_fin_rec,

Line 15642: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR

15638: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15639: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15640: RAISE OKL_API.G_EXCEPTION_ERROR;
15641: END IF;
15642: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR
15643: l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM) AND
15644: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15645: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15646:

Line 15643: l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM) AND

15639: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15640: RAISE OKL_API.G_EXCEPTION_ERROR;
15641: END IF;
15642: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR
15643: l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM) AND
15644: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15645: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15646:
15647: l_top_line_id := x_clev_fin_rec.id;

Line 15644: (l_klev_fin_rec_out.residual_value IS NOT NULL OR

15640: RAISE OKL_API.G_EXCEPTION_ERROR;
15641: END IF;
15642: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR
15643: l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM) AND
15644: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15645: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15646:
15647: l_top_line_id := x_clev_fin_rec.id;
15648: l_oec := l_klev_fin_rec_out.oec;

Line 15645: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN

15641: END IF;
15642: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR
15643: l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM) AND
15644: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15645: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15646:
15647: l_top_line_id := x_clev_fin_rec.id;
15648: l_oec := l_klev_fin_rec_out.oec;
15649: l_residual_value := l_klev_fin_rec_out.residual_value;

Line 15649: l_residual_value := l_klev_fin_rec_out.residual_value;

15645: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15646:
15647: l_top_line_id := x_clev_fin_rec.id;
15648: l_oec := l_klev_fin_rec_out.oec;
15649: l_residual_value := l_klev_fin_rec_out.residual_value;
15650:
15651: get_res_per_upd_fin_rec(p_api_version => p_api_version,
15652: p_init_msg_list => p_init_msg_list,
15653: x_return_status => x_return_status,

Line 15658: p_res_value => l_residual_value, --l_klev_fin_rec_out.residual_value

15654: x_msg_count => x_msg_count,
15655: x_msg_data => x_msg_data,
15656: P_new_yn => P_new_yn,
15657: p_asset_number => l_asset_number,
15658: p_res_value => l_residual_value, --l_klev_fin_rec_out.residual_value
15659: p_oec => l_oec, --l_klev_fin_rec_out.oec
15660: p_top_line_id => l_top_line_id, --x_clev_fin_rec.id,
15661: p_dnz_chr_id => x_clev_model_rec.dnz_chr_id,
15662: x_fin_clev_rec => x_clev_fin_rec,

Line 15670: ELSIF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR

15666: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15667: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15668: RAISE OKL_API.G_EXCEPTION_ERROR;
15669: END IF;
15670: ELSIF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15671: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15672: (l_klev_fin_rec_out.residual_value IS NULL OR
15673: l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM) THEN
15674: res_value_calc_upd_fin_rec(p_api_version => p_api_version,

Line 15671: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND

15667: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15668: RAISE OKL_API.G_EXCEPTION_ERROR;
15669: END IF;
15670: ELSIF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15671: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15672: (l_klev_fin_rec_out.residual_value IS NULL OR
15673: l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM) THEN
15674: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
15675: p_init_msg_list => p_init_msg_list,

Line 15672: (l_klev_fin_rec_out.residual_value IS NULL OR

15668: RAISE OKL_API.G_EXCEPTION_ERROR;
15669: END IF;
15670: ELSIF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15671: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15672: (l_klev_fin_rec_out.residual_value IS NULL OR
15673: l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM) THEN
15674: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
15675: p_init_msg_list => p_init_msg_list,
15676: x_return_status => x_return_status,

Line 15673: l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM) THEN

15669: END IF;
15670: ELSIF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15671: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15672: (l_klev_fin_rec_out.residual_value IS NULL OR
15673: l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM) THEN
15674: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
15675: p_init_msg_list => p_init_msg_list,
15676: x_return_status => x_return_status,
15677: x_msg_count => x_msg_count,

Line 15696: (l_klev_fin_rec_out.residual_value IS NOT NULL OR

15692: END IF;
15693: END IF;
15694: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
15695: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
15696: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15697: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15698: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
15699: OKL_API.set_message(p_app_name => G_APP_NAME,
15700: p_msg_name => G_SALVAGE_VALUE);

Line 15697: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN

15693: END IF;
15694: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
15695: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
15696: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15697: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15698: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
15699: OKL_API.set_message(p_app_name => G_APP_NAME,
15700: p_msg_name => G_SALVAGE_VALUE);
15701: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 15698: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN

15694: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
15695: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
15696: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15697: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15698: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
15699: OKL_API.set_message(p_app_name => G_APP_NAME,
15700: p_msg_name => G_SALVAGE_VALUE);
15701: RAISE OKL_API.G_EXCEPTION_ERROR;
15702: END IF;

Line 15782: l_talv_fa_rec.salvage_value := nvl(l_klev_fin_rec_out.residual_value,0);

15778: If nvl(l_deal_type_rec.reporting_pdt_id,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
15779: for l_pdt_deal_rec in l_pdt_deal_csr(p_pdt_id => l_deal_type_rec.reporting_pdt_id)
15780: loop
15781: If l_pdt_deal_rec.deal_type = 'LEASEOP' then -- reporting pdt is operating lease
15782: l_talv_fa_rec.salvage_value := nvl(l_klev_fin_rec_out.residual_value,0);
15783:
15784: End If;
15785: End loop;
15786: End If;

Line 15790: l_talv_fa_rec.salvage_value := nvl(l_klev_fin_rec_out.residual_value,0);

15786: End If;
15787: Elsif l_deal_type_rec.deal_type = 'LOAN-REVOLVING' then
15788: null;
15789: Else -- for LEASEOP, LEASEDF, LEASEST
15790: l_talv_fa_rec.salvage_value := nvl(l_klev_fin_rec_out.residual_value,0);
15791: End If;
15792: End Loop;
15793: End If;*/
15794: --| end 29-Oct-2008 cklee Bug: 7492324 move code logic to |

Line 16191: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;

16187: r_cimv_ib_rec cimv_rec_type;
16188: r_itiv_ib_rec itiv_rec_type;
16189: ln_addon_oec OKL_K_LINES_V.OEC%TYPE := 0;
16190: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
16191: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
16192: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
16193: ln_clev_model_price_unit OKC_K_LINES_V.PRICE_UNIT%TYPE := 0;
16194: ln_cimv_model_no_items OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
16195: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

Line 16266: --cursor to get existing residual values

16262: --Bug# 3533936: Enhancements for release assets
16263: l_rel_ast_fin_cle_id NUMBER;
16264: l_itiv_ib_tbl itiv_tbl_type;
16265:
16266: --cursor to get existing residual values
16267: --and down payment values Bug# 5192636
16268: cursor l_cle_csr (p_cle_id in number,
16269: p_chr_id in number) is
16270: select fin_kle.DOWN_PAYMENT_RECEIVER_CODE,

Line 16272: fin_kle.residual_value,

16268: cursor l_cle_csr (p_cle_id in number,
16269: p_chr_id in number) is
16270: select fin_kle.DOWN_PAYMENT_RECEIVER_CODE,
16271: fin_kle.CAPITALIZE_DOWN_PAYMENT_YN,
16272: fin_kle.residual_value,
16273: fin_kle.residual_percentage
16274: from
16275: okl_k_lines fin_kle,
16276: okc_k_lines_b fin_cleb

Line 16273: fin_kle.residual_percentage

16269: p_chr_id in number) is
16270: select fin_kle.DOWN_PAYMENT_RECEIVER_CODE,
16271: fin_kle.CAPITALIZE_DOWN_PAYMENT_YN,
16272: fin_kle.residual_value,
16273: fin_kle.residual_percentage
16274: from
16275: okl_k_lines fin_kle,
16276: okc_k_lines_b fin_cleb
16277: where fin_kle.id = fin_cleb.id

Line 16403: IF p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and

16399: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16400: RAISE OKL_API.G_EXCEPTION_ERROR;
16401: END IF;
16402: --start:| 14-May-2008 cklee Bug 6405415 |
16403: IF p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
16404: p_klev_fin_rec.residual_percentage IS NOT NULL THEN
16405: IF NOT p_klev_fin_rec.residual_percentage between 0 and 100 THEN
16406: OKL_API.set_message(p_app_name => G_APP_NAME,
16407: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');

Line 16404: p_klev_fin_rec.residual_percentage IS NOT NULL THEN

16400: RAISE OKL_API.G_EXCEPTION_ERROR;
16401: END IF;
16402: --start:| 14-May-2008 cklee Bug 6405415 |
16403: IF p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
16404: p_klev_fin_rec.residual_percentage IS NOT NULL THEN
16405: IF NOT p_klev_fin_rec.residual_percentage between 0 and 100 THEN
16406: OKL_API.set_message(p_app_name => G_APP_NAME,
16407: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
16408: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 16405: IF NOT p_klev_fin_rec.residual_percentage between 0 and 100 THEN

16401: END IF;
16402: --start:| 14-May-2008 cklee Bug 6405415 |
16403: IF p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
16404: p_klev_fin_rec.residual_percentage IS NOT NULL THEN
16405: IF NOT p_klev_fin_rec.residual_percentage between 0 and 100 THEN
16406: OKL_API.set_message(p_app_name => G_APP_NAME,
16407: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
16408: RAISE OKL_API.G_EXCEPTION_ERROR;
16409: END IF;

Line 16407: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');

16403: IF p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
16404: p_klev_fin_rec.residual_percentage IS NOT NULL THEN
16405: IF NOT p_klev_fin_rec.residual_percentage between 0 and 100 THEN
16406: OKL_API.set_message(p_app_name => G_APP_NAME,
16407: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
16408: RAISE OKL_API.G_EXCEPTION_ERROR;
16409: END IF;
16410: END IF;
16411: --end:| 14-May-2008 cklee Bug 6405415 |

Line 16435: if l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT = fnd_api.g_miss_num then

16431: l_klev_fin_rec := p_klev_fin_rec;
16432:
16433: --Bug# 6888733: start
16434:
16435: if l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT = fnd_api.g_miss_num then
16436: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := null;
16437: end if;
16438:
16439: --Bug# 6888733: end

Line 16436: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := null;

16432:
16433: --Bug# 6888733: start
16434:
16435: if l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT = fnd_api.g_miss_num then
16436: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := null;
16437: end if;
16438:
16439: --Bug# 6888733: end
16440:

Line 16928: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage AND

16924: -- only if the price unit and number of items change.
16925: /*
16926: IF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit AND
16927: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
16928: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage AND
16929: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
16930: l_go_for_calc := 'Y';
16931: ELSIF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit OR
16932: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN

Line 16929: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN

16925: /*
16926: IF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit AND
16927: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
16928: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage AND
16929: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
16930: l_go_for_calc := 'Y';
16931: ELSIF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit OR
16932: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
16933: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage OR

Line 16933: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage OR

16929: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
16930: l_go_for_calc := 'Y';
16931: ELSIF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit OR
16932: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
16933: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage OR
16934: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
16935: l_go_for_calc := 'Y';
16936: ELSE
16937: l_go_for_calc := 'N';

Line 16934: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN

16930: l_go_for_calc := 'Y';
16931: ELSIF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit OR
16932: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
16933: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage OR
16934: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
16935: l_go_for_calc := 'Y';
16936: ELSE
16937: l_go_for_calc := 'N';
16938: END IF;

Line 17059: IF l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM THEN

17055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17056: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17057: RAISE OKL_API.G_EXCEPTION_ERROR;
17058: END IF;
17059: IF l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM THEN
17060: l_klev_fin_rec.residual_percentage := null;
17061: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17062: l_klev_fin_rec.residual_value := null;
17063: END IF;

Line 17060: l_klev_fin_rec.residual_percentage := null;

17056: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17057: RAISE OKL_API.G_EXCEPTION_ERROR;
17058: END IF;
17059: IF l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM THEN
17060: l_klev_fin_rec.residual_percentage := null;
17061: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17062: l_klev_fin_rec.residual_value := null;
17063: END IF;
17064: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

Line 17061: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN

17057: RAISE OKL_API.G_EXCEPTION_ERROR;
17058: END IF;
17059: IF l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM THEN
17060: l_klev_fin_rec.residual_percentage := null;
17061: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17062: l_klev_fin_rec.residual_value := null;
17063: END IF;
17064: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17065: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR

Line 17062: l_klev_fin_rec.residual_value := null;

17058: END IF;
17059: IF l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM THEN
17060: l_klev_fin_rec.residual_percentage := null;
17061: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17062: l_klev_fin_rec.residual_value := null;
17063: END IF;
17064: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17065: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17066: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND

Line 17064: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

17060: l_klev_fin_rec.residual_percentage := null;
17061: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17062: l_klev_fin_rec.residual_value := null;
17063: END IF;
17064: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17065: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17066: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17067: (l_klev_fin_rec.residual_value IS NOT NULL OR
17068: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN

Line 17065: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR

17061: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17062: l_klev_fin_rec.residual_value := null;
17063: END IF;
17064: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17065: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17066: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17067: (l_klev_fin_rec.residual_value IS NOT NULL OR
17068: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17069: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN

Line 17066: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND

17062: l_klev_fin_rec.residual_value := null;
17063: END IF;
17064: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17065: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17066: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17067: (l_klev_fin_rec.residual_value IS NOT NULL OR
17068: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17069: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17070:

Line 17067: (l_klev_fin_rec.residual_value IS NOT NULL OR

17063: END IF;
17064: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17065: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17066: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17067: (l_klev_fin_rec.residual_value IS NOT NULL OR
17068: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17069: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17070:
17071: l_top_line_id := x_clev_fin_rec.id;

Line 17068: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN

17064: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17065: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17066: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17067: (l_klev_fin_rec.residual_value IS NOT NULL OR
17068: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17069: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17070:
17071: l_top_line_id := x_clev_fin_rec.id;
17072: l_oec := l_klev_fin_rec_out.oec;

Line 17069: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN

17065: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17066: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17067: (l_klev_fin_rec.residual_value IS NOT NULL OR
17068: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17069: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17070:
17071: l_top_line_id := x_clev_fin_rec.id;
17072: l_oec := l_klev_fin_rec_out.oec;
17073:

Line 17081: p_res_value => l_klev_fin_rec.residual_value,

17077: x_msg_count => x_msg_count,
17078: x_msg_data => x_msg_data,
17079: P_new_yn => P_new_yn,
17080: p_asset_number => p_asset_number,
17081: p_res_value => l_klev_fin_rec.residual_value,
17082: p_oec => l_oec, --l_klev_fin_rec_out.oec
17083: p_top_line_id => l_top_line_id, --x_clev_fin_rec.id,
17084: p_dnz_chr_id => x_clev_model_rec.dnz_chr_id,
17085: x_fin_clev_rec => x_clev_fin_rec,

Line 17093: ELSIF l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage THEN

17089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17091: RAISE OKL_API.G_EXCEPTION_ERROR;
17092: END IF;
17093: ELSIF l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage THEN
17094: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
17095: p_init_msg_list => p_init_msg_list,
17096: x_return_status => x_return_status,
17097: x_msg_count => x_msg_count,

Line 17114: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR

17110: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17111: RAISE OKL_API.G_EXCEPTION_ERROR;
17112: END IF;
17113: END IF;
17114: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR
17115: l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
17116: (l_klev_fin_rec.residual_value IS NOT NULL OR
17117: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17118:

Line 17115: l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND

17111: RAISE OKL_API.G_EXCEPTION_ERROR;
17112: END IF;
17113: END IF;
17114: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR
17115: l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
17116: (l_klev_fin_rec.residual_value IS NOT NULL OR
17117: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17118:
17119: l_top_line_id := x_clev_fin_rec.id;

Line 17116: (l_klev_fin_rec.residual_value IS NOT NULL OR

17112: END IF;
17113: END IF;
17114: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR
17115: l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
17116: (l_klev_fin_rec.residual_value IS NOT NULL OR
17117: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17118:
17119: l_top_line_id := x_clev_fin_rec.id;
17120: l_oec := l_klev_fin_rec_out.oec;

Line 17117: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN

17113: END IF;
17114: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR
17115: l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
17116: (l_klev_fin_rec.residual_value IS NOT NULL OR
17117: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17118:
17119: l_top_line_id := x_clev_fin_rec.id;
17120: l_oec := l_klev_fin_rec_out.oec;
17121:

Line 17129: p_res_value => l_klev_fin_rec.residual_value,

17125: x_msg_count => x_msg_count,
17126: x_msg_data => x_msg_data,
17127: P_new_yn => P_new_yn,
17128: p_asset_number => p_asset_number,
17129: p_res_value => l_klev_fin_rec.residual_value,
17130: p_oec => l_oec, --l_klev_fin_rec_out.oec
17131: p_top_line_id => l_top_line_id, --x_clev_fin_rec.id,
17132: p_dnz_chr_id => x_clev_model_rec.dnz_chr_id,
17133: x_fin_clev_rec => x_clev_fin_rec,

Line 17141: ELSIF (l_klev_fin_rec.residual_percentage IS NOT NULL OR

17137: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17138: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17139: RAISE OKL_API.G_EXCEPTION_ERROR;
17140: END IF;
17141: ELSIF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17142: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17143: (l_klev_fin_rec.residual_value IS NULL OR
17144: l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
17145: res_value_calc_upd_fin_rec(p_api_version => p_api_version,

Line 17142: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND

17138: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17139: RAISE OKL_API.G_EXCEPTION_ERROR;
17140: END IF;
17141: ELSIF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17142: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17143: (l_klev_fin_rec.residual_value IS NULL OR
17144: l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
17145: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
17146: p_init_msg_list => p_init_msg_list,

Line 17143: (l_klev_fin_rec.residual_value IS NULL OR

17139: RAISE OKL_API.G_EXCEPTION_ERROR;
17140: END IF;
17141: ELSIF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17142: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17143: (l_klev_fin_rec.residual_value IS NULL OR
17144: l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
17145: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
17146: p_init_msg_list => p_init_msg_list,
17147: x_return_status => x_return_status,

Line 17144: l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN

17140: END IF;
17141: ELSIF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17142: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17143: (l_klev_fin_rec.residual_value IS NULL OR
17144: l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
17145: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
17146: p_init_msg_list => p_init_msg_list,
17147: x_return_status => x_return_status,
17148: x_msg_count => x_msg_count,

Line 17168: (l_klev_fin_rec_out.residual_value IS NOT NULL OR

17164: END IF;
17165: END IF;
17166: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
17167: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
17168: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
17169: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
17170: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
17171: OKL_API.set_message(p_app_name => G_APP_NAME,
17172: p_msg_name => G_SALVAGE_VALUE);

Line 17169: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN

17165: END IF;
17166: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
17167: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
17168: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
17169: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
17170: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
17171: OKL_API.set_message(p_app_name => G_APP_NAME,
17172: p_msg_name => G_SALVAGE_VALUE);
17173: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 17170: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN

17166: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
17167: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
17168: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
17169: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
17170: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
17171: OKL_API.set_message(p_app_name => G_APP_NAME,
17172: p_msg_name => G_SALVAGE_VALUE);
17173: RAISE OKL_API.G_EXCEPTION_ERROR;
17174: END IF;

Line 17881: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;

17877: l_clev_fa_rec_out clev_rec_type;
17878: l_klev_fa_rec_out klev_rec_type;
17879: ln_model_qty OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
17880: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
17881: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
17882: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
17883:
17884: CURSOR c_remain_inst_line(p_cle_id OKC_K_LINES_V.CLE_ID%TYPE,
17885: p_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE) IS

Line 18625: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

18621: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
18622: RAISE OKL_API.G_EXCEPTION_ERROR;
18623: END IF;
18624:
18625: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
18626: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
18627: p_init_msg_list => p_init_msg_list,
18628: x_return_status => x_return_status,
18629: x_msg_count => x_msg_count,

Line 18894: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;

18890: lx_talv_fa_rec talv_rec_type;
18891: lx_clev_fin_rec clev_rec_type;
18892: lx_klev_fin_rec klev_rec_type;
18893: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
18894: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
18895: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
18896: r_clev_addon_rec clev_rec_type;
18897: r_klev_addon_rec klev_rec_type;
18898: r_cimv_addon_rec cimv_rec_type;

Line 19512: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

19508: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19509: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19510: RAISE OKL_API.G_EXCEPTION_ERROR;
19511: END IF;
19512: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
19513: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
19514: p_init_msg_list => p_init_msg_list,
19515: x_return_status => x_return_status,
19516: x_msg_count => x_msg_count,

Line 19792: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;

19788: l_klev_model_rec_out klev_rec_type;
19789: l_clev_fa_rec_out clev_rec_type;
19790: l_klev_fa_rec_out klev_rec_type;
19791: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
19792: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
19793: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
19794: r_clev_addon_rec clev_rec_type;
19795: r_klev_addon_rec klev_rec_type;
19796: r_cimv_addon_rec cimv_rec_type;

Line 20323: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

20319: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20320: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20321: RAISE OKL_API.G_EXCEPTION_ERROR;
20322: END IF;
20323: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
20324: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
20325: p_init_msg_list => p_init_msg_list,
20326: x_return_status => x_return_status,
20327: x_msg_count => x_msg_count,