The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
SC.COMPANY_NAME,
BC.SET_OF_BOOKS_ID,
SOB.NAME SOB_NAME,
SOB.CURRENCY_CODE,
CUR.PRECISION
INTO
RP_COMPANY_NAME,
RP_SOB_ID,
RP_SOB_NAME,
RP_CURRENCY_CODE,
RP_PRECISION
FROM
FA_SYSTEM_CONTROLS SC,
FA_BOOK_CONTROLS BC,
GL_LEDGERS_PUBLIC_V SOB, --GL_SETS_OF_BOOKS SOB,
FND_CURRENCIES CUR
WHERE
BC.BOOK_TYPE_CODE = NVL(P_BOOK_TYPE_CODE, BC.BOOK_TYPE_CODE)
AND SOB.LEDGER_ID = BC.SET_OF_BOOKS_ID
AND CUR.CURRENCY_CODE = SOB.CURRENCY_CODE
AND ROWNUM = 1;
SELECT
BC.ACCOUNTING_FLEX_STRUCTURE
INTO
ACCT_FLEX_STRUCTURE
FROM
FA_BOOK_CONTROLS BC
WHERE
BC.BOOK_TYPE_CODE = P_BOOK_TYPE_CODE;