The following lines contain the word 'select', 'insert', 'update' or 'delete':
select null
from ben_pl_f pl
where pl.pl_id = p_pl_id
and pl.enrt_mthd_cd = 'A'
and p_effective_date between pl.effective_start_date
and pl.effective_end_date
and pl.business_group_id + 0 = p_business_group_id;
select null
from ben_pl_pcp a
where a.pl_id = p_pl_id
and a.business_group_id = p_business_group_id;
select null
from ben_pl_f a
where a.business_group_id +0 = p_business_group_id
and a.actl_prem_id = p_actl_prem_id
and p_effective_date
between a.effective_start_date
and a.effective_end_date;
SELECT NULL
FROM ben_oipl_f cop
WHERE cop.opt_id = p_opt_id
AND cop.pl_id = p_pl_id
AND cop.oipl_id <> nvl(p_oipl_id, hr_api.g_number)
AND cop.business_group_id = p_business_group_id
AND p_validation_start_date <= cop.effective_end_date
AND p_validation_end_date >= cop.effective_start_date
--
-- Start of CAGR band aid.
--
AND NOT EXISTS(SELECT 'x'
FROM ben_pl_f pln
, ben_pl_typ_f ptp
WHERE pln.pl_id = p_pl_id
AND pln.pl_typ_id = ptp.pl_typ_id
AND pln.business_group_id = p_business_group_id
AND p_validation_start_date <= pln.effective_end_date
AND p_validation_end_date >= pln.effective_start_date
AND ptp.opt_typ_cd = 'CAGR'
AND ptp.business_group_id = p_business_group_id
AND p_validation_start_date <= ptp.effective_end_date
AND p_validation_end_date >= ptp.effective_start_date);
select null
from ben_oipl_f
where ordr_num = p_ordr_num
and pl_id = p_pl_id
and oipl_id <> nvl(p_oipl_id, hr_api.g_number)
and business_group_id + 0 = p_business_group_id
and p_validation_start_date <= effective_end_date
and p_validation_end_date >= effective_start_date;
Procedure dt_update_validate
(p_dflt_enrt_det_rl in number default hr_api.g_number,
p_mndtry_rl in number default hr_api.g_number,
p_rqd_perd_enrt_nenrt_rl in number default hr_api.g_number,
p_actl_prem_id in number default hr_api.g_number,
p_pl_id in number default hr_api.g_number,
p_opt_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_oipl_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';
select cop.opt_id
from ben_oipl_f cop
where cop.oipl_id = p_oipl_id;
select null
from ben_elig_per_elctbl_chc epe
where epe.oipl_id = p_oipl_id;
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_cop_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';
End insert_validate;
Procedure update_validate
(p_rec in ben_cop_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_dflt_enrt_det_rl => p_rec.dflt_enrt_det_rl,
p_mndtry_rl => p_rec.mndtry_rl,
p_rqd_perd_enrt_nenrt_rl => p_rec.rqd_perd_enrt_nenrt_rl,
p_actl_prem_id => p_rec.actl_prem_id,
p_pl_id => p_rec.pl_id,
p_opt_id => p_rec.opt_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_cop_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_oipl_id => p_rec.oipl_id);
End delete_validate;
select a.legislation_code
from per_business_groups a,
ben_oipl_f b
where b.oipl_id = p_oipl_id
and a.business_group_id = b.business_group_id;