The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure delete_dml(p_rec in ghr_pdc_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_dml';
delete from ghr_pd_classifications
where pd_classification_id = p_rec.pd_classification_id;
End delete_dml;
Procedure pre_delete(p_rec in ghr_pdc_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_delete';
End pre_delete;
Procedure post_delete(p_rec in ghr_pdc_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_delete';
ghr_pdc_rkd.after_delete (
p_pd_classification_id => p_rec.pd_classification_id,
p_position_description_id_o => ghr_pdc_shd.g_old_rec.position_description_id,
p_class_grade_by_o => ghr_pdc_shd.g_old_rec.class_grade_by,
p_official_title_o => ghr_pdc_shd.g_old_rec.official_title,
p_pay_plan_o => ghr_pdc_shd.g_old_rec.pay_plan,
p_occupational_code_o => ghr_pdc_shd.g_old_rec.occupational_code,
p_grade_level_o => ghr_pdc_shd.g_old_rec.grade_level,
p_object_version_number_o => ghr_pdc_shd.g_old_rec.object_version_number
);
End post_delete;
ghr_pdc_bus.delete_validate(p_rec);
pre_delete(p_rec);
delete_dml(p_rec);
post_delete(p_rec);