18: --
19: Begin
20: --
21: If (p_constraint_name = 'AME_ACTION_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;
26: Else
19: Begin
20: --
21: If (p_constraint_name = 'AME_ACTION_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;
26: Else
27: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
20: --
21: If (p_constraint_name = 'AME_ACTION_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;
26: Else
27: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
28: fnd_message.set_token('PROCEDURE', l_proc);
21: If (p_constraint_name = 'AME_ACTION_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;
26: Else
27: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
23: fnd_message.set_token('PROCEDURE', l_proc);
24: fnd_message.set_token('STEP','5');
25: fnd_message.raise_error;
26: Else
27: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
30: fnd_message.raise_error;
31: End If;
24: fnd_message.set_token('STEP','5');
25: fnd_message.raise_error;
26: Else
27: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
30: fnd_message.raise_error;
31: End If;
32: --
25: fnd_message.raise_error;
26: Else
27: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
30: fnd_message.raise_error;
31: End If;
32: --
33: End constraint_error;
26: Else
27: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
30: fnd_message.raise_error;
31: End If;
32: --
33: End constraint_error;
34: --
95: Close C_Sel1;
96: --
97: -- The primary key is invalid therefore we must error
98: --
99: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
100: fnd_message.raise_error;
101: End If;
102: Close C_Sel1;
103: If (p_object_version_number
96: --
97: -- The primary key is invalid therefore we must error
98: --
99: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
100: fnd_message.raise_error;
101: End If;
102: Close C_Sel1;
103: If (p_object_version_number
104: <> ame_acu_shd.g_old_rec.object_version_number) Then
101: End If;
102: Close C_Sel1;
103: If (p_object_version_number
104: <> ame_acu_shd.g_old_rec.object_version_number) Then
105: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
106: fnd_message.raise_error;
107: End If;
108: l_fct_ret := true;
109: End If;
102: Close C_Sel1;
103: If (p_object_version_number
104: <> ame_acu_shd.g_old_rec.object_version_number) Then
105: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
106: fnd_message.raise_error;
107: End If;
108: l_fct_ret := true;
109: End If;
110: End If;
245: Close C_Sel1;
246: --
247: -- The primary key is invalid therefore we must error
248: --
249: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
250: fnd_message.raise_error;
251: End If;
252: Close C_Sel1;
253: If (p_object_version_number
246: --
247: -- The primary key is invalid therefore we must error
248: --
249: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
250: fnd_message.raise_error;
251: End If;
252: Close C_Sel1;
253: If (p_object_version_number
254: <> ame_acu_shd.g_old_rec.object_version_number) Then
251: End If;
252: Close C_Sel1;
253: If (p_object_version_number
254: <> ame_acu_shd.g_old_rec.object_version_number) Then
255: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
256: fnd_message.raise_error;
257: End If;
258: --
259: --
252: Close C_Sel1;
253: If (p_object_version_number
254: <> ame_acu_shd.g_old_rec.object_version_number) Then
255: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
256: fnd_message.raise_error;
257: End If;
258: --
259: --
260: --
263: -- We are doing a datetrack 'INSERT' which is illegal within this
264: -- procedure therefore we must error (note: to lck on insert the
265: -- private procedure ins_lck should be called).
266: --
267: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
268: fnd_message.set_token('PROCEDURE', l_proc);
269: fnd_message.set_token('STEP','20');
270: fnd_message.raise_error;
271: End If;
264: -- procedure therefore we must error (note: to lck on insert the
265: -- private procedure ins_lck should be called).
266: --
267: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
268: fnd_message.set_token('PROCEDURE', l_proc);
269: fnd_message.set_token('STEP','20');
270: fnd_message.raise_error;
271: End If;
272: --
265: -- private procedure ins_lck should be called).
266: --
267: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
268: fnd_message.set_token('PROCEDURE', l_proc);
269: fnd_message.set_token('STEP','20');
270: fnd_message.raise_error;
271: End If;
272: --
273: -- Set the validation start and end date OUT arguments
266: --
267: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
268: fnd_message.set_token('PROCEDURE', l_proc);
269: fnd_message.set_token('STEP','20');
270: fnd_message.raise_error;
271: End If;
272: --
273: -- Set the validation start and end date OUT arguments
274: --
303: for update of end_date nowait;*/
304: exception
305: when others then
306: --
307: fnd_message.set_name('PER', 'AME_99999_CANT_LOCK_PARENT');
308: fnd_message.set_token('PROCEDURE', l_proc);
309: fnd_message.set_token('STEP','40');
310: fnd_message.raise_error;
311: end;
304: exception
305: when others then
306: --
307: fnd_message.set_name('PER', 'AME_99999_CANT_LOCK_PARENT');
308: fnd_message.set_token('PROCEDURE', l_proc);
309: fnd_message.set_token('STEP','40');
310: fnd_message.raise_error;
311: end;
312: --
305: when others then
306: --
307: fnd_message.set_name('PER', 'AME_99999_CANT_LOCK_PARENT');
308: fnd_message.set_token('PROCEDURE', l_proc);
309: fnd_message.set_token('STEP','40');
310: fnd_message.raise_error;
311: end;
312: --
313: -- We need to trap the ORA LOCK exception
306: --
307: fnd_message.set_name('PER', 'AME_99999_CANT_LOCK_PARENT');
308: fnd_message.set_token('PROCEDURE', l_proc);
309: fnd_message.set_token('STEP','40');
310: fnd_message.raise_error;
311: end;
312: --
313: -- We need to trap the ORA LOCK exception
314: --
317: --
318: -- The object is locked therefore we need to supply a meaningful
319: -- error message.
320: --
321: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
322: fnd_message.set_token('TABLE_NAME', 'ame_action_usages');
323: fnd_message.raise_error;
324: End lck;
325: --
318: -- The object is locked therefore we need to supply a meaningful
319: -- error message.
320: --
321: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
322: fnd_message.set_token('TABLE_NAME', 'ame_action_usages');
323: fnd_message.raise_error;
324: End lck;
325: --
326: -- ----------------------------------------------------------------------------
319: -- error message.
320: --
321: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
322: fnd_message.set_token('TABLE_NAME', 'ame_action_usages');
323: fnd_message.raise_error;
324: End lck;
325: --
326: -- ----------------------------------------------------------------------------
327: -- |-----------------------------< convert_args >-----------------------------|