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: pqh_rlm_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: pqh_rlm_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: pqh_rlm_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: pqh_rlm_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: pqh_rlm_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: pqh_rlm_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: pqh_rlm_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: pqh_rlm_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: pqh_rlm_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: pqh_rlm_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 => 'pqh_routing_list_members'
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 => 'pqh_routing_list_members'
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.role_id = hr_api.g_number) then
274: p_rec.role_id :=
275: pqh_rlm_shd.g_old_rec.role_id;
276: End If;
277: If (p_rec.routing_list_id = hr_api.g_number) then
273: If (p_rec.role_id = hr_api.g_number) then
274: p_rec.role_id :=
275: pqh_rlm_shd.g_old_rec.role_id;
276: End If;
277: If (p_rec.routing_list_id = hr_api.g_number) then
278: p_rec.routing_list_id :=
279: pqh_rlm_shd.g_old_rec.routing_list_id;
280: End If;
281: If (p_rec.seq_no = hr_api.g_number) then
277: If (p_rec.routing_list_id = hr_api.g_number) then
278: p_rec.routing_list_id :=
279: pqh_rlm_shd.g_old_rec.routing_list_id;
280: End If;
281: If (p_rec.seq_no = hr_api.g_number) then
282: p_rec.seq_no :=
283: pqh_rlm_shd.g_old_rec.seq_no;
284: End If;
285: If (p_rec.approver_flag = hr_api.g_varchar2) then
281: If (p_rec.seq_no = hr_api.g_number) then
282: p_rec.seq_no :=
283: pqh_rlm_shd.g_old_rec.seq_no;
284: End If;
285: If (p_rec.approver_flag = hr_api.g_varchar2) then
286: p_rec.approver_flag :=
287: pqh_rlm_shd.g_old_rec.approver_flag;
288: End If;
289: If (p_rec.enable_flag = hr_api.g_varchar2) then
285: If (p_rec.approver_flag = hr_api.g_varchar2) then
286: p_rec.approver_flag :=
287: pqh_rlm_shd.g_old_rec.approver_flag;
288: End If;
289: If (p_rec.enable_flag = hr_api.g_varchar2) then
290: p_rec.enable_flag :=
291: pqh_rlm_shd.g_old_rec.enable_flag;
292: End If;
293: If (p_rec.user_id = hr_api.g_number) then
289: If (p_rec.enable_flag = hr_api.g_varchar2) then
290: p_rec.enable_flag :=
291: pqh_rlm_shd.g_old_rec.enable_flag;
292: End If;
293: If (p_rec.user_id = hr_api.g_number) then
294: p_rec.user_id :=
295: pqh_rlm_shd.g_old_rec.user_id;
296: End If;
297: --
350: -- ----------------------------------------------------------------------------
351: Procedure upd
352: (
353: p_effective_date in date,
354: p_role_id in number default hr_api.g_number,
355: p_routing_list_id in number default hr_api.g_number,
356: p_routing_list_member_id in number,
357: p_seq_no in number default hr_api.g_number,
358: p_approver_flag in varchar2 default hr_api.g_varchar2,
351: Procedure upd
352: (
353: p_effective_date in date,
354: p_role_id in number default hr_api.g_number,
355: p_routing_list_id in number default hr_api.g_number,
356: p_routing_list_member_id in number,
357: p_seq_no in number default hr_api.g_number,
358: p_approver_flag in varchar2 default hr_api.g_varchar2,
359: p_enable_flag in varchar2 default hr_api.g_varchar2,
353: p_effective_date in date,
354: p_role_id in number default hr_api.g_number,
355: p_routing_list_id in number default hr_api.g_number,
356: p_routing_list_member_id in number,
357: p_seq_no in number default hr_api.g_number,
358: p_approver_flag in varchar2 default hr_api.g_varchar2,
359: p_enable_flag in varchar2 default hr_api.g_varchar2,
360: p_object_version_number in out nocopy number,
361: p_user_id in number default hr_api.g_number
354: p_role_id in number default hr_api.g_number,
355: p_routing_list_id in number default hr_api.g_number,
356: p_routing_list_member_id in number,
357: p_seq_no in number default hr_api.g_number,
358: p_approver_flag in varchar2 default hr_api.g_varchar2,
359: p_enable_flag in varchar2 default hr_api.g_varchar2,
360: p_object_version_number in out nocopy number,
361: p_user_id in number default hr_api.g_number
362: ) is
355: p_routing_list_id in number default hr_api.g_number,
356: p_routing_list_member_id in number,
357: p_seq_no in number default hr_api.g_number,
358: p_approver_flag in varchar2 default hr_api.g_varchar2,
359: p_enable_flag in varchar2 default hr_api.g_varchar2,
360: p_object_version_number in out nocopy number,
361: p_user_id in number default hr_api.g_number
362: ) is
363: --
357: p_seq_no in number default hr_api.g_number,
358: p_approver_flag in varchar2 default hr_api.g_varchar2,
359: p_enable_flag in varchar2 default hr_api.g_varchar2,
360: p_object_version_number in out nocopy number,
361: p_user_id in number default hr_api.g_number
362: ) is
363: --
364: l_rec pqh_rlm_shd.g_rec_type;
365: l_proc varchar2(72) := g_package||'upd';