[Home] [Help]
6709: from okc_rep_contracts_all
6710: where CONTRACT_ID = p_contract_id ;
6711:
6712: -- Delete the records. The records are locked in the delete_contract API.
6713: DELETE FROM OKC_REP_CONTRACTS_ALL_EXT_B
6714: WHERE CONTRACT_ID = p_contract_id
6715: AND contract_version_num = l_con_version;
6716:
6717: DELETE FROM OKC_REP_CONTRACTS_ALL_EXT_TL
6718: WHERE CONTRACT_ID = p_contract_id
6719: AND contract_version_num = l_con_version;
6720: /*
6721: -- Insert the previous version record.
6722: INSERT INTO OKC_REP_CONTRACTS_ALL_EXT_B(extension_id,
6723: ATTR_GROUP_ID,
6724: contract_id,
6725:
6726: DATA_LEVEL_ID,
7404: l_index NUMBER;
7405: l_extension_id_vers NUMBER;
7406:
7407: CURSOR c_get_uda_attr_for_con IS
7408: SELECT extension_id FROM okc_rep_contracts_all_ext_b
7409: WHERE contract_id = p_contract_id;
7410:
7411:
7412: BEGIN
7433: -- Initialize API return status to success
7434: x_return_status := FND_API.G_RET_STS_SUCCESS;
7435:
7436: --No API's in EGO to copy data from one object to another.
7437: --insert data from okc_rep_contracts_all_ext_b table to okc_rep_contract_vers_ext_b
7438:
7439: FOR c_get_uda_attr_for_con_rec IN c_get_uda_attr_for_con LOOP
7440: SELECT EGO_EXTFWK_S.NEXTVAL INTO l_extension_id_vers FROM dual;
7441:
7438:
7439: FOR c_get_uda_attr_for_con_rec IN c_get_uda_attr_for_con LOOP
7440: SELECT EGO_EXTFWK_S.NEXTVAL INTO l_extension_id_vers FROM dual;
7441:
7442: INSERT INTO okc_rep_contracts_all_ext_b(EXTENSION_ID,
7443: ATTR_GROUP_ID,
7444: CONTRACT_TYPE,
7445: CONTRACT_ID,
7446: CONTRACT_VERSION_NUM,
7652: D_EXT_ATTR7,
7653: D_EXT_ATTR8,
7654: D_EXT_ATTR9,
7655: D_EXT_ATTR10
7656: FROM okc_rep_contracts_all_ext_b
7657: WHERE contract_id = p_contract_id
7658: AND extension_id = c_get_uda_attr_for_con_rec.extension_id;
7659:
7660: --insert data from okc_rep_contracts_all_ext_tl table to okc_rep_contract_vers_ext_tl