[Home] [Help]
PACKAGE BODY: APPS.BEN_BATCH_PARAMETER_API
Source
1 Package Body ben_batch_parameter_api as
2 /* $Header: bebbpapi.pkb 115.3 2002/12/13 06:52:52 hmani ship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' ben_batch_parameter_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_batch_parameter >------------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_batch_parameter
13 (p_validate in boolean default false
14 ,p_batch_parameter_id out nocopy number
15 ,p_batch_exe_cd in varchar2 default null
16 ,p_thread_cnt_num in number default null
17 ,p_max_err_num in number default null
18 ,p_chunk_size in number default null
19 ,p_business_group_id in number default null
20 ,p_object_version_number out nocopy number
21 ,p_effective_date in date) is
22 --
23 -- Declare cursors and local variables
24 --
25 l_batch_parameter_id ben_batch_parameter.batch_parameter_id%TYPE;
26 l_proc varchar2(72) := g_package||'create_batch_parameter';
27 l_object_version_number ben_batch_parameter.object_version_number%TYPE;
28 --
29 begin
30 --
31 hr_utility.set_location('Entering:'|| l_proc, 10);
32 --
33 -- Issue a savepoint if operating in validation only mode
34 --
35 savepoint create_batch_parameter;
36 --
37 hr_utility.set_location(l_proc, 20);
38 --
39 -- Process Logic
40 --
41 begin
42 --
43 -- Start of API User Hook for the before hook of create_batch_parameter
44 --
45 ben_batch_parameter_bk1.create_batch_parameter_b
46 (p_batch_exe_cd => p_batch_exe_cd
47 ,p_thread_cnt_num => p_thread_cnt_num
48 ,p_max_err_num => p_max_err_num
49 ,p_chunk_size => p_chunk_size
50 ,p_business_group_id => p_business_group_id
51 ,p_effective_date => trunc(p_effective_date));
52 --
53 exception
54 --
55 when hr_api.cannot_find_prog_unit then
56 hr_api.cannot_find_prog_unit_error
57 (p_module_name => 'CREATE_batch_parameter'
58 ,p_hook_type => 'BP');
59 --
60 -- End of API User Hook for the before hook of create_batch_parameter
61 --
62 end;
63 --
64 ben_bbp_ins.ins
65 (p_batch_parameter_id => l_batch_parameter_id
66 ,p_batch_exe_cd => p_batch_exe_cd
67 ,p_thread_cnt_num => p_thread_cnt_num
68 ,p_max_err_num => p_max_err_num
69 ,p_chunk_size => p_chunk_size
70 ,p_business_group_id => p_business_group_id
71 ,p_object_version_number => l_object_version_number
72 ,p_effective_date => trunc(p_effective_date));
73 --
74 begin
75 --
76 -- Start of API User Hook for the after hook of create_batch_parameter
77 --
78 ben_batch_parameter_bk1.create_batch_parameter_a
79 (p_batch_parameter_id => l_batch_parameter_id
80 ,p_batch_exe_cd => p_batch_exe_cd
81 ,p_thread_cnt_num => p_thread_cnt_num
82 ,p_max_err_num => p_max_err_num
83 ,p_chunk_size => p_chunk_size
84 ,p_business_group_id => p_business_group_id
85 ,p_object_version_number => l_object_version_number
86 ,p_effective_date => trunc(p_effective_date));
87 --
88 exception
89 --
90 when hr_api.cannot_find_prog_unit then
91 --
92 hr_api.cannot_find_prog_unit_error
93 (p_module_name => 'CREATE_batch_parameter'
94 ,p_hook_type => 'AP');
95 --
96 -- End of API User Hook for the after hook of create_batch_parameter
97 --
98 end;
99 --
100 hr_utility.set_location(l_proc, 60);
101 --
102 -- When in validation only mode raise the Validate_Enabled exception
103 --
104 if p_validate then
105 raise hr_api.validate_enabled;
106 end if;
107 --
108 -- Set all output arguments
109 --
110 p_batch_parameter_id := l_batch_parameter_id;
111 p_object_version_number := l_object_version_number;
112 --
113 hr_utility.set_location(' Leaving:'||l_proc, 70);
114 --
115 exception
116 --
117 when hr_api.validate_enabled then
118 --
119 -- As the Validate_Enabled exception has been raised
120 -- we must rollback to the savepoint
121 --
122 ROLLBACK TO create_batch_parameter;
123 --
124 -- Only set output warning arguments
125 -- (Any key or derived arguments must be set to null
126 -- when validation only mode is being used.)
127 --
128 p_batch_parameter_id := null;
129 p_object_version_number := null;
130 hr_utility.set_location(' Leaving:'||l_proc, 80);
131 --
132 when others then
133 --
134 -- A validation or unexpected error has occured
135 --
136 ROLLBACK TO create_batch_parameter;
137 raise;
138 --
139 end create_batch_parameter;
140 -- ----------------------------------------------------------------------------
141 -- |------------------------< update_batch_parameter >------------------------|
142 -- ----------------------------------------------------------------------------
143 --
144 procedure update_batch_parameter
145 (p_validate in boolean default false
146 ,p_batch_parameter_id in number
147 ,p_batch_exe_cd in varchar2 default hr_api.g_varchar2
148 ,p_thread_cnt_num in number default hr_api.g_number
149 ,p_max_err_num in number default hr_api.g_number
150 ,p_chunk_size in number default hr_api.g_number
151 ,p_business_group_id in number default hr_api.g_number
152 ,p_object_version_number in out nocopy number
153 ,p_effective_date in date) is
154 --
155 -- Declare cursors and local variables
156 --
157 l_proc varchar2(72) := g_package||'update_batch_parameter';
158 l_object_version_number ben_batch_parameter.object_version_number%TYPE;
159 --
160 begin
161 --
162 hr_utility.set_location('Entering:'|| l_proc, 10);
163 --
164 -- Issue a savepoint if operating in validation only mode
165 --
166 savepoint update_batch_parameter;
167 --
168 hr_utility.set_location(l_proc, 20);
169 --
170 -- Process Logic
171 --
172 l_object_version_number := p_object_version_number;
173 --
174 begin
175 --
176 -- Start of API User Hook for the before hook of update_batch_parameter
177 --
178 ben_batch_parameter_bk2.update_batch_parameter_b
179 (p_batch_parameter_id => p_batch_parameter_id
180 ,p_batch_exe_cd => p_batch_exe_cd
181 ,p_thread_cnt_num => p_thread_cnt_num
182 ,p_max_err_num => p_max_err_num
183 ,p_chunk_size => p_chunk_size
184 ,p_business_group_id => p_business_group_id
185 ,p_object_version_number => p_object_version_number
186 ,p_effective_date => trunc(p_effective_date));
187 --
188 exception
189 --
190 when hr_api.cannot_find_prog_unit then
191 hr_api.cannot_find_prog_unit_error
192 (p_module_name => 'UPDATE_batch_parameter'
193 ,p_hook_type => 'BP');
194 --
195 -- End of API User Hook for the before hook of update_batch_parameter
196 --
197 end;
198 --
199 ben_bbp_upd.upd
200 (p_batch_parameter_id => p_batch_parameter_id
201 ,p_batch_exe_cd => p_batch_exe_cd
202 ,p_thread_cnt_num => p_thread_cnt_num
203 ,p_max_err_num => p_max_err_num
204 ,p_chunk_size => p_chunk_size
205 ,p_business_group_id => p_business_group_id
206 ,p_object_version_number => l_object_version_number
207 ,p_effective_date => trunc(p_effective_date));
208 --
209 begin
210 --
211 -- Start of API User Hook for the after hook of update_batch_parameter
212 --
213 ben_batch_parameter_bk2.update_batch_parameter_a
214 (p_batch_parameter_id => p_batch_parameter_id
215 ,p_batch_exe_cd => p_batch_exe_cd
216 ,p_thread_cnt_num => p_thread_cnt_num
217 ,p_max_err_num => p_max_err_num
218 ,p_chunk_size => p_chunk_size
219 ,p_business_group_id => p_business_group_id
220 ,p_object_version_number => l_object_version_number
221 ,p_effective_date => trunc(p_effective_date));
222 --
223 exception
224 --
225 when hr_api.cannot_find_prog_unit then
226 hr_api.cannot_find_prog_unit_error
227 (p_module_name => 'UPDATE_batch_parameter'
228 ,p_hook_type => 'AP');
229 --
230 -- End of API User Hook for the after hook of update_batch_parameter
231 --
232 end;
233 --
234 hr_utility.set_location(l_proc, 60);
235 --
236 -- When in validation only mode raise the Validate_Enabled exception
237 --
238 if p_validate then
239 raise hr_api.validate_enabled;
240 end if;
241 --
242 -- Set all output arguments
243 --
244 p_object_version_number := l_object_version_number;
245 --
246 hr_utility.set_location(' Leaving:'||l_proc, 70);
247 --
248 exception
249 --
250 when hr_api.validate_enabled then
251 --
252 -- As the Validate_Enabled exception has been raised
253 -- we must rollback to the savepoint
254 --
255 ROLLBACK TO update_batch_parameter;
256 --
257 -- Only set output warning arguments
258 -- (Any key or derived arguments must be set to null
259 -- when validation only mode is being used.)
260 --
261 hr_utility.set_location(' Leaving:'||l_proc, 80);
262 --
263 when others then
264 --
265 -- A validation or unexpected error has occured
266 --
267 ROLLBACK TO update_batch_parameter;
268 raise;
269 --
270 end update_batch_parameter;
271 -- ----------------------------------------------------------------------------
272 -- |------------------------< delete_batch_parameter >------------------------|
273 -- ----------------------------------------------------------------------------
274 --
275 procedure delete_batch_parameter
276 (p_validate in boolean default false
277 ,p_batch_parameter_id in number
278 ,p_object_version_number in out nocopy number
279 ,p_effective_date in date) is
280 --
281 -- Declare cursors and local variables
282 --
283 l_proc varchar2(72) := g_package||'update_batch_parameter';
284 l_object_version_number ben_batch_parameter.object_version_number%TYPE;
285 --
286 begin
287 --
288 hr_utility.set_location('Entering:'|| l_proc, 10);
289 --
290 -- Issue a savepoint if operating in validation only mode
291 --
292 savepoint delete_batch_parameter;
293 --
294 hr_utility.set_location(l_proc, 20);
295 --
296 -- Process Logic
297 --
298 l_object_version_number := p_object_version_number;
299 --
300 --
301 begin
302 --
303 -- Start of API User Hook for the before hook of delete_batch_parameter
304 --
305 ben_batch_parameter_bk3.delete_batch_parameter_b
306 (p_batch_parameter_id => p_batch_parameter_id
307 ,p_object_version_number => p_object_version_number
308 ,p_effective_date => trunc(p_effective_date));
309 --
310 exception
311 --
312 when hr_api.cannot_find_prog_unit then
313 --
314 hr_api.cannot_find_prog_unit_error
315 (p_module_name => 'DELETE_batch_parameter'
316 ,p_hook_type => 'BP');
317 --
318 -- End of API User Hook for the before hook of delete_batch_parameter
319 --
320 end;
321 --
322 ben_bbp_del.del
323 (p_batch_parameter_id => p_batch_parameter_id
324 ,p_object_version_number => l_object_version_number
325 ,p_effective_date => p_effective_date);
326 --
327 begin
328 --
329 -- Start of API User Hook for the after hook of delete_batch_parameter
330 --
331 ben_batch_parameter_bk3.delete_batch_parameter_a
332 (p_batch_parameter_id => p_batch_parameter_id
333 ,p_object_version_number => l_object_version_number
334 ,p_effective_date => trunc(p_effective_date));
335 --
336 exception
337 --
338 when hr_api.cannot_find_prog_unit then
339 --
340 hr_api.cannot_find_prog_unit_error
341 (p_module_name => 'DELETE_batch_parameter'
342 ,p_hook_type => 'AP');
343 --
344 -- End of API User Hook for the after hook of delete_batch_parameter
345 --
346 end;
347 --
348 hr_utility.set_location(l_proc, 60);
349 --
350 -- When in validation only mode raise the Validate_Enabled exception
351 --
352 if p_validate then
353 raise hr_api.validate_enabled;
354 end if;
355 --
356 hr_utility.set_location(' Leaving:'||l_proc, 70);
357 --
358 exception
359 --
360 when hr_api.validate_enabled then
361 --
362 -- As the Validate_Enabled exception has been raised
363 -- we must rollback to the savepoint
364 --
365 ROLLBACK TO delete_batch_parameter;
366 --
367 -- Only set output warning arguments
368 -- (Any key or derived arguments must be set to null
369 -- when validation only mode is being used.)
370 --
371 --
372 when others then
373 --
374 -- A validation or unexpected error has occured
375 --
376 ROLLBACK TO delete_batch_parameter;
377 raise;
378 --
379 end delete_batch_parameter;
380 --
381 -- ----------------------------------------------------------------------------
382 -- |-------------------------------< lck >------------------------------------|
383 -- ----------------------------------------------------------------------------
384 --
385 procedure lck
386 (p_batch_parameter_id in number
387 ,p_object_version_number in number) is
388 --
389 --
390 -- Declare cursors and local variables
391 --
392 l_proc varchar2(72) := g_package||'lck';
393 --
394 begin
395 --
396 hr_utility.set_location('Entering:'|| l_proc, 10);
397 --
398 ben_bbp_shd.lck
399 (p_batch_parameter_id => p_batch_parameter_id
400 ,p_object_version_number => p_object_version_number);
401 --
402 hr_utility.set_location(' Leaving:'||l_proc, 70);
403 --
404 end lck;
405 --
406 end ben_batch_parameter_api;