The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
GSOB.MRC_SOB_TYPE_CODE,
GSOB.CURRENCY_CODE
INTO P_MRCSOBTYPE,CP_PARAM_CURRENCY
FROM
GL_SETS_OF_BOOKS GSOB
WHERE GSOB.SET_OF_BOOKS_ID = P_CA_SET_OF_BOOKS_ID;
SELECT
CR.CONCURRENT_PROGRAM_ID
INTO L_CONC_PROGRAM_ID
FROM
FND_CONCURRENT_REQUESTS CR
WHERE CR.PROGRAM_APPLICATION_ID = 7004
AND CR.REQUEST_ID = P_CONC_REQUEST_ID;
SELECT
CP.USER_CONCURRENT_PROGRAM_NAME
INTO L_REPORT_NAME
FROM
FND_CONCURRENT_PROGRAMS_VL CP
WHERE CP.CONCURRENT_PROGRAM_ID = L_CONC_PROGRAM_ID
AND CP.APPLICATION_ID = 7004;
SELECT
BC.BOOK_TYPE_CODE,
BC.BOOK_CLASS,
BC.DISTRIBUTION_SOURCE_BOOK,
SOB.CURRENCY_CODE,
CUR.PRECISION
INTO L_BOOK,L_BOOK_CLASS,L_DISTRIBUTION_SOURCE_BOOK,L_CURRENCY_CODE,L_PRECISION
FROM
FA_BOOK_CONTROLS_MRC_V BC,
GL_SETS_OF_BOOKS SOB,
FND_CURRENCIES CUR
WHERE BC.BOOK_TYPE_CODE = P_BOOK
AND SOB.SET_OF_BOOKS_ID = BC.SET_OF_BOOKS_ID
AND SOB.CURRENCY_CODE = CUR.CURRENCY_CODE;
SELECT
BC.BOOK_TYPE_CODE,
BC.BOOK_CLASS,
BC.DISTRIBUTION_SOURCE_BOOK,
SOB.CURRENCY_CODE,
CUR.PRECISION
INTO L_BOOK,L_BOOK_CLASS,L_DISTRIBUTION_SOURCE_BOOK,L_CURRENCY_CODE,L_PRECISION
FROM
FA_BOOK_CONTROLS BC,
GL_SETS_OF_BOOKS SOB,
FND_CURRENCIES CUR
WHERE BC.BOOK_TYPE_CODE = P_BOOK
AND SOB.SET_OF_BOOKS_ID = BC.SET_OF_BOOKS_ID
AND SOB.CURRENCY_CODE = CUR.CURRENCY_CODE;
SELECT
PERIOD_COUNTER
INTO L_PERIOD_CTR
FROM
FA_DEPRN_PERIODS_MRC_V
WHERE BOOK_TYPE_CODE = P_BOOK
AND PERIOD_NAME = P_PERIOD;
SELECT
PERIOD_COUNTER
INTO L_PERIOD_CTR
FROM
FA_DEPRN_PERIODS
WHERE BOOK_TYPE_CODE = P_BOOK
AND PERIOD_NAME = P_PERIOD;
SELECT
NVL(ABS(SUM(DECODE(DEBIT_CREDIT_FLAG
,'DR'
,ADJUSTMENT_AMOUNT
,'CR'
,-ADJUSTMENT_AMOUNT)))
,0)
INTO L_AMT
FROM
FA_ADJUSTMENTS_MRC_V
WHERE BOOK_TYPE_CODE = P_BOOK
AND SOURCE_TYPE_CODE = 'REVALUATION'
AND ADJUSTMENT_TYPE = 'RESERVE'
AND ASSET_ID = ASSET_ID
AND PERIOD_COUNTER_CREATED = PERIOD_PC;
SELECT
NVL(ABS(SUM(DECODE(DEBIT_CREDIT_FLAG
,'DR'
,ADJUSTMENT_AMOUNT
,'CR'
,-ADJUSTMENT_AMOUNT)))
,0)
INTO L_AMT
FROM
FA_ADJUSTMENTS
WHERE BOOK_TYPE_CODE = P_BOOK
AND SOURCE_TYPE_CODE = 'REVALUATION'
AND ADJUSTMENT_TYPE = 'RESERVE'
AND ASSET_ID = ASSET_ID
AND PERIOD_COUNTER_CREATED = PERIOD_PC;
SELECT
NVL(ABS(SUM(DECODE(DEBIT_CREDIT_FLAG
,'DR'
,ADJUSTMENT_AMOUNT
,'CR'
,-ADJUSTMENT_AMOUNT)))
,0)
INTO L_AMT
FROM
FA_ADJUSTMENTS_MRC_V
WHERE BOOK_TYPE_CODE = P_BOOK
AND SOURCE_TYPE_CODE = 'REVALUATION'
AND ADJUSTMENT_TYPE = 'EXPENSE'
AND ASSET_ID = ASSET_ID
AND PERIOD_COUNTER_CREATED = PERIOD_PC;
SELECT
NVL(ABS(SUM(DECODE(DEBIT_CREDIT_FLAG
,'DR'
,ADJUSTMENT_AMOUNT
,'CR'
,-ADJUSTMENT_AMOUNT)))
,0)
INTO L_AMT
FROM
FA_ADJUSTMENTS
WHERE BOOK_TYPE_CODE = P_BOOK
AND SOURCE_TYPE_CODE = 'REVALUATION'
AND ADJUSTMENT_TYPE = 'EXPENSE'
AND ASSET_ID = ASSET_ID
AND PERIOD_COUNTER_CREATED = PERIOD_PC;