The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
O.ORGANIZATION_NAME
INTO L_ORGANIZATION_NAME
FROM
ORG_ORGANIZATION_DEFINITIONS O
WHERE O.ORGANIZATION_ID = LP_ORGANIZATION_ID;
SELECT
CATEGORY_SET_NAME
INTO L_CATEGORY_SET
FROM
MTL_CATEGORY_SETS
WHERE CATEGORY_SET_ID = P_CATEGORY_SET_ID;
SELECT
ITEM_NUMBER
INTO L_SPECIFIC_ITEM
FROM
MTL_ITEM_FLEXFIELDS
WHERE ITEM_ID = P_ITEM_ID
AND ORGANIZATION_ID = LP_ORGANIZATION_ID;
SELECT
SUBSTR(L1.MEANING
,1
,40),
SUBSTR(L2.MEANING
,1
,40),
SUBSTR(L3.MEANING
,1
,40),
SUBSTR(L4.MEANING
,1
,40)
INTO L_EXPLODE_OPTION,L_ALT_OPTION,L_RANGE_OPTION,L_ORDER_BY
FROM
MFG_LOOKUPS L1,
MFG_LOOKUPS L2,
MFG_LOOKUPS L3,
MFG_LOOKUPS L4
WHERE L1.LOOKUP_TYPE = 'BOM_INQUIRY_DISPLAY_TYPE'
AND L1.LOOKUP_CODE = P_EXPLODE_OPTION_TYPE
AND L2.LOOKUP_TYPE = 'MCG_AUTOLOAD_OPTION'
AND L2.LOOKUP_CODE = P_ALT_OPTION_TYPE
AND L3.LOOKUP_TYPE = 'BOM_SELECTION_TYPE'
AND L3.LOOKUP_CODE = P_RANGE_OPTION_TYPE
AND L4.LOOKUP_TYPE = 'BOM_BILL_SORT_ORDER_TYPE'
AND L4.LOOKUP_CODE = P_ORDER_BY_TYPE;
SELECT
SUBSTR(L1.MEANING
,1
,4),
SUBSTR(L2.MEANING
,1
,4)
INTO L_YES,L_NO
FROM
MFG_LOOKUPS L1,
MFG_LOOKUPS L2
WHERE L1.LOOKUP_TYPE = 'SYS_YES_NO'
AND L1.LOOKUP_CODE = 1
AND L2.LOOKUP_TYPE = 'SYS_YES_NO'
AND L2.LOOKUP_CODE = 2;
FOR C1 IN (SELECT
ORGANIZATION_ID
FROM
MTL_PARAMETERS MP
WHERE MASTER_ORGANIZATION_ID = (
SELECT
MASTER_ORGANIZATION_ID
FROM
MTL_PARAMETERS
WHERE ORGANIZATION_ID = LP_ORGANIZATION_ID )
AND MP.ORGANIZATION_ID IN (
SELECT
ORGANIZATION_ID
FROM
ORG_ACCESS_VIEW
WHERE RESPONSIBILITY_ID = FND_PROFILE.VALUE('RESP_ID')
AND RESP_APPLICATION_ID = FND_PROFILE.VALUE('RESP_APPL_ID') )) LOOP
N := N + 1;
SELECT
BOM_LISTS_S.NEXTVAL
INTO P_SEQUENCE_ID1
FROM
DUAL;
INSERT INTO BOM_LISTS
(ORGANIZATION_ID
,SEQUENCE_ID
,ALTERNATE_DESIGNATOR)
VALUES (T_ORG_CODE_LIST(I)
,P_SEQUENCE_ID1
,I);
TABLE_NAME := 'Select_sequence';
SELECT
BOM_LISTS_S.NEXTVAL
INTO L_SEQ_ID
FROM
DUAL;
L_STR := 'INSERT INTO BOM_LISTS (SEQUENCE_ID,ASSEMBLY_ITEM_ID,ALTERNATE_DESIGNATOR) ';
L_STR := L_STR || 'SELECT DISTINCT ' || 'TO_CHAR(:b_l_seq_id)' || ',:b_P_ITEM_ID' || ',bbom.alternate_bom_designator
FROM bom_bill_of_materials bbom
WHERE bbom.assembly_item_id = ' || ':b_P_ITEM_ID' || ' and bbom.organization_id =' || ':b_P_ORGANIZATION_ID';
L_STR := L_STR || ' SELECT
DISTINCT ' || ':b_l_seq_id' || ',
msi.inventory_item_id,
bbom.alternate_bom_designator
FROM mtl_item_categories mic,
mtl_system_items msi,
mtl_categories mc,
bom_bill_of_materials bbom
WHERE ' || P_ASS_BETWEEN || '
AND msi.inventory_item_id = mic.inventory_item_id
AND msi.organization_id =
' || ':b_P_ORGANIZATION_ID' || '
AND mic.organization_id =
' || ':b_P_ORGANIZATION_ID' || '
AND mic.category_id = mc.category_id
AND mic.category_set_id =
' || ':b_P_CATEGORY_SET_ID' || '
AND mc.structure_id =
' || ':b_P_CATEGORY_STRUCTURE_ID' || '
AND ' || P_CAT_BETWEEN || '
AND msi.inventory_item_id = bbom.assembly_item_id
AND msi.organization_id = bbom.organization_id
AND msi.bom_enabled_flag = ''Y''';
DELETE FROM BOM_LISTS
WHERE SEQUENCE_ID = P_SEQUENCE_ID1;
SELECT
DESCRIPTION
INTO L_DESC
FROM
MTL_DESCRIPTIVE_ELEMENTS
WHERE ITEM_CATALOG_GROUP_ID = L_CATALOG_GROUP_ID
AND ELEMENT_NAME = L_ELEMENT_NAME;
SELECT
MIN(DESCRIPTION)
INTO L_DESC
FROM
MTL_DESCRIPTIVE_ELEMENTS
WHERE ELEMENT_NAME = L_ELEMENT_NAME;
SELECT
MEANING
INTO DUMMY
FROM
MFG_LOOKUPS
WHERE LOOKUP_TYPE = 'WIP_SUPPLY'
AND LOOKUP_CODE = WIP_SUPPLY_TYPE;
SELECT
REV.DESCRIPTION
INTO REV_DESC
FROM
MTL_ITEM_REVISIONS REV
WHERE REV.INVENTORY_ITEM_ID = ITEM_ID
AND REV.ORGANIZATION_ID = ORG_ID
AND REV.REVISION = ACTIVE_REV;
SELECT
ORGANIZATION_NAME
INTO ORG_NAME
FROM
ORG_ORGANIZATION_DEFINITIONS ORG
WHERE ORG.ORGANIZATION_ID = M_ORG_ID;
SELECT
DESCRIPTION
INTO ITEM_DESC
FROM
MTL_SYSTEM_ITEMS_TL
WHERE ORGANIZATION_ID = ORG_ID
AND INVENTORY_ITEM_ID = ITEM_ID
AND LANGUAGE = USERENV('LANG');
SELECT
DESCRIPTION
INTO ITEM_DESC
FROM
MTL_SYSTEM_ITEMS_TL
WHERE ORGANIZATION_ID = ORG_ID
AND INVENTORY_ITEM_ID = ITEM_ID
AND LANGUAGE = USERENV('LANG');
SELECT
DESCRIPTION
INTO ITEM_DESC
FROM
MTL_SYSTEM_ITEMS_TL
WHERE ORGANIZATION_ID = ORG_ID
AND INVENTORY_ITEM_ID = ITEM_ID
AND LANGUAGE = USERENV('LANG');