The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure dt_delete_dml
(p_rec in out nocopy per_ctc_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 = 'DELETE_NEXT_CHANGE') then
hr_utility.set_location(l_proc, 10);
delete from per_contracts_f
where contract_id = p_rec.contract_id
and effective_start_date = p_validation_start_date;
delete from per_contracts_f
where contract_id = p_rec.contract_id
and effective_start_date >= p_validation_start_date;
End dt_delete_dml;
Procedure delete_dml
(p_rec in out nocopy per_ctc_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';
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_ctc_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 = '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_ctc_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';
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_ctc_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_ctc_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_start_date,
p_contract_id => p_rec.contract_id,
p_effective_start_date => p_rec.effective_start_date,
p_effective_end_date => p_rec.effective_end_date,
p_object_version_number => p_rec.object_version_number,
p_effective_start_date_o => per_ctc_shd.g_old_rec.effective_start_date,
p_effective_end_date_o => per_ctc_shd.g_old_rec.effective_end_date,
p_business_group_id_o => per_ctc_shd.g_old_rec.business_group_id,
p_person_id_o => per_ctc_shd.g_old_rec.person_id,
p_reference_o => per_ctc_shd.g_old_rec.reference,
p_type_o => per_ctc_shd.g_old_rec.type,
p_status_o => per_ctc_shd.g_old_rec.status,
p_status_reason_o => per_ctc_shd.g_old_rec.status_reason,
p_doc_status_o => per_ctc_shd.g_old_rec.doc_status,
p_doc_status_change_date_o => per_ctc_shd.g_old_rec.doc_status_change_date,
p_description_o => per_ctc_shd.g_old_rec.description,
p_duration_o => per_ctc_shd.g_old_rec.duration,
p_duration_units_o => per_ctc_shd.g_old_rec.duration_units,
p_contractual_job_title_o => per_ctc_shd.g_old_rec.contractual_job_title,
p_parties_o => per_ctc_shd.g_old_rec.parties,
p_start_reason_o => per_ctc_shd.g_old_rec.start_reason,
p_end_reason_o => per_ctc_shd.g_old_rec.end_reason ,
p_number_of_extensions_o => per_ctc_shd.g_old_rec.number_of_extensions,
p_extension_reason_o => per_ctc_shd.g_old_rec.extension_reason,
p_extension_period_o => per_ctc_shd.g_old_rec.extension_period,
p_extension_period_units_o => per_ctc_shd.g_old_rec.extension_period_units,
p_ctr_information_category_o => per_ctc_shd.g_old_rec.ctr_information_category,
p_ctr_information1_o => per_ctc_shd.g_old_rec.ctr_information1,
p_ctr_information2_o => per_ctc_shd.g_old_rec.ctr_information2,
p_ctr_information3_o => per_ctc_shd.g_old_rec.ctr_information3,
p_ctr_information4_o => per_ctc_shd.g_old_rec.ctr_information4,
p_ctr_information5_o => per_ctc_shd.g_old_rec.ctr_information5,
p_ctr_information6_o => per_ctc_shd.g_old_rec.ctr_information6,
p_ctr_information7_o => per_ctc_shd.g_old_rec.ctr_information7,
p_ctr_information8_o => per_ctc_shd.g_old_rec.ctr_information8,
p_ctr_information9_o => per_ctc_shd.g_old_rec.ctr_information9,
p_ctr_information10_o => per_ctc_shd.g_old_rec.ctr_information10,
p_ctr_information11_o => per_ctc_shd.g_old_rec.ctr_information11,
p_ctr_information12_o => per_ctc_shd.g_old_rec.ctr_information12,
p_ctr_information13_o => per_ctc_shd.g_old_rec.ctr_information13,
p_ctr_information14_o => per_ctc_shd.g_old_rec.ctr_information14,
p_ctr_information15_o => per_ctc_shd.g_old_rec.ctr_information15,
p_ctr_information16_o => per_ctc_shd.g_old_rec.ctr_information16,
p_ctr_information17_o => per_ctc_shd.g_old_rec.ctr_information17,
p_ctr_information18_o => per_ctc_shd.g_old_rec.ctr_information18,
p_ctr_information19_o => per_ctc_shd.g_old_rec.ctr_information19,
p_ctr_information20_o => per_ctc_shd.g_old_rec.ctr_information20,
p_attribute_category_o => per_ctc_shd.g_old_rec.attribute_category,
p_attribute1_o => per_ctc_shd.g_old_rec.attribute1,
p_attribute2_o => per_ctc_shd.g_old_rec.attribute2,
p_attribute3_o => per_ctc_shd.g_old_rec.attribute3,
p_attribute4_o => per_ctc_shd.g_old_rec.attribute4,
p_attribute5_o => per_ctc_shd.g_old_rec.attribute5,
p_attribute6_o => per_ctc_shd.g_old_rec.attribute6,
p_attribute7_o => per_ctc_shd.g_old_rec.attribute7,
p_attribute8_o => per_ctc_shd.g_old_rec.attribute8,
p_attribute9_o => per_ctc_shd.g_old_rec.attribute9,
p_attribute10_o => per_ctc_shd.g_old_rec.attribute10,
p_attribute11_o => per_ctc_shd.g_old_rec.attribute11,
p_attribute12_o => per_ctc_shd.g_old_rec.attribute12,
p_attribute13_o => per_ctc_shd.g_old_rec.attribute13,
p_attribute14_o => per_ctc_shd.g_old_rec.attribute14,
p_attribute15_o => per_ctc_shd.g_old_rec.attribute15,
p_attribute16_o => per_ctc_shd.g_old_rec.attribute16,
p_attribute17_o => per_ctc_shd.g_old_rec.attribute17,
p_attribute18_o => per_ctc_shd.g_old_rec.attribute18,
p_attribute19_o => per_ctc_shd.g_old_rec.attribute19,
p_attribute20_o => per_ctc_shd.g_old_rec.attribute20,
p_object_version_number_o => per_ctc_shd.g_old_rec.object_version_number
);
End post_delete;
per_ctc_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);
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);
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);
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);
procedure delete_row
(
p_contract_id in per_contracts_f.contract_id%TYPE,
p_effective_date in date,
p_object_version_number in per_contracts_f.object_version_number%TYPE
) is
--
l_proc varchar2(72) := g_package||'delete_row';
delete from per_contracts_f
where contract_id = p_contract_id and
p_effective_date between effective_start_date
and effective_end_date;
end delete_row;