17: l_proc varchar2(72) := g_package||'constraint_error';
18: --
19: Begin
20: --
21: If (p_constraint_name = 'PQH_CRITERIA_RATE_FACTORS_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_FACTORS_PK') Then
25: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
20: --
21: If (p_constraint_name = 'PQH_CRITERIA_RATE_FACTORS_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_FACTORS_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');
28: fnd_message.raise_error;
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');
28: fnd_message.raise_error;
29: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_FACTORS_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_FACTORS_FK4') Then
33: hr_utility.set_message(8302, 'PQH_RBC_BEN_PL_ID_NOT_EXIST');
28: fnd_message.raise_error;
29: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_FACTORS_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_FACTORS_FK4') Then
33: hr_utility.set_message(8302, 'PQH_RBC_BEN_PL_ID_NOT_EXIST');
34: hr_utility.raise_error;
35: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_FACTORS_FK3') Then
36: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_FACTORS_FK4') Then
33: hr_utility.set_message(8302, 'PQH_RBC_BEN_PL_ID_NOT_EXIST');
34: hr_utility.raise_error;
35: ElsIf (p_constraint_name = 'PQH_CRITERIA_RATE_FACTORS_FK3') Then
36: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
37: fnd_message.set_token('PROCEDURE', l_proc);
38: fnd_message.set_token('STEP','5');
39: fnd_message.raise_error;
69: ,parent_criteria_rate_defn_id
70: ,business_group_id
71: ,legislation_code
72: ,object_version_number
73: from pqh_criteria_rate_factors
74: where criteria_rate_factor_id = p_criteria_rate_factor_id;
75: --
76: l_fct_ret boolean;
77: --
141: ,parent_criteria_rate_defn_id
142: ,business_group_id
143: ,legislation_code
144: ,object_version_number
145: from pqh_criteria_rate_factors
146: where criteria_rate_factor_id = p_criteria_rate_factor_id
147: for update nowait;
148: --
149: l_proc varchar2(72) := g_package||'lck';
190: -- The object is locked therefore we need to supply a meaningful
191: -- error message.
192: --
193: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
194: fnd_message.set_token('TABLE_NAME', 'pqh_criteria_rate_factors');
195: fnd_message.raise_error;
196: End lck;
197: --
198: -- ----------------------------------------------------------------------------