The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml(p_rec in out nocopy pqh_cea_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into pqh_copy_entity_attribs
( copy_entity_attrib_id,
copy_entity_txn_id,
row_type_cd,
information_category,
information1,
information2,
information3,
information4,
information5,
information6,
information7,
information8,
information9,
information10,
information11,
information12,
information13,
information14,
information15,
information16,
information17,
information18,
information19,
information20,
information21,
information22,
information23,
information24,
information25,
information26,
information27,
information28,
information29,
information30,
check_information1,
check_information2,
check_information3,
object_version_number
)
Values
( p_rec.copy_entity_attrib_id,
p_rec.copy_entity_txn_id,
p_rec.row_type_cd,
p_rec.information_category,
p_rec.information1,
p_rec.information2,
p_rec.information3,
p_rec.information4,
p_rec.information5,
p_rec.information6,
p_rec.information7,
p_rec.information8,
p_rec.information9,
p_rec.information10,
p_rec.information11,
p_rec.information12,
p_rec.information13,
p_rec.information14,
p_rec.information15,
p_rec.information16,
p_rec.information17,
p_rec.information18,
p_rec.information19,
p_rec.information20,
p_rec.information21,
p_rec.information22,
p_rec.information23,
p_rec.information24,
p_rec.information25,
p_rec.information26,
p_rec.information27,
p_rec.information28,
p_rec.information29,
p_rec.information30,
p_rec.check_information1,
p_rec.check_information2,
p_rec.check_information3,
p_rec.object_version_number
);
End insert_dml;
Procedure pre_insert(p_rec in out nocopy pqh_cea_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_insert';
Cursor C_Sel1 is select pqh_copy_entity_attribs_s.nextval from sys.dual;
End pre_insert;
Procedure post_insert(
p_effective_date in date,p_rec in pqh_cea_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_insert';
pqh_cea_rki.after_insert
(
p_copy_entity_attrib_id =>p_rec.copy_entity_attrib_id
,p_copy_entity_txn_id =>p_rec.copy_entity_txn_id
,p_row_type_cd =>p_rec.row_type_cd
,p_information_category =>p_rec.information_category
,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_check_information1 =>p_rec.check_information1
,p_check_information2 =>p_rec.check_information2
,p_check_information3 =>p_rec.check_information3
,p_object_version_number =>p_rec.object_version_number
,p_effective_date =>p_effective_date
);
End post_insert;
pqh_cea_bus.insert_validate(p_rec
,p_effective_date);
pre_insert(p_rec);
insert_dml(p_rec);
post_insert(
p_effective_date,p_rec);