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: --
145: p_rec.effective_start_date := p_validation_start_date;
146: p_rec.effective_end_date := p_validation_end_date;
147: End If;
148: --
149: hr_utility.set_location(' Leaving:'||l_proc, 15);
150: Exception
151: When hr_api.check_integrity_violated Then
152: -- A check constraint has been violated
153: ben_prm_shd.g_api_dml := false; -- Unset the api dml status
203: --
204: l_proc varchar2(72) := g_package||'update_dml';
205: --
206: Begin
207: hr_utility.set_location('Entering:'||l_proc, 5);
208: --
209: dt_update_dml(p_rec => p_rec,
210: p_effective_date => p_effective_date,
211: p_datetrack_mode => p_datetrack_mode,
211: p_datetrack_mode => p_datetrack_mode,
212: p_validation_start_date => p_validation_start_date,
213: p_validation_end_date => p_validation_end_date);
214: --
215: hr_utility.set_location(' Leaving:'||l_proc, 10);
216: End update_dml;
217: --
218: -- ----------------------------------------------------------------------------
219: -- |----------------------------< dt_pre_update >-----------------------------|
268: l_proc varchar2(72) := g_package||'dt_pre_update';
269: l_dummy_version_number number;
270: --
271: Begin
272: hr_utility.set_location('Entering:'||l_proc, 5);
273: If (p_datetrack_mode <> 'CORRECTION') then
274: hr_utility.set_location(l_proc, 10);
275: --
276: -- Update the current effective end date
270: --
271: Begin
272: hr_utility.set_location('Entering:'||l_proc, 5);
273: If (p_datetrack_mode <> 'CORRECTION') then
274: hr_utility.set_location(l_proc, 10);
275: --
276: -- Update the current effective end date
277: --
278: ben_prm_shd.upd_effective_end_date
283: p_validation_end_date => p_validation_end_date,
284: p_object_version_number => l_dummy_version_number);
285: --
286: If (p_datetrack_mode = 'UPDATE_OVERRIDE') then
287: hr_utility.set_location(l_proc, 15);
288: --
289: -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
290: -- delete any future rows
291: --
295: p_datetrack_mode => p_datetrack_mode,
296: p_validation_start_date => p_validation_start_date,
297: p_validation_end_date => p_validation_end_date);
298: End If;
299: hr_utility.set_location(l_proc, 20);
300: --
301: -- We must now insert the updated row
302: --
303: ben_prm_ins.insert_dml
306: p_datetrack_mode => p_datetrack_mode,
307: p_validation_start_date => p_validation_start_date,
308: p_validation_end_date => p_validation_end_date);
309: End If;
310: hr_utility.set_location(' Leaving:'||l_proc, 20);
311: End dt_pre_update;
312: --
313: -- ----------------------------------------------------------------------------
314: -- |------------------------------< pre_update >------------------------------|
352: --
353: l_proc varchar2(72) := g_package||'pre_update';
354: --
355: Begin
356: hr_utility.set_location('Entering:'||l_proc, 5);
357: --
358: --
359: --
360: dt_pre_update
363: p_datetrack_mode => p_datetrack_mode,
364: p_validation_start_date => p_validation_start_date,
365: p_validation_end_date => p_validation_end_date);
366: --
367: hr_utility.set_location(' Leaving:'||l_proc, 10);
368: End pre_update;
369: --
370: -- ----------------------------------------------------------------------------
371: -- |-----------------------------< post_update >------------------------------|
411: l_old_rec ben_ext_chlg.g_prem_mo_rec_type;
412:
413: --
414: Begin
415: hr_utility.set_location('Entering:'||l_proc, 5);
416: --
417: --
418: -- Start of API User Hook for post_update.
419: --
575: --
576: -- End of API User Hook for post_update.
577: --
578: --
579: hr_utility.set_location(' Leaving:'||l_proc, 10);
580: End post_update;
581: --
582: -- ----------------------------------------------------------------------------
583: -- |-----------------------------< convert_defs >-----------------------------|
627: l_proc varchar2(72) := g_package||'convert_defs';
628: --
629: Begin
630: --
631: hr_utility.set_location('Entering:'||l_proc, 5);
632: --
633: -- We must now examine each argument value in the
634: -- p_rec plsql record structure
635: -- to see if a system default is being used. If a system default
827: p_rec.program_update_date :=
828: ben_prm_shd.g_old_rec.program_update_date;
829: End If;
830: --
831: hr_utility.set_location(' Leaving:'||l_proc, 10);
832: --
833: End convert_defs;
834: --
835: -- ----------------------------------------------------------------------------
846: l_validation_start_date date;
847: l_validation_end_date date;
848: --
849: Begin
850: hr_utility.set_location('Entering:'||l_proc, 5);
851: --
852: -- Ensure that the DateTrack update mode is valid
853: --
854: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
969: l_rec ben_prm_shd.g_rec_type;
970: l_proc varchar2(72) := g_package||'upd';
971: --
972: Begin
973: hr_utility.set_location('Entering:'||l_proc, 5);
974: --
975: -- Call conversion function to turn arguments into the
976: -- l_rec structure.
977: --
1041: p_effective_start_date := l_rec.effective_start_date;
1042: p_effective_end_date := l_rec.effective_end_date;
1043: --
1044: --
1045: hr_utility.set_location(' Leaving:'||l_proc, 10);
1046: End upd;
1047: --
1048: end ben_prm_upd;