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 3140: -- Business Rules : Validate instance_number_ib against OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB

3136: -- Start of Commnets
3137: -- Badrinath Kuchibholta
3138: -- Procedure Name : validate_instance_number_ib
3139: -- Description : validate_instance_number_ib
3140: -- Business Rules : Validate instance_number_ib against OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB
3141: -- ,as same should not exists in table
3142: -- Parameters : OUT Return Status, IN Rec Info
3143: -- Version : 1.0
3144: -- End of Commnets

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

3143: -- Version : 1.0
3144: -- End of Commnets
3145:
3146: PROCEDURE validate_instance_number_ib(x_return_status OUT NOCOPY VARCHAR2,
3147: p_inst_num_ib IN OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) IS
3148: ln_dummy number := 0;
3149: CURSOR c_inst_num_ib_validate(p_inst_ib OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) is
3150: SELECT 1
3151: --FROM DUAL

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

3145:
3146: PROCEDURE validate_instance_number_ib(x_return_status OUT NOCOPY VARCHAR2,
3147: p_inst_num_ib IN OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) IS
3148: ln_dummy number := 0;
3149: CURSOR c_inst_num_ib_validate(p_inst_ib OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) is
3150: SELECT 1
3151: --FROM DUAL
3152: --WHERE EXISTS (SELECT '1'
3153: FROM OKL_TXL_ITM_INSTS

Line 3153: FROM OKL_TXL_ITM_INSTS

3149: CURSOR c_inst_num_ib_validate(p_inst_ib OKL_TXL_ITM_INSTS.INSTANCE_NUMBER_IB%TYPE) is
3150: SELECT 1
3151: --FROM DUAL
3152: --WHERE EXISTS (SELECT '1'
3153: FROM OKL_TXL_ITM_INSTS
3154: WHERE instance_number_ib = p_inst_ib; --);
3155:
3156: BEGIN
3157: -- initialize return status

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

3169: -- Enforce validation
3170: OPEN c_inst_num_ib_validate(p_inst_num_ib);
3171: FETCH c_inst_num_ib_validate into ln_dummy;
3172: IF c_inst_num_ib_validate%NOTFOUND THEN
3173: -- Since no parent record existing in OKL_TXL_ITM_INSTS
3174: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3175: END IF;
3176: CLOSE c_inst_num_ib_validate;
3177: IF (ln_dummy = 1) THEN

Line 3495: p_ib_loc1 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,

3491: p_ast_no IN OKL_TXL_ASSETS_B.ASSET_NUMBER%TYPE,
3492: p_ast_desc IN OKL_TXL_ASSETS_TL.DESCRIPTION%TYPE,
3493: p_cost IN OKL_TXL_ASSETS_B.ORIGINAL_COST%TYPE,
3494: p_units IN OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE,
3495: p_ib_loc1 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
3496: p_ib_loc2 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE,
3497: p_fa_loc IN OKL_TXL_ASSETS_B.FA_LOCATION_ID%TYPE,
3498: p_refinance_amount IN OKL_K_LINES.REFINANCE_AMOUNT%TYPE,
3499: p_chr_id IN OKC_K_LINES_B.DNZ_CHR_ID%TYPE)

Line 3496: p_ib_loc2 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE,

3492: p_ast_desc IN OKL_TXL_ASSETS_TL.DESCRIPTION%TYPE,
3493: p_cost IN OKL_TXL_ASSETS_B.ORIGINAL_COST%TYPE,
3494: p_units IN OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE,
3495: p_ib_loc1 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE,
3496: p_ib_loc2 IN OKL_TXL_ITM_INSTS_V.OBJECT_ID2_NEW%TYPE,
3497: p_fa_loc IN OKL_TXL_ASSETS_B.FA_LOCATION_ID%TYPE,
3498: p_refinance_amount IN OKL_K_LINES.REFINANCE_AMOUNT%TYPE,
3499: p_chr_id IN OKC_K_LINES_B.DNZ_CHR_ID%TYPE)
3500: RETURN VARCHAR2 IS

Line 3749: -- Description : validation with OKL_TXL_ITM_INSTS_V

3745: --------------------------------------------------------------------------------------------------
3746: -- Start of Commnets
3747: -- Badrinath Kuchibholta
3748: -- Procedure Name : validate_iti_kle_id
3749: -- Description : validation with OKL_TXL_ITM_INSTS_V
3750: -- Business Rules :
3751: -- Parameters :
3752: -- Version : 1.0
3753: -- End of Commnets

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

3755: PROCEDURE validate_iti_kle_id(p_klev_rec IN klev_rec_type,
3756: x_record_exists OUT NOCOPY VARCHAR2,
3757: x_return_status OUT NOCOPY VARCHAR2) IS
3758: ln_dummy NUMBER := 0;
3759: CURSOR c_iti_kle_id_validate(p_kle_id OKL_TXL_ITM_INSTS_V.KLE_ID%TYPE) IS
3760: SELECT 1
3761: --FROM dual
3762: --WHERE EXISTS (SELECT '1'
3763: FROM OKL_TXL_ITM_INSTS_V

Line 3763: FROM OKL_TXL_ITM_INSTS_V

3759: CURSOR c_iti_kle_id_validate(p_kle_id OKL_TXL_ITM_INSTS_V.KLE_ID%TYPE) IS
3760: SELECT 1
3761: --FROM dual
3762: --WHERE EXISTS (SELECT '1'
3763: FROM OKL_TXL_ITM_INSTS_V
3764: WHERE kle_id = p_kle_id; --);
3765: BEGIN
3766: -- initialize return status
3767: x_return_status := OKL_API.G_RET_STS_SUCCESS;

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

3771: -- store SQL error message on message stack
3772: OKL_API.set_message(p_app_name => G_APP_NAME,
3773: p_msg_name => G_REQUIRED_VALUE,
3774: p_token1 => G_COL_NAME_TOKEN,
3775: p_token1_value => 'OKL_TXL_ITM_INSTS_V.KLE_ID');
3776: -- halt validation as it is a required field
3777: RAISE G_EXCEPTION_STOP_VALIDATION;
3778: END IF;
3779: -- Enforce Foreign Key

Line 4978: OKL_TXL_ITM_INSTS_PUB.create_txl_itm_insts(

4974: l_itiv_rec.tal_type := 'CFA';
4975: END IF;
4976: -- evaluate conditions, build outcomes for true conditions and
4977: -- put them on outcome queue
4978: OKL_TXL_ITM_INSTS_PUB.create_txl_itm_insts(
4979: p_api_version => p_api_version,
4980: p_init_msg_list => p_init_msg_list,
4981: x_return_status => x_return_status,
4982: x_msg_count => x_msg_count,

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

5050: RAISE OKL_API.G_EXCEPTION_ERROR;
5051: END IF;
5052: -- evaluate conditions, build outcomes for true conditions and
5053: -- put them on outcome queue
5054: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,
5055: p_init_msg_list => p_init_msg_list,
5056: x_return_status => x_return_status,
5057: x_msg_count => x_msg_count,
5058: x_msg_data => x_msg_data,

Line 14440: okl_txl_itm_insts iti,

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

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

14897:
14898: --End If;
14899: End Loop;
14900: End Loop;
14901: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,
14902: p_init_msg_list => p_init_msg_list,
14903: x_return_status => x_return_status,
14904: x_msg_count => x_msg_count,
14905: x_msg_data => x_msg_data,

Line 15095: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

15091: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
15092: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
15093: ln_clev_model_price_unit OKC_K_LINES_V.PRICE_UNIT%TYPE := 0;
15094: ln_cimv_model_no_items OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
15095: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;
15096: lv_scs_code OKC_K_HEADERS_V.SCS_CODE%TYPE := null;
15097: ln_dummy NUMBER := 0;
15098: ln_dummy1 NUMBER := 0;
15099: i NUMBER := 0;

Line 16195: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

16191: ln_klev_fin_res OKL_K_LINES_V.RESIDUAL_VALUE%TYPE := 0;
16192: ln_klev_fin_cap OKL_K_LINES_V.CAPITAL_AMOUNT%TYPE := 0;
16193: ln_clev_model_price_unit OKC_K_LINES_V.PRICE_UNIT%TYPE := 0;
16194: ln_cimv_model_no_items OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE := 0;
16195: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;
16196: lv_model_object_id1 OKC_K_ITEMS_V.OBJECT1_ID1%TYPE;
16197: lv_model_object_id2 OKC_K_ITEMS_V.OBJECT1_ID2%TYPE;
16198: ln_dummy NUMBER := 0;
16199: ln_dummy1 NUMBER := 0;

Line 16206: ln_txl_itm_id OKL_TXL_ITM_INSTS.ID%TYPE;

16202: l_new_yn VARCHAR2(3);
16203: l_go_for_calc VARCHAR2(3):= 'Y';
16204:
16205: -- rravikir added
16206: ln_txl_itm_id OKL_TXL_ITM_INSTS.ID%TYPE;
16207: k_itiv_ib_rec itiv_rec_type;
16208: kx_itiv_ib_rec itiv_rec_type;
16209: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16210: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;

Line 16209: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;

16205: -- rravikir added
16206: ln_txl_itm_id OKL_TXL_ITM_INSTS.ID%TYPE;
16207: k_itiv_ib_rec itiv_rec_type;
16208: kx_itiv_ib_rec itiv_rec_type;
16209: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16210: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16211: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16212: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16213: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;

Line 16210: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;

16206: ln_txl_itm_id OKL_TXL_ITM_INSTS.ID%TYPE;
16207: k_itiv_ib_rec itiv_rec_type;
16208: kx_itiv_ib_rec itiv_rec_type;
16209: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16210: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16211: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16212: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16213: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;
16214: -- end rravikir

Line 16211: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;

16207: k_itiv_ib_rec itiv_rec_type;
16208: kx_itiv_ib_rec itiv_rec_type;
16209: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16210: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16211: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16212: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16213: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;
16214: -- end rravikir
16215:

Line 16212: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;

16208: kx_itiv_ib_rec itiv_rec_type;
16209: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16210: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16211: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16212: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16213: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;
16214: -- end rravikir
16215:
16216: CURSOR c_asset_iti(p_asset_number OKL_TXL_ASSETS_B.ASSET_NUMBER%TYPE,

Line 16213: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;

16209: lv_object_id1 OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE;
16210: lv_object_id2 OKL_TXL_ITM_INSTS.OBJECT_ID2_NEW%TYPE;
16211: ln_inv_itm_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
16212: ln_inv_org_id OKL_TXL_ITM_INSTS.INVENTORY_ORG_ID%TYPE;
16213: lv_jtot_object_code_new OKL_TXL_ITM_INSTS.JTOT_OBJECT_CODE_NEW%TYPE;
16214: -- end rravikir
16215:
16216: CURSOR c_asset_iti(p_asset_number OKL_TXL_ASSETS_B.ASSET_NUMBER%TYPE,
16217: p_dnz_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE)

Line 16240: p_txl_inst_id OKL_TXL_ITM_INSTS.ID%TYPE)

16236: and lse_ib.lty_code = G_IB_LINE_LTY_CODE;
16237:
16238: -- rravikir added
16239: CURSOR c_get_txl_itm_insts(p_top_line_id OKC_K_LINES_B.ID%TYPE,
16240: p_txl_inst_id OKL_TXL_ITM_INSTS.ID%TYPE)
16241: IS
16242: select iti.id, iti.inventory_item_id, iti.inventory_org_id,
16243: iti.object_id1_new, iti.object_id2_new, iti.jtot_object_code_new
16244: from okl_txl_itm_insts iti,

Line 16244: from okl_txl_itm_insts iti,

16240: p_txl_inst_id OKL_TXL_ITM_INSTS.ID%TYPE)
16241: IS
16242: select iti.id, iti.inventory_item_id, iti.inventory_org_id,
16243: iti.object_id1_new, iti.object_id2_new, iti.jtot_object_code_new
16244: from okl_txl_itm_insts iti,
16245: okc_line_styles_b lse_ib,
16246: okc_k_lines_b cle_ib,
16247: okc_line_styles_b lse_inst,
16248: okc_k_lines_b cle_inst

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

17512: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17513: OKL_API.set_message(p_app_name => G_APP_NAME,
17514: p_msg_name => G_FETCHING_INFO,
17515: p_token1 => G_REC_NAME_TOKEN,
17516: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');
17517: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17518: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17519: OKL_API.set_message(p_app_name => G_APP_NAME,
17520: p_msg_name => G_FETCHING_INFO,

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

17518: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17519: OKL_API.set_message(p_app_name => G_APP_NAME,
17520: p_msg_name => G_FETCHING_INFO,
17521: p_token1 => G_REC_NAME_TOKEN,
17522: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');
17523: RAISE OKL_API.G_EXCEPTION_ERROR;
17524: END IF;
17525: --Build itiv ib item rec
17526: l_itiv_ib_rec.id := r_itiv_ib_rec.id;

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

17681: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17682: OKL_API.set_message(p_app_name => G_APP_NAME,
17683: p_msg_name => G_FETCHING_INFO,
17684: p_token1 => G_REC_NAME_TOKEN,
17685: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');
17686: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
17687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17688: OKL_API.set_message(p_app_name => G_APP_NAME,
17689: p_msg_name => G_FETCHING_INFO,

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

17687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17688: OKL_API.set_message(p_app_name => G_APP_NAME,
17689: p_msg_name => G_FETCHING_INFO,
17690: p_token1 => G_REC_NAME_TOKEN,
17691: p_token1_value => 'OKL_TXL_ITM_INSTS_V Record');
17692: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
17693: END IF;
17694: n_itiv_ib_rec.object_id1_new := p_itiv_ib_rec.object_id1_new;
17695: n_itiv_ib_rec.object_id1_old := p_itiv_ib_rec.object_id1_new;

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

17692: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
17693: END IF;
17694: n_itiv_ib_rec.object_id1_new := p_itiv_ib_rec.object_id1_new;
17695: n_itiv_ib_rec.object_id1_old := p_itiv_ib_rec.object_id1_new;
17696: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,
17697: p_init_msg_list => p_init_msg_list,
17698: x_return_status => x_return_status,
17699: x_msg_count => x_msg_count,
17700: x_msg_data => x_msg_data,

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

17717: END IF;
17718: END IF;
17719:
17720: -- rravikir modified.
17721: -- Update the OKL_TXL_ITM_INSTS table, when the item or install site gets changed.
17722: ln_txl_itm_id := l_itiv_ib_rec_out.id;
17723: lv_object_id1 := l_itiv_ib_rec_out.object_id1_new;
17724: lv_object_id2 := l_itiv_ib_rec_out.object_id2_new;
17725: ln_inv_itm_id := l_itiv_ib_rec_out.inventory_item_id;

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

17733: k_itiv_ib_rec.object_id2_new := lv_object_id2;
17734: k_itiv_ib_rec.inventory_item_id := ln_inv_itm_id;
17735: k_itiv_ib_rec.inventory_org_id := ln_inv_org_id;
17736: k_itiv_ib_rec.jtot_object_code_new := lv_jtot_object_code_new;
17737: OKL_TXL_ITM_INSTS_PUB.update_txl_itm_insts(p_api_version => p_api_version,
17738: p_init_msg_list => p_init_msg_list,
17739: x_return_status => x_return_status,
17740: x_msg_count => x_msg_count,
17741: x_msg_data => x_msg_data,

Line 17845: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;

17841: l_klev_ib_rec_out klev_rec_type;
17842: l_itiv_ib_tbl_out itiv_tbl_type;
17843: x_clev_ib_rec clev_rec_type;
17844: l_trxv_ib_rec_out trxv_rec_type;
17845: lv_object_id1_new OKL_TXL_ITM_INSTS_V.OBJECT_ID1_NEW%TYPE;
17846: j NUMBER := 0;
17847: ln_dummy NUMBER := 0;
17848: ln_dummy1 NUMBER := 0;
17849: -- rravikir added

Line 17857: ln_item_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;

17853: k NUMBER := 0;
17854: ln_remain_inst NUMBER := 0;
17855: lb_record_created BOOLEAN := FALSE;
17856: lb_update_oec_required BOOLEAN := FALSE;
17857: ln_item_id OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
17858: -- end
17859: ln_final_current_units OKC_K_ITEMS_V.NUMBER_OF_ITEMS%TYPE;
17860: ln_model_line_id OKC_K_LINES_V.ID%TYPE := OKL_API.G_MISS_NUM;
17861: ln_fa_line_id OKC_K_LINES_V.ID%TYPE := OKL_API.G_MISS_NUM;

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

18062: -- rravikir modified
18063: IF (l_clev_inst_rec.id IS NOT NULL OR
18064: l_clev_inst_rec.id <> OKL_API.G_MISS_NUM) THEN
18065: -- We are here b'cause we have to update the okl_txl_itm_inst rec
18066: -- So we are calling the update api for the okl_txl_itm_insts rec
18067:
18068: -- Now getting the item information OKL_TXL_ITM_INSTS
18069: x_return_status := get_rec_itiv(l_clev_ib_rec.id,
18070: l_itiv_rec);

Line 18068: -- Now getting the item information OKL_TXL_ITM_INSTS

18064: l_clev_inst_rec.id <> OKL_API.G_MISS_NUM) THEN
18065: -- We are here b'cause we have to update the okl_txl_itm_inst rec
18066: -- So we are calling the update api for the okl_txl_itm_insts rec
18067:
18068: -- Now getting the item information OKL_TXL_ITM_INSTS
18069: x_return_status := get_rec_itiv(l_clev_ib_rec.id,
18070: l_itiv_rec);
18071: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18072: OKL_API.set_message(p_app_name => G_APP_NAME,

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

18871: l_cimv_ib_rec_out cimv_rec_type;
18872: l_trxv_ib_rec_out trxv_rec_type;
18873: ln_remain_inst NUMBER := 0;
18874: ln_model_line_id OKC_K_LINES_V.ID%TYPE := OKL_API.G_MISS_NUM;
18875: lv_object_id1_new OKL_TXL_ITM_INSTS.OBJECT_ID1_NEW%TYPE := OKL_API.G_MISS_CHAR;
18876: ln_fa_line_id OKC_K_LINES_V.ID%TYPE := OKL_API.G_MISS_NUM;
18877: r_clev_model_rec clev_rec_type;
18878: r_klev_model_rec klev_rec_type;
18879: r_cimv_model_rec cimv_rec_type;

Line 18902: ln_model_item OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;

18898: r_cimv_addon_rec cimv_rec_type;
18899: rx_clev_addon_rec clev_rec_type;
18900: rx_klev_addon_rec klev_rec_type;
18901: rx_cimv_addon_rec cimv_rec_type;
18902: ln_model_item OKL_TXL_ITM_INSTS.INVENTORY_ITEM_ID%TYPE;
18903:
18904: CURSOR c_remain_inst_line(p_cle_id OKC_K_LINES_V.CLE_ID%TYPE,
18905: p_chr_id OKC_K_LINES_V.DNZ_CHR_ID%TYPE) IS
18906: SELECT count(cle.id)

Line 19073: -- okl_txl_itm_insts record

19069: CLOSE c_model_item;
19070:
19071: -- we have to update the txl_itm_insts table only if the p_itiv_ib_tbl(i).id is given
19072: -- otherwise we have to create instance line and install base line and then create
19073: -- okl_txl_itm_insts record
19074: l_itiv_ib_tbl := p_itiv_ib_tbl;
19075: IF l_itiv_ib_tbl.COUNT > 0 THEN
19076: -- We have intialize the I, since there could be any index integer
19077: i := l_itiv_ib_tbl.FIRST;

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

19229: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
19230: END IF;
19231:
19232: -- We are here b'cause we have to update the okl_txl_itm_inst rec
19233: -- So we are calling the update api for the okl_txl_itm_insts rec
19234: l_itiv_ib_tbl(i).object_id2_new := '#';
19235: update_txl_itm_insts(p_api_version => p_api_version,
19236: p_init_msg_list => p_init_msg_list,
19237: x_return_status => x_return_status,

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

19980: END IF;
19981: FETCH c_remain_inst_line INTO ln_remain_inst;
19982: CLOSE c_remain_inst_line;
19983:
19984: -- Last record of the OKL_TXL_ITM_INSTS should not be deleted. It
19985: -- has to update the MFG_FLAG to 'N' and nullify the serial number.
19986: IF ln_remain_inst < 2 THEN
19987: x_return_status := get_rec_itiv(l_clev_ib_rec.id,
19988: l_itiv_rec);