1: Package Body per_dis_del as
2: /* $Header: pedisrhi.pkb 115.8 2002/12/04 18:57:24 pkakar noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_dis_del.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |----------------------------< dt_delete_dml >-----------------------------|
12: -- ----------------------------------------------------------------------------
105: --
106: Begin
107: hr_utility.set_location('Entering:'||l_proc, 5);
108: --
109: per_dis_del.dt_delete_dml
110: (p_rec => p_rec
111: ,p_effective_date => p_effective_date
112: ,p_datetrack_mode => p_datetrack_mode
113: ,p_validation_start_date => p_validation_start_date
240: hr_utility.set_location('Entering:'||l_proc, 5);
241: --
242: --
243: --
244: per_dis_del.dt_pre_delete
245: (p_rec => p_rec
246: ,p_effective_date => p_effective_date
247: ,p_datetrack_mode => p_datetrack_mode
248: ,p_validation_start_date => p_validation_start_date
528: );
529: --
530: -- Call the supporting pre-delete operation
531: --
532: per_dis_del.pre_delete
533: (p_rec => p_rec
534: ,p_effective_date => p_effective_date
535: ,p_datetrack_mode => p_datetrack_mode
536: ,p_validation_start_date => l_validation_start_date
538: );
539: --
540: -- Delete the row.
541: --
542: per_dis_del.delete_dml
543: (p_rec => p_rec
544: ,p_effective_date => p_effective_date
545: ,p_datetrack_mode => p_datetrack_mode
546: ,p_validation_start_date => l_validation_start_date
547: ,p_validation_end_date => l_validation_end_date
548: );
549: -- Call the supporting post-delete operation
550: --
551: per_dis_del.post_delete
552: (p_rec => p_rec
553: ,p_effective_date => p_effective_date
554: ,p_datetrack_mode => p_datetrack_mode
555: ,p_validation_start_date => l_validation_start_date
588: -- Having converted the arguments into the per_dis_rec
589: -- plsql record structure we must call the corresponding entity
590: -- business process
591: --
592: per_dis_del.del
593: (p_effective_date
594: ,p_datetrack_mode
595: ,l_rec
596: );
603: --
604: hr_utility.set_location(' Leaving:'||l_proc, 10);
605: End del;
606: --
607: end per_dis_del;