[Home] [Help]
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
2544: WHERE TXD.asset_number = p_asset_number
2545: AND TXD.TAL_ID = TXL.ID
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
2912: WHERE TXD.asset_number = p_asset_number
2913: AND TXD.TAL_ID = TXL.ID
4074: RAISE OKL_API.G_EXCEPTION_ERROR;
4075: END IF;
4076: -- evaluate conditions, build outcomes for true conditions and
4077: -- put them on outcome queue
4078: OKL_TRX_ASSETS_PUB.create_trx_ass_h_def(
4079: p_api_version => p_api_version,
4080: p_init_msg_list => p_init_msg_list,
4081: x_return_status => x_return_status,
4082: x_msg_count => x_msg_count,
4150: RAISE OKL_API.G_EXCEPTION_ERROR;
4151: END IF;
4152: -- evaluate conditions, build outcomes for true conditions and
4153: -- put them on outcome queue
4154: OKL_TRX_ASSETS_PUB.update_trx_ass_h_def(
4155: p_api_version => p_api_version,
4156: p_init_msg_list => p_init_msg_list,
4157: x_return_status => x_return_status,
4158: x_msg_count => x_msg_count,
5932: lv_id1 OKC_K_ITEMS_V.OBJECT1_ID1%TYPE := OKL_API.G_MISS_CHAR;
5933: lv_id2 OKC_K_ITEMS_V.OBJECT1_ID2%TYPE := OKL_API.G_MISS_CHAR;
5934: ln_dummy NUMBER := 0;
5935: lv_dummy VARCHAR2(3);
5936: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
5937: ln_line_number OKL_TXL_ASSETS_V.LINE_NUMBER%TYPE;
5938: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_FA_LINE_ITEM';
5939: CURSOR c_asset_exist_chr(p_id1 OKX_ASSETS_V.ID1%TYPE,
5940: p_id2 OKX_ASSETS_V.ID2%TYPE,
6259: i NUMBER := 0;
6260: l_lty_code OKC_LINE_STYLES_V.LTY_CODE%TYPE;
6261: ln_dummy NUMBER := 0;
6262: lv_dummy VARCHAR2(3);
6263: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
6264: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_FA_LINE_ITEM';
6265: BEGIN
6266: x_return_status := OKL_API.G_RET_STS_SUCCESS;
6267: -- Call start_activity to create savepoint, check compatibility
8046: l_clev_rec clev_rec_type;
8047: l_cimv_rec cimv_rec_type;
8048: l_itiv_rec itiv_rec_type;
8049: l_lty_code OKC_LINE_STYLES_V.LTY_CODE%TYPE;
8050: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
8051: lv_dummy VARCHAR2(3) := OKL_API.G_MISS_CHAR ;
8052: i NUMBER := 0;
8053: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_IB_LINE';
8054: BEGIN
11605: l_lse_type OKC_LINE_STYLES_V.LSE_TYPE%TYPE;
11606: l_talv_rec talv_rec_type;
11607: l_trxv_rec trxv_rec_type;
11608: l_itiv_rec itiv_rec_type;
11609: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
11610: ln_line_number OKL_TXL_ASSETS_V.LINE_NUMBER%TYPE;
11611: BEGIN
11612: x_return_status := OKL_API.G_RET_STS_SUCCESS;
11613: -- Call start_activity to create savepoint, check compatibility
12177: from fa_additions fa
12178: where fa.asset_id = p_asset_id
12179: and exists
12180: (select '1'
12181: from okl_trx_assets h,
12182: okl_txl_assets_b l
12183: where h.id = l.tas_id
12184: and h.TAS_TYPE in ('AMT','AUD','AUS')
12185: and l.asset_number = fa.asset_number
14514: txlb.current_units,
14515: txlb.percent_salvage_value,
14516: txlb.salvage_value,
14517: txlb.asset_number
14518: from okl_trx_assets trx,
14519: okl_txl_assets_b txlb,
14520: okc_k_lines_b cleb_fa,
14521: okc_line_styles_b lseb_fa
14522: where trx.id = txlb.tas_id
14541: iti.serial_number,
14542: iti.instance_number_ib,
14543: iti.object_id1_new,
14544: iti.object_id2_new
14545: from okl_trx_assets trx,
14546: okl_txl_itm_insts iti,
14547: okc_k_lines_b cleb_ib,
14548: okc_line_styles_b lseb_ib,
14549: okc_k_lines_b cleb_inst,