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 2613: -- Check whether asset residual value is securitized

2609: END IF;
2610: CLOSE c_check_release_asset;
2611:
2612: --
2613: -- Check whether asset residual value is securitized
2614: -- If so, do not allow release of the asset
2615: --
2616: IF (upper(lv_release_asset) = 'Y') THEN
2617: okl_transaction_pvt.check_contract_securitized(

Line 2625: p_stream_type_class => 'RESIDUAL',

2621: x_msg_count => x_msg_count,
2622: x_msg_data => x_msg_data,
2623: p_chr_id => p_dnz_chr_id,
2624: p_cle_id => p_kle_id,
2625: p_stream_type_class => 'RESIDUAL',
2626: p_trx_date => SYSDATE
2627: );
2628:
2629: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

Line 2877: --FROM DUAL

2873: lv_release_asset OKC_RULES_V.RULE_INFORMATION1%TYPE := 'N';
2874:
2875: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2876: SELECT 1
2877: --FROM DUAL
2878: --WHERE EXISTS (SELECT '1'
2879: FROM OKL_TXL_ASSETS_B
2880: WHERE asset_number = p_asset_number; --);
2881: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

Line 2883: --FROM DUAL

2879: FROM OKL_TXL_ASSETS_B
2880: WHERE asset_number = p_asset_number; --);
2881: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2882: SELECT 1
2883: --FROM DUAL
2884: --WHERE EXISTS (SELECT '1'
2885: FROM OKX_ASSET_LINES_V
2886: WHERE asset_number = p_asset_number; --); */
2887: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

Line 2900: --FROM DUAL

2896: );
2897:
2898: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2899: SELECT 1
2900: --FROM DUAL
2901: --WHERE EXISTS (SELECT '1'
2902: FROM OKX_ASSETS_V
2903: WHERE asset_number = p_asset_number; --);
2904:

Line 2907: --FROM DUAL

2903: WHERE asset_number = p_asset_number; --);
2904:
2905: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2906: SELECT 1
2907: --FROM DUAL
2908: --WHERE EXISTS (SELECT '1'
2909: FROM OKL_TRX_ASSETS TAS,
2910: OKL_TXL_ASSETS_V TXL,
2911: OKL_TXD_ASSETS_V TXD

Line 3104: --FROM DUAL

3100: CURSOR c_asset_lines_dtls_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
3101: p_tax_book OKL_TXD_ASSETS_B.TAX_BOOK%TYPE,
3102: p_tal_id OKL_TXL_ASSETS_B.ID%TYPE) is
3103: SELECT 1
3104: --FROM DUAL
3105: --WHERE EXISTS (SELECT '1'
3106: FROM OKL_TXD_ASSETS_B txd,
3107: OKL_TXL_ASSETS_B txl
3108: WHERE txl.asset_number = p_asset_number

Line 3192: --FROM DUAL

3188: p_inst_num_ib IN OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) IS
3189: ln_dummy number := 0;
3190: CURSOR c_inst_num_ib_validate(p_inst_ib OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) is
3191: SELECT 1
3192: --FROM DUAL
3193: --WHERE EXISTS (SELECT '1'
3194: FROM OKL_TXL_ITM_INSTS
3195: WHERE instance_number_ib = p_inst_ib; --);
3196:

Line 3453: --FROM DUAL

3449: x_return_status OUT NOCOPY VARCHAR2) IS
3450: ln_dummy NUMBER := 0;
3451: CURSOR c_dnz_chr_id_validate(p_dnz_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE) IS
3452: SELECT 1
3453: --FROM DUAL
3454: --WHERE EXISTS (SELECT 1
3455: FROM OKC_K_HEADERS_B chrv
3456: WHERE chrv.id = p_dnz_chr_id; --);
3457: BEGIN

Line 3735: --FROM dual

3731: x_return_status OUT NOCOPY VARCHAR2) IS
3732: ln_dummy NUMBER := 0;
3733: CURSOR c_kle_id_validate(p_kle_id OKL_TXL_ASSETS_V.KLE_ID%TYPE) IS
3734: SELECT 1
3735: --FROM dual
3736: --WHERE EXISTS (SELECT '1'
3737: FROM OKL_TXL_ASSETS_V
3738: WHERE kle_id = p_kle_id; --);
3739: BEGIN

Line 3802: --FROM dual

3798: x_return_status OUT NOCOPY VARCHAR2) IS
3799: ln_dummy NUMBER := 0;
3800: CURSOR c_iti_kle_id_validate(p_kle_id OKL_TXL_ITM_INSTS_V.KLE_ID%TYPE) IS
3801: SELECT 1
3802: --FROM dual
3803: --WHERE EXISTS (SELECT '1'
3804: FROM OKL_TXL_ITM_INSTS_V
3805: WHERE kle_id = p_kle_id; --);
3806: BEGIN

Line 5944: --FROM DUAL

5940: p_id2 OKX_ASSETS_V.ID2%TYPE,
5941: p_dnz_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE)
5942: IS
5943: SELECT 1
5944: --FROM DUAL
5945: --WHERE EXISTS (SELECT '1'
5946: FROM OKX_ASSET_LINES_V
5947: WHERE id1 = p_id1
5948: AND id2 = p_id2

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

9338: p_top_line_id IN OKC_K_LINES_V.ID%TYPE, -- 4414408
9339: p_dnz_chr_id IN OKC_K_LINES_V.DNZ_CHR_ID%TYPE,
9340: x_fin_clev_rec OUT NOCOPY clev_rec_type,
9341: x_fin_klev_rec OUT NOCOPY klev_rec_type,
9342: x_res_value OUT NOCOPY OKL_K_LINES_V.RESIDUAL_VALUE%TYPE,
9343: p_validate_fin_line IN VARCHAR2 DEFAULT OKL_API.G_TRUE) IS
9344:
9345: ln_res_value OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
9346: -- ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;

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

9341: x_fin_klev_rec OUT NOCOPY klev_rec_type,
9342: x_res_value OUT NOCOPY OKL_K_LINES_V.RESIDUAL_VALUE%TYPE,
9343: p_validate_fin_line IN VARCHAR2 DEFAULT OKL_API.G_TRUE) IS
9344:
9345: ln_res_value OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
9346: -- ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
9347: l_update_clev_rec clev_rec_type;
9348: l_update_klev_rec klev_rec_type;
9349: -- 4414408

Line 9396: -- to get the Residual value

9392: -- RAISE G_EXCEPTION_HALT_VALIDATION;
9393: -- END IF;
9394: CLOSE c_model_top_line;
9395: */
9396: -- to get the Residual value
9397: /*
9398: x_res_value := OKL_SEEDED_FUNCTIONS_PVT.line_residualvalue(p_chr_id => p_dnz_chr_id,
9399: p_line_id => ln_top_line_id);
9400: */

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

9394: CLOSE c_model_top_line;
9395: */
9396: -- to get the Residual value
9397: /*
9398: x_res_value := OKL_SEEDED_FUNCTIONS_PVT.line_residualvalue(p_chr_id => p_dnz_chr_id,
9399: p_line_id => ln_top_line_id);
9400: */
9401:
9402: OKL_EXECUTE_FORMULA_PUB.execute(p_api_version => p_api_version,

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

9411: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9412: OKL_API.set_message(p_app_name => G_APP_NAME,
9413: p_msg_name => G_CALC_AMOUNT,
9414: p_token1 => G_AMT_TOKEN,
9415: p_token1_value => 'Residual Value');
9416: RAISE G_EXCEPTION_HALT_VALIDATION;
9417: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9418: OKL_API.set_message(p_app_name => G_APP_NAME,
9419: p_msg_name => G_CALC_AMOUNT,

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

9417: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9418: OKL_API.set_message(p_app_name => G_APP_NAME,
9419: p_msg_name => G_CALC_AMOUNT,
9420: p_token1 => G_AMT_TOKEN,
9421: p_token1_value => 'Residual Value');
9422: RAISE G_EXCEPTION_HALT_VALIDATION;
9423: END IF;
9424: -- To Get the cle top Line Record
9425: x_return_status := get_rec_clev(p_top_line_id, -- 4414408

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

9459: RAISE G_EXCEPTION_HALT_VALIDATION;
9460: END IF;
9461: -- commented for multi currency requirement. No need to round the value, as
9462: -- it is taken care in the call to accounting util package called below.
9463: -- l_update_klev_rec.residual_value := round(x_res_value,2);
9464: l_update_klev_rec.residual_value := x_res_value;
9465:
9466: -- Modified by rravikir
9467: -- Call to Accounting Util package to address Multi Currency requirement

Line 9464: l_update_klev_rec.residual_value := x_res_value;

9460: END IF;
9461: -- commented for multi currency requirement. No need to round the value, as
9462: -- it is taken care in the call to accounting util package called below.
9463: -- l_update_klev_rec.residual_value := round(x_res_value,2);
9464: l_update_klev_rec.residual_value := x_res_value;
9465:
9466: -- Modified by rravikir
9467: -- Call to Accounting Util package to address Multi Currency requirement
9468: -- Start

Line 9469: l_update_klev_rec.residual_value :=

9465:
9466: -- Modified by rravikir
9467: -- Call to Accounting Util package to address Multi Currency requirement
9468: -- Start
9469: l_update_klev_rec.residual_value :=
9470: OKL_ACCOUNTING_UTIL.CROSS_CURRENCY_ROUND_AMOUNT(l_update_klev_rec.residual_value,
9471: l_update_clev_rec.currency_code);
9472:
9473: IF (x_res_value <> 0 AND l_update_klev_rec.residual_value = 0) THEN

Line 9470: OKL_ACCOUNTING_UTIL.CROSS_CURRENCY_ROUND_AMOUNT(l_update_klev_rec.residual_value,

9466: -- Modified by rravikir
9467: -- Call to Accounting Util package to address Multi Currency requirement
9468: -- Start
9469: l_update_klev_rec.residual_value :=
9470: OKL_ACCOUNTING_UTIL.CROSS_CURRENCY_ROUND_AMOUNT(l_update_klev_rec.residual_value,
9471: l_update_clev_rec.currency_code);
9472:
9473: IF (x_res_value <> 0 AND l_update_klev_rec.residual_value = 0) THEN
9474: OKL_API.set_message(p_app_name => G_APP_NAME,

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

9469: l_update_klev_rec.residual_value :=
9470: OKL_ACCOUNTING_UTIL.CROSS_CURRENCY_ROUND_AMOUNT(l_update_klev_rec.residual_value,
9471: l_update_clev_rec.currency_code);
9472:
9473: IF (x_res_value <> 0 AND l_update_klev_rec.residual_value = 0) THEN
9474: OKL_API.set_message(p_app_name => G_APP_NAME,
9475: p_msg_name => G_AMOUNT_ROUNDING,
9476: p_token1 => 'AMT',
9477: p_token1_value => to_char(x_res_value));

Line 9545: p_res_value IN OKL_K_LINES_V.RESIDUAL_VALUE%TYPE,

9541: x_msg_count OUT NOCOPY NUMBER,
9542: x_msg_data OUT NOCOPY VARCHAR2,
9543: P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
9544: p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
9545: p_res_value IN OKL_K_LINES_V.RESIDUAL_VALUE%TYPE,
9546: p_oec IN OKL_K_LINES_V.OEC%TYPE,
9547: p_top_line_id IN OKC_K_LINES_V.ID%TYPE,
9548: p_dnz_chr_id IN OKC_K_LINES_V.DNZ_CHR_ID%TYPE,
9549: x_fin_clev_rec OUT NOCOPY clev_rec_type,

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

9549: x_fin_clev_rec OUT NOCOPY clev_rec_type,
9550: x_fin_klev_rec OUT NOCOPY klev_rec_type,
9551: p_validate_fin_line IN VARCHAR2 DEFAULT OKL_API.G_TRUE) IS
9552:
9553: ln_res_per OKL_K_LINES_V.RESIDUAL_PERCENTAGE%TYPE := 0;
9554: ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
9555: l_update_clev_rec clev_rec_type;
9556: l_update_klev_rec klev_rec_type;
9557:

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

9569: p_token1_value => 'Chr_id,top_line');
9570: RAISE G_EXCEPTION_STOP_VALIDATION;
9571: END IF;
9572: -- gboomina bug 6139003 - Start
9573: -- Modified this condition to calculate residual percent
9574: -- only for valid values
9575: IF (p_oec IS NOT NULL AND
9576: p_oec <> OKL_API.G_MISS_NUM) AND
9577: (p_res_value IS NOT NULL AND

Line 9624: l_update_klev_rec.residual_percentage := ln_res_per;

9620: OKL_API.set_message(p_app_name => G_APP_NAME,
9621: p_msg_name => G_LINE_RECORD);
9622: RAISE G_EXCEPTION_HALT_VALIDATION;
9623: END IF;
9624: l_update_klev_rec.residual_percentage := ln_res_per;
9625: Update_fin_line(p_api_version => p_api_version,
9626: p_init_msg_list => p_init_msg_list,
9627: x_return_status => x_return_status,
9628: x_msg_count => x_msg_count,

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

10417: ln_add_cle_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10418: ln_add_dnz_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE := 0;
10419: ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10420: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
10421: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
10422: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
10423:
10424: -- To Find out the Top line ID
10425: CURSOR c_model_top_line(p_model_line_id OKC_K_LINES_V.ID%TYPE,

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

10593: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10594: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10595: RAISE OKL_API.G_EXCEPTION_ERROR;
10596: END IF;
10597: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
10598: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
10599: p_init_msg_list => p_init_msg_list,
10600: x_return_status => x_return_status,
10601: x_msg_count => x_msg_count,

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

10702: ln_add_cle_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10703: ln_add_dnz_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE := 0;
10704: ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10705: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
10706: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
10707: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
10708:
10709: -- To Find out the Top line ID
10710: CURSOR c_model_top_line(p_model_line_id OKC_K_LINES_V.ID%TYPE,

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

10840: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10841: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10842: RAISE OKL_API.G_EXCEPTION_ERROR;
10843: END IF;
10844: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
10845: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
10846: p_init_msg_list => p_init_msg_list,
10847: x_return_status => x_return_status,
10848: x_msg_count => x_msg_count,

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

10949: ln_add_dnz_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE := 0;
10950: ln_top_line_id OKC_K_LINES_V.CLE_ID%TYPE := 0;
10951: l_clev_tbl clev_tbl_type;
10952: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
10953: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
10954: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
10955:
10956: -- To Find out the Top line ID
10957: CURSOR c_model_top_line(p_model_line_id OKC_K_LINES_V.ID%TYPE,

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

11075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11076: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11077: RAISE OKL_API.G_EXCEPTION_ERROR;
11078: END IF;
11079: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
11080: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
11081: p_init_msg_list => p_init_msg_list,
11082: x_return_status => x_return_status,
11083: x_msg_count => x_msg_count,

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

13355: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13356: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13357: END IF;
13358:
13359: --update financial asset line for OEC and residual value
13360: l_clev_rec.id := l_new_finasst_id;
13361: l_klev_rec.id := l_new_finasst_id;
13362: l_clev_rec.price_unit := OKL_API.G_MISS_NUM;
13363: l_klev_rec.residual_percentage := l_corpbook_rec.percent_salvage_value;

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

13359: --update financial asset line for OEC and residual value
13360: l_clev_rec.id := l_new_finasst_id;
13361: l_klev_rec.id := l_new_finasst_id;
13362: l_clev_rec.price_unit := OKL_API.G_MISS_NUM;
13363: l_klev_rec.residual_percentage := l_corpbook_rec.percent_salvage_value;
13364: l_klev_rec.residual_value := l_corpbook_rec.salvage_value;
13365: --BUG : 3569441
13366: l_klev_rec.oec := l_nbv;
13367: --l_klev_rec.oec := l_corpbook_rec.depreciation_cost;

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

13360: l_clev_rec.id := l_new_finasst_id;
13361: l_klev_rec.id := l_new_finasst_id;
13362: l_clev_rec.price_unit := OKL_API.G_MISS_NUM;
13363: l_klev_rec.residual_percentage := l_corpbook_rec.percent_salvage_value;
13364: l_klev_rec.residual_value := l_corpbook_rec.salvage_value;
13365: --BUG : 3569441
13366: l_klev_rec.oec := l_nbv;
13367: --l_klev_rec.oec := l_corpbook_rec.depreciation_cost;
13368:

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

14228:
14229:
14230: --Bug# 3533936
14231: ---------------------------------------------------------
14232: --Local procedure to resolve residual value on release
14233: --asset line
14234: --------------------------------------------------------
14235: PROCEDURE Resolve_Residual_Value(
14236: p_api_version IN NUMBER,

Line 14235: PROCEDURE Resolve_Residual_Value(

14231: ---------------------------------------------------------
14232: --Local procedure to resolve residual value on release
14233: --asset line
14234: --------------------------------------------------------
14235: PROCEDURE Resolve_Residual_Value(
14236: p_api_version IN NUMBER,
14237: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
14238: x_return_status OUT NOCOPY VARCHAR2,
14239: x_msg_count OUT NOCOPY NUMBER,

Line 14256: l_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;

14252:
14253:
14254: l_top_line_id OKC_K_LINES_B.ID%TYPE;
14255: l_oec OKL_K_LINES.OEC%TYPE;
14256: l_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;
14257: lx_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;
14258:
14259:
14260: --cursor to get model line id

Line 14257: lx_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;

14253:
14254: l_top_line_id OKC_K_LINES_B.ID%TYPE;
14255: l_oec OKL_K_LINES.OEC%TYPE;
14256: l_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;
14257: lx_residual_value OKL_K_LINES.RESIDUAL_VALUE%TYPE;
14258:
14259:
14260: --cursor to get model line id
14261: CURSOR l_modelline_csr(p_cle_id IN NUMBER,

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

14315: RAISE Okc_Api.G_EXCEPTION_ERROR;
14316: End If;
14317: Close l_modelline_csr;
14318:
14319: IF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14320: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14321: (p_klev_fin_rec.residual_value IS NOT NULL OR
14322: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14323:

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

14316: End If;
14317: Close l_modelline_csr;
14318:
14319: IF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14320: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14321: (p_klev_fin_rec.residual_value IS NOT NULL OR
14322: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14323:
14324: l_top_line_id := p_clev_fin_rec.id;

Line 14321: (p_klev_fin_rec.residual_value IS NOT NULL OR

14317: Close l_modelline_csr;
14318:
14319: IF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14320: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14321: (p_klev_fin_rec.residual_value IS NOT NULL OR
14322: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14323:
14324: l_top_line_id := p_clev_fin_rec.id;
14325: --Bug# 4631549

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

14318:
14319: IF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14320: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14321: (p_klev_fin_rec.residual_value IS NOT NULL OR
14322: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14323:
14324: l_top_line_id := p_clev_fin_rec.id;
14325: --Bug# 4631549
14326: If nvl(p_call_mode,okl_api.g_miss_char) = 'RELEASE_CONTRACT' then

Line 14331: l_residual_value := p_klev_fin_rec.residual_value;

14327: l_oec := l_exp_cost_rec.expected_asset_cost;
14328: else
14329: l_oec := p_klev_fin_rec.oec;
14330: end if;
14331: l_residual_value := p_klev_fin_rec.residual_value;
14332:
14333: get_res_per_upd_fin_rec(p_api_version => p_api_version,
14334: p_init_msg_list => p_init_msg_list,
14335: x_return_status => x_return_status,

Line 14340: p_res_value => l_residual_value,

14336: x_msg_count => x_msg_count,
14337: x_msg_data => x_msg_data,
14338: P_new_yn => 'N',
14339: p_asset_number => p_clev_fin_rec.name,
14340: p_res_value => l_residual_value,
14341: p_oec => l_oec,
14342: p_top_line_id => l_top_line_id,
14343: p_dnz_chr_id => p_clev_fin_rec.dnz_chr_id,
14344: x_fin_clev_rec => x_clev_fin_rec,

Line 14366: x_res_value => lx_residual_value,

14362: p_top_line_id => l_top_line_id,
14363: p_dnz_chr_id => p_clev_fin_rec.dnz_chr_id,
14364: x_fin_clev_rec => x_clev_fin_rec,
14365: x_fin_klev_rec => x_klev_fin_rec,
14366: x_res_value => lx_residual_value,
14367: p_validate_fin_line => OKL_API.G_TRUE); -- 4414408
14368:
14369: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14370: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 14375: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR

14371: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14372: RAISE OKL_API.G_EXCEPTION_ERROR;
14373: END IF;
14374:
14375: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR
14376: p_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
14377: (p_klev_fin_rec.residual_value IS NOT NULL OR
14378: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14379:

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

14372: RAISE OKL_API.G_EXCEPTION_ERROR;
14373: END IF;
14374:
14375: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR
14376: p_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
14377: (p_klev_fin_rec.residual_value IS NOT NULL OR
14378: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14379:
14380: l_top_line_id := p_clev_fin_rec.id;

Line 14377: (p_klev_fin_rec.residual_value IS NOT NULL OR

14373: END IF;
14374:
14375: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR
14376: p_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
14377: (p_klev_fin_rec.residual_value IS NOT NULL OR
14378: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14379:
14380: l_top_line_id := p_clev_fin_rec.id;
14381: --Bug# 4631549

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

14374:
14375: ELSIF (p_klev_fin_rec.residual_percentage IS NULL OR
14376: p_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
14377: (p_klev_fin_rec.residual_value IS NOT NULL OR
14378: p_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
14379:
14380: l_top_line_id := p_clev_fin_rec.id;
14381: --Bug# 4631549
14382: If nvl(p_call_mode,okl_api.g_miss_char) = 'RELEASE_CONTRACT' then

Line 14387: l_residual_value := p_klev_fin_rec.residual_value;

14383: l_oec := l_exp_cost_rec.expected_asset_cost;
14384: else
14385: l_oec := p_klev_fin_rec.oec;
14386: end if;
14387: l_residual_value := p_klev_fin_rec.residual_value;
14388:
14389:
14390: get_res_per_upd_fin_rec(p_api_version => p_api_version,
14391: p_init_msg_list => p_init_msg_list,

Line 14397: p_res_value => l_residual_value,

14393: x_msg_count => x_msg_count,
14394: x_msg_data => x_msg_data,
14395: P_new_yn => 'N',
14396: p_asset_number => p_clev_fin_rec.name,
14397: p_res_value => l_residual_value,
14398: p_oec => l_oec,
14399: p_top_line_id => l_top_line_id,
14400: p_dnz_chr_id => p_clev_fin_rec.dnz_chr_id,
14401: x_fin_clev_rec => x_clev_fin_rec,

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

14407: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14408: RAISE OKL_API.G_EXCEPTION_ERROR;
14409: END IF;
14410:
14411: ELSIF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14412: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14413: (p_klev_fin_rec.residual_value IS NULL OR
14414: p_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
14415:

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

14408: RAISE OKL_API.G_EXCEPTION_ERROR;
14409: END IF;
14410:
14411: ELSIF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14412: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14413: (p_klev_fin_rec.residual_value IS NULL OR
14414: p_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
14415:
14416: --Bug# 4631549

Line 14413: (p_klev_fin_rec.residual_value IS NULL OR

14409: END IF;
14410:
14411: ELSIF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14412: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14413: (p_klev_fin_rec.residual_value IS NULL OR
14414: p_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
14415:
14416: --Bug# 4631549
14417: l_top_line_id := p_clev_fin_rec.id;

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

14410:
14411: ELSIF (p_klev_fin_rec.residual_percentage IS NOT NULL OR
14412: p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
14413: (p_klev_fin_rec.residual_value IS NULL OR
14414: p_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
14415:
14416: --Bug# 4631549
14417: l_top_line_id := p_clev_fin_rec.id;
14418:

Line 14431: x_res_value => lx_residual_value,

14427: p_top_line_id => p_clev_fin_rec.id,
14428: p_dnz_chr_id => p_clev_fin_rec.dnz_chr_id,
14429: x_fin_clev_rec => x_clev_fin_rec,
14430: x_fin_klev_rec => x_klev_fin_rec,
14431: x_res_value => lx_residual_value,
14432: p_validate_fin_line => OKL_API.G_TRUE);
14433: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14434: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14435: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 14467: End Resolve_Residual_Value;

14463: 'OTHERS',
14464: x_msg_count,
14465: x_msg_data,
14466: '_PVT');
14467: End Resolve_Residual_Value;
14468:
14469: --Bug# 3533936
14470: -----------------------------------------------------
14471: --Modify Release Asset line based on the user inputs

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

14685: l_clev_fin_rec.id := p_cle_id;
14686: l_klev_fin_rec.id := p_cle_id;
14687: l_klev_fin_rec.PRESCRIBED_ASSET_YN := p_klev_fin_rec.PRESCRIBED_ASSET_YN;
14688:
14689: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := p_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT;
14690:
14691: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14692:
14693: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and

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

14687: l_klev_fin_rec.PRESCRIBED_ASSET_YN := p_klev_fin_rec.PRESCRIBED_ASSET_YN;
14688:
14689: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := p_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT;
14690:
14691: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14692:
14693: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14694: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14695: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;

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

14689: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := p_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT;
14690:
14691: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14692:
14693: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14694: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14695: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14696: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14697: End If;

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

14690:
14691: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14692:
14693: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14694: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14695: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14696: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14697: End If;
14698:

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

14691: l_klev_fin_rec.RESIDUAL_CODE := p_klev_fin_rec.RESIDUAL_CODE;
14692:
14693: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14694: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14695: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14696: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14697: End If;
14698:
14699: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and

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

14692:
14693: If nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14694: nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14695: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14696: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14697: End If;
14698:
14699: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14700: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then

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

14695: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14696: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14697: End If;
14698:
14699: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14700: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then
14701: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14702: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14703: End If;

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

14696: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14697: End If;
14698:
14699: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14700: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then
14701: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14702: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14703: End If;
14704:

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

14697: End If;
14698:
14699: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14700: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then
14701: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14702: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14703: End If;
14704:
14705: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and

Line 14702: l_klev_fin_rec.RESIDUAL_VALUE := NULL;

14698:
14699: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM and
14700: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM then
14701: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14702: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14703: End If;
14704:
14705: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14706: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then

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

14701: l_klev_fin_rec.RESIDUAL_PERCENTAGE := p_klev_fin_rec.RESIDUAL_PERCENTAGE;
14702: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14703: End If;
14704:
14705: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14706: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14707: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14708: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;
14709: End If;

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

14702: l_klev_fin_rec.RESIDUAL_VALUE := NULL;
14703: End If;
14704:
14705: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14706: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14707: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14708: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;
14709: End If;
14710:

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

14703: End If;
14704:
14705: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14706: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14707: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14708: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;
14709: End If;
14710:
14711: --BUG# : NBV - update price unit on fixed asset and model lines

Line 14708: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;

14704:
14705: If nvl(p_klev_fin_rec.RESIDUAL_PERCENTAGE,OKL_API.G_MISS_NUM) = OKL_API.G_MISS_NUM and
14706: nvl(p_klev_fin_rec.RESIDUAL_VALUE,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
14707: l_klev_fin_rec.RESIDUAL_VALUE := p_klev_fin_rec.RESIDUAL_VALUE;
14708: l_klev_fin_rec.RESIDUAL_PERCENTAGE := NULL;
14709: End If;
14710:
14711: --BUG# : NBV - update price unit on fixed asset and model lines
14712: rec_count := 0;

Line 15026: --update residual value as per standard

15022: END IF;
15023: End If;
15024:
15025: --------------------------------------------------
15026: --update residual value as per standard
15027: -------------------------------------------------
15028: Resolve_Residual_Value(
15029: p_api_version => p_api_version,
15030: p_init_msg_list => p_init_msg_list,

Line 15028: Resolve_Residual_Value(

15024:
15025: --------------------------------------------------
15026: --update residual value as per standard
15027: -------------------------------------------------
15028: Resolve_Residual_Value(
15029: p_api_version => p_api_version,
15030: p_init_msg_list => p_init_msg_list,
15031: x_return_status => x_return_status,
15032: x_msg_count => x_msg_count,

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

15196: l_cimv_ib_rec_out cimv_rec_type;
15197: l_trxv_ib_rec_out trxv_rec_type;
15198: l_itiv_ib_tbl_out itiv_tbl_type;
15199: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
15200: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
15201: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
15202: ln_clev_model_price_unit OKC_K_LINES_V.PRICE_UNIT%TYPE := 0;
15203: ln_cimv_model_no_items OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
15204: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

Line 15251: l_residual_value NUMBER;

15247: AND cii.instance_id = ite.object1_id1 AND kle_fa.name = p_asset_number;
15248:
15249: l_top_line_id NUMBER;
15250: l_oec NUMBER;
15251: l_residual_value NUMBER;
15252:
15253: --Bug# 3533936:
15254: l_rel_ast_fin_cle_id NUMBER;
15255:

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

15363: p_token1_value => 'OKC_K_LINES_V.DNZ_CHR_ID for All Lines');
15364: RAISE OKL_API.G_EXCEPTION_ERROR;
15365: END IF;
15366: --start:| 14-May-2008 cklee Bug 6405415 |
15367: IF l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
15368: l_klev_fin_rec.residual_percentage IS NOT NULL THEN
15369: IF NOT l_klev_fin_rec.residual_percentage between 0 and 100 THEN
15370: OKL_API.set_message(p_app_name => G_APP_NAME,
15371: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');

Line 15368: l_klev_fin_rec.residual_percentage IS NOT NULL THEN

15364: RAISE OKL_API.G_EXCEPTION_ERROR;
15365: END IF;
15366: --start:| 14-May-2008 cklee Bug 6405415 |
15367: IF l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
15368: l_klev_fin_rec.residual_percentage IS NOT NULL THEN
15369: IF NOT l_klev_fin_rec.residual_percentage between 0 and 100 THEN
15370: OKL_API.set_message(p_app_name => G_APP_NAME,
15371: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
15372: RAISE OKL_API.G_EXCEPTION_ERROR;

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

15365: END IF;
15366: --start:| 14-May-2008 cklee Bug 6405415 |
15367: IF l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
15368: l_klev_fin_rec.residual_percentage IS NOT NULL THEN
15369: IF NOT l_klev_fin_rec.residual_percentage between 0 and 100 THEN
15370: OKL_API.set_message(p_app_name => G_APP_NAME,
15371: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
15372: RAISE OKL_API.G_EXCEPTION_ERROR;
15373: END IF;

Line 15371: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');

15367: IF l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
15368: l_klev_fin_rec.residual_percentage IS NOT NULL THEN
15369: IF NOT l_klev_fin_rec.residual_percentage between 0 and 100 THEN
15370: OKL_API.set_message(p_app_name => G_APP_NAME,
15371: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
15372: RAISE OKL_API.G_EXCEPTION_ERROR;
15373: END IF;
15374: END IF;
15375: --end:| 14-May-2008 cklee Bug 6405415 |

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

15717: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15718: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15719: RAISE OKL_API.G_EXCEPTION_ERROR;
15720: END IF;
15721: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
15722: -- We need to Back calculate the Residual Percentage if value not given
15723: -- or if given should be in sync with residual value
15724:
15725: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN

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

15718: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15719: RAISE OKL_API.G_EXCEPTION_ERROR;
15720: END IF;
15721: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
15722: -- We need to Back calculate the Residual Percentage if value not given
15723: -- or if given should be in sync with residual value
15724:
15725: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15726: l_klev_fin_rec_out.residual_percentage := null;

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

15719: RAISE OKL_API.G_EXCEPTION_ERROR;
15720: END IF;
15721: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
15722: -- We need to Back calculate the Residual Percentage if value not given
15723: -- or if given should be in sync with residual value
15724:
15725: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15726: l_klev_fin_rec_out.residual_percentage := null;
15727: END IF;

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

15721: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
15722: -- We need to Back calculate the Residual Percentage if value not given
15723: -- or if given should be in sync with residual value
15724:
15725: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15726: l_klev_fin_rec_out.residual_percentage := null;
15727: END IF;
15728:
15729: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN

Line 15726: l_klev_fin_rec_out.residual_percentage := null;

15722: -- We need to Back calculate the Residual Percentage if value not given
15723: -- or if given should be in sync with residual value
15724:
15725: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15726: l_klev_fin_rec_out.residual_percentage := null;
15727: END IF;
15728:
15729: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN
15730: l_klev_fin_rec_out.residual_value := null;

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

15725: IF l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM THEN
15726: l_klev_fin_rec_out.residual_percentage := null;
15727: END IF;
15728:
15729: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN
15730: l_klev_fin_rec_out.residual_value := null;
15731: END IF;
15732:
15733: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR

Line 15730: l_klev_fin_rec_out.residual_value := null;

15726: l_klev_fin_rec_out.residual_percentage := null;
15727: END IF;
15728:
15729: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN
15730: l_klev_fin_rec_out.residual_value := null;
15731: END IF;
15732:
15733: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15734: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND

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

15729: IF l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM THEN
15730: l_klev_fin_rec_out.residual_value := null;
15731: END IF;
15732:
15733: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15734: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15735: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15736: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15737:

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

15730: l_klev_fin_rec_out.residual_value := null;
15731: END IF;
15732:
15733: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15734: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15735: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15736: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15737:
15738: l_top_line_id := x_clev_fin_rec.id;

Line 15735: (l_klev_fin_rec_out.residual_value IS NOT NULL OR

15731: END IF;
15732:
15733: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15734: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15735: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15736: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15737:
15738: l_top_line_id := x_clev_fin_rec.id;
15739: l_oec := l_klev_fin_rec_out.oec;

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

15732:
15733: IF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15734: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15735: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15736: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15737:
15738: l_top_line_id := x_clev_fin_rec.id;
15739: l_oec := l_klev_fin_rec_out.oec;
15740: l_residual_value := l_klev_fin_rec_out.residual_value;

Line 15740: l_residual_value := l_klev_fin_rec_out.residual_value;

15736: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15737:
15738: l_top_line_id := x_clev_fin_rec.id;
15739: l_oec := l_klev_fin_rec_out.oec;
15740: l_residual_value := l_klev_fin_rec_out.residual_value;
15741:
15742: get_res_per_upd_fin_rec(p_api_version => p_api_version,
15743: p_init_msg_list => p_init_msg_list,
15744: x_return_status => x_return_status,

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

15745: x_msg_count => x_msg_count,
15746: x_msg_data => x_msg_data,
15747: P_new_yn => P_new_yn,
15748: p_asset_number => l_asset_number,
15749: p_res_value => l_residual_value, --l_klev_fin_rec_out.residual_value
15750: p_oec => l_oec, --l_klev_fin_rec_out.oec
15751: p_top_line_id => l_top_line_id, --x_clev_fin_rec.id,
15752: p_dnz_chr_id => x_clev_model_rec.dnz_chr_id,
15753: x_fin_clev_rec => x_clev_fin_rec,

Line 15780: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR

15776: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15777: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15778: RAISE OKL_API.G_EXCEPTION_ERROR;
15779: END IF;
15780: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR
15781: l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM) AND
15782: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15783: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15784:

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

15777: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15778: RAISE OKL_API.G_EXCEPTION_ERROR;
15779: END IF;
15780: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR
15781: l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM) AND
15782: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15783: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15784:
15785: l_top_line_id := x_clev_fin_rec.id;

Line 15782: (l_klev_fin_rec_out.residual_value IS NOT NULL OR

15778: RAISE OKL_API.G_EXCEPTION_ERROR;
15779: END IF;
15780: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR
15781: l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM) AND
15782: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15783: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15784:
15785: l_top_line_id := x_clev_fin_rec.id;
15786: l_oec := l_klev_fin_rec_out.oec;

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

15779: END IF;
15780: ELSIF (l_klev_fin_rec_out.residual_percentage IS NULL OR
15781: l_klev_fin_rec_out.residual_percentage = OKL_API.G_MISS_NUM) AND
15782: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15783: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15784:
15785: l_top_line_id := x_clev_fin_rec.id;
15786: l_oec := l_klev_fin_rec_out.oec;
15787: l_residual_value := l_klev_fin_rec_out.residual_value;

Line 15787: l_residual_value := l_klev_fin_rec_out.residual_value;

15783: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15784:
15785: l_top_line_id := x_clev_fin_rec.id;
15786: l_oec := l_klev_fin_rec_out.oec;
15787: l_residual_value := l_klev_fin_rec_out.residual_value;
15788:
15789: get_res_per_upd_fin_rec(p_api_version => p_api_version,
15790: p_init_msg_list => p_init_msg_list,
15791: x_return_status => x_return_status,

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

15792: x_msg_count => x_msg_count,
15793: x_msg_data => x_msg_data,
15794: P_new_yn => P_new_yn,
15795: p_asset_number => l_asset_number,
15796: p_res_value => l_residual_value, --l_klev_fin_rec_out.residual_value
15797: p_oec => l_oec, --l_klev_fin_rec_out.oec
15798: p_top_line_id => l_top_line_id, --x_clev_fin_rec.id,
15799: p_dnz_chr_id => x_clev_model_rec.dnz_chr_id,
15800: x_fin_clev_rec => x_clev_fin_rec,

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

15804: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15805: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15806: RAISE OKL_API.G_EXCEPTION_ERROR;
15807: END IF;
15808: ELSIF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15809: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15810: (l_klev_fin_rec_out.residual_value IS NULL OR
15811: l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM) THEN
15812: res_value_calc_upd_fin_rec(p_api_version => p_api_version,

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

15805: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15806: RAISE OKL_API.G_EXCEPTION_ERROR;
15807: END IF;
15808: ELSIF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15809: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15810: (l_klev_fin_rec_out.residual_value IS NULL OR
15811: l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM) THEN
15812: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
15813: p_init_msg_list => p_init_msg_list,

Line 15810: (l_klev_fin_rec_out.residual_value IS NULL OR

15806: RAISE OKL_API.G_EXCEPTION_ERROR;
15807: END IF;
15808: ELSIF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15809: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15810: (l_klev_fin_rec_out.residual_value IS NULL OR
15811: l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM) THEN
15812: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
15813: p_init_msg_list => p_init_msg_list,
15814: x_return_status => x_return_status,

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

15807: END IF;
15808: ELSIF (l_klev_fin_rec_out.residual_percentage IS NOT NULL OR
15809: l_klev_fin_rec_out.residual_percentage <> OKL_API.G_MISS_NUM) AND
15810: (l_klev_fin_rec_out.residual_value IS NULL OR
15811: l_klev_fin_rec_out.residual_value = OKL_API.G_MISS_NUM) THEN
15812: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
15813: p_init_msg_list => p_init_msg_list,
15814: x_return_status => x_return_status,
15815: x_msg_count => x_msg_count,

Line 15834: (l_klev_fin_rec_out.residual_value IS NOT NULL OR

15830: END IF;
15831: END IF;
15832: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
15833: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
15834: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15835: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15836: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
15837: OKL_API.set_message(p_app_name => G_APP_NAME,
15838: p_msg_name => G_SALVAGE_VALUE);

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

15831: END IF;
15832: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
15833: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
15834: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15835: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15836: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
15837: OKL_API.set_message(p_app_name => G_APP_NAME,
15838: p_msg_name => G_SALVAGE_VALUE);
15839: RAISE OKL_API.G_EXCEPTION_ERROR;

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

15832: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
15833: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
15834: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
15835: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
15836: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
15837: OKL_API.set_message(p_app_name => G_APP_NAME,
15838: p_msg_name => G_SALVAGE_VALUE);
15839: RAISE OKL_API.G_EXCEPTION_ERROR;
15840: END IF;

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

15916: If nvl(l_deal_type_rec.reporting_pdt_id,OKL_API.G_MISS_NUM) <> OKL_API.G_MISS_NUM then
15917: for l_pdt_deal_rec in l_pdt_deal_csr(p_pdt_id => l_deal_type_rec.reporting_pdt_id)
15918: loop
15919: If l_pdt_deal_rec.deal_type = 'LEASEOP' then -- reporting pdt is operating lease
15920: l_talv_fa_rec.salvage_value := nvl(l_klev_fin_rec_out.residual_value,0);
15921:
15922: End If;
15923: End loop;
15924: End If;

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

15924: End If;
15925: Elsif l_deal_type_rec.deal_type = 'LOAN-REVOLVING' then
15926: null;
15927: Else -- for LEASEOP, LEASEDF, LEASEST
15928: l_talv_fa_rec.salvage_value := nvl(l_klev_fin_rec_out.residual_value,0);
15929: End If;
15930: End Loop;
15931: End If;*/
15932: --| end 29-Oct-2008 cklee Bug: 7492324 move code logic to |

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

16325: r_cimv_ib_rec cimv_rec_type;
16326: r_itiv_ib_rec itiv_rec_type;
16327: ln_addon_oec OKL_K_LINES_V.OEC%TYPE := 0;
16328: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
16329: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
16330: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
16331: ln_clev_model_price_unit OKC_K_LINES_V.PRICE_UNIT%TYPE := 0;
16332: ln_cimv_model_no_items OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
16333: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

Line 16404: --cursor to get existing residual values

16400: --Bug# 3533936: Enhancements for release assets
16401: l_rel_ast_fin_cle_id NUMBER;
16402: l_itiv_ib_tbl itiv_tbl_type;
16403:
16404: --cursor to get existing residual values
16405: --and down payment values Bug# 5192636
16406: cursor l_cle_csr (p_cle_id in number,
16407: p_chr_id in number) is
16408: select fin_kle.DOWN_PAYMENT_RECEIVER_CODE,

Line 16410: fin_kle.residual_value,

16406: cursor l_cle_csr (p_cle_id in number,
16407: p_chr_id in number) is
16408: select fin_kle.DOWN_PAYMENT_RECEIVER_CODE,
16409: fin_kle.CAPITALIZE_DOWN_PAYMENT_YN,
16410: fin_kle.residual_value,
16411: fin_kle.residual_percentage
16412: from
16413: okl_k_lines fin_kle,
16414: okc_k_lines_b fin_cleb

Line 16411: fin_kle.residual_percentage

16407: p_chr_id in number) is
16408: select fin_kle.DOWN_PAYMENT_RECEIVER_CODE,
16409: fin_kle.CAPITALIZE_DOWN_PAYMENT_YN,
16410: fin_kle.residual_value,
16411: fin_kle.residual_percentage
16412: from
16413: okl_k_lines fin_kle,
16414: okc_k_lines_b fin_cleb
16415: where fin_kle.id = fin_cleb.id

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

16581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16582: RAISE OKL_API.G_EXCEPTION_ERROR;
16583: END IF;
16584: --start:| 14-May-2008 cklee Bug 6405415 |
16585: IF p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
16586: p_klev_fin_rec.residual_percentage IS NOT NULL THEN
16587: IF NOT p_klev_fin_rec.residual_percentage between 0 and 100 THEN
16588: OKL_API.set_message(p_app_name => G_APP_NAME,
16589: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');

Line 16586: p_klev_fin_rec.residual_percentage IS NOT NULL THEN

16582: RAISE OKL_API.G_EXCEPTION_ERROR;
16583: END IF;
16584: --start:| 14-May-2008 cklee Bug 6405415 |
16585: IF p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
16586: p_klev_fin_rec.residual_percentage IS NOT NULL THEN
16587: IF NOT p_klev_fin_rec.residual_percentage between 0 and 100 THEN
16588: OKL_API.set_message(p_app_name => G_APP_NAME,
16589: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
16590: RAISE OKL_API.G_EXCEPTION_ERROR;

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

16583: END IF;
16584: --start:| 14-May-2008 cklee Bug 6405415 |
16585: IF p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
16586: p_klev_fin_rec.residual_percentage IS NOT NULL THEN
16587: IF NOT p_klev_fin_rec.residual_percentage between 0 and 100 THEN
16588: OKL_API.set_message(p_app_name => G_APP_NAME,
16589: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
16590: RAISE OKL_API.G_EXCEPTION_ERROR;
16591: END IF;

Line 16589: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');

16585: IF p_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM and
16586: p_klev_fin_rec.residual_percentage IS NOT NULL THEN
16587: IF NOT p_klev_fin_rec.residual_percentage between 0 and 100 THEN
16588: OKL_API.set_message(p_app_name => G_APP_NAME,
16589: p_msg_name => 'OKL_VALID_RESIDUAL_PERCENT');
16590: RAISE OKL_API.G_EXCEPTION_ERROR;
16591: END IF;
16592: END IF;
16593: --end:| 14-May-2008 cklee Bug 6405415 |

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

16613: l_klev_fin_rec := p_klev_fin_rec;
16614:
16615: --Bug# 6888733: start
16616:
16617: if l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT = fnd_api.g_miss_num then
16618: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := null;
16619: end if;
16620:
16621: --Bug# 6888733: end

Line 16618: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := null;

16614:
16615: --Bug# 6888733: start
16616:
16617: if l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT = fnd_api.g_miss_num then
16618: l_klev_fin_rec.RESIDUAL_GRNTY_AMOUNT := null;
16619: end if;
16620:
16621: --Bug# 6888733: end
16622:

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

17119: -- only if the price unit and number of items change.
17120: /*
17121: IF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit AND
17122: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
17123: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage AND
17124: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17125: l_go_for_calc := 'Y';
17126: ELSIF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit OR
17127: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN

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

17120: /*
17121: IF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit AND
17122: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
17123: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage AND
17124: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17125: l_go_for_calc := 'Y';
17126: ELSIF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit OR
17127: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
17128: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage OR

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

17124: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17125: l_go_for_calc := 'Y';
17126: ELSIF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit OR
17127: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
17128: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage OR
17129: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17130: l_go_for_calc := 'Y';
17131: ELSE
17132: l_go_for_calc := 'N';

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

17125: l_go_for_calc := 'Y';
17126: ELSIF l_clev_model_rec.price_unit <> r_clev_model_rec.price_unit OR
17127: l_cimv_model_rec.number_of_items <> r_cimv_model_rec.number_of_items THEN
17128: l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage OR
17129: l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17130: l_go_for_calc := 'Y';
17131: ELSE
17132: l_go_for_calc := 'N';
17133: END IF;

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

17250: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17251: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17252: RAISE OKL_API.G_EXCEPTION_ERROR;
17253: END IF;
17254: IF l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM THEN
17255: l_klev_fin_rec.residual_percentage := null;
17256: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17257: l_klev_fin_rec.residual_value := null;
17258: END IF;

Line 17255: l_klev_fin_rec.residual_percentage := null;

17251: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17252: RAISE OKL_API.G_EXCEPTION_ERROR;
17253: END IF;
17254: IF l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM THEN
17255: l_klev_fin_rec.residual_percentage := null;
17256: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17257: l_klev_fin_rec.residual_value := null;
17258: END IF;
17259: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE

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

17252: RAISE OKL_API.G_EXCEPTION_ERROR;
17253: END IF;
17254: IF l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM THEN
17255: l_klev_fin_rec.residual_percentage := null;
17256: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17257: l_klev_fin_rec.residual_value := null;
17258: END IF;
17259: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17260: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR

Line 17257: l_klev_fin_rec.residual_value := null;

17253: END IF;
17254: IF l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM THEN
17255: l_klev_fin_rec.residual_percentage := null;
17256: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17257: l_klev_fin_rec.residual_value := null;
17258: END IF;
17259: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17260: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17261: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND

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

17255: l_klev_fin_rec.residual_percentage := null;
17256: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17257: l_klev_fin_rec.residual_value := null;
17258: END IF;
17259: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17260: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17261: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17262: (l_klev_fin_rec.residual_value IS NOT NULL OR
17263: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN

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

17256: ELSIF l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM THEN
17257: l_klev_fin_rec.residual_value := null;
17258: END IF;
17259: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17260: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17261: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17262: (l_klev_fin_rec.residual_value IS NOT NULL OR
17263: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17264: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN

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

17257: l_klev_fin_rec.residual_value := null;
17258: END IF;
17259: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17260: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17261: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17262: (l_klev_fin_rec.residual_value IS NOT NULL OR
17263: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17264: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17265:

Line 17262: (l_klev_fin_rec.residual_value IS NOT NULL OR

17258: END IF;
17259: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17260: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17261: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17262: (l_klev_fin_rec.residual_value IS NOT NULL OR
17263: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17264: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17265:
17266: l_top_line_id := x_clev_fin_rec.id;

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

17259: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
17260: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17261: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17262: (l_klev_fin_rec.residual_value IS NOT NULL OR
17263: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17264: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17265:
17266: l_top_line_id := x_clev_fin_rec.id;
17267: l_oec := l_klev_fin_rec_out.oec;

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

17260: IF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17261: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17262: (l_klev_fin_rec.residual_value IS NOT NULL OR
17263: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17264: IF l_klev_fin_rec.residual_value <> r_klev_fin_rec.residual_value THEN
17265:
17266: l_top_line_id := x_clev_fin_rec.id;
17267: l_oec := l_klev_fin_rec_out.oec;
17268:

Line 17276: p_res_value => l_klev_fin_rec.residual_value,

17272: x_msg_count => x_msg_count,
17273: x_msg_data => x_msg_data,
17274: P_new_yn => P_new_yn,
17275: p_asset_number => p_asset_number,
17276: p_res_value => l_klev_fin_rec.residual_value,
17277: p_oec => l_oec, --l_klev_fin_rec_out.oec
17278: p_top_line_id => l_top_line_id, --x_clev_fin_rec.id,
17279: p_dnz_chr_id => x_clev_model_rec.dnz_chr_id,
17280: x_fin_clev_rec => x_clev_fin_rec,

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

17284: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17285: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17286: RAISE OKL_API.G_EXCEPTION_ERROR;
17287: END IF;
17288: ELSIF l_klev_fin_rec.residual_percentage <> r_klev_fin_rec.residual_percentage THEN
17289: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
17290: p_init_msg_list => p_init_msg_list,
17291: x_return_status => x_return_status,
17292: x_msg_count => x_msg_count,

Line 17309: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR

17305: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17306: RAISE OKL_API.G_EXCEPTION_ERROR;
17307: END IF;
17308: END IF;
17309: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR
17310: l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
17311: (l_klev_fin_rec.residual_value IS NOT NULL OR
17312: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17313:

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

17306: RAISE OKL_API.G_EXCEPTION_ERROR;
17307: END IF;
17308: END IF;
17309: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR
17310: l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
17311: (l_klev_fin_rec.residual_value IS NOT NULL OR
17312: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17313:
17314: l_top_line_id := x_clev_fin_rec.id;

Line 17311: (l_klev_fin_rec.residual_value IS NOT NULL OR

17307: END IF;
17308: END IF;
17309: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR
17310: l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
17311: (l_klev_fin_rec.residual_value IS NOT NULL OR
17312: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17313:
17314: l_top_line_id := x_clev_fin_rec.id;
17315: l_oec := l_klev_fin_rec_out.oec;

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

17308: END IF;
17309: ELSIF (l_klev_fin_rec.residual_percentage IS NULL OR
17310: l_klev_fin_rec.residual_percentage = OKL_API.G_MISS_NUM) AND
17311: (l_klev_fin_rec.residual_value IS NOT NULL OR
17312: l_klev_fin_rec.residual_value <> OKL_API.G_MISS_NUM) THEN
17313:
17314: l_top_line_id := x_clev_fin_rec.id;
17315: l_oec := l_klev_fin_rec_out.oec;
17316:

Line 17324: p_res_value => l_klev_fin_rec.residual_value,

17320: x_msg_count => x_msg_count,
17321: x_msg_data => x_msg_data,
17322: P_new_yn => P_new_yn,
17323: p_asset_number => p_asset_number,
17324: p_res_value => l_klev_fin_rec.residual_value,
17325: p_oec => l_oec, --l_klev_fin_rec_out.oec
17326: p_top_line_id => l_top_line_id, --x_clev_fin_rec.id,
17327: p_dnz_chr_id => x_clev_model_rec.dnz_chr_id,
17328: x_fin_clev_rec => x_clev_fin_rec,

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

17332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17333: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17334: RAISE OKL_API.G_EXCEPTION_ERROR;
17335: END IF;
17336: ELSIF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17337: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17338: (l_klev_fin_rec.residual_value IS NULL OR
17339: l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
17340: res_value_calc_upd_fin_rec(p_api_version => p_api_version,

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

17333: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17334: RAISE OKL_API.G_EXCEPTION_ERROR;
17335: END IF;
17336: ELSIF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17337: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17338: (l_klev_fin_rec.residual_value IS NULL OR
17339: l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
17340: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
17341: p_init_msg_list => p_init_msg_list,

Line 17338: (l_klev_fin_rec.residual_value IS NULL OR

17334: RAISE OKL_API.G_EXCEPTION_ERROR;
17335: END IF;
17336: ELSIF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17337: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17338: (l_klev_fin_rec.residual_value IS NULL OR
17339: l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
17340: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
17341: p_init_msg_list => p_init_msg_list,
17342: x_return_status => x_return_status,

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

17335: END IF;
17336: ELSIF (l_klev_fin_rec.residual_percentage IS NOT NULL OR
17337: l_klev_fin_rec.residual_percentage <> OKL_API.G_MISS_NUM) AND
17338: (l_klev_fin_rec.residual_value IS NULL OR
17339: l_klev_fin_rec.residual_value = OKL_API.G_MISS_NUM) THEN
17340: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
17341: p_init_msg_list => p_init_msg_list,
17342: x_return_status => x_return_status,
17343: x_msg_count => x_msg_count,

Line 17363: (l_klev_fin_rec_out.residual_value IS NOT NULL OR

17359: END IF;
17360: END IF;
17361: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
17362: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
17363: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
17364: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
17365: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
17366: OKL_API.set_message(p_app_name => G_APP_NAME,
17367: p_msg_name => G_SALVAGE_VALUE);

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

17360: END IF;
17361: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
17362: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
17363: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
17364: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
17365: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
17366: OKL_API.set_message(p_app_name => G_APP_NAME,
17367: p_msg_name => G_SALVAGE_VALUE);
17368: RAISE OKL_API.G_EXCEPTION_ERROR;

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

17361: IF (l_klev_fin_rec_out.oec IS NOT NULL OR
17362: l_klev_fin_rec_out.oec <> OKL_API.G_MISS_NUM) AND
17363: (l_klev_fin_rec_out.residual_value IS NOT NULL OR
17364: l_klev_fin_rec_out.residual_value <> OKL_API.G_MISS_NUM) THEN
17365: IF l_klev_fin_rec_out.residual_value > l_klev_fin_rec_out.oec THEN
17366: OKL_API.set_message(p_app_name => G_APP_NAME,
17367: p_msg_name => G_SALVAGE_VALUE);
17368: RAISE OKL_API.G_EXCEPTION_ERROR;
17369: END IF;

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

18084: l_clev_fa_rec_out clev_rec_type;
18085: l_klev_fa_rec_out klev_rec_type;
18086: ln_model_qty OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
18087: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
18088: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
18089: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
18090:
18091: CURSOR c_remain_inst_line(p_cle_id OKC_K_LINES_V.CLE_ID%TYPE,
18092: p_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE) IS

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

18852: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
18853: RAISE OKL_API.G_EXCEPTION_ERROR;
18854: END IF;
18855:
18856: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
18857: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
18858: p_init_msg_list => p_init_msg_list,
18859: x_return_status => x_return_status,
18860: x_msg_count => x_msg_count,

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

19121: lx_talv_fa_rec talv_rec_type;
19122: lx_clev_fin_rec clev_rec_type;
19123: lx_klev_fin_rec klev_rec_type;
19124: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
19125: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
19126: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
19127: r_clev_addon_rec clev_rec_type;
19128: r_klev_addon_rec klev_rec_type;
19129: r_cimv_addon_rec cimv_rec_type;

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

19763: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19764: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19765: RAISE OKL_API.G_EXCEPTION_ERROR;
19766: END IF;
19767: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
19768: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
19769: p_init_msg_list => p_init_msg_list,
19770: x_return_status => x_return_status,
19771: x_msg_count => x_msg_count,

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

20044: l_klev_model_rec_out klev_rec_type;
20045: l_clev_fa_rec_out clev_rec_type;
20046: l_klev_fa_rec_out klev_rec_type;
20047: ln_klev_fin_oec OKL_K_LINES_V.OEC%TYPE := 0;
20048: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
20049: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
20050: r_clev_addon_rec clev_rec_type;
20051: r_klev_addon_rec klev_rec_type;
20052: r_cimv_addon_rec cimv_rec_type;

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

20600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20601: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20602: RAISE OKL_API.G_EXCEPTION_ERROR;
20603: END IF;
20604: -- Calculate the Residual Value to Populate the OKL_K_LINES_V.RESIDUAL_VALUE
20605: res_value_calc_upd_fin_rec(p_api_version => p_api_version,
20606: p_init_msg_list => p_init_msg_list,
20607: x_return_status => x_return_status,
20608: x_msg_count => x_msg_count,