The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pcp.pl_pcp_id
from ben_pl_pcp pcp
Where pcp.pl_id = p_pl_id
and pcp.pl_pcp_id <> nvl(p_pl_pcp_id,-1)
;
select svgs_pl_flag, imptd_incm_calc_cd, invk_flx_cr_pl_flag, invk_dcln_prtn_pl_flag
from ben_pl_f
Where pl_id = p_pl_id
and p_effective_date between effective_start_date and
effective_end_date;
cursor c1 is select 'x'
from ben_popl_org_f
Where pl_id = p_pl_id;
select pbg.security_group_id
from per_business_groups pbg
, ben_pl_pcp pcp
where pcp.pl_pcp_id = p_pl_pcp_id
and pbg.business_group_id = pcp.business_group_id;
select pbg.legislation_code
from per_business_groups pbg
, ben_pl_pcp pcp
where pcp.pl_pcp_id = p_pl_pcp_id
and pbg.business_group_id = pcp.business_group_id;
Procedure chk_non_updateable_args
(p_rec in ben_pcp_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
Procedure insert_validate
(p_rec in ben_pcp_shd.g_rec_type ,
p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_rec in ben_pcp_shd.g_rec_type
,p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args
(p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in ben_pcp_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;