18: --
19: Begin
20: --
21: If (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_FK1') Then
22: hr_utility.set_message(800, 'HR_INV_INFO_TYPE');
23: hr_utility.raise_error;
24: Elsif (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_FK2') Then
25: hr_utility.set_message(8302, 'PQH_INV_ROLE_ID');
26: hr_utility.raise_error;
19: Begin
20: --
21: If (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_FK1') Then
22: hr_utility.set_message(800, 'HR_INV_INFO_TYPE');
23: hr_utility.raise_error;
24: Elsif (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_FK2') Then
25: hr_utility.set_message(8302, 'PQH_INV_ROLE_ID');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_PK') Then
21: If (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_FK1') Then
22: hr_utility.set_message(800, 'HR_INV_INFO_TYPE');
23: hr_utility.raise_error;
24: Elsif (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_FK2') Then
25: hr_utility.set_message(8302, 'PQH_INV_ROLE_ID');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_PK') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
22: hr_utility.set_message(800, 'HR_INV_INFO_TYPE');
23: hr_utility.raise_error;
24: Elsif (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_FK2') Then
25: hr_utility.set_message(8302, 'PQH_INV_ROLE_ID');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_PK') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','15');
24: Elsif (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_FK2') Then
25: hr_utility.set_message(8302, 'PQH_INV_ROLE_ID');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_PK') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','15');
31: hr_utility.raise_error;
32: Else
25: hr_utility.set_message(8302, 'PQH_INV_ROLE_ID');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_PK') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','15');
31: hr_utility.raise_error;
32: Else
33: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_PK') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','15');
31: hr_utility.raise_error;
32: Else
33: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
27: ElsIf (p_constraint_name = 'PQH_ROLE_EXTRA_INFO_PK') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','15');
31: hr_utility.raise_error;
32: Else
33: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','15');
31: hr_utility.raise_error;
32: Else
33: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
36: hr_utility.raise_error;
37: End If;
30: hr_utility.set_message_token('STEP','15');
31: hr_utility.raise_error;
32: Else
33: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
36: hr_utility.raise_error;
37: End If;
38: --
31: hr_utility.raise_error;
32: Else
33: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
36: hr_utility.raise_error;
37: End If;
38: --
39: End constraint_error;
32: Else
33: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
36: hr_utility.raise_error;
37: End If;
38: --
39: End constraint_error;
40: --
158: Close C_Sel1;
159: --
160: -- The primary key is invalid therefore we must error
161: --
162: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
163: hr_utility.raise_error;
164:
165: End If;
166: Close C_Sel1;
159: --
160: -- The primary key is invalid therefore we must error
161: --
162: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
163: hr_utility.raise_error;
164:
165: End If;
166: Close C_Sel1;
167:
165: End If;
166: Close C_Sel1;
167:
168: If (p_object_version_number <> g_old_rec.object_version_number) Then
169: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
170: hr_utility.raise_error;
171: End If;
172:
173: l_fct_ret := true;
166: Close C_Sel1;
167:
168: If (p_object_version_number <> g_old_rec.object_version_number) Then
169: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
170: hr_utility.raise_error;
171: End If;
172:
173: l_fct_ret := true;
174: End If;
265: --
266: l_proc varchar2(72) := g_package||'lck';
267: --
268: Begin
269: hr_utility.set_location('Entering:'||l_proc, 5);
270: --
271: hr_api.mandatory_arg_error
272: (p_api_name => l_proc
273: ,p_argument => 'ROLE_EXTRA_INFO_ID'
272: (p_api_name => l_proc
273: ,p_argument => 'ROLE_EXTRA_INFO_ID'
274: ,p_argument_value => p_role_extra_info_id
275: );
276: hr_utility.set_location(l_proc,6);
277: hr_api.mandatory_arg_error
278: (p_api_name => l_proc
279: ,p_argument => 'OBJECT_VERSION_NUMBER'
280: ,p_argument_value => p_object_version_number
286: Close C_Sel1;
287: --
288: -- The primary key is invalid therefore we must error
289: --
290: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
291: hr_utility.raise_error;
292: End If;
293: Close C_Sel1;
294: If (p_object_version_number <> g_old_rec.object_version_number) Then
287: --
288: -- The primary key is invalid therefore we must error
289: --
290: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
291: hr_utility.raise_error;
292: End If;
293: Close C_Sel1;
294: If (p_object_version_number <> g_old_rec.object_version_number) Then
295: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
291: hr_utility.raise_error;
292: End If;
293: Close C_Sel1;
294: If (p_object_version_number <> g_old_rec.object_version_number) Then
295: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
296: hr_utility.raise_error;
297: End If;
298: --
299: hr_utility.set_location(' Leaving:'||l_proc, 10);
292: End If;
293: Close C_Sel1;
294: If (p_object_version_number <> g_old_rec.object_version_number) Then
295: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
296: hr_utility.raise_error;
297: End If;
298: --
299: hr_utility.set_location(' Leaving:'||l_proc, 10);
300: --
295: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
296: hr_utility.raise_error;
297: End If;
298: --
299: hr_utility.set_location(' Leaving:'||l_proc, 10);
300: --
301: -- We need to trap the ORA LOCK exception
302: --
303:
307: --
308: -- The object is locked therefore we need to supply a meaningful
309: -- error message.
310: --
311: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
312: hr_utility.set_message_token('TABLE_NAME', 'pqh_role_extra_info');
313: hr_utility.raise_error;
314: End lck;
315:
308: -- The object is locked therefore we need to supply a meaningful
309: -- error message.
310: --
311: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
312: hr_utility.set_message_token('TABLE_NAME', 'pqh_role_extra_info');
313: hr_utility.raise_error;
314: End lck;
315:
316: -- ----------------------------------------------------------------------------
309: -- error message.
310: --
311: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
312: hr_utility.set_message_token('TABLE_NAME', 'pqh_role_extra_info');
313: hr_utility.raise_error;
314: End lck;
315:
316: -- ----------------------------------------------------------------------------
317: -- |-----------------------------< convert_args >-----------------------------|