[Home] [Help]
3389: -- Start of comments
3390: --
3391: -- Procedure Name : create_offlease_asset_trx
3392: -- Description : This procedure populates the transaction
3393: -- header- okl_trx_assets_v and transaction lines- okl_txl_assets_v with amortization transactions
3394: -- for off-lease assets for a particular financial asset
3395: -- Business Rules :
3396: -- Parameters : p_kle_id - Finacial Asset id
3397: -- p_early_termination_yn - early termination / end of term flag
3743: FROM okl_k_lines_full_v
3744: WHERE id = p_id;
3745:
3746: -- This cursor returns the original cost from the original asset creation line
3747: CURSOR l_txlassetsv_csr(p_asset_number okl_txl_assets_v.asset_number%type) IS
3748: SELECT original_cost
3749: FROM okl_txl_assets_v
3750: WHERE tal_type = 'CFA'
3751: AND asset_number = p_asset_number
3745:
3746: -- This cursor returns the original cost from the original asset creation line
3747: CURSOR l_txlassetsv_csr(p_asset_number okl_txl_assets_v.asset_number%type) IS
3748: SELECT original_cost
3749: FROM okl_txl_assets_v
3750: WHERE tal_type = 'CFA'
3751: AND asset_number = p_asset_number
3752: AND ROWNUM < 2;
3753:
4785: WHERE id = p_id;
4786:
4787: -- SECHAWLA 24-FEB-05 4147143 : added kle_id, tal_type
4788: -- SECHAWLA 27-FEB-05 4147143 : added asset book
4789: -- This cursor returns the transaction line information from okl_txl_assets_v
4790: CURSOR l_lines_csr(p_id number) IS
4791: SELECT l.asset_number, l.hold_period_days, l.depreciate_yn, l.kle_id, l.tal_type,
4792: decode(d.tax_book,NULL,l.CORPORATE_BOOK,d.tax_book ) ASSET_BOOK
4793: FROM okl_txl_assets_b l, -- SECHAWLA 24-FEB-05 4147143 : changed view to base table
5273: SELECT DATE_TRANS_OCCURRED
5274: FROM OKL_TRX_ASSETS
5275: WHERE id = p_id;
5276:
5277: -- This cursor returns the transaction line information from okl_txl_assets_v
5278: CURSOR l_lines_csr(p_id number) IS
5279: SELECT asset_number, hold_period_days, depreciate_yn
5280: FROM okl_txl_assets_v
5281: WHERE id = p_id;
5276:
5277: -- This cursor returns the transaction line information from okl_txl_assets_v
5278: CURSOR l_lines_csr(p_id number) IS
5279: SELECT asset_number, hold_period_days, depreciate_yn
5280: FROM okl_txl_assets_v
5281: WHERE id = p_id;
5282:
5283: lp_header_temp_rec thpv_rec_type;
5284: lp_lines_temp_rec tlpv_rec_type;
5319: IF p_header_tbl.count > 0 THEN
5320: i := p_header_tbl.FIRST;
5321:
5322: -- loop thru all the records in the input table, validate data an then update okl_trx_assets_v and
5323: -- okl_txl_assets_v
5324: LOOP
5325:
5326: l_date_valid_yn := 'Y';
5327:
5557:
5558: -- Get the Line details
5559: CURSOR line_csr (p_header_id IN NUMBER) IS
5560: SELECT TXL.id
5561: FROM OKL_TXL_ASSETS_V TXL
5562: WHERE TXL.tas_id = p_header_id;
5563:
5564: -- Get the lookup meaning for OKL_TRANS_HEADER_TYPE
5565: CURSOR amt_csr (p_code IN VARCHAR2) IS