The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure delete_dml(p_rec in pay_con_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_dml';
delete from pay_us_contribution_history
where contr_history_id = p_rec.contr_history_id;
End delete_dml;
Procedure pre_delete(p_rec in pay_con_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_delete';
End pre_delete;
Procedure post_delete(p_rec in pay_con_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_delete';
pay_con_rkd.after_delete
(
p_contr_history_id =>p_rec.contr_history_id
,p_person_id_o =>pay_con_shd.g_old_rec.person_id
,p_date_from_o =>pay_con_shd.g_old_rec.date_from
,p_date_to_o =>pay_con_shd.g_old_rec.date_to
,p_contr_type_o =>pay_con_shd.g_old_rec.contr_type
,p_business_group_id_o =>pay_con_shd.g_old_rec.business_group_id
,p_legislation_code_o =>pay_con_shd.g_old_rec.legislation_code
,p_amt_contr_o =>pay_con_shd.g_old_rec.amt_contr
,p_max_contr_allowed_o =>pay_con_shd.g_old_rec.max_contr_allowed
,p_includable_comp_o =>pay_con_shd.g_old_rec.includable_comp
,p_tax_unit_id_o =>pay_con_shd.g_old_rec.tax_unit_id
,p_source_system_o =>pay_con_shd.g_old_rec.source_system
,p_contr_information_category_o =>pay_con_shd.g_old_rec.contr_information_category
,p_contr_information1_o =>pay_con_shd.g_old_rec.contr_information1
,p_contr_information2_o =>pay_con_shd.g_old_rec.contr_information2
,p_contr_information3_o =>pay_con_shd.g_old_rec.contr_information3
,p_contr_information4_o =>pay_con_shd.g_old_rec.contr_information4
,p_contr_information5_o =>pay_con_shd.g_old_rec.contr_information5
,p_contr_information6_o =>pay_con_shd.g_old_rec.contr_information6
,p_contr_information7_o =>pay_con_shd.g_old_rec.contr_information7
,p_contr_information8_o =>pay_con_shd.g_old_rec.contr_information8
,p_contr_information9_o =>pay_con_shd.g_old_rec.contr_information9
,p_contr_information10_o =>pay_con_shd.g_old_rec.contr_information10
,p_contr_information11_o =>pay_con_shd.g_old_rec.contr_information11
,p_contr_information12_o =>pay_con_shd.g_old_rec.contr_information12
,p_contr_information13_o =>pay_con_shd.g_old_rec.contr_information13
,p_contr_information14_o =>pay_con_shd.g_old_rec.contr_information14
,p_contr_information15_o =>pay_con_shd.g_old_rec.contr_information15
,p_contr_information16_o =>pay_con_shd.g_old_rec.contr_information16
,p_contr_information17_o =>pay_con_shd.g_old_rec.contr_information17
,p_contr_information18_o =>pay_con_shd.g_old_rec.contr_information18
,p_contr_information19_o =>pay_con_shd.g_old_rec.contr_information19
,p_contr_information20_o =>pay_con_shd.g_old_rec.contr_information20
,p_contr_information21_o =>pay_con_shd.g_old_rec.contr_information21
,p_contr_information22_o =>pay_con_shd.g_old_rec.contr_information22
,p_contr_information23_o =>pay_con_shd.g_old_rec.contr_information23
,p_contr_information24_o =>pay_con_shd.g_old_rec.contr_information24
,p_contr_information25_o =>pay_con_shd.g_old_rec.contr_information25
,p_contr_information26_o =>pay_con_shd.g_old_rec.contr_information26
,p_contr_information27_o =>pay_con_shd.g_old_rec.contr_information27
,p_contr_information28_o =>pay_con_shd.g_old_rec.contr_information28
,p_contr_information29_o =>pay_con_shd.g_old_rec.contr_information29
,p_contr_information30_o =>pay_con_shd.g_old_rec.contr_information30
,p_object_version_number_o =>pay_con_shd.g_old_rec.object_version_number
);
End post_delete;
pay_con_bus.delete_validate(p_rec);
pre_delete(p_rec);
delete_dml(p_rec);
post_delete(p_rec);