The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
XFI.NAME,
GLL.CURRENCY_CODE
INTO P_LEGAL_ENTITY,L_FCN_CURRENCY
FROM
XLE_FIRSTPARTY_INFORMATION_V XFI,
GL_LEDGER_LE_V GLL
WHERE XFI.LEGAL_ENTITY_ID = P_LEGAL_ENTITY_ID
AND GLL.LEGAL_ENTITY_ID = XFI.LEGAL_ENTITY_ID
AND GLL.RELATIONSHIP_ENABLED_FLAG = 'Y'
AND GLL.LEDGER_CATEGORY_CODE = 'PRIMARY';
SELECT
NVL(FC.EXTENDED_PRECISION
,PRECISION),
NVL(FC.PRECISION
,0),
NVL(MINIMUM_ACCOUNTABLE_UNIT
,POWER(10
,NVL(-PRECISION
,0)))
INTO P_EXT_PREC,P_PRECISION,ROUND_UNIT
FROM
FND_CURRENCIES FC
WHERE FC.CURRENCY_CODE = P_CURRENCY_CODE;
SELECT
MCS.CATEGORY_SET_NAME
INTO P_CAT_SET_NAME
FROM
MTL_CATEGORY_SETS MCS
WHERE MCS.CATEGORY_SET_ID = P_CATEGORY_SET;
SELECT
LU.MEANING
INTO P_DETAIL_LEVEL
FROM
MFG_LOOKUPS LU
WHERE LU.LOOKUP_TYPE = 'CST_BICR_DETAIL_OPTION'
AND LU.LOOKUP_CODE = P_RPT_OPTION;
SELECT
USERENV('SESSIONID')
INTO P_SESSIONID
FROM
DUAL;
SELECT
CT.COST_TYPE
INTO P_COST_TYPE
FROM
CST_COST_TYPES CT
WHERE CT.COST_TYPE_ID = P_COST_TYPE_ID;
SELECT
CCG.COST_GROUP
INTO P_COST_GROUP
FROM
CST_COST_GROUPS CCG
WHERE CCG.COST_GROUP_ID = P_COST_GROUP_ID
AND CCG.COST_GROUP_TYPE = 2;
SELECT
PERIOD_NAME
INTO P_PERIOD_NAME
FROM
CST_PAC_PERIODS
WHERE PAC_PERIOD_ID = P_PERIOD_ID
AND LEGAL_ENTITY = P_LEGAL_ENTITY_ID
AND COST_TYPE_ID = P_COST_TYPE_ID;
SELECT
MEANING
INTO P_SORT_BY
FROM
MFG_LOOKUPS
WHERE LOOKUP_TYPE = 'CST_ITEM_REPORT_SORT'
AND LOOKUP_CODE = P_SORT_OPTION;
SELECT
USER_CONCURRENT_PROGRAM_NAME
INTO P_REPORT_NAME
FROM
FND_CONCURRENT_PROGRAMS_TL
WHERE LANGUAGE = USERENV('LANG')
AND CONCURRENT_PROGRAM_ID IN (
SELECT
P.CONCURRENT_PROGRAM_ID
FROM
FND_CONCURRENT_PROGRAMS P,
FND_CONCURRENT_REQUESTS R
WHERE R.REQUEST_ID = P_CONC_REQUEST_ID
AND P.APPLICATION_ID = R.PROGRAM_APPLICATION_ID
AND P.CONCURRENT_PROGRAM_ID = R.CONCURRENT_PROGRAM_ID );
SELECT
USER_CONCURRENT_PROGRAM_NAME
INTO P_REPORT_NAME
FROM
FND_CONCURRENT_PROGRAMS_TL
WHERE LANGUAGE = USERENV('LANG')
AND CONCURRENT_PROGRAM_ID IN (
SELECT
CONCURRENT_PROGRAM_ID
FROM
FND_CONCURRENT_PROGRAMS P
WHERE P.APPLICATION_ID = 702
AND P.CONCURRENT_PROGRAM_NAME = 'BOM_CSTRPICR_XMLP_PKG' );