18: --
19: Begin
20: --
21: If (p_constraint_name = 'AME_RULE_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_RULE_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_RULE_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_RULE_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: --
100: Close C_Sel1;
101: --
102: -- The primary key is invalid therefore we must error
103: --
104: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
105: fnd_message.raise_error;
106: End If;
107: Close C_Sel1;
108: If (p_object_version_number
101: --
102: -- The primary key is invalid therefore we must error
103: --
104: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
105: fnd_message.raise_error;
106: End If;
107: Close C_Sel1;
108: If (p_object_version_number
109: <> ame_rlu_shd.g_old_rec.object_version_number) Then
106: End If;
107: Close C_Sel1;
108: If (p_object_version_number
109: <> ame_rlu_shd.g_old_rec.object_version_number) Then
110: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
111: fnd_message.raise_error;
112: End If;
113: l_fct_ret := true;
114: End If;
107: Close C_Sel1;
108: If (p_object_version_number
109: <> ame_rlu_shd.g_old_rec.object_version_number) Then
110: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
111: fnd_message.raise_error;
112: End If;
113: l_fct_ret := true;
114: End If;
115: End If;
260: Close C_Sel1;
261: --
262: -- The primary key is invalid therefore we must error
263: --
264: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
265: fnd_message.raise_error;
266: End If;
267: Close C_Sel1;
268: If (p_object_version_number
261: --
262: -- The primary key is invalid therefore we must error
263: --
264: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
265: fnd_message.raise_error;
266: End If;
267: Close C_Sel1;
268: If (p_object_version_number
269: <> ame_rlu_shd.g_old_rec.object_version_number) Then
266: End If;
267: Close C_Sel1;
268: If (p_object_version_number
269: <> ame_rlu_shd.g_old_rec.object_version_number) Then
270: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
271: fnd_message.raise_error;
272: End If;
273: --
274: --
267: Close C_Sel1;
268: If (p_object_version_number
269: <> ame_rlu_shd.g_old_rec.object_version_number) Then
270: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
271: fnd_message.raise_error;
272: End If;
273: --
274: --
275: --
278: -- We are doing a datetrack 'INSERT' which is illegal within this
279: -- procedure therefore we must error (note: to lck on insert the
280: -- private procedure ins_lck should be called).
281: --
282: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
283: fnd_message.set_token('PROCEDURE', l_proc);
284: fnd_message.set_token('STEP','20');
285: fnd_message.raise_error;
286: End If;
279: -- procedure therefore we must error (note: to lck on insert the
280: -- private procedure ins_lck should be called).
281: --
282: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
283: fnd_message.set_token('PROCEDURE', l_proc);
284: fnd_message.set_token('STEP','20');
285: fnd_message.raise_error;
286: End If;
287: --
280: -- private procedure ins_lck should be called).
281: --
282: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
283: fnd_message.set_token('PROCEDURE', l_proc);
284: fnd_message.set_token('STEP','20');
285: fnd_message.raise_error;
286: End If;
287: --
288: -- Set the validation start and end date OUT arguments
281: --
282: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
283: fnd_message.set_token('PROCEDURE', l_proc);
284: fnd_message.set_token('STEP','20');
285: fnd_message.raise_error;
286: End If;
287: --
288: -- Set the validation start and end date OUT arguments
289: --
310: for update of end_date nowait;
311: exception
312: when others then
313: --
314: fnd_message.set_name('PER', 'AME_99999_CANT_LOCK_PARENT');
315: fnd_message.set_token('PROCEDURE', l_proc);
316: fnd_message.set_token('STEP','40');
317: fnd_message.raise_error;
318: end;
311: exception
312: when others then
313: --
314: fnd_message.set_name('PER', 'AME_99999_CANT_LOCK_PARENT');
315: fnd_message.set_token('PROCEDURE', l_proc);
316: fnd_message.set_token('STEP','40');
317: fnd_message.raise_error;
318: end;
319: hr_utility.set_location(' Leaving:'||l_proc, 30);
312: when others then
313: --
314: fnd_message.set_name('PER', 'AME_99999_CANT_LOCK_PARENT');
315: fnd_message.set_token('PROCEDURE', l_proc);
316: fnd_message.set_token('STEP','40');
317: fnd_message.raise_error;
318: end;
319: hr_utility.set_location(' Leaving:'||l_proc, 30);
320: --
313: --
314: fnd_message.set_name('PER', 'AME_99999_CANT_LOCK_PARENT');
315: fnd_message.set_token('PROCEDURE', l_proc);
316: fnd_message.set_token('STEP','40');
317: fnd_message.raise_error;
318: end;
319: hr_utility.set_location(' Leaving:'||l_proc, 30);
320: --
321: -- We need to trap the ORA LOCK exception
325: --
326: -- The object is locked therefore we need to supply a meaningful
327: -- error message.
328: --
329: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
330: fnd_message.set_token('TABLE_NAME', 'ame_rule_usages');
331: fnd_message.raise_error;
332: End lck;
333: --
326: -- The object is locked therefore we need to supply a meaningful
327: -- error message.
328: --
329: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
330: fnd_message.set_token('TABLE_NAME', 'ame_rule_usages');
331: fnd_message.raise_error;
332: End lck;
333: --
334: -- ----------------------------------------------------------------------------
327: -- error message.
328: --
329: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
330: fnd_message.set_token('TABLE_NAME', 'ame_rule_usages');
331: fnd_message.raise_error;
332: End lck;
333: --
334: -- ----------------------------------------------------------------------------
335: -- |-----------------------------< convert_args >-----------------------------|