The following lines contain the word 'select', 'insert', 'update' or 'delete':
cursor c1 is select null
from hr_lookups h1
where h1.lookup_type = 'BEN_CWB_QUAR_IN_GRD'
and h1.lookup_code = p_quar_in_grade_cd
and p_effective_date
between nvl(h1.start_date_active, p_effective_date)
and nvl(h1.end_date_active, p_effective_date)
and h1.enabled_flag = 'Y';
select null
from ben_qua_in_gr_rt_f
where quar_in_grade_cd = p_quar_in_grade_cd
and vrbl_rt_prfl_id = p_vrbl_rt_prfl_id
and qua_in_gr_rt_id <> nvl(p_qua_in_gr_rt_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;
select pbg.security_group_id
from per_business_groups pbg
, ben_qua_in_gr_rt_f qig
where qig.qua_in_gr_rt_id = p_qua_in_gr_rt_id
and pbg.business_group_id = qig.business_group_id;
select pbg.legislation_code
from per_business_groups pbg
, ben_qua_in_gr_rt_f qig
where qig.qua_in_gr_rt_id = p_qua_in_gr_rt_id
and pbg.business_group_id = qig.business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in ben_qig_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
cursor c1 is select null
from ben_qua_in_gr_rt_f
where vrbl_rt_prfl_id = p_vrbl_rt_prfl_id
-- changed against bug: 5113011
and qua_in_gr_rt_id <> nvl(p_qua_in_gr_rt_id ,-1)
-- and quar_in_grade_cd <> nvl(p_quar_in_grade_cd ,-1)
--and p_effective_date between effective_start_date
-- and effective_end_date
and p_validation_start_date <= effective_end_date
and p_validation_end_date >= effective_start_date
and business_group_id + 0 = p_business_group_id
and ordr_num = p_ordr_num;
Procedure dt_update_validate
(p_vrbl_rt_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_qua_in_gr_rt_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_qig_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_qig_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_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_qig_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_qua_in_gr_rt_id => p_rec.qua_in_gr_rt_id
);
End delete_validate;