[Home] [Help]
17: l_proc varchar2(72) := g_package||'constraint_error';
18: --
19: Begin
20: --
21: If (p_constraint_name = 'AME_ACTION_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;
51: ,start_date
52: ,end_date
53: ,security_group_id
54: ,object_version_number
55: from ame_action_type_usages
56: where action_type_id = p_action_type_id
57: and rule_type = p_rule_type
58: and p_effective_date
59: between start_date and nvl(end_date - ame_util.oneSecond, p_effective_date);
143: --
144: -- Update the specified datetrack row setting the effective
145: -- end date to the specified new effective end date.
146: --
147: update ame_action_type_usages t
148: set t.end_date = p_new_end_date
149: ,t.last_updated_by = l_current_user_id
150: ,t.last_update_date = p_new_end_date
151: ,t.last_update_login = l_current_user_id
189: ,start_date
190: ,end_date
191: ,security_group_id
192: ,object_version_number
193: from ame_action_type_usages
194: where action_type_id = p_action_type_id
195: and rule_type = p_rule_type
196: and p_effective_date
197: between start_date and nvl(end_date - ame_util.oneSecond, sysdate)
281: -- The object is locked therefore we need to supply a meaningful
282: -- error message.
283: --
284: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
285: fnd_message.set_token('TABLE_NAME', 'ame_action_type_usages');
286: fnd_message.raise_error;
287: End lck;
288: --
289: -- ----------------------------------------------------------------------------
334: -- get the next ovn
335: --
336: select nvl(max(t.object_version_number),0) + 1
337: into l_ovn
338: from ame_action_type_usages t
339: where t.action_type_id = p_action_type_id
340: and t.rule_type = p_rule_type;
341: --
342: -- Return the new object_version_number.