The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT SUBSTR(release_name,1,4)
INTO g_release_name
FROM fnd_product_groups
;
SELECT COUNT(*)
INTO l_count
FROM fnd_data_groups
WHERE data_group_name NOT LIKE 'Multiple Reporting Currencies%'
;
SELECT pr.spid
,se.sid
,se.program
,se.module
INTO g_process_id
,g_session_id
,g_program
,g_module
FROM v$session se
,v$process pr
WHERE se.sid = (select sid from v$mystat where rownum = 1)
AND se.paddr = pr.addr;