15: --
16: l_proc varchar2(72) := g_package||'return_api_dml_status';
17: --
18: Begin
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: Return (nvl(g_api_dml, false));
22: --
23: hr_utility.set_location(' Leaving:'||l_proc, 10);
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: Return (nvl(g_api_dml, false));
22: --
23: hr_utility.set_location(' Leaving:'||l_proc, 10);
24: End return_api_dml_status;
25: --
26: -- ----------------------------------------------------------------------------
27: -- |---------------------------< constraint_error >---------------------------|
31: --
32: l_proc varchar2(72) := g_package||'constraint_error';
33: --
34: Begin
35: hr_utility.set_location('Entering:'||l_proc, 5);
36: --
37: If (p_constraint_name = 'BEN_dpnt_eligy_criteria_FK1') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
34: Begin
35: hr_utility.set_location('Entering:'||l_proc, 5);
36: --
37: If (p_constraint_name = 'BEN_dpnt_eligy_criteria_FK1') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'BEN_dpnt_eligy_criteria_PK') Then
35: hr_utility.set_location('Entering:'||l_proc, 5);
36: --
37: If (p_constraint_name = 'BEN_dpnt_eligy_criteria_FK1') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'BEN_dpnt_eligy_criteria_PK') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
36: --
37: If (p_constraint_name = 'BEN_dpnt_eligy_criteria_FK1') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'BEN_dpnt_eligy_criteria_PK') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
37: If (p_constraint_name = 'BEN_dpnt_eligy_criteria_FK1') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'BEN_dpnt_eligy_criteria_PK') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'BEN_dpnt_eligy_criteria_PK') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
46: hr_utility.raise_error;
47:
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'BEN_dpnt_eligy_criteria_PK') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
46: hr_utility.raise_error;
47:
48: Else
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'BEN_dpnt_eligy_criteria_PK') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
46: hr_utility.raise_error;
47:
48: Else
49: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
42: ElsIf (p_constraint_name = 'BEN_dpnt_eligy_criteria_PK') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
46: hr_utility.raise_error;
47:
48: Else
49: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
50: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
46: hr_utility.raise_error;
47:
48: Else
49: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
50: hr_utility.set_message_token('PROCEDURE', l_proc);
51: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
52: hr_utility.raise_error;
53: End If;
46: hr_utility.raise_error;
47:
48: Else
49: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
50: hr_utility.set_message_token('PROCEDURE', l_proc);
51: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
52: hr_utility.raise_error;
53: End If;
54: --
47:
48: Else
49: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
50: hr_utility.set_message_token('PROCEDURE', l_proc);
51: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
52: hr_utility.raise_error;
53: End If;
54: --
55: hr_utility.set_location(' Leaving:'||l_proc, 10);
48: Else
49: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
50: hr_utility.set_message_token('PROCEDURE', l_proc);
51: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
52: hr_utility.raise_error;
53: End If;
54: --
55: hr_utility.set_location(' Leaving:'||l_proc, 10);
56: End constraint_error;
51: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
52: hr_utility.raise_error;
53: End If;
54: --
55: hr_utility.set_location(' Leaving:'||l_proc, 10);
56: End constraint_error;
57: --
58: -- ----------------------------------------------------------------------------
59: -- |-----------------------------< api_updating >-----------------------------|
134: l_proc varchar2(72) := g_package||'api_updating';
135: l_fct_ret boolean;
136: --
137: Begin
138: hr_utility.set_location('Entering:'||l_proc, 5);
139: --
140: If (
141: p_eligy_criteria_dpnt_id is null and
142: p_object_version_number is null
167: Close C_Sel1;
168: --
169: -- The primary key is invalid therefore we must error
170: --
171: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
172: hr_utility.raise_error;
173: End If;
174: Close C_Sel1;
175: If (p_object_version_number <> g_old_rec.object_version_number) Then
168: --
169: -- The primary key is invalid therefore we must error
170: --
171: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
172: hr_utility.raise_error;
173: End If;
174: Close C_Sel1;
175: If (p_object_version_number <> g_old_rec.object_version_number) Then
176: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
172: hr_utility.raise_error;
173: End If;
174: Close C_Sel1;
175: If (p_object_version_number <> g_old_rec.object_version_number) Then
176: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
177: hr_utility.raise_error;
178: End If;
179:
180: l_fct_ret := true;
173: End If;
174: Close C_Sel1;
175: If (p_object_version_number <> g_old_rec.object_version_number) Then
176: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
177: hr_utility.raise_error;
178: End If;
179:
180: l_fct_ret := true;
181: End If;
179:
180: l_fct_ret := true;
181: End If;
182: End If;
183: hr_utility.set_location(' Leaving:'||l_proc, 20);
184: Return (l_fct_ret);
185: --
186: End api_updating;
187: --
263: --
264: l_proc varchar2(72) := g_package||'lck';
265: --
266: Begin
267: hr_utility.set_location('Entering:'||l_proc, 5);
268: --
269:
270: -- Add any mandatory argument checking here:
271: -- Example:
282: --
283: -- The primary key is invalid therefore we must error
284: --
285:
286: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
287: hr_utility.raise_error;
288: End If;
289: Close C_Sel1;
290:
283: -- The primary key is invalid therefore we must error
284: --
285:
286: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
287: hr_utility.raise_error;
288: End If;
289: Close C_Sel1;
290:
291: If (p_object_version_number <> g_old_rec.object_version_number) Then
288: End If;
289: Close C_Sel1;
290:
291: If (p_object_version_number <> g_old_rec.object_version_number) Then
292: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
293: hr_utility.raise_error;
294: End If;
295: --
296: hr_utility.set_location(' Leaving:'||l_proc, 10);
289: Close C_Sel1;
290:
291: If (p_object_version_number <> g_old_rec.object_version_number) Then
292: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
293: hr_utility.raise_error;
294: End If;
295: --
296: hr_utility.set_location(' Leaving:'||l_proc, 10);
297: --
292: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
293: hr_utility.raise_error;
294: End If;
295: --
296: hr_utility.set_location(' Leaving:'||l_proc, 10);
297: --
298: -- We need to trap the ORA LOCK exception
299: --
300: Exception
302: --
303: -- The object is locked therefore we need to supply a meaningful
304: -- error message.
305: --
306: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
307: hr_utility.set_message_token('TABLE_NAME', 'ben_eligy_criteria_dpnt');
308: hr_utility.raise_error;
309: End lck;
310: --
303: -- The object is locked therefore we need to supply a meaningful
304: -- error message.
305: --
306: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
307: hr_utility.set_message_token('TABLE_NAME', 'ben_eligy_criteria_dpnt');
308: hr_utility.raise_error;
309: End lck;
310: --
311: -- ----------------------------------------------------------------------------
304: -- error message.
305: --
306: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
307: hr_utility.set_message_token('TABLE_NAME', 'ben_eligy_criteria_dpnt');
308: hr_utility.raise_error;
309: End lck;
310: --
311: -- ----------------------------------------------------------------------------
312: -- |-----------------------------< convert_args >-----------------------------|
379: l_proc varchar2(72) := g_package||'convert_args';
380: --
381: Begin
382: --
383: hr_utility.set_location('Entering:'||l_proc, 5);
384: --
385: -- Convert arguments into local l_rec structure.
386: --
387: l_rec.eligy_criteria_dpnt_id := p_eligy_criteria_dpnt_id;
446:
447: --
448: -- Return the plsql record structure.
449: --
450: hr_utility.set_location(' Leaving:'||l_proc, 10);
451: Return(l_rec);
452: --
453: End convert_args;
454: --