18: --
19: Begin
20: hr_utility.set_location('Entering:'||l_proc, 5);
21: --
22: If (p_constraint_name = 'PQH_BUDGET_SETS_FK1') Then
23: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
23: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_BUDGET_SETS_FK2') 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','10');
31: hr_utility.raise_error;
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','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_BUDGET_SETS_PK') Then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PQH_BUDGET_SETS_UK') Then
38: hr_utility.set_message(8302, 'PQH_DUPLICATE_BUDGET_SET_NAME');
39: hr_utility.raise_error;
40: Else
41: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
76: object_version_number,
77: budget_unit1_value_type_cd,
78: budget_unit2_value_type_cd,
79: budget_unit3_value_type_cd
80: from pqh_budget_sets
81: where budget_set_id = p_budget_set_id;
82: --
83: l_proc varchar2(72) := g_package||'api_updating';
84: l_fct_ret boolean;
161: object_version_number,
162: budget_unit1_value_type_cd,
163: budget_unit2_value_type_cd,
164: budget_unit3_value_type_cd
165: from pqh_budget_sets
166: where budget_set_id = p_budget_set_id
167: for update nowait;
168: --
169: l_proc varchar2(72) := g_package||'lck';
204: -- The object is locked therefore we need to supply a meaningful
205: -- error message.
206: --
207: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
208: hr_utility.set_message_token('TABLE_NAME', 'pqh_budget_sets');
209: hr_utility.raise_error;
210: End lck;
211: --
212: -- ----------------------------------------------------------------------------