The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in hr_itf_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
select
'found'
From
fnd_form frm
where
frm.form_name = p_form_name;
select
'found'
From
hr_ki_user_interfaces itf
Where
itf.type = p_type
and itf.form_name = p_form_name
and (p_user_interface_id is null or
itf.user_interface_id <> p_user_interface_id);
select
'found'
From
fnd_form_functions frm
where
frm.function_name = p_page_region_code;
select 'found'
from hr_ki_user_interfaces itf
where
itf.type = cur_type
and itf.page_region_code = cur_page_region_code
and (cur_region_code is null or itf.region_code = cur_region_code)
and (cur_user_interface_id is null or itf.user_interface_id <> cur_user_interface_id);
procedure chk_delete(p_user_interface_id in varchar2)
is
CURSOR csr_hnm_id is
select
distinct 'found'
From
hr_ki_hierarchy_node_maps hnm
where
hnm.user_interface_id = p_user_interface_id;
l_proc varchar2(72) := g_package ||'chk_delete';
End chk_delete;
Procedure insert_validate
(p_effective_date in date
,p_rec in out nocopy hr_itf_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_effective_date in date
,p_rec in out nocopy hr_itf_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in hr_itf_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete(p_rec.user_interface_id);
End delete_validate;