86: --
87: hr_utility.set_location(' Leaving:'||l_proc, 10);
88: --
89: Exception
90: When hr_api.check_integrity_violated Then
91: -- A check constraint has been violated
92: per_naa_shd.g_api_dml := false; -- Unset the api dml status
93: per_naa_shd.constraint_error
94: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
90: When hr_api.check_integrity_violated Then
91: -- A check constraint has been violated
92: per_naa_shd.g_api_dml := false; -- Unset the api dml status
93: per_naa_shd.constraint_error
94: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
95: When hr_api.parent_integrity_violated Then
96: -- Parent integrity has been violated
97: per_naa_shd.g_api_dml := false; -- Unset the api dml status
98: per_naa_shd.constraint_error
91: -- A check constraint has been violated
92: per_naa_shd.g_api_dml := false; -- Unset the api dml status
93: per_naa_shd.constraint_error
94: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
95: When hr_api.parent_integrity_violated Then
96: -- Parent integrity has been violated
97: per_naa_shd.g_api_dml := false; -- Unset the api dml status
98: per_naa_shd.constraint_error
99: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
95: When hr_api.parent_integrity_violated Then
96: -- Parent integrity has been violated
97: per_naa_shd.g_api_dml := false; -- Unset the api dml status
98: per_naa_shd.constraint_error
99: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
100: When hr_api.unique_integrity_violated Then
101: -- Unique integrity has been violated
102: per_naa_shd.g_api_dml := false; -- Unset the api dml status
103: per_naa_shd.constraint_error
96: -- Parent integrity has been violated
97: per_naa_shd.g_api_dml := false; -- Unset the api dml status
98: per_naa_shd.constraint_error
99: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
100: When hr_api.unique_integrity_violated Then
101: -- Unique integrity has been violated
102: per_naa_shd.g_api_dml := false; -- Unset the api dml status
103: per_naa_shd.constraint_error
104: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
100: When hr_api.unique_integrity_violated Then
101: -- Unique integrity has been violated
102: per_naa_shd.g_api_dml := false; -- Unset the api dml status
103: per_naa_shd.constraint_error
104: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
105: When Others Then
106: per_naa_shd.g_api_dml := false; -- Unset the api dml status
107: Raise;
108: End update_dml;
241: );
242: --
243: exception
244: --
245: when hr_api.cannot_find_prog_unit then
246: --
247: hr_api.cannot_find_prog_unit_error
248: (p_module_name => 'PER_NL_ABSENCE_ACTIONS'
249: ,p_hook_type => 'AU');
243: exception
244: --
245: when hr_api.cannot_find_prog_unit then
246: --
247: hr_api.cannot_find_prog_unit_error
248: (p_module_name => 'PER_NL_ABSENCE_ACTIONS'
249: ,p_hook_type => 'AU');
250: --
251: end;
306: -- p_rec plsql record structure
307: -- to see if a system default is being used. If a system default
308: -- is being used then we must set to the 'current' argument value.
309: --
310: If (p_rec.absence_attendance_id = hr_api.g_number) then
311: p_rec.absence_attendance_id :=
312: per_naa_shd.g_old_rec.absence_attendance_id;
313: End If;
314: If (p_rec.expected_date = hr_api.g_date) then
310: If (p_rec.absence_attendance_id = hr_api.g_number) then
311: p_rec.absence_attendance_id :=
312: per_naa_shd.g_old_rec.absence_attendance_id;
313: End If;
314: If (p_rec.expected_date = hr_api.g_date) then
315: p_rec.expected_date :=
316: per_naa_shd.g_old_rec.expected_date;
317: End If;
318: If (p_rec.description = hr_api.g_varchar2) then
314: If (p_rec.expected_date = hr_api.g_date) then
315: p_rec.expected_date :=
316: per_naa_shd.g_old_rec.expected_date;
317: End If;
318: If (p_rec.description = hr_api.g_varchar2) then
319: p_rec.description :=
320: per_naa_shd.g_old_rec.description;
321: End If;
322: If (p_rec.actual_start_date = hr_api.g_date) then
318: If (p_rec.description = hr_api.g_varchar2) then
319: p_rec.description :=
320: per_naa_shd.g_old_rec.description;
321: End If;
322: If (p_rec.actual_start_date = hr_api.g_date) then
323: p_rec.actual_start_date :=
324: per_naa_shd.g_old_rec.actual_start_date;
325: End If;
326: If (p_rec.actual_end_date = hr_api.g_date) then
322: If (p_rec.actual_start_date = hr_api.g_date) then
323: p_rec.actual_start_date :=
324: per_naa_shd.g_old_rec.actual_start_date;
325: End If;
326: If (p_rec.actual_end_date = hr_api.g_date) then
327: p_rec.actual_end_date :=
328: per_naa_shd.g_old_rec.actual_end_date;
329: End If;
330: If (p_rec.holder = hr_api.g_varchar2) then
326: If (p_rec.actual_end_date = hr_api.g_date) then
327: p_rec.actual_end_date :=
328: per_naa_shd.g_old_rec.actual_end_date;
329: End If;
330: If (p_rec.holder = hr_api.g_varchar2) then
331: p_rec.holder :=
332: per_naa_shd.g_old_rec.holder;
333: End If;
334: If (p_rec.comments = hr_api.g_varchar2) then
330: If (p_rec.holder = hr_api.g_varchar2) then
331: p_rec.holder :=
332: per_naa_shd.g_old_rec.holder;
333: End If;
334: If (p_rec.comments = hr_api.g_varchar2) then
335: p_rec.comments :=
336: per_naa_shd.g_old_rec.comments;
337: End If;
338: If (p_rec.document_file_name = hr_api.g_varchar2) then
334: If (p_rec.comments = hr_api.g_varchar2) then
335: p_rec.comments :=
336: per_naa_shd.g_old_rec.comments;
337: End If;
338: If (p_rec.document_file_name = hr_api.g_varchar2) then
339: p_rec.document_file_name :=
340: per_naa_shd.g_old_rec.document_file_name;
341: End If;
342: If (p_rec.last_updated_by = hr_api.g_number) then
338: If (p_rec.document_file_name = hr_api.g_varchar2) then
339: p_rec.document_file_name :=
340: per_naa_shd.g_old_rec.document_file_name;
341: End If;
342: If (p_rec.last_updated_by = hr_api.g_number) then
343: p_rec.last_updated_by :=
344: per_naa_shd.g_old_rec.last_updated_by;
345: End If;
346: If (p_rec.enabled = hr_api.g_varchar2) then
342: If (p_rec.last_updated_by = hr_api.g_number) then
343: p_rec.last_updated_by :=
344: per_naa_shd.g_old_rec.last_updated_by;
345: End If;
346: If (p_rec.enabled = hr_api.g_varchar2) then
347: p_rec.enabled :=
348: per_naa_shd.g_old_rec.enabled;
349: End If;
350: