The following lines contain the word 'select', 'insert', 'update' or 'delete':
cursor c1 is select null
from ben_yr_perd
Where yr_perd_id <> nvl(p_yr_perd_id,-1)
and start_date = p_start_date
and end_date = p_end_date
and business_group_id = p_business_group_id;
Procedure insert_validate(p_rec in ben_yrp_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_yrp_shd.g_rec_type
,p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'update_validate';
End update_validate;
Procedure delete_validate(p_rec in ben_yrp_shd.g_rec_type
,p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'delete_validate';
select 1
from ben_popl_yr_perd
where yr_perd_id = p_rec.yr_perd_id ;
select 1
from ben_enrt_perd
where yr_perd_id = p_rec.yr_perd_id ;
select 1
from ben_wthn_yr_perd
where yr_perd_id = p_rec.yr_perd_id ;
End delete_validate;
select a.legislation_code
from per_business_groups a,
ben_yr_perd b
where b.yr_perd_id = p_yr_perd_id
and a.business_group_id = b.business_group_id;