The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
BC.BOOK_TYPE_CODE,
BC.BOOK_CLASS,
BC.ACCOUNTING_FLEX_STRUCTURE,
BC.DISTRIBUTION_SOURCE_BOOK,
SOB.CURRENCY_CODE,
CUR.PRECISION
INTO L_BOOK,L_BOOK_CLASS,L_ACCOUNTING_FLEX_STRUCTURE,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_NAME,
PERIOD_COUNTER,
PERIOD_OPEN_DATE,
NVL(PERIOD_CLOSE_DATE
,SYSDATE),
FISCAL_YEAR
INTO L_PERIOD_NAME,L_PERIOD_PC,L_PERIOD_POD,L_PERIOD_PCD,L_PERIOD_FY
FROM
FA_DEPRN_PERIODS
WHERE BOOK_TYPE_CODE = P_BOOK
AND PERIOD_NAME = P_PERIOD1;