The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml
( p_rec in out NOCOPY pqh_rls_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into pqh_roles
(role_id
,role_name
,role_type_cd
,enable_flag
,object_version_number
,business_group_id
,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
)
Values
(p_rec.role_id
,p_rec.role_name
,p_rec.role_type_cd
,p_rec.enable_flag
,p_rec.object_version_number
,p_rec.business_group_id
,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
);
End insert_dml;
Procedure pre_insert
( p_rec in out NOCOPY pqh_rls_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'pre_insert';
Cursor C_Sel1 is select pqh_roles_s.nextval from sys.dual;
End pre_insert;
Procedure post_insert
(p_effective_date in date
,p_rec in pqh_rls_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'post_insert';
pqh_rls_rki.after_insert
(p_effective_date => p_effective_date
,p_role_id => p_rec.role_id
,p_role_name => p_rec.role_name
,p_role_type_cd => p_rec.role_type_cd
,p_enable_flag => p_rec.enable_flag
,p_object_version_number => p_rec.object_version_number
,p_business_group_id => p_rec.business_group_id
,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
);
End post_insert;
pqh_rls_bus.insert_validate
(p_effective_date
,p_rec
);
pqh_rls_ins.pre_insert(p_rec);
pqh_rls_ins.insert_dml(p_rec);
pqh_rls_ins.post_insert
(p_effective_date
,p_rec
);