The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure dt_delete_dml
(p_rec in out nocopy per_rei_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||'dt_delete_dml';
If (p_datetrack_mode = hr_api.g_delete_next_change) then
per_rei_shd.g_api_dml := true; -- Set the api dml status
delete from per_contact_extra_info_f
where contact_extra_info_id = p_rec.contact_extra_info_id
and effective_start_date = p_validation_start_date;
delete from per_contact_extra_info_f
where contact_extra_info_id = p_rec.contact_extra_info_id
and effective_start_date >= p_validation_start_date;
End dt_delete_dml;
Procedure delete_dml
(p_rec in out nocopy per_rei_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||'delete_dml';
per_rei_del.dt_delete_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 delete_dml;
Procedure dt_pre_delete
(p_rec in out nocopy per_rei_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||'dt_pre_delete';
If (p_datetrack_mode = hr_api.g_delete) then
p_rec.effective_end_date := p_validation_start_date - 1;
End dt_pre_delete;
Procedure pre_delete
(p_rec in out nocopy per_rei_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||'pre_delete';
per_rei_del.dt_pre_delete
(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 pre_delete;
Procedure post_delete
(p_rec in per_rei_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_delete';
per_rei_rkd.after_delete
(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
,p_contact_extra_info_id
=> p_rec.contact_extra_info_id
,p_effective_start_date
=> p_rec.effective_start_date
,p_effective_end_date
=> p_rec.effective_end_date
,p_effective_start_date_o
=> per_rei_shd.g_old_rec.effective_start_date
,p_effective_end_date_o
=> per_rei_shd.g_old_rec.effective_end_date
,p_contact_relationship_id_o
=> per_rei_shd.g_old_rec.contact_relationship_id
,p_information_type_o
=> per_rei_shd.g_old_rec.information_type
,p_cei_information_category_o
=> per_rei_shd.g_old_rec.cei_information_category
,p_cei_information1_o
=> per_rei_shd.g_old_rec.cei_information1
,p_cei_information2_o
=> per_rei_shd.g_old_rec.cei_information2
,p_cei_information3_o
=> per_rei_shd.g_old_rec.cei_information3
,p_cei_information4_o
=> per_rei_shd.g_old_rec.cei_information4
,p_cei_information5_o
=> per_rei_shd.g_old_rec.cei_information5
,p_cei_information6_o
=> per_rei_shd.g_old_rec.cei_information6
,p_cei_information7_o
=> per_rei_shd.g_old_rec.cei_information7
,p_cei_information8_o
=> per_rei_shd.g_old_rec.cei_information8
,p_cei_information9_o
=> per_rei_shd.g_old_rec.cei_information9
,p_cei_information10_o
=> per_rei_shd.g_old_rec.cei_information10
,p_cei_information11_o
=> per_rei_shd.g_old_rec.cei_information11
,p_cei_information12_o
=> per_rei_shd.g_old_rec.cei_information12
,p_cei_information13_o
=> per_rei_shd.g_old_rec.cei_information13
,p_cei_information14_o
=> per_rei_shd.g_old_rec.cei_information14
,p_cei_information15_o
=> per_rei_shd.g_old_rec.cei_information15
,p_cei_information16_o
=> per_rei_shd.g_old_rec.cei_information16
,p_cei_information17_o
=> per_rei_shd.g_old_rec.cei_information17
,p_cei_information18_o
=> per_rei_shd.g_old_rec.cei_information18
,p_cei_information19_o
=> per_rei_shd.g_old_rec.cei_information19
,p_cei_information20_o
=> per_rei_shd.g_old_rec.cei_information20
,p_cei_information21_o
=> per_rei_shd.g_old_rec.cei_information21
,p_cei_information22_o
=> per_rei_shd.g_old_rec.cei_information22
,p_cei_information23_o
=> per_rei_shd.g_old_rec.cei_information23
,p_cei_information24_o
=> per_rei_shd.g_old_rec.cei_information24
,p_cei_information25_o
=> per_rei_shd.g_old_rec.cei_information25
,p_cei_information26_o
=> per_rei_shd.g_old_rec.cei_information26
,p_cei_information27_o
=> per_rei_shd.g_old_rec.cei_information27
,p_cei_information28_o
=> per_rei_shd.g_old_rec.cei_information28
,p_cei_information29_o
=> per_rei_shd.g_old_rec.cei_information29
,p_cei_information30_o
=> per_rei_shd.g_old_rec.cei_information30
,p_cei_attribute_category_o
=> per_rei_shd.g_old_rec.cei_attribute_category
,p_cei_attribute1_o
=> per_rei_shd.g_old_rec.cei_attribute1
,p_cei_attribute2_o
=> per_rei_shd.g_old_rec.cei_attribute2
,p_cei_attribute3_o
=> per_rei_shd.g_old_rec.cei_attribute3
,p_cei_attribute4_o
=> per_rei_shd.g_old_rec.cei_attribute4
,p_cei_attribute5_o
=> per_rei_shd.g_old_rec.cei_attribute5
,p_cei_attribute6_o
=> per_rei_shd.g_old_rec.cei_attribute6
,p_cei_attribute7_o
=> per_rei_shd.g_old_rec.cei_attribute7
,p_cei_attribute8_o
=> per_rei_shd.g_old_rec.cei_attribute8
,p_cei_attribute9_o
=> per_rei_shd.g_old_rec.cei_attribute9
,p_cei_attribute10_o
=> per_rei_shd.g_old_rec.cei_attribute10
,p_cei_attribute11_o
=> per_rei_shd.g_old_rec.cei_attribute11
,p_cei_attribute12_o
=> per_rei_shd.g_old_rec.cei_attribute12
,p_cei_attribute13_o
=> per_rei_shd.g_old_rec.cei_attribute13
,p_cei_attribute14_o
=> per_rei_shd.g_old_rec.cei_attribute14
,p_cei_attribute15_o
=> per_rei_shd.g_old_rec.cei_attribute15
,p_cei_attribute16_o
=> per_rei_shd.g_old_rec.cei_attribute16
,p_cei_attribute17_o
=> per_rei_shd.g_old_rec.cei_attribute17
,p_cei_attribute18_o
=> per_rei_shd.g_old_rec.cei_attribute18
,p_cei_attribute19_o
=> per_rei_shd.g_old_rec.cei_attribute19
,p_cei_attribute20_o
=> per_rei_shd.g_old_rec.cei_attribute20
,p_object_version_number_o
=> per_rei_shd.g_old_rec.object_version_number
,p_request_id_o
=> per_rei_shd.g_old_rec.request_id
,p_program_application_id_o
=> per_rei_shd.g_old_rec.program_application_id
,p_program_id_o
=> per_rei_shd.g_old_rec.program_id
,p_program_update_date_o
=> per_rei_shd.g_old_rec.program_update_date
);
End post_delete;
per_rei_bus.delete_validate
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => l_validation_start_date
,p_validation_end_date => l_validation_end_date
);
per_rei_del.pre_delete
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => l_validation_start_date
,p_validation_end_date => l_validation_end_date
);
per_rei_del.delete_dml
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => l_validation_start_date
,p_validation_end_date => l_validation_end_date
);
per_rei_del.post_delete
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => l_validation_start_date
,p_validation_end_date => l_validation_end_date
);