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
, pqh_corps_definitions cpd
where cpd.corps_definition_id = p_corps_definition_id
and pbg.business_group_id = cpd.business_group_id;
select pbg.legislation_code
from per_business_groups_perf pbg
, pqh_corps_definitions cpd
where cpd.corps_definition_id = p_corps_definition_id
and pbg.business_group_id = cpd.business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in pqh_cpd_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
SELECT 'X'
FROM pqh_corps_definitions
WHERE name = p_name
AND corps_definition_id <> nvl(p_corps_definition_id,-1)
AND business_group_id = p_business_group_id;
SELECT NULL
FROM per_shared_types_vl
WHERE shared_type_id = TO_NUMBER (p_type_of_ps);
SELECT 'Y'
FROM per_shared_types
WHERE shared_type_id = p_primary_prof_field_id;
SELECT 'Y'
FROM per_grades
WHERE grade_id = p_starting_grade_id
AND p_effective_date BETWEEN date_from AND nvl(date_to,to_date('31/12/4712','DD/MM/RRRR'));
SELECT 'Y'
FROM per_grade_spines_f gs,
per_spinal_point_steps_f sps
WHERE gs.grade_id = p_starting_grade_id
AND p_effective_date BETWEEN gs.effective_start_date and gs.effective_end_date
AND gs.grade_spine_id = sps.grade_spine_id
AND sps.step_id = p_starting_grade_step_id
AND p_effective_date BETWEEN sps.effective_start_date and sps.effective_end_date;
SELECT 'Y'
FROM ben_pgm_f
WHERE pgm_id = p_ben_pgm_id
AND p_effective_date BETWEEN effective_start_date AND effective_end_date;
Procedure insert_validate
(p_effective_date in date
,p_rec in pqh_cpd_shd.g_rec_type
) is
--
l_proc varchar2(72) ;
l_proc := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_effective_date in date
,p_rec in pqh_cpd_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := 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 pqh_cpd_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := g_package||'delete_validate';
End delete_validate;