[Home] [Help]
17: l_proc varchar2(72) := g_package||'constraint_error';
18: --
19: Begin
20: --
21: If (p_constraint_name = 'AME_APPROVER_TYPE_USAGES_PK') Then
22: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
23: fnd_message.set_token('PROCEDURE', l_proc);
24: fnd_message.set_token('STEP','5');
25: fnd_message.raise_error;
50: ,action_type_id
51: ,start_date
52: ,end_date
53: ,object_version_number
54: from ame_approver_type_usages
55: where approver_type_id = p_approver_type_id
56: and action_type_id = p_action_type_id
57: and p_effective_date
58: between start_date and nvl(end_date - ame_util.oneSecond, p_effective_date);
142: --
143: -- Update the specified datetrack row setting the effective
144: -- end date to the specified new effective end date.
145: --
146: update ame_approver_type_usages t
147: set t.end_date = p_new_end_date
148: ,t.last_updated_by = l_current_user_id
149: ,t.last_update_date = p_new_end_date
150: ,t.last_update_login = l_current_user_id
187: ,action_type_id
188: ,start_date
189: ,end_date
190: ,object_version_number
191: from ame_approver_type_usages
192: where approver_type_id = p_approver_type_id
193: and action_type_id = p_action_type_id
194: and p_effective_date
195: between start_date and nvl(end_date - ame_util.oneSecond, sysdate)
279: -- The object is locked therefore we need to supply a meaningful
280: -- error message.
281: --
282: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
283: fnd_message.set_token('TABLE_NAME', 'ame_approver_type_usages');
284: fnd_message.raise_error;
285: End lck;
286: --
287: -- ----------------------------------------------------------------------------
330: -- get the next ovn
331: --
332: select nvl(max(t.object_version_number),0) + 1
333: into l_ovn
334: from ame_approver_type_usages t
335: where t.approver_type_id = p_approver_type_id
336: and t.action_type_id = p_action_type_id;
337: --
338: -- Return the new object_version_number.