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: --
135: p_rec.effective_start_date := p_validation_start_date;
136: p_rec.effective_end_date := p_validation_end_date;
137: End If;
138: --
139: hr_utility.set_location(' Leaving:'||l_proc, 15);
140: Exception
141: When hr_api.check_integrity_violated Then
142: -- A check constraint has been violated
143: ben_etu_shd.g_api_dml := false; -- Unset the api dml status
193: --
194: l_proc varchar2(72) := g_package||'update_dml';
195: --
196: Begin
197: hr_utility.set_location('Entering:'||l_proc, 5);
198: --
199: dt_update_dml(p_rec => p_rec,
200: p_effective_date => p_effective_date,
201: p_datetrack_mode => p_datetrack_mode,
201: p_datetrack_mode => p_datetrack_mode,
202: p_validation_start_date => p_validation_start_date,
203: p_validation_end_date => p_validation_end_date);
204: --
205: hr_utility.set_location(' Leaving:'||l_proc, 10);
206: End update_dml;
207: --
208: -- ----------------------------------------------------------------------------
209: -- |----------------------------< dt_pre_update >-----------------------------|
258: l_proc varchar2(72) := g_package||'dt_pre_update';
259: l_dummy_version_number number;
260: --
261: Begin
262: hr_utility.set_location('Entering:'||l_proc, 5);
263: If (p_datetrack_mode <> 'CORRECTION') then
264: hr_utility.set_location(l_proc, 10);
265: --
266: -- Update the current effective end date
260: --
261: Begin
262: hr_utility.set_location('Entering:'||l_proc, 5);
263: If (p_datetrack_mode <> 'CORRECTION') then
264: hr_utility.set_location(l_proc, 10);
265: --
266: -- Update the current effective end date
267: --
268: ben_etu_shd.upd_effective_end_date
273: p_validation_end_date => p_validation_end_date,
274: p_object_version_number => l_dummy_version_number);
275: --
276: If (p_datetrack_mode = 'UPDATE_OVERRIDE') then
277: hr_utility.set_location(l_proc, 15);
278: --
279: -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
280: -- delete any future rows
281: --
285: p_datetrack_mode => p_datetrack_mode,
286: p_validation_start_date => p_validation_start_date,
287: p_validation_end_date => p_validation_end_date);
288: End If;
289: hr_utility.set_location(l_proc, 20);
290: --
291: -- We must now insert the updated row
292: --
293: ben_etu_ins.insert_dml
296: p_datetrack_mode => p_datetrack_mode,
297: p_validation_start_date => p_validation_start_date,
298: p_validation_end_date => p_validation_end_date);
299: End If;
300: hr_utility.set_location(' Leaving:'||l_proc, 20);
301: End dt_pre_update;
302: --
303: -- ----------------------------------------------------------------------------
304: -- |------------------------------< pre_update >------------------------------|
342: --
343: l_proc varchar2(72) := g_package||'pre_update';
344: --
345: Begin
346: hr_utility.set_location('Entering:'||l_proc, 5);
347: --
348: --
349: --
350: dt_pre_update
353: p_datetrack_mode => p_datetrack_mode,
354: p_validation_start_date => p_validation_start_date,
355: p_validation_end_date => p_validation_end_date);
356: --
357: hr_utility.set_location(' Leaving:'||l_proc, 10);
358: End pre_update;
359: --
360: -- ----------------------------------------------------------------------------
361: -- |-----------------------------< post_update >------------------------------|
398: --
399: l_proc varchar2(72) := g_package||'post_update';
400: --
401: Begin
402: hr_utility.set_location('Entering:'||l_proc, 5);
403: --
404: --
405: -- Start of API User Hook for post_update.
406: --
510: --
511: -- End of API User Hook for post_update.
512: --
513: --
514: hr_utility.set_location(' Leaving:'||l_proc, 10);
515: End post_update;
516: --
517: -- ----------------------------------------------------------------------------
518: -- |-----------------------------< convert_defs >-----------------------------|
562: l_proc varchar2(72) := g_package||'convert_defs';
563: --
564: Begin
565: --
566: hr_utility.set_location('Entering:'||l_proc, 5);
567: --
568: -- We must now examine each argument value in the
569: -- p_rec plsql record structure
570: -- to see if a system default is being used. If a system default
727:
728:
729:
730: --
731: hr_utility.set_location(' Leaving:'||l_proc, 10);
732: --
733: End convert_defs;
734: --
735: -- ----------------------------------------------------------------------------
746: l_validation_start_date date;
747: l_validation_end_date date;
748: --
749: Begin
750: hr_utility.set_location('Entering:'||l_proc, 5);
751: --
752: -- Ensure that the DateTrack update mode is valid
753: --
754: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
860: l_rec ben_etu_shd.g_rec_type;
861: l_proc varchar2(72) := g_package||'upd';
862: --
863: Begin
864: hr_utility.set_location('Entering:'||l_proc, 5);
865: --
866: -- Call conversion function to turn arguments into the
867: -- l_rec structure.
868: --
922: p_effective_start_date := l_rec.effective_start_date;
923: p_effective_end_date := l_rec.effective_end_date;
924: --
925: --
926: hr_utility.set_location(' Leaving:'||l_proc, 10);
927: End upd;
928: --
929: end ben_etu_upd;