[Home] [Help]
17: l_proc varchar2(72) := g_package||'constraint_error';
18: --
19: Begin
20: --
21: If (p_constraint_name = 'AME_ACTION_TYPE_CONFIG_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;
53: ,chain_ordering_mode
54: ,start_date
55: ,end_date
56: ,object_version_number
57: from ame_action_type_config
58: where action_type_id = p_action_type_id
59: and application_id = p_application_id
60: and p_effective_date
61: between start_date and nvl(end_date - ame_util.oneSecond,p_effective_date);
145: --
146: -- Update the specified datetrack row setting the effective
147: -- end date to the specified new effective end date.
148: --
149: update ame_action_type_config t
150: set t.end_date = p_new_end_date
151: ,t.last_updated_by = l_current_user_id
152: ,t.last_update_date = p_new_end_date
153: ,t.last_update_login = l_current_user_id
193: ,chain_ordering_mode
194: ,start_date
195: ,end_date
196: ,object_version_number
197: from ame_action_type_config
198: where action_type_id = p_action_type_id
199: and application_id = p_application_id
200: and p_effective_date
201: between start_date and nvl(end_date - ame_util.oneSecond, sysdate)
285: -- The object is locked therefore we need to supply a meaningful
286: -- error message.
287: --
288: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
289: fnd_message.set_token('TABLE_NAME', 'ame_action_type_config');
290: fnd_message.raise_error;
291: End lck;
292: --
293: -- ----------------------------------------------------------------------------
342: -- get the next ovn
343: --
344: select nvl(max(t.object_version_number),0) + 1
345: into l_ovn
346: from ame_action_type_config t
347: where t.action_type_id = p_action_type_id
348: and t.application_id = p_application_id;
349: --
350: -- Return the new object_version_number.