The following lines contain the word 'select', 'insert', 'update' or 'delete':
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;
SELECT
MEANING
INTO STATUS
FROM
MFG_LOOKUPS
WHERE LOOKUP_CODE = P_STATUS
AND LOOKUP_TYPE = 'ECG_ECN_STATUS';
MODE="SELECT" DISPLAY="ALL" TABLEALIAS="msi1"')*/NULL;
SELECT
BOM_LISTS_S.NEXTVAL
INTO P_SEQUENCE_ID
FROM
DUAL;
FOR c_org IN (SELECT
ORGANIZATION_ID
FROM
MTL_PARAMETERS MP
WHERE MP.MASTER_ORGANIZATION_ID = (
SELECT
MP1.MASTER_ORGANIZATION_ID
FROM
MTL_PARAMETERS MP1
WHERE MP1.ORGANIZATION_ID = P_ORG_ID )
AND MP.ORGANIZATION_ID IN (
SELECT
ORGANIZATION_ID
FROM
ORG_ACCESS_VIEW
WHERE RESPONSIBILITY_ID = L_RESP_ID
AND RESP_APPLICATION_ID = L_RESP_APPL_ID )) LOOP
L_INDEX := L_INDEX + 1;
INSERT INTO BOM_LISTS
(SEQUENCE_ID
,ORGANIZATION_ID
,ALTERNATE_DESIGNATOR)
VALUES (P_SEQUENCE_ID
,C_ORG.ORGANIZATION_ID
,L_INDEX);
INSERT INTO BOM_LISTS
(SEQUENCE_ID
,ORGANIZATION_ID
,ALTERNATE_DESIGNATOR)
VALUES (P_SEQUENCE_ID
,P_ORG_ID
,1);
INSERT INTO BOM_LISTS
(SEQUENCE_ID
,ORGANIZATION_ID
,ALTERNATE_DESIGNATOR)
VALUES (P_SEQUENCE_ID
,L_ORG_CODE_LIST(L_INDEX)
,L_INDEX);
SELECT
REV.REVISION
INTO REV
FROM
MTL_ITEM_REVISIONS REV
WHERE REV.INVENTORY_ITEM_ID = ITEM_ID
AND REV.ORGANIZATION_ID = ORG_ID
AND REV.EFFECTIVITY_DATE = (
SELECT
MAX(EFFECTIVITY_DATE)
FROM
MTL_ITEM_REVISIONS
WHERE EFFECTIVITY_DATE <= EFF_DATE
AND ORGANIZATION_ID = ORG_ID
AND INVENTORY_ITEM_ID = ITEM_ID
AND IMPLEMENTATION_DATE is not null )
AND REV.IMPLEMENTATION_DATE is not null;
SELECT
REV.REVISION
INTO LATE_REV
FROM
MTL_ITEM_REVISIONS REV
WHERE REV.INVENTORY_ITEM_ID = ITEM_ID
AND REV.ORGANIZATION_ID = ORG_ID
AND REV.EFFECTIVITY_DATE = (
SELECT
MAX(EFFECTIVITY_DATE)
FROM
MTL_ITEM_REVISIONS
WHERE ORGANIZATION_ID = ORG_ID
AND INVENTORY_ITEM_ID = ITEM_ID );
SELECT
FULL_NAME
INTO EMP_NAME
FROM
MTL_EMPLOYEES_VIEW
WHERE ORGANIZATION_ID = L_ORGANIZATION_ID --Changed for bug 7381270
AND EMPLOYEE_ID = L_EMPLOYEE_ID; --Changed for bug 7381270
SELECT
EMP.FULL_NAME
INTO REQ_NAME
FROM
MTL_EMPLOYEES_CURRENT_VIEW EMP
WHERE EMP.ORGANIZATION_ID = P_ORG_ID
AND EMP.EMPLOYEE_ID = (
SELECT
HZ.PERSON_IDENTIFIER
FROM
HZ_PARTIES HZ
WHERE HZ.PARTY_ID = REQUESTOR_ID )
AND EMP.SYSTEM_PERSON_TYPE = 'EMP';
SELECT
MEANING
INTO ITEM_TYPE_NAME
FROM
FND_COMMON_LOOKUPS
WHERE LOOKUP_CODE = ITEM_TYPE
AND LOOKUP_TYPE = 'ITEM_TYPE';