18: --
19: Begin
20: --
21: If (p_constraint_name = 'AME_RULES_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_RULES_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_RULES_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_RULES_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_rul_shd.g_old_rec.object_version_number) Then
101: End If;
102: Close C_Sel1;
103: If (p_object_version_number
104: <> ame_rul_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_rul_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;
246: Close C_Sel1;
247: --
248: -- The primary key is invalid therefore we must error
249: --
250: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
251: fnd_message.raise_error;
252: End If;
253: Close C_Sel1;
254: If (p_object_version_number
247: --
248: -- The primary key is invalid therefore we must error
249: --
250: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
251: fnd_message.raise_error;
252: End If;
253: Close C_Sel1;
254: If (p_object_version_number
255: <> ame_rul_shd.g_old_rec.object_version_number) Then
252: End If;
253: Close C_Sel1;
254: If (p_object_version_number
255: <> ame_rul_shd.g_old_rec.object_version_number) Then
256: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
257: fnd_message.raise_error;
258: End If;
259: --
260: --
253: Close C_Sel1;
254: If (p_object_version_number
255: <> ame_rul_shd.g_old_rec.object_version_number) Then
256: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
257: fnd_message.raise_error;
258: End If;
259: --
260: --
261: --
264: -- We are doing a datetrack 'INSERT' which is illegal within this
265: -- procedure therefore we must error (note: to lck on insert the
266: -- private procedure ins_lck should be called).
267: --
268: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
269: fnd_message.set_token('PROCEDURE', l_proc);
270: fnd_message.set_token('STEP','20');
271: fnd_message.raise_error;
272: End If;
265: -- procedure therefore we must error (note: to lck on insert the
266: -- private procedure ins_lck should be called).
267: --
268: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
269: fnd_message.set_token('PROCEDURE', l_proc);
270: fnd_message.set_token('STEP','20');
271: fnd_message.raise_error;
272: End If;
273: --
266: -- private procedure ins_lck should be called).
267: --
268: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
269: fnd_message.set_token('PROCEDURE', l_proc);
270: fnd_message.set_token('STEP','20');
271: fnd_message.raise_error;
272: End If;
273: --
274: -- Set the validation start and end date OUT arguments
267: --
268: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
269: fnd_message.set_token('PROCEDURE', l_proc);
270: fnd_message.set_token('STEP','20');
271: fnd_message.raise_error;
272: End If;
273: --
274: -- Set the validation start and end date OUT arguments
275: --
290: --
291: -- The object is locked therefore we need to supply a meaningful
292: -- error message.
293: --
294: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
295: fnd_message.set_token('TABLE_NAME', 'ame_rules');
296: fnd_message.raise_error;
297: End lck;
298: --
291: -- The object is locked therefore we need to supply a meaningful
292: -- error message.
293: --
294: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
295: fnd_message.set_token('TABLE_NAME', 'ame_rules');
296: fnd_message.raise_error;
297: End lck;
298: --
299: -- ----------------------------------------------------------------------------
292: -- error message.
293: --
294: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
295: fnd_message.set_token('TABLE_NAME', 'ame_rules');
296: fnd_message.raise_error;
297: End lck;
298: --
299: -- ----------------------------------------------------------------------------
300: -- |-----------------------------< convert_args >-----------------------------|
399: Open C_Sel1;
400: Fetch C_Sel1 into l_child_count;
401: Close C_Sel1;
402: If l_child_count >0 then
403: fnd_message.set_name('PAY','HR_7215_DT_CHILD_EXISTS');
404: fnd_message.set_token('TABLE_NAME','ame_rule_usages');
405: hr_multi_message.add;
406: End If;
407: --
400: Fetch C_Sel1 into l_child_count;
401: Close C_Sel1;
402: If l_child_count >0 then
403: fnd_message.set_name('PAY','HR_7215_DT_CHILD_EXISTS');
404: fnd_message.set_token('TABLE_NAME','ame_rule_usages');
405: hr_multi_message.add;
406: End If;
407: --
408: -- ame_action_usages
409: Open C_Sel2;
410: Fetch C_Sel2 into l_child_count;
411: Close C_Sel2;
412: If l_child_count >0 then
413: fnd_message.set_name('PAY','HR_7215_DT_CHILD_EXISTS');
414: fnd_message.set_token('TABLE_NAME','ame_action_usages');
415: hr_multi_message.add;
416: End If;
417: --
410: Fetch C_Sel2 into l_child_count;
411: Close C_Sel2;
412: If l_child_count >0 then
413: fnd_message.set_name('PAY','HR_7215_DT_CHILD_EXISTS');
414: fnd_message.set_token('TABLE_NAME','ame_action_usages');
415: hr_multi_message.add;
416: End If;
417: --
418: -- ame_condition_usages
419: Open C_Sel3;
420: Fetch C_Sel3 into l_child_count;
421: Close C_Sel3;
422: If l_child_count >0 then
423: fnd_message.set_name('PAY','HR_7215_DT_CHILD_EXISTS');
424: fnd_message.set_token('TABLE_NAME','ame_condition_usages');
425: hr_multi_message.add;
426: End If;
427: --
420: Fetch C_Sel3 into l_child_count;
421: Close C_Sel3;
422: If l_child_count >0 then
423: fnd_message.set_name('PAY','HR_7215_DT_CHILD_EXISTS');
424: fnd_message.set_token('TABLE_NAME','ame_condition_usages');
425: hr_multi_message.add;
426: End If;
427: --
428: --