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_points psp
where psp.spinal_point_id = p_spinal_point_id
and pbg.business_group_id = psp.business_group_id;
select pbg.legislation_code
from per_business_groups_perf pbg
, per_spinal_points psp
where psp.spinal_point_id = p_spinal_point_id
and pbg.business_group_id = psp.business_group_id;
select null
from per_parent_spines pps
where pps.business_group_id = p_business_group_id
and pps.parent_spine_id = p_parent_spine_id;
select 'x'
from per_spinal_points
where sequence = p_sequence
and parent_spine_id = p_parent_spine_id
and spinal_point = p_spinal_point;
select 'x'
from per_spinal_points
where spinal_point = p_spinal_point
and parent_spine_id = p_parent_spine_id;
PROCEDURE chk_delete(
p_spinal_point_id in per_spinal_points.spinal_point_id%TYPE
,p_parent_spine_id in per_spinal_points.parent_spine_id%TYPE
) is
--
l_proc varchar2(72) := g_package||'chk_delete';
select 'x'
from per_spinal_point_steps_f sps
,per_grade_spines_f pgs
where sps.grade_spine_id = pgs.grade_spine_id
and pgs.parent_spine_id = p_parent_spine_id
and sps.spinal_point_id = p_spinal_point_id;
select 'x'
from pay_grade_rules_f
where grade_or_spinal_point_id = p_spinal_point_id
and rate_type = 'SP';
end chk_delete;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in per_psp_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
Procedure insert_validate
(p_effective_date in date
,p_rec in per_psp_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_effective_date in date
,p_rec in per_psp_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in per_psp_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete(p_spinal_point_id => p_rec.spinal_point_id
,p_parent_spine_id => p_rec.parent_spine_id);
End delete_validate;