[Home] [Help]
5: --
6: -- Procedure Name : create_salvage_value_trx
7: -- Description : The main body of the package. This procedure gets a table of line ids along with the new
8: -- salvage values as parameter. It then validates the new SV to make sure that it is less than
9: -- the current SV and then creates salvage value transactions in OKL_TRX_ASSETS_V and
10: -- OKL_TXL_ASSETS_V
11: -- Business Rules :
12: -- Parameters : p_assets_tbl
13: -- Version : 1.0
26: x_msg_data OUT NOCOPY VARCHAR2,
27: p_assets_tbl IN assets_tbl_type,
28: x_salvage_value_status OUT NOCOPY VARCHAR2) IS
29:
30: SUBTYPE thpv_rec_type IS okl_trx_assets_pub.thpv_rec_type;
31: SUBTYPE tlpv_rec_type IS okl_txl_assets_pub.tlpv_rec_type;
32:
33:
34: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
72: -- SECHAWLA 07-FEB-03 Bug # 2789656 : Changed the cursor to select asset_number instead of count(*)
73: -- This cursor is used to check if a pending salvage value writedown transaction already exists for a financial asset.
74: CURSOR l_assettrx_csr(p_kle_id NUMBER) IS
75: SELECT l.asset_number
76: FROM OKL_TRX_ASSETS h, okl_txl_assets_v l
77: WHERE h.id = l.tas_id
78: AND h.tsu_code = 'ENTERED'
79: AND h.tas_type = 'FSC'
80: AND l.kle_id = p_kle_id;
254: END IF;
255: -- Legal Entity Changes End
256:
257: -- create transaction header
258: OKL_TRX_ASSETS_PUB.create_trx_ass_h_def(
259: p_api_version => p_api_version,
260: p_init_msg_list => OKL_API.G_FALSE,
261: x_return_status => l_record_status,
262: x_msg_count => x_msg_count,