[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
2885: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2886: SELECT 1
2887: --FROM DUAL
2888: --WHERE EXISTS (SELECT '1'
2889: FROM OKL_TRX_ASSETS TAS,
2890: OKL_TXL_ASSETS_V TXL,
2891: OKL_TXD_ASSETS_V TXD
2892: WHERE TXD.asset_number = p_asset_number
2893: AND TXD.TAL_ID = TXL.ID
4033: RAISE OKL_API.G_EXCEPTION_ERROR;
4034: END IF;
4035: -- evaluate conditions, build outcomes for true conditions and
4036: -- put them on outcome queue
4037: OKL_TRX_ASSETS_PUB.create_trx_ass_h_def(
4038: p_api_version => p_api_version,
4039: p_init_msg_list => p_init_msg_list,
4040: x_return_status => x_return_status,
4041: x_msg_count => x_msg_count,
4109: RAISE OKL_API.G_EXCEPTION_ERROR;
4110: END IF;
4111: -- evaluate conditions, build outcomes for true conditions and
4112: -- put them on outcome queue
4113: OKL_TRX_ASSETS_PUB.update_trx_ass_h_def(
4114: p_api_version => p_api_version,
4115: p_init_msg_list => p_init_msg_list,
4116: x_return_status => x_return_status,
4117: x_msg_count => x_msg_count,
5891: lv_id1 OKC_K_ITEMS_V.OBJECT1_ID1%TYPE := OKL_API.G_MISS_CHAR;
5892: lv_id2 OKC_K_ITEMS_V.OBJECT1_ID2%TYPE := OKL_API.G_MISS_CHAR;
5893: ln_dummy NUMBER := 0;
5894: lv_dummy VARCHAR2(3);
5895: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
5896: ln_line_number OKL_TXL_ASSETS_V.LINE_NUMBER%TYPE;
5897: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_FA_LINE_ITEM';
5898: CURSOR c_asset_exist_chr(p_id1 OKX_ASSETS_V.ID1%TYPE,
5899: p_id2 OKX_ASSETS_V.ID2%TYPE,
6218: i NUMBER := 0;
6219: l_lty_code OKC_LINE_STYLES_V.LTY_CODE%TYPE;
6220: ln_dummy NUMBER := 0;
6221: lv_dummy VARCHAR2(3);
6222: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
6223: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_FA_LINE_ITEM';
6224: BEGIN
6225: x_return_status := OKL_API.G_RET_STS_SUCCESS;
6226: -- Call start_activity to create savepoint, check compatibility
8005: l_clev_rec clev_rec_type;
8006: l_cimv_rec cimv_rec_type;
8007: l_itiv_rec itiv_rec_type;
8008: l_lty_code OKC_LINE_STYLES_V.LTY_CODE%TYPE;
8009: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
8010: lv_dummy VARCHAR2(3) := OKL_API.G_MISS_CHAR ;
8011: i NUMBER := 0;
8012: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_IB_LINE';
8013: BEGIN
11520: l_lse_type OKC_LINE_STYLES_V.LSE_TYPE%TYPE;
11521: l_talv_rec talv_rec_type;
11522: l_trxv_rec trxv_rec_type;
11523: l_itiv_rec itiv_rec_type;
11524: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
11525: ln_line_number OKL_TXL_ASSETS_V.LINE_NUMBER%TYPE;
11526: BEGIN
11527: x_return_status := OKL_API.G_RET_STS_SUCCESS;
11528: -- Call start_activity to create savepoint, check compatibility
12092: from fa_additions fa
12093: where fa.asset_id = p_asset_id
12094: and exists
12095: (select '1'
12096: from okl_trx_assets h,
12097: okl_txl_assets_b l
12098: where h.id = l.tas_id
12099: and h.TAS_TYPE in ('AMT','AUD','AUS')
12100: and l.asset_number = fa.asset_number
14408: txlb.current_units,
14409: txlb.percent_salvage_value,
14410: txlb.salvage_value,
14411: txlb.asset_number
14412: from okl_trx_assets trx,
14413: okl_txl_assets_b txlb,
14414: okc_k_lines_b cleb_fa,
14415: okc_line_styles_b lseb_fa
14416: where trx.id = txlb.tas_id
14435: iti.serial_number,
14436: iti.instance_number_ib,
14437: iti.object_id1_new,
14438: iti.object_id2_new
14439: from okl_trx_assets trx,
14440: okl_txl_itm_insts iti,
14441: okc_k_lines_b cleb_ib,
14442: okc_line_styles_b lseb_ib,
14443: okc_k_lines_b cleb_inst,