The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pbg.security_group_id
from per_business_groups pbg
, hxc_alias_types hat
where hat.alias_type_id = p_alias_type_id;
select pbg.legislation_code
from per_business_groups pbg
, hxc_alias_types hat
where hat.alias_type_id = p_alias_type_id;
Procedure chk_non_updateable_args
(p_rec in hxc_hat_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
SELECT 'error'
FROM sys.dual
WHERE EXISTS (
SELECT 'x'
from hxc_alias_types
where alias_type = p_type and
reference_object = p_reference_object);
select 'error'
from sys.dual
where exists(
select 'x'
from hxc_alias_definitions had,
hxc_alias_types hat
where hat.alias_type_id = p_alias_type_id and
hat.alias_type_id = had.alias_type_id
);
Procedure insert_validate
(p_rec in hxc_hat_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_rec in hxc_hat_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := g_package||'update_validate';
chk_non_updateable_args
(p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in hxc_hat_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := g_package||'delete_validate';
End delete_validate;