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 >---------------------------|
36:
37: l_name varchar2(100);
38: --
39: Begin
40: hr_utility.set_location('Entering:'||l_proc, 5);
41: --
42: If (p_constraint_name = 'BEN_EXT_FILE_FK1') Then
43: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
44: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
66: fnd_message.raise_error;
67: End If;
68: --
69: hr_utility.set_location(' Leaving:'||l_proc, 10);
70: End constraint_error;
71: --
72: -- ----------------------------------------------------------------------------
73: -- |-----------------------------< 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_ext_file_id is null and
142: p_object_version_number is null
150: If (
151: p_ext_file_id = g_old_rec.ext_file_id and
152: p_object_version_number = g_old_rec.object_version_number
153: ) Then
154: hr_utility.set_location(l_proc, 10);
155: --
156: -- The g_old_rec is current therefore we must
157: -- set the returning function to true
158: --
175: If (p_object_version_number <> g_old_rec.object_version_number) Then
176: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
177: fnd_message.raise_error;
178: End If;
179: hr_utility.set_location(l_proc, 15);
180: l_fct_ret := true;
181: End If;
182: End If;
183: hr_utility.set_location(' Leaving:'||l_proc, 20);
179: hr_utility.set_location(l_proc, 15);
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: --
248: --
249: l_proc varchar2(72) := g_package||'lck';
250: --
251: Begin
252: hr_utility.set_location('Entering:'||l_proc, 5);
253: --
254: -- Add any mandatory argument checking here:
255: -- Example:
256: -- hr_api.mandatory_arg_error
273: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
274: fnd_message.raise_error;
275: End If;
276: --
277: hr_utility.set_location(' Leaving:'||l_proc, 10);
278: --
279: -- We need to trap the ORA LOCK exception
280: --
281: Exception
346: l_proc varchar2(72) := g_package||'convert_args';
347: --
348: Begin
349: --
350: hr_utility.set_location('Entering:'||l_proc, 5);
351: --
352: -- Convert arguments into local l_rec structure.
353: --
354: l_rec.ext_file_id := p_ext_file_id;
398: l_rec.object_version_number := p_object_version_number;
399: --
400: -- Return the plsql record structure.
401: --
402: hr_utility.set_location(' Leaving:'||l_proc, 10);
403: Return(l_rec);
404: --
405: End convert_args;
406: --