18: --
19: Begin
20: --
21: If (p_constraint_name = 'PER_GEN_HIERARCHY_VER_UK1') 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 = 'PER_GEN_HIERARCHY_VER_UK1') 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 = 'PER_GEN_HIERARCHY_VER_UK1') 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 = 'PER_GEN_HIERARCHY_VER_UK1') 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: --
157: Close C_Sel1;
158: --
159: -- The primary key is invalid therefore we must error
160: --
161: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
162: fnd_message.raise_error;
163: End If;
164: Close C_Sel1;
165: If (p_object_version_number
158: --
159: -- The primary key is invalid therefore we must error
160: --
161: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
162: fnd_message.raise_error;
163: End If;
164: Close C_Sel1;
165: If (p_object_version_number
166: <> per_pgv_shd.g_old_rec.object_version_number) Then
163: End If;
164: Close C_Sel1;
165: If (p_object_version_number
166: <> per_pgv_shd.g_old_rec.object_version_number) Then
167: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
168: fnd_message.raise_error;
169: End If;
170: l_fct_ret := true;
171: End If;
164: Close C_Sel1;
165: If (p_object_version_number
166: <> per_pgv_shd.g_old_rec.object_version_number) Then
167: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
168: fnd_message.raise_error;
169: End If;
170: l_fct_ret := true;
171: End If;
172: End If;
282: Close C_Sel1;
283: --
284: -- The primary key is invalid therefore we must error
285: --
286: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
287: fnd_message.raise_error;
288: End If;
289: Close C_Sel1;
290: If (p_object_version_number
283: --
284: -- The primary key is invalid therefore we must error
285: --
286: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
287: fnd_message.raise_error;
288: End If;
289: Close C_Sel1;
290: If (p_object_version_number
291: <> per_pgv_shd.g_old_rec.object_version_number) Then
288: End If;
289: Close C_Sel1;
290: If (p_object_version_number
291: <> per_pgv_shd.g_old_rec.object_version_number) Then
292: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
293: fnd_message.raise_error;
294: End If;
295: --
296: hr_utility.set_location(' Leaving:'||l_proc, 10);
289: Close C_Sel1;
290: If (p_object_version_number
291: <> per_pgv_shd.g_old_rec.object_version_number) Then
292: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
293: fnd_message.raise_error;
294: End If;
295: --
296: hr_utility.set_location(' Leaving:'||l_proc, 10);
297: --
302: --
303: -- The object is locked therefore we need to supply a meaningful
304: -- error message.
305: --
306: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
307: fnd_message.set_token('TABLE_NAME', 'per_gen_hierarchy_versions');
308: fnd_message.raise_error;
309: End lck;
310: --
303: -- The object is locked therefore we need to supply a meaningful
304: -- error message.
305: --
306: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
307: fnd_message.set_token('TABLE_NAME', 'per_gen_hierarchy_versions');
308: fnd_message.raise_error;
309: End lck;
310: --
311: -- ----------------------------------------------------------------------------
304: -- error message.
305: --
306: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
307: fnd_message.set_token('TABLE_NAME', 'per_gen_hierarchy_versions');
308: fnd_message.raise_error;
309: End lck;
310: --
311: -- ----------------------------------------------------------------------------
312: -- |-----------------------------< convert_args >-----------------------------|