18: --
19: Begin
20: --
21: If (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK3') Then
22: hr_utility.set_message(8302, 'PQH_RBC_INVALID_BUSINESS_GRP');
23: hr_utility.raise_error;
24: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_PK') Then
25: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
26: fnd_message.set_token('PROCEDURE', l_proc);
19: Begin
20: --
21: If (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK3') Then
22: hr_utility.set_message(8302, 'PQH_RBC_INVALID_BUSINESS_GRP');
23: hr_utility.raise_error;
24: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_PK') Then
25: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
26: fnd_message.set_token('PROCEDURE', l_proc);
27: fnd_message.set_token('STEP','10');
26: fnd_message.set_token('PROCEDURE', l_proc);
27: fnd_message.set_token('STEP','10');
28: fnd_message.raise_error;
29: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK1') Then
30: hr_utility.set_message(8302, 'PQH_RBC_CRT_RT_DF_ID_NOT_EXIST');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK3') Then
33: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
34: fnd_message.set_token('PROCEDURE', l_proc);
27: fnd_message.set_token('STEP','10');
28: fnd_message.raise_error;
29: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK1') Then
30: hr_utility.set_message(8302, 'PQH_RBC_CRT_RT_DF_ID_NOT_EXIST');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK3') Then
33: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
34: fnd_message.set_token('PROCEDURE', l_proc);
35: fnd_message.set_token('STEP','5');
34: fnd_message.set_token('PROCEDURE', l_proc);
35: fnd_message.set_token('STEP','5');
36: fnd_message.raise_error;
37: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK4') Then
38: hr_utility.set_message(8302, 'PQH_RBC_INVALID_ELEMENT_TYPE');
39: hr_utility.raise_error;
40: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK5') Then
41: hr_utility.set_message(8302, 'PQH_RBC_INVALID_INPUT_VALUE');
42: hr_utility.raise_error;
35: fnd_message.set_token('STEP','5');
36: fnd_message.raise_error;
37: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK4') Then
38: hr_utility.set_message(8302, 'PQH_RBC_INVALID_ELEMENT_TYPE');
39: hr_utility.raise_error;
40: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK5') Then
41: hr_utility.set_message(8302, 'PQH_RBC_INVALID_INPUT_VALUE');
42: hr_utility.raise_error;
43: Else
37: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK4') Then
38: hr_utility.set_message(8302, 'PQH_RBC_INVALID_ELEMENT_TYPE');
39: hr_utility.raise_error;
40: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK5') Then
41: hr_utility.set_message(8302, 'PQH_RBC_INVALID_INPUT_VALUE');
42: hr_utility.raise_error;
43: Else
44: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
45: fnd_message.set_token('PROCEDURE', l_proc);
38: hr_utility.set_message(8302, 'PQH_RBC_INVALID_ELEMENT_TYPE');
39: hr_utility.raise_error;
40: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_ELEMENTS_FK5') Then
41: hr_utility.set_message(8302, 'PQH_RBC_INVALID_INPUT_VALUE');
42: hr_utility.raise_error;
43: Else
44: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
45: fnd_message.set_token('PROCEDURE', l_proc);
46: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
148: --
149: l_proc varchar2(72) := g_package||'lck';
150: --
151: Begin
152: hr_utility.set_location('Entering:'||l_proc, 5);
153: --
154: hr_api.mandatory_arg_error
155: (p_api_name => l_proc
156: ,p_argument => 'CRITERIA_RATE_ELEMENT_ID'
155: (p_api_name => l_proc
156: ,p_argument => 'CRITERIA_RATE_ELEMENT_ID'
157: ,p_argument_value => p_criteria_rate_element_id
158: );
159: hr_utility.set_location(l_proc,6);
160: hr_api.mandatory_arg_error
161: (p_api_name => l_proc
162: ,p_argument => 'OBJECT_VERSION_NUMBER'
163: ,p_argument_value => p_object_version_number
179: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
180: fnd_message.raise_error;
181: End If;
182: --
183: hr_utility.set_location(' Leaving:'||l_proc, 10);
184: --
185: -- We need to trap the ORA LOCK exception
186: --
187: Exception