74: --
75: hr_utility.set_location(' Leaving:'||l_proc, 10);
76: --
77: Exception
78: When hr_api.check_integrity_violated Then
79: -- A check constraint has been violated
80: ghr_nre_shd.constraint_error
81: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
82: When hr_api.parent_integrity_violated Then
77: Exception
78: When hr_api.check_integrity_violated Then
79: -- A check constraint has been violated
80: ghr_nre_shd.constraint_error
81: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
82: When hr_api.parent_integrity_violated Then
83: -- Parent integrity has been violated
84: ghr_nre_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
78: When hr_api.check_integrity_violated Then
79: -- A check constraint has been violated
80: ghr_nre_shd.constraint_error
81: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
82: When hr_api.parent_integrity_violated Then
83: -- Parent integrity has been violated
84: ghr_nre_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When hr_api.unique_integrity_violated Then
81: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
82: When hr_api.parent_integrity_violated Then
83: -- Parent integrity has been violated
84: ghr_nre_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When hr_api.unique_integrity_violated Then
87: -- Unique integrity has been violated
88: ghr_nre_shd.constraint_error
89: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
82: When hr_api.parent_integrity_violated Then
83: -- Parent integrity has been violated
84: ghr_nre_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When hr_api.unique_integrity_violated Then
87: -- Unique integrity has been violated
88: ghr_nre_shd.constraint_error
89: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
90: When Others Then
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When hr_api.unique_integrity_violated Then
87: -- Unique integrity has been violated
88: ghr_nre_shd.constraint_error
89: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
90: When Others Then
91: Raise;
92: End update_dml;
93: --
199: );
200: --
201: exception
202: --
203: when hr_api.cannot_find_prog_unit then
204: --
205: hr_api.cannot_find_prog_unit_error
206: (p_module_name => 'ghr_noac_remarks'
207: ,p_hook_type => 'AU');
201: exception
202: --
203: when hr_api.cannot_find_prog_unit then
204: --
205: hr_api.cannot_find_prog_unit_error
206: (p_module_name => 'ghr_noac_remarks'
207: ,p_hook_type => 'AU');
208: --
209: end;
269: -- p_rec plsql record structure
270: -- to see if a system default is being used. If a system default
271: -- is being used then we must set to the 'current' argument value.
272: --
273: If (p_rec.nature_of_action_id = hr_api.g_number) then
274: p_rec.nature_of_action_id :=
275: ghr_nre_shd.g_old_rec.nature_of_action_id;
276: End If;
277: If (p_rec.remark_id = hr_api.g_number) then
273: If (p_rec.nature_of_action_id = hr_api.g_number) then
274: p_rec.nature_of_action_id :=
275: ghr_nre_shd.g_old_rec.nature_of_action_id;
276: End If;
277: If (p_rec.remark_id = hr_api.g_number) then
278: p_rec.remark_id :=
279: ghr_nre_shd.g_old_rec.remark_id;
280: End If;
281: If (p_rec.required_flag = hr_api.g_varchar2) then
277: If (p_rec.remark_id = hr_api.g_number) then
278: p_rec.remark_id :=
279: ghr_nre_shd.g_old_rec.remark_id;
280: End If;
281: If (p_rec.required_flag = hr_api.g_varchar2) then
282: p_rec.required_flag :=
283: ghr_nre_shd.g_old_rec.required_flag;
284: End If;
285: If (p_rec.enabled_flag = hr_api.g_varchar2) then
281: If (p_rec.required_flag = hr_api.g_varchar2) then
282: p_rec.required_flag :=
283: ghr_nre_shd.g_old_rec.required_flag;
284: End If;
285: If (p_rec.enabled_flag = hr_api.g_varchar2) then
286: p_rec.enabled_flag :=
287: ghr_nre_shd.g_old_rec.enabled_flag;
288: End If;
289: If (p_rec.date_from = hr_api.g_date) then
285: If (p_rec.enabled_flag = hr_api.g_varchar2) then
286: p_rec.enabled_flag :=
287: ghr_nre_shd.g_old_rec.enabled_flag;
288: End If;
289: If (p_rec.date_from = hr_api.g_date) then
290: p_rec.date_from :=
291: ghr_nre_shd.g_old_rec.date_from;
292: End If;
293: If (p_rec.date_to = hr_api.g_date) then
289: If (p_rec.date_from = hr_api.g_date) then
290: p_rec.date_from :=
291: ghr_nre_shd.g_old_rec.date_from;
292: End If;
293: If (p_rec.date_to = hr_api.g_date) then
294: p_rec.date_to :=
295: ghr_nre_shd.g_old_rec.date_to;
296: End If;
297:
352: Procedure upd
353: (
354: p_effective_date in date,
355: p_noac_remark_id in number,
356: p_nature_of_action_id in number default hr_api.g_number,
357: p_remark_id in number default hr_api.g_number,
358: p_required_flag in varchar2 default hr_api.g_varchar2,
359: p_enabled_flag in varchar2 default hr_api.g_varchar2,
360: p_date_from in date default hr_api.g_date,
353: (
354: p_effective_date in date,
355: p_noac_remark_id in number,
356: p_nature_of_action_id in number default hr_api.g_number,
357: p_remark_id in number default hr_api.g_number,
358: p_required_flag in varchar2 default hr_api.g_varchar2,
359: p_enabled_flag in varchar2 default hr_api.g_varchar2,
360: p_date_from in date default hr_api.g_date,
361: p_date_to in date default hr_api.g_date,
354: p_effective_date in date,
355: p_noac_remark_id in number,
356: p_nature_of_action_id in number default hr_api.g_number,
357: p_remark_id in number default hr_api.g_number,
358: p_required_flag in varchar2 default hr_api.g_varchar2,
359: p_enabled_flag in varchar2 default hr_api.g_varchar2,
360: p_date_from in date default hr_api.g_date,
361: p_date_to in date default hr_api.g_date,
362: p_object_version_number in out number
355: p_noac_remark_id in number,
356: p_nature_of_action_id in number default hr_api.g_number,
357: p_remark_id in number default hr_api.g_number,
358: p_required_flag in varchar2 default hr_api.g_varchar2,
359: p_enabled_flag in varchar2 default hr_api.g_varchar2,
360: p_date_from in date default hr_api.g_date,
361: p_date_to in date default hr_api.g_date,
362: p_object_version_number in out number
363: ) is
356: p_nature_of_action_id in number default hr_api.g_number,
357: p_remark_id in number default hr_api.g_number,
358: p_required_flag in varchar2 default hr_api.g_varchar2,
359: p_enabled_flag in varchar2 default hr_api.g_varchar2,
360: p_date_from in date default hr_api.g_date,
361: p_date_to in date default hr_api.g_date,
362: p_object_version_number in out number
363: ) is
364: --
357: p_remark_id in number default hr_api.g_number,
358: p_required_flag in varchar2 default hr_api.g_varchar2,
359: p_enabled_flag in varchar2 default hr_api.g_varchar2,
360: p_date_from in date default hr_api.g_date,
361: p_date_to in date default hr_api.g_date,
362: p_object_version_number in out number
363: ) is
364: --
365: l_rec ghr_nre_shd.g_rec_type;