The following lines contain the word 'select', 'insert', 'update' or 'delete':
cursor c1 is select pqr.role_id,pqr.role_name
from pqh_roles pqr
where pqr.role_type_cd ='SSBNFT' ;
select pei.person_id,
ppf.full_name,
usr.user_name,
usr.user_id user_id
from per_people_extra_info pei,
per_all_people_f ppf,
fnd_user usr,
pqh_roles rls
where pei.information_type = 'PQH_ROLE_USERS'
and pei.person_id = ppf.person_id
and trunc(sysdate) between ppf.effective_start_date and ppf.effective_end_date
and usr.employee_id = ppf.person_id
and rls.role_id = to_number(pei.pei_information3)
and nvl(pei.pei_information5,'Y')='Y'
and rls.role_id = l_role_id;