DBA Data[Home] [Help]

APPS.OKL_CREATE_KLE_PVT dependencies on OKL_TXL_ITM_INSTS

Line 104: FUNCTION is_duplicate_serial_number(p_serial_number OKL_TXL_ITM_INSTS.SERIAL_NUMBER%TYPE,

100: SELECT contract_number
101: FROM OKC_K_HEADERS_B
102: WHERE id = p_ctr_id1;
103:
104: FUNCTION is_duplicate_serial_number(p_serial_number OKL_TXL_ITM_INSTS.SERIAL_NUMBER%TYPE,
105: p_item_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE)
106: RETURN VARCHAR2 IS
107: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
108: ln_serial_number NUMBER := 0;

Line 105: p_item_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE)

101: FROM OKC_K_HEADERS_B
102: WHERE id = p_ctr_id1;
103:
104: FUNCTION is_duplicate_serial_number(p_serial_number OKL_TXL_ITM_INSTS.SERIAL_NUMBER%TYPE,
105: p_item_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE)
106: RETURN VARCHAR2 IS
107: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
108: ln_serial_number NUMBER := 0;
109: -- cursor to get sequence number for asset number

Line 114: SELECT 1 FROM OKL_TXL_ITM_INSTS

110: -- Bug 4698117
111:
112:
113: CURSOR c_check_dup_serial_num IS
114: SELECT 1 FROM OKL_TXL_ITM_INSTS
115: WHERE INVENTORY_ITEM_ID = p_item_id
116: AND SERIAL_NUMBER = p_serial_number
117: AND NOT EXISTS (
118: select 1 From okc_k_lines_b cleb

Line 119: where cleb.id=OKL_TXL_ITM_INSTS.kle_id

115: WHERE INVENTORY_ITEM_ID = p_item_id
116: AND SERIAL_NUMBER = p_serial_number
117: AND NOT EXISTS (
118: select 1 From okc_k_lines_b cleb
119: where cleb.id=OKL_TXL_ITM_INSTS.kle_id
120: and cleb.STS_CODE = 'ABANDONED'
121: );
122: --Bug# 4698117: End
123: BEGIN

Line 160: FUNCTION generate_instance_number_ib(x_instance_number_ib OUT NOCOPY OKL_TXL_ITM_INSTS_V.INSTANCE_NUMBER_IB%TYPE)

156: p_token2_value => sqlerrm);
157: RETURN x_return_status;
158: END is_duplicate_serial_number;
159: ---------------------------------------------------------------------------------------------------------------
160: FUNCTION generate_instance_number_ib(x_instance_number_ib OUT NOCOPY OKL_TXL_ITM_INSTS_V.INSTANCE_NUMBER_IB%TYPE)
161: RETURN VARCHAR2 IS
162: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
163: -- cursor to get sequence number for asset number
164: Cursor c_instance_no_ib IS

Line 1232: FUNCTION get_rec_itiv(p_itiv_id IN OKL_TXL_ITM_INSTS_V.KLE_ID%TYPE,

1228: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1229: return(x_return_status);
1230: END get_txdv_tbl;
1231: -----------------------------------------------------------------------------------------------
1232: FUNCTION get_rec_itiv(p_itiv_id IN OKL_TXL_ITM_INSTS_V.KLE_ID%TYPE,
1233: x_itiv_rec OUT NOCOPY itiv_rec_type)
1234: RETURN VARCHAR2 IS
1235:
1236: CURSOR okl_itiv_pk_csr (p_kle_id IN NUMBER) IS

Line 1277: FROM OKL_TXL_ITM_INSTS iti

1273: CREATION_DATE,
1274: LAST_UPDATED_BY,
1275: LAST_UPDATE_DATE,
1276: LAST_UPDATE_LOGIN
1277: FROM OKL_TXL_ITM_INSTS iti
1278: WHERE iti.kle_id = p_kle_id;
1279: l_okl_itiv_pk okl_itiv_pk_csr%ROWTYPE;
1280: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
1281: BEGIN

Line 1717: FUNCTION get_party_site_id(p_object_id1_new IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,

1713: END IF;
1714: RETURN(x_return_status);
1715: END get_rec_update_cimv;
1716: ---------------------------------------------------------------------------------------------------------
1717: FUNCTION get_party_site_id(p_object_id1_new IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
1718: x_object_id1_new OUT NOCOPY OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
1719: x_object_id2_new OUT NOCOPY OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE)
1720: RETURN VARCHAR2 IS
1721: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;

Line 1718: x_object_id1_new OUT NOCOPY OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,

1714: RETURN(x_return_status);
1715: END get_rec_update_cimv;
1716: ---------------------------------------------------------------------------------------------------------
1717: FUNCTION get_party_site_id(p_object_id1_new IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
1718: x_object_id1_new OUT NOCOPY OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
1719: x_object_id2_new OUT NOCOPY OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE)
1720: RETURN VARCHAR2 IS
1721: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
1722:

Line 1719: x_object_id2_new OUT NOCOPY OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE)

1715: END get_rec_update_cimv;
1716: ---------------------------------------------------------------------------------------------------------
1717: FUNCTION get_party_site_id(p_object_id1_new IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
1718: x_object_id1_new OUT NOCOPY OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
1719: x_object_id2_new OUT NOCOPY OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE)
1720: RETURN VARCHAR2 IS
1721: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
1722:
1723: CURSOR c_get_id1_id2(p_id1 OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE) IS

Line 1723: CURSOR c_get_id1_id2(p_id1 OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE) IS

1719: x_object_id2_new OUT NOCOPY OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE)
1720: RETURN VARCHAR2 IS
1721: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
1722:
1723: CURSOR c_get_id1_id2(p_id1 OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE) IS
1724: SELECT id1
1725: ,id2
1726: FROM OKX_PARTY_SITE_USES_V
1727: WHERE id1 = p_id1

Line 3181: -- Business Rules : Validate instance_number_ib against OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB

3177: -- Start of Commnets
3178: -- Badrinath Kuchibholta
3179: -- Procedure Name : validate_instance_number_ib
3180: -- Description : validate_instance_number_ib
3181: -- Business Rules : Validate instance_number_ib against OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB
3182: -- ,as same should not exists in table
3183: -- Parameters : OUT Return Status, IN Rec Info
3184: -- Version : 1.0
3185: -- End of Commnets

Line 3188: p_inst_num_ib IN OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) IS

3184: -- Version : 1.0
3185: -- End of Commnets
3186:
3187: PROCEDURE validate_instance_number_ib(x_return_status OUT NOCOPY VARCHAR2,
3188: p_inst_num_ib IN OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) IS
3189: ln_dummy number := 0;
3190: CURSOR c_inst_num_ib_validate(p_inst_ib OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) is
3191: SELECT 1
3192: --FROM DUAL

Line 3190: CURSOR c_inst_num_ib_validate(p_inst_ib OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) is

3186:
3187: PROCEDURE validate_instance_number_ib(x_return_status OUT NOCOPY VARCHAR2,
3188: p_inst_num_ib IN OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) IS
3189: ln_dummy number := 0;
3190: CURSOR c_inst_num_ib_validate(p_inst_ib OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) is
3191: SELECT 1
3192: --FROM DUAL
3193: --WHERE EXISTS (SELECT '1'
3194: FROM OKL_TXL_ITM_INSTS

Line 3194: FROM OKL_TXL_ITM_INSTS

3190: CURSOR c_inst_num_ib_validate(p_inst_ib OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) is
3191: SELECT 1
3192: --FROM DUAL
3193: --WHERE EXISTS (SELECT '1'
3194: FROM OKL_TXL_ITM_INSTS
3195: WHERE instance_number_ib = p_inst_ib; --);
3196:
3197: BEGIN
3198: -- initialize return status

Line 3214: -- Since no parent record existing in OKL_TXL_ITM_INSTS

3210: -- Enforce validation
3211: OPEN c_inst_num_ib_validate(p_inst_num_ib);
3212: FETCH c_inst_num_ib_validate into ln_dummy;
3213: IF c_inst_num_ib_validate%NOTFOUND THEN
3214: -- Since no parent record existing in OKL_TXL_ITM_INSTS
3215: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3216: END IF;
3217: CLOSE c_inst_num_ib_validate;
3218: IF (ln_dummy = 1) THEN

Line 3536: p_ib_loc1 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,

3532: p_ast_no IN OKL_TXL_ASSETS_B.ASSET_NUMBER%TYPE,
3533: p_ast_desc IN OKL_TXL_ASSETS_TL.DESCRIPTION%TYPE,
3534: p_cost IN OKL_TXL_ASSETS_B.ORIGINAL_COST%TYPE,
3535: p_units IN OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE,
3536: p_ib_loc1 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
3537: p_ib_loc2 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE,
3538: p_fa_loc IN OKL_TXL_ASSETS_B.FA_LOCATION_ID%TYPE,
3539: p_refinance_amount IN OKL_K_LINES.REFINANCE_AMOUNT%TYPE,
3540: p_chr_id IN OKC_K_LINES_B.DNZ_CHR_ID%TYPE)

Line 3537: p_ib_loc2 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE,

3533: p_ast_desc IN OKL_TXL_ASSETS_TL.DESCRIPTION%TYPE,
3534: p_cost IN OKL_TXL_ASSETS_B.ORIGINAL_COST%TYPE,
3535: p_units IN OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE,
3536: p_ib_loc1 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
3537: p_ib_loc2 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE,
3538: p_fa_loc IN OKL_TXL_ASSETS_B.FA_LOCATION_ID%TYPE,
3539: p_refinance_amount IN OKL_K_LINES.REFINANCE_AMOUNT%TYPE,
3540: p_chr_id IN OKC_K_LINES_B.DNZ_CHR_ID%TYPE)
3541: RETURN VARCHAR2 IS

Line 3790: -- Description : validation with OKL_TXL_ITM_INSTS_V

3786: --------------------------------------------------------------------------------------------------
3787: -- Start of Commnets
3788: -- Badrinath Kuchibholta
3789: -- Procedure Name : validate_iti_kle_id
3790: -- Description : validation with OKL_TXL_ITM_INSTS_V
3791: -- Business Rules :
3792: -- Parameters :
3793: -- Version : 1.0
3794: -- End of Commnets

Line 3800: CURSOR c_iti_kle_id_validate(p_kle_id OKL_TXL_ITM_INSTS_V.KLE_ID%TYPE) IS

3796: PROCEDURE validate_iti_kle_id(p_klev_rec IN klev_rec_type,
3797: x_record_exists OUT NOCOPY VARCHAR2,
3798: x_return_status OUT NOCOPY VARCHAR2) IS
3799: ln_dummy NUMBER := 0;
3800: CURSOR c_iti_kle_id_validate(p_kle_id OKL_TXL_ITM_INSTS_V.KLE_ID%TYPE) IS
3801: SELECT 1
3802: --FROM dual
3803: --WHERE EXISTS (SELECT '1'
3804: FROM OKL_TXL_ITM_INSTS_V

Line 3804: FROM OKL_TXL_ITM_INSTS_V

3800: CURSOR c_iti_kle_id_validate(p_kle_id OKL_TXL_ITM_INSTS_V.KLE_ID%TYPE) IS
3801: SELECT 1
3802: --FROM dual
3803: --WHERE EXISTS (SELECT '1'
3804: FROM OKL_TXL_ITM_INSTS_V
3805: WHERE kle_id = p_kle_id; --);
3806: BEGIN
3807: -- initialize return status
3808: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 3816: p_token1_value => 'OKL_TXL_ITM_INSTS_V.KLE_ID');

3812: -- store SQL error message on message stack
3813: OKL_API.set_message(p_app_name => G_APP_NAME,
3814: p_msg_name => G_REQUIRED_VALUE,
3815: p_token1 => G_COL_NAME_TOKEN,
3816: p_token1_value => 'OKL_TXL_ITM_INSTS_V.KLE_ID');
3817: -- halt validation as it is a required field
3818: RAISE G_EXCEPTION_STOP_VALIDATION;
3819: END IF;
3820: -- Enforce Foreign Key

Line 5019: OKL_TXL_ITM_INSTS_PUB.create_txl_itm_insts(

5015: l_itiv_rec.tal_type := 'CFA';
5016: END IF;
5017: -- evaluate conditions, build outcomes for true conditions and
5018: -- put them on outcome queue
5019: OKL_TXL_ITM_INSTS_PUB.create_txl_itm_insts(
5020: p_api_version => p_api_version,
5021: p_init_msg_list => p_init_msg_list,
5022: x_return_status => x_return_status,
5023: x_msg_count => x_msg_count,

Line 5095: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,

5091: RAISE OKL_API.G_EXCEPTION_ERROR;
5092: END IF;
5093: -- evaluate conditions, build outcomes for true conditions and
5094: -- put them on outcome queue
5095: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,
5096: p_init_msg_list => p_init_msg_list,
5097: x_return_status => x_return_status,
5098: x_msg_count => x_msg_count,
5099: x_msg_data => x_msg_data,

Line 14546: okl_txl_itm_insts iti,

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,
14550: okc_line_styles_b lseb_inst

Line 15010: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,

15006:
15007: --End If;
15008: End Loop;
15009: End Loop;
15010: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,
15011: p_init_msg_list => p_init_msg_list,
15012: x_return_status => x_return_status,
15013: x_msg_count => x_msg_count,
15014: x_msg_data => x_msg_data,

Line 15204: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

15200: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
15201: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
15202: ln_clev_model_price_unit OKC_K_LINES_V.PRICE_UNIT%TYPE := 0;
15203: ln_cimv_model_no_items OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
15204: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;
15205: lv_scs_code OKC_K_HEADERS_V.SCS_CODE%TYPE := null;
15206: ln_dummy NUMBER := 0;
15207: ln_dummy1 NUMBER := 0;
15208: i NUMBER := 0;

Line 16333: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

16329: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
16330: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
16331: ln_clev_model_price_unit OKC_K_LINES_V.PRICE_UNIT%TYPE := 0;
16332: ln_cimv_model_no_items OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
16333: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;
16334: lv_model_object_id1 OKC_K_ITEMS_V.OBJECT1_ID1%TYPE;
16335: lv_model_object_id2 OKC_K_ITEMS_V.OBJECT1_ID2%TYPE;
16336: ln_dummy NUMBER := 0;
16337: ln_dummy1 NUMBER := 0;

Line 16344: ln_txl_itm_id OKL_TXL_ITM_INSTS.ID%TYPE;

16340: l_new_yn VARCHAR2(3);
16341: l_go_for_calc VARCHAR2(3):= 'Y';
16342:
16343: -- rravikir added
16344: ln_txl_itm_id OKL_TXL_ITM_INSTS.ID%TYPE;
16345: k_itiv_ib_rec itiv_rec_type;
16346: kx_itiv_ib_rec itiv_rec_type;
16347: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16348: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;

Line 16347: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;

16343: -- rravikir added
16344: ln_txl_itm_id OKL_TXL_ITM_INSTS.ID%TYPE;
16345: k_itiv_ib_rec itiv_rec_type;
16346: kx_itiv_ib_rec itiv_rec_type;
16347: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16348: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16349: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16350: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16351: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;

Line 16348: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;

16344: ln_txl_itm_id OKL_TXL_ITM_INSTS.ID%TYPE;
16345: k_itiv_ib_rec itiv_rec_type;
16346: kx_itiv_ib_rec itiv_rec_type;
16347: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16348: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16349: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16350: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16351: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;
16352: -- end rravikir

Line 16349: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;

16345: k_itiv_ib_rec itiv_rec_type;
16346: kx_itiv_ib_rec itiv_rec_type;
16347: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16348: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16349: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16350: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16351: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;
16352: -- end rravikir
16353:

Line 16350: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;

16346: kx_itiv_ib_rec itiv_rec_type;
16347: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16348: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16349: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16350: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16351: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;
16352: -- end rravikir
16353:
16354: CURSOR c_asset_iti(p_asset_number OKL_TXL_ASSETS_B.ASSET_NUMBER%TYPE,

Line 16351: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;

16347: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16348: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16349: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16350: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16351: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;
16352: -- end rravikir
16353:
16354: CURSOR c_asset_iti(p_asset_number OKL_TXL_ASSETS_B.ASSET_NUMBER%TYPE,
16355: p_dnz_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE)

Line 16378: p_txl_inst_id OKL_TXL_ITM_INSTS.ID%TYPE)

16374: and lse_ib.lty_code = G_IB_LINE_LTY_CODE;
16375:
16376: -- rravikir added
16377: CURSOR c_get_txl_itm_insts(p_top_line_id OKC_K_LINES_B.ID%TYPE,
16378: p_txl_inst_id OKL_TXL_ITM_INSTS.ID%TYPE)
16379: IS
16380: select iti.id, iti.inventory_item_id, iti.inventory_org_id,
16381: iti.object_id1_new, iti.object_id2_new, iti.jtot_object_code_new
16382: from okl_txl_itm_insts iti,

Line 16382: from okl_txl_itm_insts iti,

16378: p_txl_inst_id OKL_TXL_ITM_INSTS.ID%TYPE)
16379: IS
16380: select iti.id, iti.inventory_item_id, iti.inventory_org_id,
16381: iti.object_id1_new, iti.object_id2_new, iti.jtot_object_code_new
16382: from okl_txl_itm_insts iti,
16383: okc_line_styles_b lse_ib,
16384: okc_k_lines_b cle_ib,
16385: okc_line_styles_b lse_inst,
16386: okc_k_lines_b cle_inst

Line 17723: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');

17719: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17720: OKL_API.set_message(p_app_name => G_APP_NAME,
17721: p_msg_name => G_FETCHING_INFO,
17722: p_token1 => G_REC_NAME_TOKEN,
17723: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');
17724: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17725: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17726: OKL_API.set_message(p_app_name => G_APP_NAME,
17727: p_msg_name => G_FETCHING_INFO,

Line 17729: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');

17725: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17726: OKL_API.set_message(p_app_name => G_APP_NAME,
17727: p_msg_name => G_FETCHING_INFO,
17728: p_token1 => G_REC_NAME_TOKEN,
17729: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');
17730: RAISE OKL_API.G_EXCEPTION_ERROR;
17731: END IF;
17732: --Build itiv ib item rec
17733: l_itiv_ib_rec.id := r_itiv_ib_rec.id;

Line 17892: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');

17888: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17889: OKL_API.set_message(p_app_name => G_APP_NAME,
17890: p_msg_name => G_FETCHING_INFO,
17891: p_token1 => G_REC_NAME_TOKEN,
17892: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');
17893: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
17894: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17895: OKL_API.set_message(p_app_name => G_APP_NAME,
17896: p_msg_name => G_FETCHING_INFO,

Line 17898: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');

17894: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17895: OKL_API.set_message(p_app_name => G_APP_NAME,
17896: p_msg_name => G_FETCHING_INFO,
17897: p_token1 => G_REC_NAME_TOKEN,
17898: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');
17899: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
17900: END IF;
17901: n_itiv_ib_rec.object_id1_new := p_itiv_ib_rec.object_id1_new;
17902: n_itiv_ib_rec.object_id1_old := p_itiv_ib_rec.object_id1_new;

Line 17903: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,

17899: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
17900: END IF;
17901: n_itiv_ib_rec.object_id1_new := p_itiv_ib_rec.object_id1_new;
17902: n_itiv_ib_rec.object_id1_old := p_itiv_ib_rec.object_id1_new;
17903: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,
17904: p_init_msg_list => p_init_msg_list,
17905: x_return_status => x_return_status,
17906: x_msg_count => x_msg_count,
17907: x_msg_data => x_msg_data,

Line 17928: -- Update the OKL_TXL_ITM_INSTS table, when the item or install site gets changed.

17924: END IF;
17925: END IF;
17926:
17927: -- rravikir modified.
17928: -- Update the OKL_TXL_ITM_INSTS table, when the item or install site gets changed.
17929: ln_txl_itm_id := l_itiv_ib_rec_out.id;
17930: lv_object_id1 := l_itiv_ib_rec_out.object_id1_new;
17931: lv_object_id2 := l_itiv_ib_rec_out.object_id2_new;
17932: ln_inv_itm_id := l_itiv_ib_rec_out.inventory_item_id;

Line 17944: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,

17940: k_itiv_ib_rec.object_id2_new := lv_object_id2;
17941: k_itiv_ib_rec.inventory_item_id := ln_inv_itm_id;
17942: k_itiv_ib_rec.inventory_org_id := ln_inv_org_id;
17943: k_itiv_ib_rec.jtot_object_code_new := lv_jtot_object_code_new;
17944: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,
17945: p_init_msg_list => p_init_msg_list,
17946: x_return_status => x_return_status,
17947: x_msg_count => x_msg_count,
17948: x_msg_data => x_msg_data,

Line 18052: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

18048: l_klev_ib_rec_out klev_rec_type;
18049: l_itiv_ib_tbl_out itiv_tbl_type;
18050: x_clev_ib_rec clev_rec_type;
18051: l_trxv_ib_rec_out trxv_rec_type;
18052: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;
18053: j NUMBER := 0;
18054: ln_dummy NUMBER := 0;
18055: ln_dummy1 NUMBER := 0;
18056: -- rravikir added

Line 18064: ln_item_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;

18060: k NUMBER := 0;
18061: ln_remain_inst NUMBER := 0;
18062: lb_record_created BOOLEAN := FALSE;
18063: lb_update_oec_required BOOLEAN := FALSE;
18064: ln_item_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
18065: -- end
18066: ln_final_current_units OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE;
18067: ln_model_line_id OKC_K_LINES_V.ID%TYPE := OKL_API.G_MISS_NUM;
18068: ln_fa_line_id OKC_K_LINES_V.ID%TYPE := OKL_API.G_MISS_NUM;

Line 18291: -- So we are calling the update api for the okl_txl_itm_insts rec

18287: -- rravikir modified
18288: IF (l_clev_inst_rec.id IS NOT NULL OR
18289: l_clev_inst_rec.id <> OKL_API.G_MISS_NUM) THEN
18290: -- We are here b'cause we have to update the okl_txl_itm_inst rec
18291: -- So we are calling the update api for the okl_txl_itm_insts rec
18292:
18293: -- Now getting the item information OKL_TXL_ITM_INSTS
18294: x_return_status := get_rec_itiv(l_clev_ib_rec.id,
18295: l_itiv_rec);

Line 18293: -- Now getting the item information OKL_TXL_ITM_INSTS

18289: l_clev_inst_rec.id <> OKL_API.G_MISS_NUM) THEN
18290: -- We are here b'cause we have to update the okl_txl_itm_inst rec
18291: -- So we are calling the update api for the okl_txl_itm_insts rec
18292:
18293: -- Now getting the item information OKL_TXL_ITM_INSTS
18294: x_return_status := get_rec_itiv(l_clev_ib_rec.id,
18295: l_itiv_rec);
18296: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18297: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 19106: lv_object_id1_new OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE := OKL_API.G_MISS_CHAR;

19102: l_cimv_ib_rec_out cimv_rec_type;
19103: l_trxv_ib_rec_out trxv_rec_type;
19104: ln_remain_inst NUMBER := 0;
19105: ln_model_line_id OKC_K_LINES_V.ID%TYPE := OKL_API.G_MISS_NUM;
19106: lv_object_id1_new OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE := OKL_API.G_MISS_CHAR;
19107: ln_fa_line_id OKC_K_LINES_V.ID%TYPE := OKL_API.G_MISS_NUM;
19108: r_clev_model_rec clev_rec_type;
19109: r_klev_model_rec klev_rec_type;
19110: r_cimv_model_rec cimv_rec_type;

Line 19133: ln_model_item OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;

19129: r_cimv_addon_rec cimv_rec_type;
19130: rx_clev_addon_rec clev_rec_type;
19131: rx_klev_addon_rec klev_rec_type;
19132: rx_cimv_addon_rec cimv_rec_type;
19133: ln_model_item OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
19134:
19135: CURSOR c_remain_inst_line(p_cle_id OKC_K_LINES_V.CLE_ID%TYPE,
19136: p_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE) IS
19137: SELECT count(cle.id)

Line 19322: -- okl_txl_itm_insts record

19318: CLOSE c_model_item;
19319:
19320: -- we have to update the txl_itm_insts table only if the p_itiv_ib_tbl(i).id is given
19321: -- otherwise we have to create instance line and install base line and then create
19322: -- okl_txl_itm_insts record
19323: l_itiv_ib_tbl := p_itiv_ib_tbl;
19324: IF l_itiv_ib_tbl.COUNT > 0 THEN
19325: -- We have intialize the I, since there could be any index integer
19326: i := l_itiv_ib_tbl.FIRST;

Line 19488: -- So we are calling the update api for the okl_txl_itm_insts rec

19484: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
19485: END IF;
19486:
19487: -- We are here b'cause we have to update the okl_txl_itm_inst rec
19488: -- So we are calling the update api for the okl_txl_itm_insts rec
19489: l_itiv_ib_tbl(i).object_id2_new := '#';
19490: update_txl_itm_insts(p_api_version => p_api_version,
19491: p_init_msg_list => p_init_msg_list,
19492: x_return_status => x_return_status,

Line 20259: -- Last record of the OKL_TXL_ITM_INSTS should not be deleted. It

20255: END IF;
20256: FETCH c_remain_inst_line INTO ln_remain_inst;
20257: CLOSE c_remain_inst_line;
20258:
20259: -- Last record of the OKL_TXL_ITM_INSTS should not be deleted. It
20260: -- has to update the MFG_FLAG to 'N' and nullify the serial number.
20261: IF ln_remain_inst < 2 THEN
20262: x_return_status := get_rec_itiv(l_clev_ib_rec.id,
20263: l_itiv_rec);