The following lines contain the word 'select', 'insert', 'update' or 'delete':
select per.person_id
, per.employee_number
, per.object_version_number
from per_all_people_f per
where per.person_id = p_person_id
and p_actual_termination_date between per.effective_start_date
and per.effective_end_date;
SAVEPOINT update_person_details;
hr_person_api.update_person (
p_validate => p_validate
,p_effective_date => p_effective_date
,p_datetrack_update_mode => 'CORRECTION'
,p_person_id => l_person_id
,p_object_version_number => l_per_object_version_number
,p_employee_number => l_employee_number
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_rehire_recommendation => p_rehire_recommendation
,p_rehire_reason => p_rehire_reason
,p_full_name => l_full_name
,p_comment_id => l_comment_id
,p_name_combination_warning => l_name_combination_warning
,p_assign_payroll_warning => l_assign_payroll_warning
,p_orig_hire_warning => l_orig_hire_warning
);
ROLLBACK TO update_person_details;