The following lines contain the word 'select', 'insert', 'update' or 'delete':
x_rev_comp_unexp_rec.Delete_Group_Name :=
p_bom_component_rec.Delete_Group_Name ; -- Added in 1155
x_bom_component_rec.Delete_Group_Name :=
p_rev_comp_unexp_rec.Delete_Group_Name ; -- Added in 1155
select decode(enable_unimplemented_boms,'Y',null, sysdate)
into l_bom_header_rec.BOM_Implementation_Date
from bom_structure_types_b stype,
bom_alternate_designators alt
where alt.alternate_designator_code IS NULL
and stype.structure_type_id = alt.structure_type_id;
select decode(enable_unimplemented_boms,'Y',null, sysdate)
into l_bom_header_rec.BOM_Implementation_Date
from bom_structure_types_b stype,
bom_alternate_designators alt
where alt.alternate_designator_code = l_bom_header_rec.alternate_bom_code
and organization_id = l_organization_id
and stype.structure_type_id = alt.structure_type_id;
select decode(enable_unimplemented_boms,'Y',null, sysdate)
into l_bom_header_rec.BOM_Implementation_Date
from bom_structure_types_b stype
where stype.structure_type_name = 'Asset BOM';
l_bom_header_rec.Delete_Group_Name :=
l_bomheaders_tbl(hdrRec).Delete_Group_Name;
l_bom_header_rec.Delete_Group_Name :=
l_bomheaders_tbl(hdrRec).Delete_Group_Name;
l_bomheaders_tbl.DELETE(hdrRec);
l_bomrevisions_tbl.DELETE(revRec);
l_bom_component_tbl(i).Delete_Group_Name :=
l_bomcomponents_tbl(compRec).Delete_Group_Name;
l_bomcomponents_tbl.DELETE(compRec);
l_bomsubcomponents_tbl.DELETE(scompRec);
l_bomrefdesignators_tbl.DELETE(rdesRec);
l_bomcompoperations_tbl.DELETE(copsRec);
x_bomheaders_tbl(l_phdrcount).Delete_Group_Name :=
l_bom_header_rec.Delete_Group_Name;
x_bomheaders_tbl(l_phdrcount).Delete_Group_Name :=
l_bom_header_rec.Delete_Group_Name;
x_bomcomponents_tbl(i).Delete_Group_Name :=
l_bom_component_tbl(compRec).Delete_Group_Name;
l_bom_revision_tbl.DELETE;
l_bom_component_tbl.DELETE;
l_bom_ref_designator_tbl.DELETE;
l_bom_sub_component_tbl.DELETE;
l_bom_comp_ops_tbl.DELETE;
select decode(enable_unimplemented_boms,'Y',null, sysdate)
into l_bom_header_rec.BOM_Implementation_Date
from bom_structure_types_b stype,
bom_alternate_designators alt
where alt.alternate_designator_code IS NULL
and stype.structure_type_id = alt.structure_type_id;
select decode(enable_unimplemented_boms,'Y',null, sysdate)
into l_bom_header_rec.BOM_Implementation_Date
from bom_structure_types_b stype,
bom_alternate_designators alt
where
alt.alternate_designator_code is NULL
and alt.organization_id = -1
and stype.structure_type_id = alt.structure_type_id;
select decode(enable_unimplemented_boms,'Y',null, sysdate)
into l_bom_header_rec.BOM_Implementation_Date
from bom_structure_types_b stype,
bom_alternate_designators alt,
org_organization_definitions org
where alt.alternate_designator_code = p_Alternate_Bom_Code
and alt.organization_id = org.organization_id
and org.organization_code = p_Organization_Code
and stype.structure_type_id = alt.structure_type_id;
l_bom_header_rec.Delete_Group_Name := l_input_bomheader_rec.Delete_Group_Name;
IF (l_bom_header_rec.Transaction_Type = BOM_Globals.G_OPR_UPDATE) Then
l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
Error_Handler.Write_Debug('Cannot have transaction type of UPDATE for product family Bills');
l_bom_component_tbl(compRec).Delete_Group_Name :=
l_input_bomcomponents_tbl(compRec).Delete_Group_Name;