The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT nvl(upper(replace(oi.org_information1,'|','||''.''||')),'j.name') slist
FROM hr_all_organization_units o, hr_organization_information oi
WHERE o.organization_id = p_bg_id
AND o.organization_id = oi.organization_id(+)
AND oi.org_information_context(+) = 'SSHR Information';
jobStr := ' SELECT ' || segList || ' FROM PER_JOBS j, PER_JOB_DEFINITIONS pjd ' ||
' WHERE j.JOB_ID = :1 AND j.job_definition_id = pjd.job_definition_id' ;