[Home] [Help]
3321: CURRENCY_CODE,
3322: CURRENCY_CONVERSION_TYPE,
3323: CURRENCY_CONVERSION_RATE,
3324: CURRENCY_CONVERSION_DATE
3325: FROM Okl_Txd_Assets_v txdv
3326: WHERE txdv.tal_id = p_tal_id
3327: ORDER BY NVL(target_kle_id,-1)
3328: --Bug# 3502142
3329: , NVL(split_percent,-1);
3480: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3481: RETURN(l_return_status);
3482: END Asset_Number_Exists;
3483: --------------------------------------------------------------------------------
3484: --Function to validate okl_txd_Assets_v attributes
3485: --------------------------------------------------------------------------------
3486: FUNCTION Validate_Attributes (p_txdv_rec IN txdv_rec_type)
3487: RETURN VARCHAR2 IS
3488:
3980: l_split_into_individuals_yn := NVL(p_txlv_rec.SPLIT_INTO_SINGLES_FLAG,'N');
3981: --dbms_output.put_line('Split into individuals'||l_split_into_individuals_yn);
3982: --dbms_output.put_line('ast rec current units'||to_char(p_ast_line_rec.current_units));
3983: --dbms_output.put_line('txlv rec units retired'||to_char(p_txlv_rec.split_into_units));
3984: --prepared record for OKL_TXD_ASSETS_V
3985: IF l_split_into_individuals_yn = 'Y' THEN
3986: --l_split_into_units := p_ast_line_rec.current_units;
3987: l_split_into_units := p_txlv_rec.current_units;
3988: l_units_on_child_line := 1;
5727: --------------------------------------------------------------------------------
5728: --Start of Comments
5729: --API Name : Create_Split_Transaction
5730: --Description : Process API to create Split Aseet Transaction Records in
5731: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
5732: -- 1. Take the line details to be split
5733: -- 2. Set the status of the contract as inactive
5734: -- 3. Create and save source record into okl_trx_assets_v
5735: -- 4. Create and save target record into okl_txd_assets_v
5731: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
5732: -- 1. Take the line details to be split
5733: -- 2. Set the status of the contract as inactive
5734: -- 3. Create and save source record into okl_trx_assets_v
5735: -- 4. Create and save target record into okl_txd_assets_v
5736: --History :
5737: -- 10-OCT-2001 avsingh Creation
5738: -- 12-Dec-2002 avsingh Overloaded the procedure to take p_srl_tbl
5739: -- as IN parameter. This will be directly called
6372: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6373: RAISE OKL_API.G_EXCEPTION_ERROR;
6374: END IF;
6375:
6376: --call to create record for OKL_TXD_ASSETS_V
6377: --dbms_output.put_line('when fresh trx '||l_ast_line_rec.description);
6378: IF NVL(p_split_into_individuals_yn,'N') = 'X' THEN
6379: --split asset component transaction details will not be created
6380: NULL;
6495: x_no_data_found => l_no_txd_data_found);
6496: IF l_no_txd_data_found THEN
6497: NULL;
6498: --dbms_output.put_line('No Transaction Details Found');
6499: --call to create record for OKL_TXD_ASSETS_V
6500: --dbms_output.put_line('when txd assets not found '||l_ast_line_rec.description);
6501: Create_trx_details(p_api_version => p_api_version,
6502: p_init_msg_list => p_init_msg_list,
6503: x_return_status => x_return_status,
6530: --Bug fix# 2744213 : positioning of end if
6531: -- End If;
6532:
6533: -- create new transaction details
6534: --call to create record for OKL_TXD_ASSETS_V
6535: --dbms_output.put_line('after deleting txd assets '||l_ast_line_rec.description);
6536: Create_trx_details(p_api_version => p_api_version,
6537: p_init_msg_list => p_init_msg_list,
6538: x_return_status => x_return_status,
6667: ------------------------------------------------------------------------------
6668: --Bug# 3156924
6669: --API Name : Create_Split_Transaction
6670: --Description : Process API to create Split Aseet Transaction Records in
6671: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
6672: --Note : Original split asset trx creation callo has been overloaded
6673: -- to include p_trx_date(trx_date) as parameter. This old
6674: -- signature preserved for backward compatability. It will
6675: -- create split asset transaction on SYSDATE
6766: -------------------------------------------------------------------------------------
6767: --Bug# 3156924
6768: --API Name : Create_Split_Transaction
6769: --Description : Process API to create Split Aseet Transaction Records in
6770: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
6771: --Note : New signature added to accomodate p_trx_date being passed. This is
6772: -- the one called from the UI. This will create transactions in OKL
6773: -- _TXL_ITM_INSTS if the asset is serialized ad being split by units
6774: -- UI will mark the selected records as selected_for_split_flag = 'Y'
6930: --------------------------------------------------------------------------------
6931: --Start of Comments
6932: --API Name : Create_Split_Transaction
6933: --Description : Process API to create Split Aseet Transaction Records in
6934: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
6935: -- 1. Take the line details to be split
6936: -- 2. Set the status of the contract as inactive
6937: -- 3. Create and save source record into okl_trx_assets_v
6938: -- 4. Create and save target record into okl_txd_assets_v
6934: -- OKL_TXL_ASSETS_V and OKL_TXD_ASSETS_V
6935: -- 1. Take the line details to be split
6936: -- 2. Set the status of the contract as inactive
6937: -- 3. Create and save source record into okl_trx_assets_v
6938: -- 4. Create and save target record into okl_txd_assets_v
6939: --Note : old signature kept for backward compatability. This will be the
6940: -- the one called from the UI. This will create transactions in OKL
6941: -- _TXL_ITM_INSTS if the asset is serialized ad being split by units
6942: -- UI will mark the selected records as selected_for_split_flag = 'Y'