The following lines contain the word 'select', 'insert', 'update' or 'delete':
CURSOR c1 IS SELECT implementation_date FROM
bom_bill_of_materials WHERE
bill_sequence_id = p_bill_seq_id;
SELECT lookup_code INTO l_enforce_int_reqcode FROM mfg_lookups WHERE
lookup_type = 'BOM_ENFORCE_INT_REQUIREMENTS' AND
upper(meaning) = upper(p_enforce_integer);
SELECT operation_sequence_id
INTO l_id
FROM bom_operation_sequences bos
WHERE routing_sequence_id =
(SELECT common_routing_sequence_id
FROM bom_operational_routings bor
WHERE assembly_item_id = p_assembly_item_id
and organization_id = p_organization_id
and nvl(alternate_routing_designator, nvl(p_alternate_bom_designator, 'NONE')) =
nvl(p_alternate_bom_designator, 'NONE')
and ( p_alternate_bom_designator is null
or (p_alternate_bom_designator is not null
and (alternate_routing_designator = p_alternate_bom_designator
or not exists (SELECT null
FROM bom_operational_routings bor2
WHERE bor2.assembly_item_id = p_assembly_item_id
and bor2.organization_id = p_organization_id
and bor2.alternate_routing_designator =
p_alternate_bom_designator
)
)
)
)
)
and nvl(trunc(disable_date), trunc(sysdate)+1) > trunc(sysdate) and nvl(operation_type,1) = 1 and
operation_seq_num = p_operation_sequence_number;
SELECT organization_id
INTO l_id
FROM mtl_parameters
WHERE organization_code = p_organization;
SELECT bill_sequence_id
INTO l_id
FROM bom_bill_of_materials
WHERE assembly_item_id = p_assembly_item_id
AND NVL(alternate_bom_designator, 'NONE') =
-- NVL(p_alternate_bom_designator, 'NONE')
decode(p_alternate_bom_designator,FND_API.G_MISS_CHAR,'NONE',NULL,'NONE',p_alternate_bom_designator) --2783251
AND organization_id = p_organization_id;
SELECT STRUCTURE_TYPE_ID
INTO l_structure_type_id
FROM BOM_STRUCTURE_TYPES_B
WHERE STRUCTURE_TYPE_NAME = p_structure_type_name
AND ( DISABLE_DATE IS NULL OR DISABLE_DATE > SYSDATE );
SELECT 1
FROM bom_alternate_designators
WHERE alternate_designator_code = p_alt_designator
AND organization_id = p_organization_id;
IF p_bom_header_Rec.enable_attrs_update = 'Y'
THEN
l_bom_head_unexp_rec.common_bill_sequence_id := l_bom_head_unexp_rec.bill_sequence_id;
l_token_tbl.Delete;
select inventory_location_id
into supply_locator_id
from mtl_item_locations_kfv
where concatenated_segments = p_location_name and
organization_id = p_organization_id;
SELECT component_sequence_id
INTO l_id
FROM bom_inventory_components
WHERE component_item_id = p_component_item_id
AND bill_sequence_id = p_bill_sequence_id
AND effectivity_date = p_old_effective_date
AND operation_seq_num = p_old_op_seq_num;
SELECT revised_item_sequence_id
INTO l_id
FROM Eng_revised_items
WHERE NVL(from_end_item_unit_number,FND_API.G_MISS_CHAR )
= NVL(p_from_end_item_number, FND_API.G_MISS_CHAR)
AND NVL(new_item_revision, FND_API.G_MISS_CHAR) =
NVL(p_new_item_revision, FND_API.G_MISS_CHAR)
AND NVL(new_routing_revision, FND_API.G_MISS_CHAR) =
NVL(p_new_routing_revision, FND_API.G_MISS_CHAR)
AND TRUNC(scheduled_date) = TRUNC(p_effective_date )
AND change_notice = p_change_notice
AND organization_id = p_organization_id
AND revised_item_id = p_revised_item_id ;
SELECT bill_sequence_id, revised_item_Sequence_id
INTO l_Bill_Seq, l_Rev_Item_Seq
FROM eng_revised_items
WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
= NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
= NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
= NVL(p_item_revision , FND_API.G_MISS_CHAR)
AND TRUNC(scheduled_date) = TRUNC(p_effective_date)
AND change_notice = p_change_notice
AND organization_id = p_organization_id
AND revised_item_id = p_revised_item_id ;
select component_sequence_id
into l_id
from bom_inventory_components
where bill_sequence_id = p_bill_sequence_id
and component_item_id = p_component_item_id
and operation_seq_num = p_operation_sequence_num
and effectivity_date = p_effectivity_date
and
(p_from_unit_number IS NULL
or
p_from_unit_number = FND_API.G_MISS_CHAR
or
from_end_item_unit_number = p_from_unit_number);
select vendor_id
into l_id
from po_vendors
where vendor_name = p_Vendor_Name
and enabled_flag = 'Y'
and sysdate between nvl(start_date_active,sysdate-1) AND nvl(end_date_active,sysdate+1);
( BOM_Globals.G_OPR_UPDATE, BOM_globals.G_OPR_DELETE,
BOM_Globals.G_OPR_CANCEL
) AND
l_rev_comp_unexp_rec.bill_sequence_id IS NULL
AND Bom_Globals.Get_Bo_Identifier <> Bom_Globals.G_ECO_BO -- Added by MK on 12/03/00
THEN
l_return_status := FND_API.G_RET_STS_ERROR;
-- If Transaction Type is Update and New substitute component is given,
-- Convert New substitute item name to New Substitute Item ID
--
*********************************************************************/
IF ( p_Sub_Component_Rec.new_substitute_component_name is not null
AND p_sub_component_rec.substitute_component_name <> FND_API.G_MISS_CHAR
and p_sub_component_rec.transaction_type = Bom_Globals.G_OPR_UPDATE)
THEN
l_sub_comp_unexp_rec.new_substitute_component_id :=
Substitute_Component( p_substitute_component =>
p_sub_component_rec.new_substitute_component_name
, p_organization_id =>
l_sub_comp_unexp_rec.organization_id
, x_err_text => l_err_text
);
g_Token_Tbl.Delete;
SELECT 1
INTO l_dummy
FROM bom_bill_of_materials
WHERE bill_sequence_id = source_bill_sequence_id
AND bill_sequence_id = l_sub_comp_unexp_rec.bill_Sequence_id;
g_token_tbl.delete(2);
g_Token_Tbl.Delete;
SELECT 1
INTO l_dummy
FROM bom_bill_of_materials
WHERE bill_sequence_id = source_bill_sequence_id
AND bill_sequence_id = l_ref_desg_unexp_rec.bill_sequence_id;
g_token_tbl.delete(2);
SELECT 1
INTO l_dummy
FROM bom_bill_of_materials
WHERE bill_sequence_id = source_bill_sequence_id
AND bill_sequence_id = l_bom_comp_ops_unexp_rec.bill_Sequence_id;
g_Token_Tbl.Delete;
g_Token_Tbl.Delete;
If(p_bom_comp_ops_rec.transaction_type = BOM_globals.G_OPR_UPDATE and
p_bom_comp_ops_rec.new_additional_op_seq_num is not null and
p_bom_comp_ops_rec.new_additional_op_seq_num <> FND_API.G_MISS_NUM) then
l_bom_comp_ops_unexp_rec.new_additional_op_seq_id :=
Operation_Sequence_Id( p_organization_id =>
l_bom_comp_ops_unexp_rec.organization_id
, p_assembly_item_id =>
l_bom_comp_ops_unexp_rec.assembly_item_id
, p_alternate_bom_designator =>
p_bom_comp_ops_rec.alternate_bom_code
, p_operation_sequence_number =>
p_bom_comp_ops_rec.new_additional_op_seq_num
, x_err_text => l_Err_Text
);
g_Token_Tbl.Delete;
select inventory_item_id into id from mtl_system_items_kfv
where concatenated_segments = item_name
and organization_id =org_id;