The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pbg.security_group_id,
pbg.legislation_code
from per_business_groups_perf pbg
, per_spinal_point_steps_f sps
where sps.step_id = p_step_id
and pbg.business_group_id = sps.business_group_id;
select pbg.legislation_code
from per_business_groups_perf pbg
, per_spinal_point_steps_f sps
where sps.step_id = p_step_id
and pbg.business_group_id = sps.business_group_id;
select null
from per_spinal_points psp
where psp.business_group_id = p_business_group_id
and psp.spinal_point_id = p_spinal_point_id;
select null
from per_spinal_points psp
,per_grade_spines_f pgs
where psp.business_group_id = p_business_group_id
and psp.spinal_point_id = p_spinal_point_id
and pgs.grade_spine_id = p_grade_spine_id
and pgs.business_group_id = p_business_group_id
and p_effective_date between
pgs.effective_start_date and pgs.effective_end_date
and pgs.parent_spine_id = psp.parent_spine_id;
select null
from per_grade_spines_f pgs
where pgs.business_group_id = p_business_group_id
and pgs.grade_spine_id = p_grade_spine_id
and p_effective_date between
pgs.effective_start_date and pgs.effective_end_date;
select null
from per_spinal_points psp
where psp.business_group_id = p_business_group_id
and psp.spinal_point_id = p_spinal_point_id
and psp.sequence = p_sequence;
select 'x'
from sys.dual
where exists
(select null
from per_spinal_point_steps_f
where grade_spine_id = p_grade_spine_id
and spinal_point_id = p_spinal_point_id
and step_id <> nvl(p_step_id,hr_api.g_number)
and p_effective_date between effective_start_date
and effective_end_date);
procedure chk_delete(
p_step_id in per_spinal_point_steps_f.step_id%Type
,p_spinal_point_id in per_spinal_point_steps_f.spinal_point_id%Type
,p_grade_spine_id in per_spinal_point_steps_f.grade_spine_id%Type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_called_from_del_grd_scale in boolean --bug 4096238
) is
--
-- Start of fix 3439542
l_proc varchar2(72) := g_package||'chk_delete';
select 'X'
from per_spinal_point_placements_f
where step_id = p_step_id
and p_date < effective_end_date;
select 'X'
from per_all_assignments_f
where special_ceiling_step_id = p_step_id;
select 'X'
from hr_all_positions_f
where entry_step_id = p_step_id
and p_date < effective_end_date;
select 'X' from per_grade_spines_f
where ceiling_step_id=p_step_id
and grade_spine_id=l_grade_spine_id
and p_effective_date<>effective_start_date;
select 'X' from per_grade_spines_f
where ceiling_step_id = p_step_id and
grade_spine_id=l_grade_spine_id and
p_effective_date <= effective_end_date;
if p_datetrack_mode = hr_api.g_delete then
l_date := p_effective_date;
select grade_spine_id into l_grade_spine_id
from per_spinal_point_steps_f where step_id=p_step_id;
if ( not p_called_from_del_grd_scale ) and (p_datetrack_mode = hr_api.g_delete ) then
open csr_ceiling_chk2;
end chk_delete;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in per_sps_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
Procedure dt_update_validate
(p_grade_spine_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_step_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 per_sps_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 per_sps_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_grade_spine_id => p_rec.grade_spine_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 per_sps_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
,p_called_from_del_grd_scale in boolean --bug 4096238
) 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_step_id => p_rec.step_id
);
chk_delete
(p_step_id => p_rec.step_id
,p_spinal_point_id => p_rec.spinal_point_id
,p_grade_spine_id => p_rec.grade_spine_id
,p_effective_date => p_effective_date
,p_datetrack_mode => p_datetrack_mode
,p_called_from_del_grd_scale => p_called_from_del_grd_scale -- bug 4096238
);
End delete_validate;