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: --
194: p_rec.effective_start_date := p_validation_start_date;
195: p_rec.effective_end_date := p_validation_end_date;
196: End If;
197: --
198: hr_utility.set_location(' Leaving:'||l_proc, 15);
199: Exception
200: When hr_api.check_integrity_violated Then
201: -- A check constraint has been violated
202: ben_pep_shd.g_api_dml := false; -- Unset the api dml status
252: --
253: l_proc varchar2(72) := g_package||'update_dml';
254: --
255: Begin
256: hr_utility.set_location('Entering:'||l_proc, 5);
257: --
258: dt_update_dml(p_rec => p_rec,
259: p_effective_date => p_effective_date,
260: p_datetrack_mode => p_datetrack_mode,
260: p_datetrack_mode => p_datetrack_mode,
261: p_validation_start_date => p_validation_start_date,
262: p_validation_end_date => p_validation_end_date);
263: --
264: hr_utility.set_location(' Leaving:'||l_proc, 10);
265: End update_dml;
266: --
267: -- ----------------------------------------------------------------------------
268: -- |----------------------------< dt_pre_update >-----------------------------|
317: l_proc varchar2(72) := g_package||'dt_pre_update';
318: l_dummy_version_number number;
319: --
320: Begin
321: hr_utility.set_location('Entering:'||l_proc, 5);
322: If (p_datetrack_mode <> 'CORRECTION') then
323: hr_utility.set_location(l_proc, 10);
324: --
325: -- Update the current effective end date
319: --
320: Begin
321: hr_utility.set_location('Entering:'||l_proc, 5);
322: If (p_datetrack_mode <> 'CORRECTION') then
323: hr_utility.set_location(l_proc, 10);
324: --
325: -- Update the current effective end date
326: --
327: ben_pep_shd.upd_effective_end_date
332: p_validation_end_date => p_validation_end_date,
333: p_object_version_number => l_dummy_version_number);
334: --
335: If (p_datetrack_mode = 'UPDATE_OVERRIDE') then
336: hr_utility.set_location(l_proc, 15);
337: --
338: -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
339: -- delete any future rows
340: --
344: p_datetrack_mode => p_datetrack_mode,
345: p_validation_start_date => p_validation_start_date,
346: p_validation_end_date => p_validation_end_date);
347: End If;
348: hr_utility.set_location(l_proc, 20);
349: --
350: -- We must now insert the updated row
351: --
352: ben_pep_ins.insert_dml
355: p_datetrack_mode => p_datetrack_mode,
356: p_validation_start_date => p_validation_start_date,
357: p_validation_end_date => p_validation_end_date);
358: End If;
359: hr_utility.set_location(' Leaving:'||l_proc, 20);
360: End dt_pre_update;
361: --
362: -- ----------------------------------------------------------------------------
363: -- |------------------------------< pre_update >------------------------------|
401: --
402: l_proc varchar2(72) := g_package||'pre_update';
403: --
404: Begin
405: hr_utility.set_location('Entering:'||l_proc, 5);
406: --
407: --
408: --
409: dt_pre_update
412: p_datetrack_mode => p_datetrack_mode,
413: p_validation_start_date => p_validation_start_date,
414: p_validation_end_date => p_validation_end_date);
415: --
416: hr_utility.set_location(' Leaving:'||l_proc, 10);
417: End pre_update;
418: --
419: -- ----------------------------------------------------------------------------
420: -- |-----------------------------< post_update >------------------------------|
457: --
458: l_proc varchar2(72) := g_package||'post_update';
459: --
460: Begin
461: hr_utility.set_location('Entering:'||l_proc, 5);
462:
463: ben_pep_rku.after_update
464: (
465: p_elig_per_id => p_rec.elig_per_id,
726: l_proc varchar2(72) := g_package||'convert_defs';
727: --
728: Begin
729: --
730: hr_utility.set_location('Entering:'||l_proc, 5);
731: --
732: -- We must now examine each argument value in the
733: -- p_rec plsql record structure
734: -- to see if a system default is being used. If a system default
1123: p_rec.program_update_date :=
1124: ben_pep_shd.g_old_rec.program_update_date;
1125: End If;
1126: --
1127: hr_utility.set_location(' Leaving:'||l_proc, 10);
1128: --
1129: End convert_defs;
1130: --
1131: -- ----------------------------------------------------------------------------
1142: l_validation_start_date date;
1143: l_validation_end_date date;
1144: --
1145: Begin
1146: hr_utility.set_location('Entering:'||l_proc, 5);
1147: --
1148: -- Ensure that the DateTrack update mode is valid
1149: --
1150: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
1314: l_rec ben_pep_shd.g_rec_type;
1315: l_proc varchar2(72) := g_package||'upd';
1316: --
1317: Begin
1318: hr_utility.set_location('Entering:'||l_proc, 5);
1319: --
1320: -- Call conversion function to turn arguments into the
1321: -- l_rec structure.
1322: --
1435: p_effective_start_date := l_rec.effective_start_date;
1436: p_effective_end_date := l_rec.effective_end_date;
1437: --
1438: --
1439: hr_utility.set_location(' Leaving:'||l_proc, 10);
1440: End upd;
1441: --
1442: end ben_pep_upd;