[Home] [Help]
1: Package Body ame_rlu_upd as
2: /* $Header: amrlurhi.pkb 120.5 2005/11/22 03:19 santosin noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' ame_rlu_upd.'; -- Global package name
9: g_old_start_date date;
10: --
11: -- ----------------------------------------------------------------------------
12: -- |----------------------------< dt_update_dml >-----------------------------|
168: --
169: Begin
170: hr_utility.set_location('Entering:'||l_proc, 5);
171: --
172: ame_rlu_upd.dt_update_dml
173: (p_rec => p_rec
174: ,p_effective_date => p_effective_date
175: ,p_datetrack_mode => p_datetrack_mode
176: ,p_validation_start_date => p_validation_start_date
562: -- derive the full record structure values to be updated.
563: --
564: -- 2. Call the supporting update validate operations.
565: --
566: ame_rlu_upd.convert_defs(p_rec);
567: --
568: -- Make sure that the Rule start_date and end_date are correct
569: --
570: -- p_validation_start_date is sysdate, so if the start_date is greater
671: -- Having converted the arguments into the
672: -- plsql record structure we call the corresponding record
673: -- business process.
674: --
675: ame_rlu_upd.upd
676: (p_effective_date
677: ,p_datetrack_mode
678: ,l_rec
679: );
687: --
688: hr_utility.set_location(' Leaving:'||l_proc, 10);
689: End upd;
690: --
691: end ame_rlu_upd;