The following lines contain the word 'select', 'insert', 'update' or 'delete':
select max(fcr.request_id)
from fnd_concurrent_requests fcr
,fnd_concurrent_programs fcp
where fcp.application_id = 800
and fcp.concurrent_program_name = p_reportname
and fcr.concurrent_program_id = fcp.concurrent_program_id
and fcr.program_application_id = fcp.application_id;
select translate(ltrim(value),',',' ')
into TEMP_UTL
from v$parameter
where name = 'utl_file_dir';
select substrb(TEMP_UTL, 1, instr(TEMP_UTL,' ') - 1)
into TEMP_DIR
from dual ;