1: Package Body pay_rom_upd as
2: /* $Header: pyromrhi.pkb 115.3 2002/12/09 15:04:01 divicker noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pay_rom_upd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |----------------------------< dt_update_dml >-----------------------------|
12: -- ----------------------------------------------------------------------------
167: --
168: Begin
169: hr_utility.set_location('Entering:'||l_proc, 5);
170: --
171: pay_rom_upd.dt_update_dml
172: (p_rec => p_rec
173: ,p_effective_date => p_effective_date
174: ,p_datetrack_mode => p_datetrack_mode
175: ,p_validation_start_date => p_validation_start_date
559: -- derive the full record structure values to be updated.
560: --
561: -- 2. Call the supporting update validate operations.
562: --
563: pay_rom_upd.convert_defs(p_rec);
564: --
565: pay_rom_bus.update_validate
566: (p_rec => p_rec
567: ,p_effective_date => p_effective_date
643: -- Having converted the arguments into the
644: -- plsql record structure we call the corresponding record
645: -- business process.
646: --
647: pay_rom_upd.upd
648: (p_effective_date
649: ,p_datetrack_mode
650: ,l_rec
651: );
659: --
660: hr_utility.set_location(' Leaving:'||l_proc, 10);
661: End upd;
662: --
663: end pay_rom_upd;