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: --
155: p_rec.effective_start_date := p_validation_start_date;
156: p_rec.effective_end_date := p_validation_end_date;
157: End If;
158: --
159: hr_utility.set_location(' Leaving:'||l_proc, 15);
160: Exception
161: When hr_api.check_integrity_violated Then
162: -- A check constraint has been violated
163: ben_clp_shd.g_api_dml := false; -- Unset the api dml status
213: --
214: l_proc varchar2(72) := g_package||'update_dml';
215: --
216: Begin
217: hr_utility.set_location('Entering:'||l_proc, 5);
218: --
219: dt_update_dml(p_rec => p_rec,
220: p_effective_date => p_effective_date,
221: p_datetrack_mode => p_datetrack_mode,
221: p_datetrack_mode => p_datetrack_mode,
222: p_validation_start_date => p_validation_start_date,
223: p_validation_end_date => p_validation_end_date);
224: --
225: hr_utility.set_location(' Leaving:'||l_proc, 10);
226: End update_dml;
227: --
228: -- ----------------------------------------------------------------------------
229: -- |----------------------------< dt_pre_update >-----------------------------|
278: l_proc varchar2(72) := g_package||'dt_pre_update';
279: l_dummy_version_number number;
280: --
281: Begin
282: hr_utility.set_location('Entering:'||l_proc, 5);
283: If (p_datetrack_mode <> 'CORRECTION') then
284: hr_utility.set_location(l_proc, 10);
285: --
286: -- Update the current effective end date
280: --
281: Begin
282: hr_utility.set_location('Entering:'||l_proc, 5);
283: If (p_datetrack_mode <> 'CORRECTION') then
284: hr_utility.set_location(l_proc, 10);
285: --
286: -- Update the current effective end date
287: --
288: ben_clp_shd.upd_effective_end_date
293: p_validation_end_date => p_validation_end_date,
294: p_object_version_number => l_dummy_version_number);
295: --
296: If (p_datetrack_mode = 'UPDATE_OVERRIDE') then
297: hr_utility.set_location(l_proc, 15);
298: --
299: -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
300: -- delete any future rows
301: --
305: p_datetrack_mode => p_datetrack_mode,
306: p_validation_start_date => p_validation_start_date,
307: p_validation_end_date => p_validation_end_date);
308: End If;
309: hr_utility.set_location(l_proc, 20);
310: --
311: -- We must now insert the updated row
312: --
313: ben_clp_ins.insert_dml
316: p_datetrack_mode => p_datetrack_mode,
317: p_validation_start_date => p_validation_start_date,
318: p_validation_end_date => p_validation_end_date);
319: End If;
320: hr_utility.set_location(' Leaving:'||l_proc, 20);
321: End dt_pre_update;
322: --
323: -- ----------------------------------------------------------------------------
324: -- |------------------------------< pre_update >------------------------------|
362: --
363: l_proc varchar2(72) := g_package||'pre_update';
364: --
365: Begin
366: hr_utility.set_location('Entering:'||l_proc, 5);
367: --
368: --
369: --
370: dt_pre_update
373: p_datetrack_mode => p_datetrack_mode,
374: p_validation_start_date => p_validation_start_date,
375: p_validation_end_date => p_validation_end_date);
376: --
377: hr_utility.set_location(' Leaving:'||l_proc, 10);
378: End pre_update;
379: --
380: -- ----------------------------------------------------------------------------
381: -- |-----------------------------< post_update >------------------------------|
418: --
419: l_proc varchar2(72) := g_package||'post_update';
420: --
421: Begin
422: hr_utility.set_location('Entering:'||l_proc, 5);
423: --
424: -- Start of API User Hook for post_update.
425: --
426: begin
565: end;
566: --
567: -- End of API User Hook for post_update.
568: --
569: hr_utility.set_location(' Leaving:'||l_proc, 10);
570: --
571: End post_update;
572: --
573: -- ----------------------------------------------------------------------------
619: l_proc varchar2(72) := g_package||'convert_defs';
620: --
621: Begin
622: --
623: hr_utility.set_location('Entering:'||l_proc, 5);
624: --
625: -- We must now examine each argument value in the
626: -- p_rec plsql record structure
627: -- to see if a system default is being used. If a system default
859: p_rec.clp_attribute30 :=
860: ben_clp_shd.g_old_rec.clp_attribute30;
861: End If;
862: --
863: hr_utility.set_location(' Leaving:'||l_proc, 10);
864: --
865: End convert_defs;
866: --
867: -- ----------------------------------------------------------------------------
878: l_validation_start_date date;
879: l_validation_end_date date;
880: --
881: Begin
882: hr_utility.set_location('Entering:'||l_proc, 5);
883: --
884: -- Ensure that the DateTrack update mode is valid
885: --
886: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
1011: l_rec ben_clp_shd.g_rec_type;
1012: l_proc varchar2(72) := g_package||'upd';
1013: --
1014: Begin
1015: hr_utility.set_location('Entering:'||l_proc, 5);
1016: --
1017: -- Call conversion function to turn arguments into the
1018: -- l_rec structure.
1019: --
1093: p_effective_start_date := l_rec.effective_start_date;
1094: p_effective_end_date := l_rec.effective_end_date;
1095: --
1096: --
1097: hr_utility.set_location(' Leaving:'||l_proc, 10);
1098: End upd;
1099: --
1100: end ben_clp_upd;