The following lines contain the word 'select', 'insert', 'update' or 'delete':
select null
from ben_cvrd_dpnt_ctfn_prvdd_f ccp,
ben_prtt_enrt_actn_f pea,
ben_per_in_ler pil
where ccp.elig_cvrd_dpnt_id = p_elig_cvrd_dpnt_id
and ccp.dpnt_dsgn_ctfn_typ_cd = p_dpnt_dsgn_ctfn_typ_cd
and pea.prtt_enrt_actn_id = p_prtt_enrt_actn_id
and pea.prtt_enrt_actn_id = ccp.prtt_enrt_actn_id
and pil.per_in_ler_id = pea.per_in_ler_id
and pil.per_in_ler_stat_cd not in ('BCKDT', 'VOIDD')
and ccp.cvrd_dpnt_ctfn_prvdd_id <> nvl(p_cvrd_dpnt_ctfn_prvdd_id, hr_api.g_number)
and ccp.business_group_id = p_business_group_id
and p_effective_date between pea.effective_start_date
and pea.effective_end_date
and p_validation_start_date <= ccp.effective_end_date
and p_validation_end_date >= ccp.effective_start_date
;
Procedure dt_update_validate
(p_elig_cvrd_dpnt_id in number default hr_api.g_number,
p_prtt_enrt_actn_id in number default hr_api.g_number,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) Is
--
l_proc varchar2(72) := g_package||'dt_update_validate';
End dt_update_validate;
Procedure dt_delete_validate
(p_cvrd_dpnt_ctfn_prvdd_id in number,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) Is
--
l_proc varchar2(72) := g_package||'dt_delete_validate';
If (p_datetrack_mode = 'DELETE' or
p_datetrack_mode = 'ZAP') then
--
--
-- Ensure the arguments are not null
--
hr_api.mandatory_arg_error
(p_api_name => l_proc,
p_argument => 'validation_start_date',
p_argument_value => p_validation_start_date);
End dt_delete_validate;
Procedure insert_validate
(p_rec in ben_ccp_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'insert_validate';
But such 'Update' is not allowed through the form.
--
chk_dpnt_dsgn_ctfn_recd_dt
( p_dpnt_dsgn_ctfn_recd_dt => p_rec.dpnt_dsgn_ctfn_recd_dt,
p_validation_start_date => p_validation_start_date
);
End insert_validate;
Procedure update_validate
(p_rec in ben_ccp_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'update_validate';
dt_update_validate
(p_elig_cvrd_dpnt_id => p_rec.elig_cvrd_dpnt_id,
p_prtt_enrt_actn_id => p_rec.prtt_enrt_actn_id,
p_datetrack_mode => p_datetrack_mode,
p_validation_start_date => p_validation_start_date,
p_validation_end_date => p_validation_end_date);
End update_validate;
Procedure delete_validate
(p_rec in ben_ccp_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'delete_validate';
dt_delete_validate
(p_datetrack_mode => p_datetrack_mode,
p_validation_start_date => p_validation_start_date,
p_validation_end_date => p_validation_end_date,
p_cvrd_dpnt_ctfn_prvdd_id => p_rec.cvrd_dpnt_ctfn_prvdd_id);
End delete_validate;
select a.legislation_code
from per_business_groups a,
ben_cvrd_dpnt_ctfn_prvdd_f b
where b.cvrd_dpnt_ctfn_prvdd_id = p_cvrd_dpnt_ctfn_prvdd_id
and a.business_group_id = b.business_group_id;