14: --
15: l_proc varchar2(72) := g_package||'return_api_dml_status';
16: --
17: Begin
18: hr_utility.set_location('Entering:'||l_proc, 5);
19: --
20: Return (nvl(g_api_dml, false));
21: --
22: hr_utility.set_location(' Leaving:'||l_proc, 10);
18: hr_utility.set_location('Entering:'||l_proc, 5);
19: --
20: Return (nvl(g_api_dml, false));
21: --
22: hr_utility.set_location(' Leaving:'||l_proc, 10);
23: End return_api_dml_status;
24: --
25: -- ----------------------------------------------------------------------------
26: -- |---------------------------< constraint_error >---------------------------|
50: l_proc varchar2(72) := g_package||'constraint_error';
51: l_name ben_ext_data_elmt.name%type ;
52: --
53: Begin
54: hr_utility.set_location('Entering:'||l_proc, 5);
55: --
56: If (p_constraint_name = 'BEN_EXT_DATA_ELMT_FK2') Then
57: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.set_token('PROCEDURE', l_proc);
97: fnd_message.raise_error;
98:
99: End If;
100: --
101: hr_utility.set_location(' Leaving:'||l_proc, 10);
102: End constraint_error;
103: --
104: -- ----------------------------------------------------------------------------
105: -- |-----------------------------< api_updating >-----------------------------|
177: l_proc varchar2(72) := g_package||'api_updating';
178: l_fct_ret boolean;
179: --
180: Begin
181: hr_utility.set_location('Entering:'||l_proc, 5);
182: --
183: If (
184: p_ext_data_elmt_id is null and
185: p_object_version_number is null
193: If (
194: p_ext_data_elmt_id = g_old_rec.ext_data_elmt_id and
195: p_object_version_number = g_old_rec.object_version_number
196: ) Then
197: hr_utility.set_location(l_proc, 10);
198: --
199: -- The g_old_rec is current therefore we must
200: -- set the returning function to true
201: --
218: If (p_object_version_number <> g_old_rec.object_version_number) Then
219: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
220: fnd_message.raise_error;
221: End If;
222: hr_utility.set_location(l_proc, 15);
223: l_fct_ret := true;
224: End If;
225: End If;
226: hr_utility.set_location(' Leaving:'||l_proc, 20);
222: hr_utility.set_location(l_proc, 15);
223: l_fct_ret := true;
224: End If;
225: End If;
226: hr_utility.set_location(' Leaving:'||l_proc, 20);
227: Return (l_fct_ret);
228: --
229: End api_updating;
230: --
302: --
303: l_proc varchar2(72) := g_package||'lck';
304: --
305: Begin
306: hr_utility.set_location('Entering:'||l_proc, 5);
307: --
308: -- Add any mandatory argument checking here:
309: -- Example:
310: -- hr_api.mandatory_arg_error
327: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
328: fnd_message.raise_error;
329: End If;
330: --
331: hr_utility.set_location(' Leaving:'||l_proc, 10);
332: --
333: -- We need to trap the ORA LOCK exception
334: --
335: Exception
411: l_proc varchar2(72) := g_package||'convert_args';
412: --
413: Begin
414: --
415: hr_utility.set_location('Entering:'||l_proc, 5);
416: --
417: -- Convert arguments into local l_rec structure.
418: --
419: l_rec.ext_data_elmt_id := p_ext_data_elmt_id;
474: l_rec.object_version_number := p_object_version_number;
475: --
476: -- Return the plsql record structure.
477: --
478: hr_utility.set_location(' Leaving:'||l_proc, 10);
479: Return(l_rec);
480: --
481: End convert_args;
482: --