The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure dt_insert_dml
(p_rec in out nocopy per_sps_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
-- Cursor to select 'old' created AOL who column values
--
Cursor C_Sel1 Is
select t.created_by,
t.creation_date
from per_spinal_point_steps_f t
where t.step_id = p_rec.step_id
and t.effective_start_date =
per_sps_shd.g_old_rec.effective_start_date
and t.effective_end_date = (p_validation_start_date - 1);
l_proc varchar2(72) := g_package||'dt_insert_dml';
l_last_update_date per_spinal_point_steps_f.last_update_date%TYPE;
l_last_updated_by per_spinal_point_steps_f.last_updated_by%TYPE;
l_last_update_login per_spinal_point_steps_f.last_update_login%TYPE;
If (p_datetrack_mode <> hr_api.g_insert) then
hr_utility.set_location(l_proc, 10);
l_last_update_date := sysdate;
l_last_updated_by := fnd_global.user_id;
l_last_update_login := fnd_global.login_id;
insert into per_spinal_point_steps_f
(step_id
,effective_start_date
,effective_end_date
,business_group_id
,spinal_point_id
,grade_spine_id
,sequence
,request_id
,program_application_id
,program_id
,program_update_date
,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
,information_category
,object_version_number
,created_by
,creation_date
,last_update_date
,last_updated_by
,last_update_login
)
Values
(p_rec.step_id
,p_rec.effective_start_date
,p_rec.effective_end_date
,p_rec.business_group_id
,p_rec.spinal_point_id
,p_rec.grade_spine_id
,p_rec.sequence
,p_rec.request_id
,p_rec.program_application_id
,p_rec.program_id
,p_rec.program_update_date
,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.information_category
,p_rec.object_version_number
,l_created_by
,l_creation_date
,l_last_update_date
,l_last_updated_by
,l_last_update_login
);
End dt_insert_dml;
Procedure insert_dml
(p_rec in out nocopy per_sps_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
--
l_proc varchar2(72) := g_package||'insert_dml';
per_sps_ins.dt_insert_dml
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => p_validation_start_date
,p_validation_end_date => p_validation_end_date
);
End insert_dml;
Procedure pre_insert
(p_rec in out nocopy per_sps_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
--
Cursor C_Sel1 is select per_spinal_point_steps_s.nextval from sys.dual;
Select null
from per_spinal_point_steps_f
where step_id =
per_sps_ins.g_step_id_i;
l_proc varchar2(72) := g_package||'pre_insert';
End pre_insert;
Procedure post_insert
(p_rec in per_sps_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
--
l_proc varchar2(72) := g_package||'post_insert';
select pps.name
,psp.spinal_point
,pgs.grade_id
from per_parent_spines pps
,per_grade_spines_f pgs
,per_spinal_points psp
where pgs.grade_spine_id = p_rec.grade_spine_id
and p_effective_date between
pgs.effective_start_date and pgs.effective_end_date
and pps.parent_spine_id = pgs.parent_spine_id
and psp.spinal_point_id = p_rec.spinal_point_id;
per_sps_rki.after_insert
(p_effective_date
=> p_effective_date
,p_validation_start_date
=> p_validation_start_date
,p_validation_end_date
=> p_validation_end_date
,p_step_id
=> p_rec.step_id
,p_effective_start_date
=> p_rec.effective_start_date
,p_effective_end_date
=> p_rec.effective_end_date
,p_business_group_id
=> p_rec.business_group_id
,p_spinal_point_id
=> p_rec.spinal_point_id
,p_grade_spine_id
=> p_rec.grade_spine_id
,p_sequence
=> p_rec.sequence
,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_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
);
End post_insert;
l_datetrack_mode varchar2(30) := hr_api.g_insert;
per_sps_bus.insert_validate
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => l_datetrack_mode
,p_validation_start_date => l_validation_start_date
,p_validation_end_date => l_validation_end_date
);
per_sps_ins.pre_insert
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => l_datetrack_mode
,p_validation_start_date => l_validation_start_date
,p_validation_end_date => l_validation_end_date
);
per_sps_ins.insert_dml
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => l_datetrack_mode
,p_validation_start_date => l_validation_start_date
,p_validation_end_date => l_validation_end_date
);
per_sps_ins.post_insert
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => l_datetrack_mode
,p_validation_start_date => l_validation_start_date
,p_validation_end_date => l_validation_end_date
);
,p_program_update_date in date 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_information_category in varchar2 default null
,p_step_id in out nocopy number
,p_object_version_number out nocopy number
,p_effective_start_date out nocopy date
,p_effective_end_date out nocopy date
) is
--
l_rec per_sps_shd.g_rec_type;
,p_program_update_date
,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
,p_information_category
,null
);