63: --
64: l_proc varchar2(72) := g_package||'dt_update_dml';
65: --
66: Begin
67: hr_utility.set_location('Entering:'||l_proc, 5);
68: --
69: If (p_datetrack_mode = 'CORRECTION') then
70: hr_utility.set_location(l_proc, 10);
71: --
66: Begin
67: hr_utility.set_location('Entering:'||l_proc, 5);
68: --
69: If (p_datetrack_mode = 'CORRECTION') then
70: hr_utility.set_location(l_proc, 10);
71: --
72: -- Because we are updating a row we must get the next object
73: -- version number.
74: --
141: p_rec.effective_start_date := p_validation_start_date;
142: p_rec.effective_end_date := p_validation_end_date;
143: End If;
144: --
145: hr_utility.set_location(' Leaving:'||l_proc, 15);
146: Exception
147: When hr_api.check_integrity_violated Then
148: -- A check constraint has been violated
149: ben_lpr_shd.g_api_dml := false; -- Unset the api dml status
199: --
200: l_proc varchar2(72) := g_package||'update_dml';
201: --
202: Begin
203: hr_utility.set_location('Entering:'||l_proc, 5);
204: --
205: dt_update_dml(p_rec => p_rec,
206: p_effective_date => p_effective_date,
207: p_datetrack_mode => p_datetrack_mode,
207: p_datetrack_mode => p_datetrack_mode,
208: p_validation_start_date => p_validation_start_date,
209: p_validation_end_date => p_validation_end_date);
210: --
211: hr_utility.set_location(' Leaving:'||l_proc, 10);
212: End update_dml;
213: --
214: -- ----------------------------------------------------------------------------
215: -- |----------------------------< dt_pre_update >-----------------------------|
264: l_proc varchar2(72) := g_package||'dt_pre_update';
265: l_dummy_version_number number;
266: --
267: Begin
268: hr_utility.set_location('Entering:'||l_proc, 5);
269: If (p_datetrack_mode <> 'CORRECTION') then
270: hr_utility.set_location(l_proc, 10);
271: --
272: -- Update the current effective end date
266: --
267: Begin
268: hr_utility.set_location('Entering:'||l_proc, 5);
269: If (p_datetrack_mode <> 'CORRECTION') then
270: hr_utility.set_location(l_proc, 10);
271: --
272: -- Update the current effective end date
273: --
274: ben_lpr_shd.upd_effective_end_date
279: p_validation_end_date => p_validation_end_date,
280: p_object_version_number => l_dummy_version_number);
281: --
282: If (p_datetrack_mode = 'UPDATE_OVERRIDE') then
283: hr_utility.set_location(l_proc, 15);
284: --
285: -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
286: -- delete any future rows
287: --
291: p_datetrack_mode => p_datetrack_mode,
292: p_validation_start_date => p_validation_start_date,
293: p_validation_end_date => p_validation_end_date);
294: End If;
295: hr_utility.set_location(l_proc, 20);
296: --
297: -- We must now insert the updated row
298: --
299: ben_lpr_ins.insert_dml
302: p_datetrack_mode => p_datetrack_mode,
303: p_validation_start_date => p_validation_start_date,
304: p_validation_end_date => p_validation_end_date);
305: End If;
306: hr_utility.set_location(' Leaving:'||l_proc, 20);
307: End dt_pre_update;
308: --
309: -- ----------------------------------------------------------------------------
310: -- |------------------------------< pre_update >------------------------------|
348: --
349: l_proc varchar2(72) := g_package||'pre_update';
350: --
351: Begin
352: hr_utility.set_location('Entering:'||l_proc, 5);
353: --
354: --
355: --
356: dt_pre_update
359: p_datetrack_mode => p_datetrack_mode,
360: p_validation_start_date => p_validation_start_date,
361: p_validation_end_date => p_validation_end_date);
362: --
363: hr_utility.set_location(' Leaving:'||l_proc, 10);
364: End pre_update;
365: --
366: -- ----------------------------------------------------------------------------
367: -- |-----------------------------< post_update >------------------------------|
404: --
405: l_proc varchar2(72) := g_package||'post_update';
406: --
407: Begin
408: hr_utility.set_location('Entering:'||l_proc, 5);
409: --
410: --
411: -- Start of API User Hook for post_update.
412: --
527: --
528: -- End of API User Hook for post_update.
529: --
530: --
531: hr_utility.set_location(' Leaving:'||l_proc, 10);
532: End post_update;
533: --
534: -- ----------------------------------------------------------------------------
535: -- |-----------------------------< convert_defs >-----------------------------|
579: l_proc varchar2(72) := g_package||'convert_defs';
580: --
581: Begin
582: --
583: hr_utility.set_location('Entering:'||l_proc, 5);
584: --
585: -- We must now examine each argument value in the
586: -- p_rec plsql record structure
587: -- to see if a system default is being used. If a system default
764: ben_lpr_shd.g_old_rec.lpr_attribute30;
765: End If;
766:
767: --
768: hr_utility.set_location(' Leaving:'||l_proc, 10);
769: --
770: End convert_defs;
771: --
772: -- ----------------------------------------------------------------------------
783: l_validation_start_date date;
784: l_validation_end_date date;
785: --
786: Begin
787: hr_utility.set_location('Entering:'||l_proc, 5);
788: --
789: -- Ensure that the DateTrack update mode is valid
790: --
791: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
902: l_rec ben_lpr_shd.g_rec_type;
903: l_proc varchar2(72) := g_package||'upd';
904: --
905: Begin
906: hr_utility.set_location('Entering:'||l_proc, 5);
907: --
908: -- Call conversion function to turn arguments into the
909: -- l_rec structure.
910: --
970: p_effective_start_date := l_rec.effective_start_date;
971: p_effective_end_date := l_rec.effective_end_date;
972: --
973: --
974: hr_utility.set_location(' Leaving:'||l_proc, 10);
975: End upd;
976: --
977: end ben_lpr_upd;