The following lines contain the word 'select', 'insert', 'update' or 'delete':
select ler.ler_id
from ben_ler_f ler
where ler.business_group_id = p_business_group_id
and ler.typ_cd = 'DRVDAGE'
and p_effective_date
between ler.effective_start_date
and ler.effective_end_date;
select paf.person_id
from per_all_assignments_f paf
where paf.assignment_id = p_assignment_id
and p_effective_date
between paf.effective_start_date
and paf.effective_end_date;
select per.date_of_birth
from per_contact_relationships ctr,
per_all_people_f per
where ctr.person_id = p_person_id
and per.person_id = ctr.contact_person_id
and ctr.personal_flag = 'Y'
and ctr.contact_type = 'S'
and p_effective_date
between per.effective_start_date
and per.effective_end_date;
p_program_update_date => p_effective_date,
p_ntfn_dt => trunc(p_effective_date),
p_dtctd_dt => p_effective_date);