The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pbg.legislation_code
from per_business_groups pbg
,per_people_extra_info pei
,per_all_people_f per
where pei.person_extra_info_id = p_person_extra_info_id
and per.person_id = pei.person_id
and pbg.business_group_id = per.business_group_id;
Procedure chk_non_updateable_args(p_rec in pe_pei_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'chk_non_updateable_args';
end chk_non_updateable_args;
SELECT 1
FROM per_all_people_f per -- Bug 4508101
WHERE per.person_id = p_person_id;
SELECT pit.multiple_occurences_flag
,pit.active_inactive_flag
FROM per_people_info_types pit
WHERE pit.information_type = p_information_type;
SELECT 1
FROM per_people_extra_info pei
WHERE pei.information_type = p_information_type
AND pei.person_id = p_person_id ;
Procedure insert_validate(p_rec in pe_pei_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate(p_rec in pe_pei_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_validate';
pe_pei_bus.chk_non_updateable_args (p_rec => p_rec);
End update_validate;
Procedure delete_validate(p_rec in pe_pei_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;