The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT DISTINCT NVL(COMMON_ASSEMBLY_ITEM_ID,ASSEMBLY_ITEM_ID) COMMON_ASSEMBLY_ITEM_ID,
NVL(COMMON_ORGANIZATION_ID,ORGANIZATION_ID) COMMON_ORG_ID
FROM BOM_BILL_OF_MATERIALS BOM
WHERE BOM.ORGANIZATION_ID = X_org_id
AND BOM.ASSEMBLY_ITEM_ID = X_eng_item_id
AND nvl(bom.effectivity_control, 1) <> 4 -- Bug 4210718
AND ((X_designator_option = 2 AND
BOM.ALTERNATE_BOM_DESIGNATOR IS NULL)
OR (X_designator_option = 3 AND
BOM.ALTERNATE_BOM_DESIGNATOR = X_alt_bom_designator)
OR (X_designator_option = 1));
SELECT DISTINCT RBOM.ASSEMBLY_ITEM_ID ASSEMBLY_ITEM_ID, RBOM.ORGANIZATION_ID ORG_ID
FROM BOM_BILL_OF_MATERIALS RBOM, MTL_SYSTEM_ITEMS_B MST, BOM_BILL_OF_MATERIALS CBOM
WHERE CBOM.ORGANIZATION_ID = X_org_id
AND CBOM.ASSEMBLY_ITEM_ID = X_eng_item_id
AND ((X_designator_option = 2 AND
CBOM.ALTERNATE_BOM_DESIGNATOR IS NULL)
OR (X_designator_option = 3 AND
CBOM.ALTERNATE_BOM_DESIGNATOR = X_alt_bom_designator)
OR (X_designator_option = 1))
AND RBOM.COMMON_ASSEMBLY_ITEM_ID = NVL(CBOM.COMMON_ASSEMBLY_ITEM_ID,CBOM.ASSEMBLY_ITEM_ID)
AND RBOM.COMMON_ORGANIZATION_ID = NVL(CBOM.COMMON_ORGANIZATION_ID,CBOM.ORGANIZATION_ID)
AND RBOM.COMMON_BILL_SEQUENCE_ID = NVL(CBOM.COMMON_BILL_SEQUENCE_ID,CBOM.BILL_SEQUENCE_ID)
AND NVL(RBOM.ALTERNATE_BOM_DESIGNATOR,'PRIMARY') = NVL(CBOM.ALTERNATE_BOM_DESIGNATOR,'PRIMARY')
AND MST.INVENTORY_ITEM_ID = RBOM.ASSEMBLY_ITEM_ID
AND MST.ORGANIZATION_ID = RBOM.ORGANIZATION_ID
AND nvl(rbom.effectivity_control, 1) <> 4 -- Bug 4210718
AND MST.ENG_ITEM_FLAG = 'Y'; -- Fetch only engineering items. Because it could have been just transferred.
SELECT NVL(COMMON_ASSEMBLY_ITEM_ID,ASSEMBLY_ITEM_ID) COMMON_ASSEMBLY_ITEM_ID, NVL(COMMON_ORGANIZATION_ID,ORGANIZATION_ID) COMMON_ORG_ID,
SOURCE_BILL_SEQUENCE_ID, ALTERNATE_BOM_DESIGNATOR
FROM BOM_BILL_OF_MATERIALS BOM
WHERE BOM.ORGANIZATION_ID = X_org_id
AND BOM.ASSEMBLY_ITEM_ID = X_eng_item_id
AND ((X_designator_option = 2 AND
BOM.ALTERNATE_BOM_DESIGNATOR IS NULL)
OR (X_designator_option = 3 AND
BOM.ALTERNATE_BOM_DESIGNATOR = X_alt_bom_designator)
OR (X_designator_option = 1));
SELECT ASSEMBLY_ITEM_ID ASSEMBLY_ITEM_ID, ORGANIZATION_ID ORG_ID
FROM BOM_BILL_OF_MATERIALS BOM
WHERE BOM.COMMON_ORGANIZATION_ID = cp_Common_Org_Id
AND BOM.COMMON_ASSEMBLY_ITEM_ID = cp_Common_Assembly_Item_Id -- Fix for bug 3519193. Changed the cursor parameter name
AND ((X_designator_option = 2 AND
BOM.ALTERNATE_BOM_DESIGNATOR IS NULL)
OR (X_designator_option = 3 AND
BOM.ALTERNATE_BOM_DESIGNATOR = X_alt_bom_designator)
OR (X_designator_option = 1))
AND BOM.BILL_SEQUENCE_ID <> BOM.COMMON_BILL_SEQUENCE_ID; -- Make sure source not fetched
SELECT ASSEMBLY_ITEM_ID ASSEMBLY_ITEM_ID, ORGANIZATION_ID ORG_ID
FROM BOM_BILL_OF_MATERIALS BOM
WHERE BOM.Source_BILL_SEQUENCE_ID = cp_Source_Bill_Sequence_Id
AND BOM.BILL_SEQUENCE_ID <> BOM.Source_BILL_SEQUENCE_ID; -- Make sure source not fetched
select organization_code into G_ORG_CODE
from mtl_parameters
where organization_id = X_org_id;
select concatenated_segments into G_ITEM_NAME
from mtl_system_items_kfv
where inventory_item_id = X_mfg_item_id AND organization_id = X_org_id;
X_last_update_date => SYSDATE,
X_last_updated_by => to_number(Fnd_Profile.Value('USER_ID')),
X_creation_date => SYSDATE,
X_created_by => to_number(Fnd_Profile.Value('USER_ID')),
X_last_update_login => to_number(Fnd_Profile.Value('LOGIN_ID')),
X_effectivity_date => SYSDATE,
X_change_notice => X_ecn_name,
X_implementation_date => SYSDATE);
ENG_ROUTING_PKG.ROUTING_UPDATE(X_org_id => X_org_id,
X_eng_item_id => X_eng_item_id,
X_designator_option => X_designator_option,
X_transfer_option => X_transfer_option,
X_alt_rtg_designator => X_alt_rtg_designator,
X_effectivity_date => X_effectivity_date);
X_last_update_date => SYSDATE,
X_last_updated_by => to_number(Fnd_Profile.Value('USER_ID')),
X_creation_date => SYSDATE,
X_created_by => to_number(Fnd_Profile.Value('USER_ID')),
X_last_update_login => to_number(Fnd_Profile.Value('LOGIN_ID')),
X_effectivity_date => SYSDATE,
X_change_notice => X_ecn_name,
X_implementation_date => SYSDATE);
ENG_BOM_PKG.BOM_UPDATE(X_org_id => X_org_id,
X_eng_item_id => X_eng_item_id,
X_designator_option => X_designator_option,
X_transfer_option => X_transfer_option,
X_alt_bom_designator => X_alt_bom_designator,
X_effectivity_date => X_effectivity_date,
X_implemented_only => X_implemented_only,
X_unit_number => X_unit_number);
ENG_BOM_PKG.BOM_UPDATE(X_org_id => common_rec.COMMON_ORG_ID,
X_eng_item_id => common_rec.COMMON_ASSEMBLY_ITEM_ID,
-- For common bill always transfer particular alternate only.
X_designator_option => 2,
X_transfer_option => X_transfer_option,
-- To transfer particular alternate pass alternate from the cursor
X_alt_bom_designator => common_rec.ALTERNATE_BOM_DESIGNATOR,
X_effectivity_date => X_effectivity_date,
X_implemented_only => X_implemented_only,
X_unit_number => X_unit_number);
ENG_BOM_PKG.BOM_UPDATE(X_org_id => common_rec.COMMON_ORG_ID,
X_eng_item_id => common_rec.COMMON_ASSEMBLY_ITEM_ID,
-- For common bill always transfer particular alternate only.
X_designator_option => 3,
X_transfer_option => X_transfer_option,
-- To transfer particular alternate pass alternate from the cursor
X_alt_bom_designator => common_rec.ALTERNATE_BOM_DESIGNATOR,
X_effectivity_date => X_effectivity_date,
X_implemented_only => X_implemented_only,
X_unit_number => X_unit_number);
ENG_BOM_PKG.BOM_UPDATE(X_org_id => other_reference_rec.ORG_ID,
X_eng_item_id => other_reference_rec.ASSEMBLY_ITEM_ID,
-- For reference bill always transfer particular alternate only.
X_designator_option => 2,
X_transfer_option => X_transfer_option,
-- To transfer particular alternate pass alternate from the cursor
X_alt_bom_designator => common_rec.ALTERNATE_BOM_DESIGNATOR,
X_effectivity_date => X_effectivity_date,
X_implemented_only => X_implemented_only,
X_unit_number => X_unit_number);
ENG_BOM_PKG.BOM_UPDATE(X_org_id => other_reference_rec.ORG_ID,
X_eng_item_id => other_reference_rec.ASSEMBLY_ITEM_ID,
-- For reference bill always transfer particular alternate only.
X_designator_option => 3,
X_transfer_option => X_transfer_option,
-- To transfer particular alternate pass alternate from the cursor
X_alt_bom_designator => common_rec.ALTERNATE_BOM_DESIGNATOR,
X_effectivity_date => X_effectivity_date,
X_implemented_only => X_implemented_only,
X_unit_number => X_unit_number);