The following lines contain the word 'select', 'insert', 'update' or 'delete':
select supervisor_id
into l_supervisor_id
from per_all_assignments_f
where per_all_assignments_f.person_id = l_current_person_id
and per_all_assignments_f.primary_flag = 'Y'
and per_all_assignments_f.assignment_type in ('E','C')
and per_all_assignments_f.assignment_status_type_id not in
(select assignment_status_type_id
from per_assignment_status_types
where per_system_status = 'TERM_ASSIGN')
and trunc(p_effective_date)
between per_all_assignments_f.effective_start_date
and per_all_assignments_f.effective_end_date;
select address_line1,
address_line2,
address_line3,
region_1,
region_2,
region_3,
town_or_city,
postal_code,
country
into l_address_line1,
l_address_line2,
l_address_line3,
l_region_1,
l_region_2,
l_region_3,
l_town_or_city,
l_postal_code,
l_country
from per_addresses
where person_id = p_person_id
and primary_flag = 'Y'
and p_effective_date
between date_from
and nvl(date_to,p_effective_date);
select ppt.SYSTEM_PERSON_TYPE person_type
from per_all_people_f papf,
per_person_types ppt
where papf.person_id = p_person_id
and sysdate between papf.EFFECTIVE_START_DATE and papf.EFFECTIVE_END_DATE
and papf.PERSON_TYPE_ID = ppt.PERSON_TYPE_ID
and papf.BUSINESS_GROUP_ID = ppt.BUSINESS_GROUP_ID;
select hr_util_misc_ss.get_person_id from dual;