The following lines contain the word 'select', 'insert', 'update' or 'delete':
select common_bill_sequence_id
into l_com_bill_seq_id
from bom_bill_of_materials
where organization_id = p_organization_id
and assembly_item_id = p_prod_inv_item_id
and alternate_bom_designator is null;
select bic.component_quantity, mtl.primary_uom_code,
mtl.coverage_schedule_id
into p_duration, p_uom_code, p_cov_sch_id
from mtl_system_items mtl, bom_inventory_components bic
where bic.component_item_id = mtl.inventory_item_id
and mtl.organization_id = p_organization_id
and bic.bill_sequence_id = l_com_bill_seq_id
and bic.component_item_id = p_war_inv_item_id
and l_war_date >= bic.effectivity_date
and l_war_date < nvl(bic.disable_date,l_war_date+1)
and mtl.vendor_warranty_flag = 'Y'
and rownum < 2;
select service_duration, service_duration_period_code,
coverage_schedule_id
into p_duration, p_uom_code, p_cov_sch_id
from mtl_system_items
where inventory_item_id = p_war_inv_item_id
and organization_id = p_organization_id;