66: --
67: Begin
68: hr_utility.set_location('Entering:'||l_proc, 5);
69: --
70: If (p_datetrack_mode = hr_api.g_correction) then
71: hr_utility.set_location(l_proc, 10);
72: --
73: -- Because we are updating a row we must get the next object
74: -- version number.
103: End If;
104: --
105: hr_utility.set_location(' Leaving:'||l_proc, 15);
106: Exception
107: When hr_api.check_integrity_violated Then
108: -- A check constraint has been violated
109: --
110: ame_apu_shd.constraint_error
111: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
107: When hr_api.check_integrity_violated Then
108: -- A check constraint has been violated
109: --
110: ame_apu_shd.constraint_error
111: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
112: When hr_api.unique_integrity_violated Then
113: -- Unique integrity has been violated
114: --
115: ame_apu_shd.constraint_error
108: -- A check constraint has been violated
109: --
110: ame_apu_shd.constraint_error
111: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
112: When hr_api.unique_integrity_violated Then
113: -- Unique integrity has been violated
114: --
115: ame_apu_shd.constraint_error
116: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
112: When hr_api.unique_integrity_violated Then
113: -- Unique integrity has been violated
114: --
115: ame_apu_shd.constraint_error
116: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
117: When Others Then
118: --
119: Raise;
120: End dt_update_dml;
229: l_dummy_version_number number;
230: --
231: Begin
232: hr_utility.set_location('Entering:'||l_proc, 5);
233: If (p_datetrack_mode <> hr_api.g_correction) then
234: --
235: -- Update the current effective end date
236: --
237: ame_apu_shd.upd_end_date
243: ,p_validation_end_date => p_validation_end_date
244: ,p_object_version_number => l_dummy_version_number
245: );
246: --
247: If (p_datetrack_mode = hr_api.g_update_override) then
248: --
249: -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
250: -- delete any future rows
251: --
403: );
404: --
405: exception
406: --
407: when hr_api.cannot_find_prog_unit then
408: --
409: hr_api.cannot_find_prog_unit_error
410: (p_module_name => 'AME_APPROVER_TYPE_USAGES'
411: ,p_hook_type => 'AU');
405: exception
406: --
407: when hr_api.cannot_find_prog_unit then
408: --
409: hr_api.cannot_find_prog_unit_error
410: (p_module_name => 'AME_APPROVER_TYPE_USAGES'
411: ,p_hook_type => 'AU');
412: --
413: end;