The following lines contain the word 'select', 'insert', 'update' or 'delete':
select null from
BEN_VRBL_RT_ELIG_PRFL_f vep
where
vep.vrbl_rt_prfl_id = p_vrbl_rt_prfl_id
and p_effective_date between effective_start_date
and effective_end_date;
select null from
BEN_VRBL_RT_ELIG_PRFL_f vep
where
vep.eligy_prfl_id = p_eligy_prfl_id
and vep.vrbl_rt_prfl_id = p_vrbl_rt_prfl_id
and vep.effective_start_date > p_effective_date
and nvl(vep.vrbl_rt_elig_prfl_id,-1) <> p_vrbl_rt_elig_prfl_id ;
hr_utility.set_location('Future record exists.Cannot insert ', 8 ) ;
select 'X' from
ben_vrbl_rt_prfl_f vpf
where
vpf.vrbl_rt_prfl_id = p_vrbl_rt_prfl_id
and p_effective_date between vpf.effective_start_date and vpf.effective_end_date
and (rt_hrly_slrd_flag = 'Y' or
rt_pstl_cd_flag = 'Y' or
rt_lbr_mmbr_flag = 'Y' or
rt_lgl_enty_flag = 'Y' or
rt_benfts_grp_flag = 'Y' or
rt_wk_loc_flag = 'Y' or
rt_brgng_unit_flag = 'Y' or
rt_age_flag = 'Y' or
rt_los_flag = 'Y' or
rt_per_typ_flag = 'Y' or
rt_fl_tm_pt_tm_flag = 'Y' or
rt_ee_stat_flag = 'Y' or
rt_grd_flag = 'Y' or
rt_pct_fl_tm_flag = 'Y' or
rt_asnt_set_flag = 'Y' or
rt_hrs_wkd_flag = 'Y' or
rt_comp_lvl_flag = 'Y' or
rt_org_unit_flag = 'Y' or
rt_loa_rsn_flag = 'Y' or
rt_pyrl_flag = 'Y' or
rt_schedd_hrs_flag = 'Y' or
rt_py_bss_flag = 'Y' or
rt_prfl_rl_flag = 'Y' or
rt_cmbn_age_los_flag = 'Y' or
rt_prtt_pl_flag = 'Y' or
rt_svc_area_flag = 'Y' or
rt_ppl_grp_flag = 'Y' or
rt_dsbld_flag = 'Y' or
rt_hlth_cvg_flag = 'Y' or
rt_poe_flag = 'Y' or
rt_ttl_cvg_vol_flag = 'Y' or
rt_ttl_prtt_flag = 'Y' or
rt_gndr_flag = 'Y' or
rt_tbco_use_flag = 'Y' or
rt_cntng_prtn_prfl_flag = 'Y' or
rt_cbr_quald_bnf_flag = 'Y' or
rt_optd_mdcr_flag = 'Y' or
rt_lvg_rsn_flag = 'Y' or
rt_pstn_flag = 'Y' or
rt_comptncy_flag = 'Y' or
rt_job_flag = 'Y' or
rt_qual_titl_flag = 'Y' or
rt_dpnt_cvrd_pl_flag = 'Y' or
rt_dpnt_cvrd_plip_flag = 'Y' or
rt_dpnt_cvrd_ptip_flag = 'Y' or
rt_dpnt_cvrd_pgm_flag = 'Y' or
rt_enrld_oipl_flag = 'Y' or
rt_enrld_pl_flag = 'Y' or
rt_enrld_plip_flag = 'Y' or
rt_enrld_ptip_flag = 'Y' or
rt_enrld_pgm_flag = 'Y' or
rt_prtt_anthr_pl_flag = 'Y' or
rt_othr_ptip_flag = 'Y' or
rt_no_othr_cvg_flag = 'Y' or
rt_dpnt_othr_ptip_flag = 'Y' or
rt_qua_in_gr_flag = 'Y' or
rt_perf_rtng_flag = 'Y'
-- or rt_elig_prfl_flag = 'Y'
);
select pbg.security_group_id
from per_business_groups pbg
, BEN_VRBL_RT_ELIG_PRFL_f vep
where vep.vrbl_rt_elig_prfl_id = p_vrbl_rt_elig_prfl_id
and pbg.business_group_id = vep.business_group_id;
select pbg.legislation_code
from per_business_groups pbg
, BEN_VRBL_RT_ELIG_PRFL_f vep
where vep.vrbl_rt_elig_prfl_id = p_vrbl_rt_elig_prfl_id
and pbg.business_group_id = vep.business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in ben_vep_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
select null
from ben_elig_ttl_cvg_vol_prte_f
where eligy_prfl_id = p_eligy_prfl_id
and exists
(select null
from ben_elig_ttl_prtt_prte_f
where eligy_prfl_id in
(select eligy_prfl_id
from ben_vrbl_rt_elig_prfl_f
where vrbl_rt_prfl_id = p_vrbl_rt_prfl_id
and business_group_id = p_business_group_id
and p_effective_date between effective_start_date and effective_end_date)
or eligy_prfl_id = p_eligy_prfl_id);
select null
from ben_elig_ttl_prtt_prte_f
where eligy_prfl_id = p_eligy_prfl_id
and exists
(select null
from ben_elig_ttl_cvg_vol_prte_f
where eligy_prfl_id in
(select eligy_prfl_id
from ben_vrbl_rt_elig_prfl_f
where vrbl_rt_prfl_id = p_vrbl_rt_prfl_id
and business_group_id = p_business_group_id
and p_effective_date between effective_start_date and effective_end_date)
or eligy_prfl_id = p_eligy_prfl_id);
select mlt_cd, vrbl_usg_cd
from ben_vrbl_rt_prfl_f
where vrbl_rt_prfl_id = p_vrbl_rt_prfl_id
and business_group_id = p_business_group_id
and p_effective_date between effective_start_date and effective_end_date;
select null
from ben_elig_ttl_prtt_prte_f
where eligy_prfl_id = p_eligy_prfl_id
and business_group_id = p_business_group_id
and p_effective_date between effective_start_date and effective_end_date;
select null
from ben_elig_ttl_cvg_vol_prte_f
where eligy_prfl_id = p_eligy_prfl_id
and business_group_id = p_business_group_id
and p_effective_date between effective_start_date and effective_end_date;
Procedure dt_update_validate
(
p_vrbl_rt_prfl_id in number default hr_api.g_number
,p_eligy_prfl_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_vrbl_rt_elig_prfl_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 = hr_api.g_delete or
p_datetrack_mode = hr_api.g_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_vep_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_vep_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_vrbl_rt_prfl_id => p_rec.vrbl_rt_prfl_id
,p_eligy_prfl_id => p_rec.eligy_prfl_id
,p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => p_validation_start_date
,p_validation_end_date => p_validation_end_date
);
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in ben_vep_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_vrbl_rt_elig_prfl_id => p_rec.vrbl_rt_elig_prfl_id
);
End delete_validate;