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_parent_spines pps
where pps.parent_spine_id = p_parent_spine_id
and pbg.business_group_id = pps.business_group_id;
select pbg.legislation_code
from per_business_groups_perf pbg
, per_parent_spines pps
where pps.parent_spine_id = p_parent_spine_id
and pbg.business_group_id = pps.business_group_id;
select 'x'
from per_parent_spines
where p_name is not null
and upper(name) = upper(p_name)
and business_group_id + 0 = p_business_group_id
-- Start of 3312706
and (p_parent_spine_id is not null
and parent_spine_id <> p_parent_spine_id);
PROCEDURE chk_delete(
p_parent_spine_id in per_parent_spines.parent_spine_id%TYPE
) is
--
l_proc varchar2(72) := g_package||'chk_delete';
select 'x'
FROM per_spinal_points
WHERE parent_spine_id = p_parent_spine_id;
select 'x'
FROM per_grade_spines_f
WHERE parent_spine_id = p_parent_spine_id;
select 'x'
FROM pay_rates
WHERE parent_spine_id = p_parent_spine_id;
end chk_delete;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in per_pps_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 out nocopy per_pps_shd.g_rec_type
,p_rec in per_pps_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_pps_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_pps_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete(p_parent_spine_id => p_rec.parent_spine_id);
End delete_validate;