The following lines contain the word 'select', 'insert', 'update' or 'delete':
cursor c1 is select null
from ben_ptip_f
where ptip_id <> nvl(p_ptip_id, -1 )
and pgm_id = p_pgm_id
and ordr_num = p_ordr_num
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;
cursor c1 is select null
from ben_ptip_f
where pgm_id = p_pgm_id
and business_group_id + 0 = p_business_group_id
and pl_typ_id = p_pl_typ_id
and ptip_id <> nvl(p_ptip_id, -1)
and p_validation_start_date <= effective_end_date
and p_validation_end_date >= effective_start_date;
cursor c1 is select null
from ben_plip_f plip, ben_pl_f pl
where plip.pgm_id = p_pgm_id
and plip.pl_id = pl.pl_id
and pl.wvbl_flag <> 'Y'
and plip.business_group_id +0 = p_business_group_id
and p_effective_date between plip.effective_start_date
and plip.effective_end_date;
cursor c1 is select null
from ben_pl_typ_f
where pl_typ_id = p_pl_typ_id
and p_effective_date between effective_start_date
and effective_end_date
and business_group_id + 0 = p_business_group_id
and TMPRL_FCTR_APLS_RTS_FLAG = 'Y';
cursor c2 is select null
from ben_pgm_f
where pgm_id = p_pgm_id
and p_effective_date between effective_start_date
and effective_end_date
and business_group_id + 0 = p_business_group_id
and TMPRL_FCTR_APLS_RTS_FLAG = 'Y';
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_postelcn_edit_rl
and ff.formula_type_id = -215 /*default enrollment det */
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_rt_end_dt_rl
and ff.formula_type_id = -67 /*rt_end */
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_rt_strt_dt_rl
and ff.formula_type_id = -66 /*rt_strt */
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_enrt_cvg_end_dt_rl
and ff.formula_type_id = -30 /*enrt_cvg_end */
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_enrt_cvg_strt_dt_rl
and ff.formula_type_id = -29 /*enrt_cvg_strt */
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_rqd_perd_enrt_nenrt_rl
and ff.formula_type_id = -513
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_auto_enrt_mthd_rl
and ff.formula_type_id = -146
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_enrt_rl
and ff.formula_type_id = -393
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_dflt_enrt_det_rl
and ff.formula_type_id = -32
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_dpnt_cvg_end_dt_rl
and ff.formula_type_id = -28 /*default enrollment det */
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
select null
from ff_formulas_f ff ,
per_business_groups pbg
where ff.formula_id = p_dpnt_cvg_strt_dt_rl
and ff.formula_type_id = -27 /*default enrollment det */
and pbg.business_group_id = p_business_group_id
and nvl(ff.business_group_id, p_business_group_id) =
p_business_group_id
and nvl(ff.legislation_code, pbg.legislation_code) =
pbg.legislation_code
and p_effective_date
between ff.effective_start_date
and ff.effective_end_date;
cursor c1 is select mx_enrl_alwd_num
from ben_pl_typ_f pt
where pt.pl_typ_id = p_pl_typ_id
and pt.business_group_id +0 = p_business_group_id
and p_effective_date between pt.effective_start_date
and pt.effective_end_date;
cursor c1 is select mn_enrl_rqd_num
from ben_pl_typ_f pt
where pt.pl_typ_id = p_pl_typ_id
and pt.business_group_id +0 = p_business_group_id
and p_effective_date between pt.effective_start_date
and pt.effective_end_date;
cursor c1 is select 'x'
from ben_ler_chg_dpnt_cvg_f ldc
where ldc.ptip_id = p_ptip_id
and ldc.business_group_id + 0 = p_business_group_id
and p_effective_date between ldc.effective_start_date
and ldc.effective_end_date;
cursor c2 is select 'x'
from ben_apld_dpnt_cvg_elig_prfl_f ade
where ade.ptip_id = p_ptip_id
and ade.business_group_id + 0 = p_business_group_id
and p_effective_date between ade.effective_start_date
and ade.effective_end_date;
cursor c3 is select 'x'
from ben_ptip_dpnt_cvg_ctfn_f pgc
where pgc.ptip_id = p_ptip_id
and pgc.business_group_id + 0 = p_business_group_id
and p_effective_date between pgc.effective_start_date
and pgc.effective_end_date;
fnd_message.set_name('BEN','BEN_92518_DELETE_LDC');
fnd_message.set_name('BEN','BEN_92517_DELETE_ADE');
fnd_message.set_name('BEN','BEN_92516_DELETE_PYD');
cursor c1 is select pgm.dpnt_dsgn_lvl_cd
from ben_pgm_f pgm
where pgm.pgm_id = p_pgm_id
and pgm.business_group_id + 0 = p_business_group_id
and p_effective_date between pgm.effective_start_date
and pgm.effective_end_date;
Procedure dt_update_validate
(p_pgm_id in number default hr_api.g_number,
p_cmbn_ptip_id in number default hr_api.g_number,
p_cmbn_ptip_opt_id in number default hr_api.g_number,
p_acrs_ptip_cvg_id in number default hr_api.g_number,
p_pl_typ_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_ptip_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_ctp_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_ctp_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_pgm_id => p_rec.pgm_id,
p_pl_typ_id => p_rec.pl_typ_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_ctp_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_ptip_id => p_rec.ptip_id);
End delete_validate;
select a.legislation_code
from per_business_groups a,
ben_ptip_f b
where b.ptip_id = p_ptip_id
and a.business_group_id = b.business_group_id;