The following lines contain the word 'select', 'insert', 'update' or 'delete':
IS SELECT system_person_type
FROM per_person_types
WHERE business_group_id = p_business_group_id
AND person_type_id = p_person_type_id ;
SELECT business_group_id
FROM per_all_people_f pap
WHERE pap.person_id = p_person_id
AND p_effective_date BETWEEN pap.effective_start_date and pap.effective_end_date;
CURSOR csr_per IS SELECT person_type_id, per_information11, per_information12, nvl(per_information8,'N')
,national_identifier
FROM per_all_people_f
WHERE person_id = p_person_id
AND p_effective_date BETWEEN effective_start_date
AND effective_end_date;