The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml
(p_rec in out nocopy per_psp_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into per_spinal_points
(spinal_point_id
,business_group_id
,parent_spine_id
,sequence
,spinal_point
,request_id
,program_application_id
,program_id
,program_update_date
,object_version_number
,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.spinal_point_id
,p_rec.business_group_id
,p_rec.parent_spine_id
,p_rec.sequence
,p_rec.spinal_point
,p_rec.request_id
,p_rec.program_application_id
,p_rec.program_id
,p_rec.program_update_date
,p_rec.object_version_number
,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 per_psp_shd.g_rec_type
) is
--
Cursor C_Sel1 is select per_spinal_points_s.nextval from sys.dual;
Select null
from per_spinal_points
where spinal_point_id =
per_psp_ins.g_spinal_point_id_i;
l_proc varchar2(72) := g_package||'pre_insert';
End pre_insert;
Procedure post_insert
(p_effective_date in date
,p_rec in per_psp_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'post_insert';
per_psp_rki.after_insert
(p_effective_date => p_effective_date
,p_spinal_point_id
=> p_rec.spinal_point_id
,p_business_group_id
=> p_rec.business_group_id
,p_parent_spine_id
=> p_rec.parent_spine_id
,p_sequence
=> p_rec.sequence
,p_spinal_point
=> p_rec.spinal_point
,p_request_id
=> p_rec.request_id
,p_program_application_id
=> p_rec.program_application_id
,p_program_id
=> p_rec.program_id
,p_program_update_date
=> p_rec.program_update_date
,p_object_version_number
=> p_rec.object_version_number
,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;
per_psp_bus.insert_validate
(p_effective_date
,p_rec
);
per_psp_ins.pre_insert(p_rec);
per_psp_ins.insert_dml(p_rec);
per_psp_ins.post_insert
(p_effective_date
,p_rec
);
,p_program_update_date in date default null
,p_information_category in varchar2 default null
,p_information1 in varchar2 default null
,p_information2 in varchar2 default null
,p_information3 in varchar2 default null
,p_information4 in varchar2 default null
,p_information5 in varchar2 default null
,p_information6 in varchar2 default null
,p_information7 in varchar2 default null
,p_information8 in varchar2 default null
,p_information9 in varchar2 default null
,p_information10 in varchar2 default null
,p_information11 in varchar2 default null
,p_information12 in varchar2 default null
,p_information13 in varchar2 default null
,p_information14 in varchar2 default null
,p_information15 in varchar2 default null
,p_information16 in varchar2 default null
,p_information17 in varchar2 default null
,p_information18 in varchar2 default null
,p_information19 in varchar2 default null
,p_information20 in varchar2 default null
,p_information21 in varchar2 default null
,p_information22 in varchar2 default null
,p_information23 in varchar2 default null
,p_information24 in varchar2 default null
,p_information25 in varchar2 default null
,p_information26 in varchar2 default null
,p_information27 in varchar2 default null
,p_information28 in varchar2 default null
,p_information29 in varchar2 default null
,p_information30 in varchar2 default null
,p_spinal_point_id out nocopy number
,p_object_version_number out nocopy number
) is
--
l_rec per_psp_shd.g_rec_type;
,p_program_update_date
,null
,p_information_category
,p_information1
,p_information2
,p_information3
,p_information4
,p_information5
,p_information6
,p_information7
,p_information8
,p_information9
,p_information10
,p_information11
,p_information12
,p_information13
,p_information14
,p_information15
,p_information16
,p_information17
,p_information18
,p_information19
,p_information20
,p_information21
,p_information22
,p_information23
,p_information24
,p_information25
,p_information26
,p_information27
,p_information28
,p_information29
,p_information30
);