The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure update_dml(p_rec in out nocopy per_sht_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_dml';
update per_shared_types
set
shared_type_id = p_rec.shared_type_id,
business_group_id = p_rec.business_group_id,
shared_type_name = p_rec.shared_type_name,
shared_type_code = p_rec.shared_type_code,
system_type_cd = p_rec.system_type_cd,
information1 = p_rec.information1,
information2 = p_rec.information2,
information3 = p_rec.information3,
information4 = p_rec.information4,
information5 = p_rec.information5,
information6 = p_rec.information6,
information7 = p_rec.information7,
information8 = p_rec.information8,
information9 = p_rec.information9,
information10 = p_rec.information10,
information11 = p_rec.information11,
information12 = p_rec.information12,
information13 = p_rec.information13,
information14 = p_rec.information14,
information15 = p_rec.information15,
information16 = p_rec.information16,
information17 = p_rec.information17,
information18 = p_rec.information18,
information19 = p_rec.information19,
information20 = p_rec.information20,
information21 = p_rec.information21,
information22 = p_rec.information22,
information23 = p_rec.information23,
information24 = p_rec.information24,
information25 = p_rec.information25,
information26 = p_rec.information26,
information27 = p_rec.information27,
information28 = p_rec.information28,
information29 = p_rec.information29,
information30 = p_rec.information30,
information_category = p_rec.information_category,
object_version_number = p_rec.object_version_number,
lookup_type = p_rec.lookup_type
where shared_type_id = p_rec.shared_type_id;
End update_dml;
Procedure pre_update(p_rec in per_sht_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_update';
End pre_update;
Procedure post_update(
p_effective_date in date,p_rec in per_sht_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_update';
per_sht_rku.after_update
(
p_shared_type_id =>p_rec.shared_type_id
,p_business_group_id =>p_rec.business_group_id
,p_shared_type_name =>p_rec.shared_type_name
,p_shared_type_code =>p_rec.shared_type_code
,p_system_type_cd =>p_rec.system_type_cd
,p_information1 =>p_rec.information1
,p_information2 =>p_rec.information2
,p_information3 =>p_rec.information3
,p_information4 =>p_rec.information4
,p_information5 =>p_rec.information5
,p_information6 =>p_rec.information6
,p_information7 =>p_rec.information7
,p_information8 =>p_rec.information8
,p_information9 =>p_rec.information9
,p_information10 =>p_rec.information10
,p_information11 =>p_rec.information11
,p_information12 =>p_rec.information12
,p_information13 =>p_rec.information13
,p_information14 =>p_rec.information14
,p_information15 =>p_rec.information15
,p_information16 =>p_rec.information16
,p_information17 =>p_rec.information17
,p_information18 =>p_rec.information18
,p_information19 =>p_rec.information19
,p_information20 =>p_rec.information20
,p_information21 =>p_rec.information21
,p_information22 =>p_rec.information22
,p_information23 =>p_rec.information23
,p_information24 =>p_rec.information24
,p_information25 =>p_rec.information25
,p_information26 =>p_rec.information26
,p_information27 =>p_rec.information27
,p_information28 =>p_rec.information28
,p_information29 =>p_rec.information29
,p_information30 =>p_rec.information30
,p_information_category =>p_rec.information_category
,p_object_version_number =>p_rec.object_version_number
,p_lookup_type =>p_rec.lookup_type
,p_effective_date =>p_effective_date
,p_business_group_id_o =>per_sht_shd.g_old_rec.business_group_id
,p_shared_type_name_o =>per_sht_shd.g_old_rec.shared_type_name
,p_shared_type_code_o =>per_sht_shd.g_old_rec.shared_type_code
,p_system_type_cd_o =>per_sht_shd.g_old_rec.system_type_cd
,p_information1_o =>per_sht_shd.g_old_rec.information1
,p_information2_o =>per_sht_shd.g_old_rec.information2
,p_information3_o =>per_sht_shd.g_old_rec.information3
,p_information4_o =>per_sht_shd.g_old_rec.information4
,p_information5_o =>per_sht_shd.g_old_rec.information5
,p_information6_o =>per_sht_shd.g_old_rec.information6
,p_information7_o =>per_sht_shd.g_old_rec.information7
,p_information8_o =>per_sht_shd.g_old_rec.information8
,p_information9_o =>per_sht_shd.g_old_rec.information9
,p_information10_o =>per_sht_shd.g_old_rec.information10
,p_information11_o =>per_sht_shd.g_old_rec.information11
,p_information12_o =>per_sht_shd.g_old_rec.information12
,p_information13_o =>per_sht_shd.g_old_rec.information13
,p_information14_o =>per_sht_shd.g_old_rec.information14
,p_information15_o =>per_sht_shd.g_old_rec.information15
,p_information16_o =>per_sht_shd.g_old_rec.information16
,p_information17_o =>per_sht_shd.g_old_rec.information17
,p_information18_o =>per_sht_shd.g_old_rec.information18
,p_information19_o =>per_sht_shd.g_old_rec.information19
,p_information20_o =>per_sht_shd.g_old_rec.information20
,p_information21_o =>per_sht_shd.g_old_rec.information21
,p_information22_o =>per_sht_shd.g_old_rec.information22
,p_information23_o =>per_sht_shd.g_old_rec.information23
,p_information24_o =>per_sht_shd.g_old_rec.information24
,p_information25_o =>per_sht_shd.g_old_rec.information25
,p_information26_o =>per_sht_shd.g_old_rec.information26
,p_information27_o =>per_sht_shd.g_old_rec.information27
,p_information28_o =>per_sht_shd.g_old_rec.information28
,p_information29_o =>per_sht_shd.g_old_rec.information29
,p_information30_o =>per_sht_shd.g_old_rec.information30
,p_information_category_o =>per_sht_shd.g_old_rec.information_category
,p_object_version_number_o =>per_sht_shd.g_old_rec.object_version_number
,p_lookup_type_o =>per_sht_shd.g_old_rec.lookup_type
);
End post_update;
per_sht_bus.update_validate(p_rec
,p_effective_date);
pre_update(p_rec);
update_dml(p_rec);
post_update(
p_effective_date,p_rec);