1: Package Body per_rei_del as
2: /* $Header: pereirhi.pkb 115.6 2003/10/07 19:01:25 ttagawa noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_rei_del.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |----------------------------< dt_delete_dml >-----------------------------|
12: -- ----------------------------------------------------------------------------
110: --
111: Begin
112: hr_utility.set_location('Entering:'||l_proc, 5);
113: --
114: per_rei_del.dt_delete_dml
115: (p_rec => p_rec
116: ,p_effective_date => p_effective_date
117: ,p_datetrack_mode => p_datetrack_mode
118: ,p_validation_start_date => p_validation_start_date
245: hr_utility.set_location('Entering:'||l_proc, 5);
246: --
247: --
248: --
249: per_rei_del.dt_pre_delete
250: (p_rec => p_rec
251: ,p_effective_date => p_effective_date
252: ,p_datetrack_mode => p_datetrack_mode
253: ,p_validation_start_date => p_validation_start_date
500: hr_multi_message.end_validation_set;
501: --
502: -- Call the supporting pre-delete operation
503: --
504: per_rei_del.pre_delete
505: (p_rec => p_rec
506: ,p_effective_date => p_effective_date
507: ,p_datetrack_mode => p_datetrack_mode
508: ,p_validation_start_date => l_validation_start_date
510: );
511: --
512: -- Delete the row.
513: --
514: per_rei_del.delete_dml
515: (p_rec => p_rec
516: ,p_effective_date => p_effective_date
517: ,p_datetrack_mode => p_datetrack_mode
518: ,p_validation_start_date => l_validation_start_date
519: ,p_validation_end_date => l_validation_end_date
520: );
521: -- Call the supporting post-delete operation
522: --
523: per_rei_del.post_delete
524: (p_rec => p_rec
525: ,p_effective_date => p_effective_date
526: ,p_datetrack_mode => p_datetrack_mode
527: ,p_validation_start_date => l_validation_start_date
563: -- Having converted the arguments into the per_rei_rec
564: -- plsql record structure we must call the corresponding entity
565: -- business process
566: --
567: per_rei_del.del
568: (p_effective_date
569: ,p_datetrack_mode
570: ,l_rec
571: );
579: --
580: hr_utility.set_location(' Leaving:'||l_proc, 10);
581: End del;
582: --
583: end per_rei_del;