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 cp.user_concurrent_program_name
INTO l_report_name
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;