The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
ORGANIZATION_CODE,
ORGANIZATION_NAME
INTO P_ORG_CODE,P_ORG_NAME
FROM
ORG_ORGANIZATION_DEFINITIONS
WHERE ORGANIZATION_ID = P_ORG_ID;
SELECT
CP.USER_CONCURRENT_PROGRAM_NAME,
TO_CHAR(CR.REQUEST_DATE
,'DD-MON-YYYY HH24:MI'),
TO_CHAR(CR.ACTUAL_START_DATE
,'DD-MON-YYYY HH24:MI'),
CR.PRINTER
INTO L_REPORT_NAME,P_REQUEST_DATE,P_ACTUAL_START_DATE,P_PRINTER
FROM
FND_CONCURRENT_PROGRAMS_VL CP,
FND_CONCURRENT_REQUESTS CR
WHERE CR.REQUEST_ID = P_CONC_REQUEST_ID
AND CP.APPLICATION_ID = CR.PROGRAM_APPLICATION_ID
AND CP.CONCURRENT_PROGRAM_ID = CR.CONCURRENT_PROGRAM_ID;
SELECT
APPLICATION_NAME
INTO P_APPLICATION_NAME
FROM
FND_CONCURRENT_REQUESTS FCR,
FND_APPLICATION_VL FAV
WHERE FCR.REQUEST_ID = P_CONC_REQUEST_ID
AND FAV.APPLICATION_ID = FCR.PROGRAM_APPLICATION_ID;
SELECT
RESPONSIBILITY_NAME
INTO P_RESPONSIBILITY_NAME
FROM
FND_CONCURRENT_REQUESTS FCR,
FND_RESPONSIBILITY_VL FRV
WHERE FCR.REQUEST_ID = P_CONC_REQUEST_ID
AND FRV.RESPONSIBILITY_ID = FCR.RESPONSIBILITY_ID;
SELECT
CHART_OF_ACCOUNTS_ID
INTO P_EXPENSEACCOUNT_FLEXNUM
FROM
ORG_ORGANIZATION_DEFINITIONS
WHERE ORGANIZATION_ID = P_ORG_ID;
SELECT
MAXIMUM_QUANTITY
INTO L_PAR_LEVEL
FROM
MTL_SECONDARY_LOCATORS MSL
WHERE MSL.ORGANIZATION_ID = P_ORG_ID
AND MSL.SECONDARY_LOCATOR = LOCATOR_ID
AND MSL.INVENTORY_ITEM_ID = ITEM_ID;
SELECT
MFG.MEANING
INTO L_MEANING
FROM
MFG_LOOKUPS MFG
WHERE MFG.LOOKUP_TYPE = 'MTL_REPLENISHMENT_ERROR'
AND MFG.LOOKUP_CODE = L_ERROR_NUMBER;
SELECT
ORGANIZATION_CODE
INTO L_ORG_CODE
FROM
ORG_ORGANIZATION_DEFINITIONS
WHERE ORGANIZATION_ID = SOURCE_ORG_ID;