18: --
19: Begin
20: --
21: If (p_constraint_name = 'PER_GEN_HIERARCHY_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: ElsIf (p_constraint_name = 'PER_GEN_HIERARCHY_UK1') Then
19: Begin
20: --
21: If (p_constraint_name = 'PER_GEN_HIERARCHY_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: ElsIf (p_constraint_name = 'PER_GEN_HIERARCHY_UK1') Then
27: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
20: --
21: If (p_constraint_name = 'PER_GEN_HIERARCHY_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: ElsIf (p_constraint_name = 'PER_GEN_HIERARCHY_UK1') Then
27: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
28: fnd_message.set_token('PROCEDURE', l_proc);
21: If (p_constraint_name = 'PER_GEN_HIERARCHY_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: ElsIf (p_constraint_name = 'PER_GEN_HIERARCHY_UK1') Then
27: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('STEP','10');
23: fnd_message.set_token('PROCEDURE', l_proc);
24: fnd_message.set_token('STEP','5');
25: fnd_message.raise_error;
26: ElsIf (p_constraint_name = 'PER_GEN_HIERARCHY_UK1') Then
27: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('STEP','10');
30: fnd_message.raise_error;
31: Else
24: fnd_message.set_token('STEP','5');
25: fnd_message.raise_error;
26: ElsIf (p_constraint_name = 'PER_GEN_HIERARCHY_UK1') Then
27: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('STEP','10');
30: fnd_message.raise_error;
31: Else
32: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
25: fnd_message.raise_error;
26: ElsIf (p_constraint_name = 'PER_GEN_HIERARCHY_UK1') Then
27: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('STEP','10');
30: fnd_message.raise_error;
31: Else
32: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
33: fnd_message.set_token('PROCEDURE', l_proc);
26: ElsIf (p_constraint_name = 'PER_GEN_HIERARCHY_UK1') Then
27: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('STEP','10');
30: fnd_message.raise_error;
31: Else
32: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
33: fnd_message.set_token('PROCEDURE', l_proc);
34: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
28: fnd_message.set_token('PROCEDURE', l_proc);
29: fnd_message.set_token('STEP','10');
30: fnd_message.raise_error;
31: Else
32: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
33: fnd_message.set_token('PROCEDURE', l_proc);
34: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
35: fnd_message.raise_error;
36: End If;
29: fnd_message.set_token('STEP','10');
30: fnd_message.raise_error;
31: Else
32: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
33: fnd_message.set_token('PROCEDURE', l_proc);
34: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
35: fnd_message.raise_error;
36: End If;
37: --
30: fnd_message.raise_error;
31: Else
32: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
33: fnd_message.set_token('PROCEDURE', l_proc);
34: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
35: fnd_message.raise_error;
36: End If;
37: --
38: End constraint_error;
31: Else
32: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
33: fnd_message.set_token('PROCEDURE', l_proc);
34: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
35: fnd_message.raise_error;
36: End If;
37: --
38: End constraint_error;
39: --
158: Close C_Sel1;
159: --
160: -- The primary key is invalid therefore we must error
161: --
162: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
163: fnd_message.raise_error;
164: End If;
165: Close C_Sel1;
166: If (p_object_version_number
159: --
160: -- The primary key is invalid therefore we must error
161: --
162: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
163: fnd_message.raise_error;
164: End If;
165: Close C_Sel1;
166: If (p_object_version_number
167: <> per_pgh_shd.g_old_rec.object_version_number) Then
164: End If;
165: Close C_Sel1;
166: If (p_object_version_number
167: <> per_pgh_shd.g_old_rec.object_version_number) Then
168: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
169: fnd_message.raise_error;
170: End If;
171: l_fct_ret := true;
172: End If;
165: Close C_Sel1;
166: If (p_object_version_number
167: <> per_pgh_shd.g_old_rec.object_version_number) Then
168: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
169: fnd_message.raise_error;
170: End If;
171: l_fct_ret := true;
172: End If;
173: End If;
279: Close C_Sel1;
280: --
281: -- The primary key is invalid therefore we must error
282: --
283: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
284: fnd_message.raise_error;
285: End If;
286: Close C_Sel1;
287: If (p_object_version_number
280: --
281: -- The primary key is invalid therefore we must error
282: --
283: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
284: fnd_message.raise_error;
285: End If;
286: Close C_Sel1;
287: If (p_object_version_number
288: <> per_pgh_shd.g_old_rec.object_version_number) Then
285: End If;
286: Close C_Sel1;
287: If (p_object_version_number
288: <> per_pgh_shd.g_old_rec.object_version_number) Then
289: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
290: fnd_message.raise_error;
291: End If;
292: --
293: hr_utility.set_location(' Leaving:'||l_proc, 10);
286: Close C_Sel1;
287: If (p_object_version_number
288: <> per_pgh_shd.g_old_rec.object_version_number) Then
289: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
290: fnd_message.raise_error;
291: End If;
292: --
293: hr_utility.set_location(' Leaving:'||l_proc, 10);
294: --
299: --
300: -- The object is locked therefore we need to supply a meaningful
301: -- error message.
302: --
303: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
304: fnd_message.set_token('TABLE_NAME', 'per_gen_hierarchy');
305: fnd_message.raise_error;
306: End lck;
307: --
300: -- The object is locked therefore we need to supply a meaningful
301: -- error message.
302: --
303: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
304: fnd_message.set_token('TABLE_NAME', 'per_gen_hierarchy');
305: fnd_message.raise_error;
306: End lck;
307: --
308: -- ----------------------------------------------------------------------------
301: -- error message.
302: --
303: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
304: fnd_message.set_token('TABLE_NAME', 'per_gen_hierarchy');
305: fnd_message.raise_error;
306: End lck;
307: --
308: -- ----------------------------------------------------------------------------
309: -- |-----------------------------< convert_args >-----------------------------|