The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure delete_dml(p_rec in per_ast_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_dml';
delete from per_competence_elements
where competence_element_id in
(select competence_element_id from per_competence_elements cel1
where cel1.assessment_type_id = p_rec.assessment_type_id
Or parent_competence_element_id in
(select competence_element_id
from per_competence_elements cel2
where cel2.assessment_type_id = p_rec.assessment_type_id)
);
DELETE FROM per_competence_elements
WHERE
competence_element_id IN (SELECT competence_element_id
FROM per_competence_elements cel1
WHERE cel1.assessment_type_id = p_rec.assessment_type_id);
DELETE FROM per_competence_elements
WHERE
parent_competence_element_id IN (SELECT competence_element_id
FROM per_competence_elements cel2
WHERE cel2.assessment_type_id = p_rec.assessment_type_id );
delete from per_assessment_types
where assessment_type_id = p_rec.assessment_type_id;
End delete_dml;
Procedure pre_delete(p_rec in per_ast_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_delete';
End pre_delete;
Procedure post_delete(p_rec in per_ast_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_delete';
per_ast_rkd.after_delete (
p_assessment_type_id => p_rec.assessment_type_id ,
p_business_group_id_o => per_ast_shd.g_old_rec.business_group_id ,
p_object_version_number_o => per_ast_shd.g_old_rec.object_version_number,
p_name_o => per_ast_shd.g_old_rec.name ,
p_date_to_o => per_ast_shd.g_old_rec.date_to ,
p_date_from_o => per_ast_shd.g_old_rec.date_from ,
p_assessment_classification_o =>
per_ast_shd.g_old_rec.assessment_classification ,
p_display_assessment_comment_o =>
per_ast_shd.g_old_rec.display_assessment_comments,
p_description_o => per_ast_shd.g_old_rec.description ,
p_rating_scale_comment_o => per_ast_shd.g_old_rec.rating_scale_comment,
p_weighting_scale_comment_o =>
per_ast_shd.g_old_rec.weighting_scale_comment ,
p_comments_o => per_ast_shd.g_old_rec.comments ,
p_instructions_o => per_ast_shd.g_old_rec.instructions ,
p_line_score_formula_o => per_ast_shd.g_old_rec.line_score_formula ,
p_total_score_formula_o => per_ast_shd.g_old_rec.total_score_formula ,
p_weighting_classification_o =>
per_ast_shd.g_old_rec.weighting_classification ,
p_rating_scale_id_o => per_ast_shd.g_old_rec.rating_scale_id ,
p_weighting_scale_id_o => per_ast_shd.g_old_rec.weighting_scale_id ,
p_attribute_category_o => per_ast_shd.g_old_rec.attribute_category ,
p_attribute1_o => per_ast_shd.g_old_rec.attribute1 ,
p_attribute2_o => per_ast_shd.g_old_rec.attribute2 ,
p_attribute3_o => per_ast_shd.g_old_rec.attribute3 ,
p_attribute4_o => per_ast_shd.g_old_rec.attribute4 ,
p_attribute5_o => per_ast_shd.g_old_rec.attribute5 ,
p_attribute6_o => per_ast_shd.g_old_rec.attribute6 ,
p_attribute7_o => per_ast_shd.g_old_rec.attribute7 ,
p_attribute8_o => per_ast_shd.g_old_rec.attribute8 ,
p_attribute9_o => per_ast_shd.g_old_rec.attribute9 ,
p_attribute10_o => per_ast_shd.g_old_rec.attribute10 ,
p_attribute11_o => per_ast_shd.g_old_rec.attribute11 ,
p_attribute12_o => per_ast_shd.g_old_rec.attribute12 ,
p_attribute13_o => per_ast_shd.g_old_rec.attribute13 ,
p_attribute14_o => per_ast_shd.g_old_rec.attribute14 ,
p_attribute15_o => per_ast_shd.g_old_rec.attribute15 ,
p_attribute16_o => per_ast_shd.g_old_rec.attribute16 ,
p_attribute17_o => per_ast_shd.g_old_rec.attribute17 ,
p_attribute18_o => per_ast_shd.g_old_rec.attribute18 ,
p_attribute19_o => per_ast_shd.g_old_rec.attribute19 ,
p_attribute20_o => per_ast_shd.g_old_rec.attribute20 ,
p_type_o => per_ast_shd.g_old_rec.type,
p_line_score_formula_id_o => per_ast_shd.g_old_rec.line_score_formula_id,
p_default_job_competencies_o => per_ast_shd.g_old_rec.default_job_competencies,
p_available_flag_o => per_ast_shd.g_old_rec.available_flag);
End post_delete;
per_ast_bus.delete_validate(p_rec);
pre_delete(p_rec);
delete_dml(p_rec);
post_delete(p_rec);