The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pbg.security_group_id
from per_business_groups pbg
, pqh_de_case_groups cgn
where cgn.case_group_id = p_case_group_id
and pbg.business_group_id = cgn.business_group_id;
select pbg.legislation_code
from per_business_groups pbg
, pqh_de_case_groups cgn
where cgn.case_group_id = p_case_group_id
and pbg.business_group_id (+) = cgn.business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in pqh_cgn_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
Select case_group_NUMBER
from PQH_DE_case_groupS
Where case_group_NUMBER = p_rec.ADVANCEMENT_TO;
Procedure Chk_delete
(p_rec in pqh_cgn_shd.g_rec_type) is
l_proc varchar2(72) := g_package||'Ckh_Delete';
Select '1'
from per_gen_hierarchy_nodes a, pqh_de_case_groups b
where NODE_TYPE = 'CASE_GROUP'
and a. entity_id = b.CASE_GROUP_NUMBER
and b.CASE_GROUP_id= p_rec.CASE_GROUP_id;
End Chk_Delete;
Select '1'
from PQH_DE_case_groupS
Where case_group_NUMBER = p_rec.case_group_NUMBER
and description = p_rec.description;
Procedure insert_validate
(p_effective_date in date
,p_rec in pqh_cgn_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 pqh_cgn_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 pqh_cgn_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
Chk_delete(P_Rec);
End delete_validate;