[Home] [Help]
3349: CURRENCY_CODE,
3350: CURRENCY_CONVERSION_TYPE,
3351: CURRENCY_CONVERSION_RATE,
3352: CURRENCY_CONVERSION_DATE
3353: FROM Okl_Txd_Assets_v txdv
3354: WHERE txdv.tal_id = p_tal_id
3355: ORDER BY NVL(target_kle_id,-1)
3356: --Bug# 3502142
3357: , NVL(split_percent,-1);
3508: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3509: RETURN(l_return_status);
3510: END Asset_Number_Exists;
3511: --------------------------------------------------------------------------------
3512: --Function to validate okl_txd_Assets_v attributes
3513: --------------------------------------------------------------------------------
3514: FUNCTION Validate_Attributes (p_txdv_rec IN txdv_rec_type)
3515: RETURN VARCHAR2 IS
3516:
4008: l_split_into_individuals_yn := NVL(p_txlv_rec.SPLIT_INTO_SINGLES_FLAG,'N');
4009: --dbms_output.put_line('Split into individuals'||l_split_into_individuals_yn);
4010: --dbms_output.put_line('ast rec current units'||to_char(p_ast_line_rec.current_units));
4011: --dbms_output.put_line('txlv rec units retired'||to_char(p_txlv_rec.split_into_units));
4012: --prepared record for OKL_TXD_ASSETS_V
4013: IF l_split_into_individuals_yn = 'Y' THEN
4014: --l_split_into_units := p_ast_line_rec.current_units;
4015: l_split_into_units := p_txlv_rec.current_units;
4016: l_units_on_child_line := 1;
5755: --------------------------------------------------------------------------------
5756: --Start of Comments
5757: --API Name : Create_Split_Transaction
5758: --Description : Process API to create Split Aseet Transaction Records in
5759: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
5760: -- 1. Take the line details to be split
5761: -- 2. Set the status of the contract as inactive
5762: -- 3. Create and save source record into okl_trx_assets_v
5763: -- 4. Create and save target record into okl_txd_assets_v
5759: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
5760: -- 1. Take the line details to be split
5761: -- 2. Set the status of the contract as inactive
5762: -- 3. Create and save source record into okl_trx_assets_v
5763: -- 4. Create and save target record into okl_txd_assets_v
5764: --History :
5765: -- 10-OCT-2001 avsingh Creation
5766: -- 12-Dec-2002 avsingh Overloaded the procedure to take p_srl_tbl
5767: -- as IN parameter. This will be directly called
6425: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6426: RAISE OKL_API.G_EXCEPTION_ERROR;
6427: END IF;
6428:
6429: --call to create record for OKL_TXD_ASSETS_V
6430: --dbms_output.put_line('when fresh trx '||l_ast_line_rec.description);
6431: IF NVL(p_split_into_individuals_yn,'N') = 'X' THEN
6432: --split asset component transaction details will not be created
6433: NULL;
6548: x_no_data_found => l_no_txd_data_found);
6549: IF l_no_txd_data_found THEN
6550: NULL;
6551: --dbms_output.put_line('No Transaction Details Found');
6552: --call to create record for OKL_TXD_ASSETS_V
6553: --dbms_output.put_line('when txd assets not found '||l_ast_line_rec.description);
6554: Create_trx_details(p_api_version => p_api_version,
6555: p_init_msg_list => p_init_msg_list,
6556: x_return_status => x_return_status,
6583: --Bug fix# 2744213 : positioning of end if
6584: -- End If;
6585:
6586: -- create new transaction details
6587: --call to create record for OKL_TXD_ASSETS_V
6588: --dbms_output.put_line('after deleting txd assets '||l_ast_line_rec.description);
6589: Create_trx_details(p_api_version => p_api_version,
6590: p_init_msg_list => p_init_msg_list,
6591: x_return_status => x_return_status,
6720: ------------------------------------------------------------------------------
6721: --Bug# 3156924
6722: --API Name : Create_Split_Transaction
6723: --Description : Process API to create Split Aseet Transaction Records in
6724: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
6725: --Note : Original split asset trx creation callo has been overloaded
6726: -- to include p_trx_date(trx_date) as parameter. This old
6727: -- signature preserved for backward compatability. It will
6728: -- create split asset transaction on SYSDATE
6819: -------------------------------------------------------------------------------------
6820: --Bug# 3156924
6821: --API Name : Create_Split_Transaction
6822: --Description : Process API to create Split Aseet Transaction Records in
6823: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
6824: --Note : New signature added to accomodate p_trx_date being passed. This is
6825: -- the one called from the UI. This will create transactions in OKL
6826: -- _TXL_ITM_INSTS if the asset is serialized ad being split by units
6827: -- UI will mark the selected records as selected_for_split_flag = 'Y'
6983: --------------------------------------------------------------------------------
6984: --Start of Comments
6985: --API Name : Create_Split_Transaction
6986: --Description : Process API to create Split Aseet Transaction Records in
6987: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
6988: -- 1. Take the line details to be split
6989: -- 2. Set the status of the contract as inactive
6990: -- 3. Create and save source record into okl_trx_assets_v
6991: -- 4. Create and save target record into okl_txd_assets_v
6987: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
6988: -- 1. Take the line details to be split
6989: -- 2. Set the status of the contract as inactive
6990: -- 3. Create and save source record into okl_trx_assets_v
6991: -- 4. Create and save target record into okl_txd_assets_v
6992: --Note : old signature kept for backward compatability. This will be the
6993: -- the one called from the UI. This will create transactions in OKL
6994: -- _TXL_ITM_INSTS if the asset is serialized ad being split by units
6995: -- UI will mark the selected records as selected_for_split_flag = 'Y'