[Home] [Help]
PACKAGE BODY: APPS.HR_DE_LIABILITY_PREMIUMS_API
Source
1 Package Body hr_de_liability_premiums_api as
2 /* $Header: hrlipapi.pkb 120.0 2005/05/31 01:16:39 appldev noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' hr_de_liability_premiums_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |----------------------------< create_premium >----------------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_premium
13 (p_validate in boolean default false
14 ,p_effective_date in date
15 ,p_organization_link_id in number
16 ,p_std_percentage in number default null
17 ,p_calculation_method in varchar2 default null
18 ,p_std_working_hours_per_year in number default null
19 ,p_max_remuneration in number default null
20 ,p_attribute_category in varchar2 default null
21 ,p_attribute1 in varchar2 default null
22 ,p_attribute2 in varchar2 default null
23 ,p_attribute3 in varchar2 default null
24 ,p_attribute4 in varchar2 default null
25 ,p_attribute5 in varchar2 default null
26 ,p_attribute6 in varchar2 default null
27 ,p_attribute7 in varchar2 default null
28 ,p_attribute8 in varchar2 default null
29 ,p_attribute9 in varchar2 default null
30 ,p_attribute10 in varchar2 default null
31 ,p_attribute11 in varchar2 default null
32 ,p_attribute12 in varchar2 default null
33 ,p_attribute13 in varchar2 default null
34 ,p_attribute14 in varchar2 default null
35 ,p_attribute15 in varchar2 default null
36 ,p_attribute16 in varchar2 default null
37 ,p_attribute17 in varchar2 default null
38 ,p_attribute18 in varchar2 default null
39 ,p_attribute19 in varchar2 default null
40 ,p_attribute20 in varchar2 default null
41 ,p_liability_premiums_id out nocopy number
42 ,p_object_version_number out nocopy number
43 ,p_effective_start_date out nocopy date
44 ,p_effective_end_date out nocopy date
45 ) is
46 --
47 -- Declare cursors and local variables
48 --
49 l_proc varchar2(72) := g_package||'create_premium';
50 l_liability_premiums_id hr_de_liability_premiums_f.liability_premiums_id%TYPE;
51 l_object_version_number hr_de_liability_premiums_f.object_version_number%TYPE;
52 l_effective_start_date hr_de_liability_premiums_f.effective_start_date%TYPE;
53 l_effective_end_date hr_de_liability_premiums_f.effective_end_date%TYPE;
54 begin
55 hr_utility.set_location('Entering:'|| l_proc, 10);
56 --
57 -- Issue a savepoint
58 --
59 savepoint create_premium;
60 --
61 -- Call Before Process User Hook
62 --
63 begin
64 hr_de_liability_premiums_bk1.create_premium_b
65 (p_effective_date => trunc(p_effective_date)
66 ,p_organization_link_id => p_organization_link_id
67 ,p_std_percentage => p_std_percentage
68 ,p_calculation_method => p_calculation_method
69 ,p_std_working_hours_per_year => p_std_working_hours_per_year
70 ,p_max_remuneration => p_max_remuneration
71 ,p_attribute_category => p_attribute_category
72 ,p_attribute1 => p_attribute1
73 ,p_attribute2 => p_attribute2
74 ,p_attribute3 => p_attribute3
75 ,p_attribute4 => p_attribute4
76 ,p_attribute5 => p_attribute5
77 ,p_attribute6 => p_attribute6
78 ,p_attribute7 => p_attribute7
79 ,p_attribute8 => p_attribute8
80 ,p_attribute9 => p_attribute9
81 ,p_attribute10 => p_attribute1
82 ,p_attribute11 => p_attribute11
83 ,p_attribute12 => p_attribute12
84 ,p_attribute13 => p_attribute13
85 ,p_attribute14 => p_attribute14
86 ,p_attribute15 => p_attribute15
87 ,p_attribute16 => p_attribute16
88 ,p_attribute17 => p_attribute17
89 ,p_attribute18 => p_attribute18
90 ,p_attribute19 => p_attribute19
91 ,p_attribute20 => p_attribute20);
92 exception
93 when hr_api.cannot_find_prog_unit then
94 hr_api.cannot_find_prog_unit_error
95 (p_module_name => 'create_premium'
96 ,p_hook_type => 'BP'
97 );
98 end;
99 --
100 -- Process Logic
101 --
102 hr_lip_ins.ins
103 (p_effective_date => trunc(p_effective_date)
104 ,p_organization_link_id => p_organization_link_id
105 ,p_std_percentage => p_std_percentage
106 ,p_calculation_method => p_calculation_method
107 ,p_std_working_hours_per_year => p_std_working_hours_per_year
108 ,p_max_remuneration => p_max_remuneration
109 ,p_attribute_category => p_attribute_category
110 ,p_attribute1 => p_attribute1
111 ,p_attribute2 => p_attribute2
112 ,p_attribute3 => p_attribute3
113 ,p_attribute4 => p_attribute4
114 ,p_attribute5 => p_attribute5
115 ,p_attribute6 => p_attribute6
116 ,p_attribute7 => p_attribute7
117 ,p_attribute8 => p_attribute8
118 ,p_attribute9 => p_attribute9
119 ,p_attribute10 => p_attribute10
120 ,p_attribute11 => p_attribute11
121 ,p_attribute12 => p_attribute12
122 ,p_attribute13 => p_attribute13
123 ,p_attribute14 => p_attribute14
124 ,p_attribute15 => p_attribute15
125 ,p_attribute16 => p_attribute16
126 ,p_attribute17 => p_attribute17
127 ,p_attribute18 => p_attribute18
128 ,p_attribute19 => p_attribute19
129 ,p_attribute20 => p_attribute20
130 ,p_liability_premiums_id => l_liability_premiums_id
131 ,p_object_version_number => l_object_version_number
132 ,p_effective_start_date => l_effective_start_date
133 ,p_effective_end_date => l_effective_end_date);
134 --
135 -- Call After Process User Hook
136 --
137 begin
138 hr_de_liability_premiums_bk1.create_premium_a
139 (p_effective_date => trunc(p_effective_date)
140 ,p_organization_link_id => p_organization_link_id
141 ,p_std_percentage => p_std_percentage
142 ,p_calculation_method => p_calculation_method
143 ,p_std_working_hours_per_year => p_std_working_hours_per_year
144 ,p_max_remuneration => p_max_remuneration
145 ,p_attribute_category => p_attribute_category
146 ,p_attribute1 => p_attribute1
147 ,p_attribute2 => p_attribute2
148 ,p_attribute3 => p_attribute3
149 ,p_attribute4 => p_attribute4
150 ,p_attribute5 => p_attribute5
151 ,p_attribute6 => p_attribute6
152 ,p_attribute7 => p_attribute7
153 ,p_attribute8 => p_attribute8
154 ,p_attribute9 => p_attribute9
155 ,p_attribute10 => p_attribute1
156 ,p_attribute11 => p_attribute11
157 ,p_attribute12 => p_attribute12
158 ,p_attribute13 => p_attribute13
159 ,p_attribute14 => p_attribute14
160 ,p_attribute15 => p_attribute15
161 ,p_attribute16 => p_attribute16
162 ,p_attribute17 => p_attribute17
163 ,p_attribute18 => p_attribute18
164 ,p_attribute19 => p_attribute19
165 ,p_attribute20 => p_attribute20
166 ,p_liability_premiums_id => l_liability_premiums_id
167 ,p_object_version_number => l_object_version_number
168 ,p_effective_start_date => l_effective_start_date
169 ,p_effective_end_date => l_effective_end_date);
170 exception
171 when hr_api.cannot_find_prog_unit then
172 hr_api.cannot_find_prog_unit_error
173 (p_module_name => 'create_premium'
174 ,p_hook_type => 'AP'
175 );
176 end;
177 --
178 -- When in validation only mode raise the Validate_Enabled exception
179 --
180 if p_validate then
181 raise hr_api.validate_enabled;
182 end if;
183 --
184 -- Set all output arguments
185 --
186 p_liability_premiums_id := l_liability_premiums_id;
187 p_object_version_number := l_object_version_number;
188 p_effective_start_date := l_effective_start_date;
189 p_effective_end_date := l_effective_end_date;
190 --
191 hr_utility.set_location(' Leaving:'||l_proc, 70);
192 exception
193 when hr_api.validate_enabled then
194 --
195 -- As the Validate_Enabled exception has been raised
196 -- we must rollback to the savepoint
197 --
198 rollback to create_premium;
199 --
200 -- Only set output warning arguments
201 -- (Any key or derived arguments must be set to null
202 -- when validation only mode is being used.)
203 --
204 p_liability_premiums_id := null;
205 p_object_version_number := null;
206 p_effective_start_date := null;
207 p_effective_end_date := null;
208 hr_utility.set_location(' Leaving:'||l_proc, 80);
209 when others then
210 --
211 -- A validation or unexpected error has occured
212 --
213 rollback to create_premium;
214 -- Set OUT parameters.
215 p_liability_premiums_id := null;
216 p_object_version_number := null;
217 p_effective_start_date := null;
218 p_effective_end_date := null;
219 hr_utility.set_location(' Leaving:'||l_proc, 90);
220 raise;
221 end create_premium;
222 --
223 -- ----------------------------------------------------------------------------
224 -- |----------------------------< update_premium >----------------------------|
225 -- ----------------------------------------------------------------------------
226 --
227 procedure update_premium
228 (p_validate in boolean default false
229 ,p_effective_date in date
230 ,p_datetrack_mode in varchar2
231 ,p_liability_premiums_id in number
232 ,p_std_percentage in number default hr_api.g_number
233 ,p_calculation_method in varchar2 default hr_api.g_varchar2
234 ,p_std_working_hours_per_year in number default hr_api.g_number
235 ,p_max_remuneration in number default hr_api.g_number
236 ,p_attribute_category in varchar2 default hr_api.g_varchar2
237 ,p_attribute1 in varchar2 default hr_api.g_varchar2
238 ,p_attribute2 in varchar2 default hr_api.g_varchar2
239 ,p_attribute3 in varchar2 default hr_api.g_varchar2
240 ,p_attribute4 in varchar2 default hr_api.g_varchar2
241 ,p_attribute5 in varchar2 default hr_api.g_varchar2
242 ,p_attribute6 in varchar2 default hr_api.g_varchar2
243 ,p_attribute7 in varchar2 default hr_api.g_varchar2
244 ,p_attribute8 in varchar2 default hr_api.g_varchar2
245 ,p_attribute9 in varchar2 default hr_api.g_varchar2
246 ,p_attribute10 in varchar2 default hr_api.g_varchar2
247 ,p_attribute11 in varchar2 default hr_api.g_varchar2
248 ,p_attribute12 in varchar2 default hr_api.g_varchar2
249 ,p_attribute13 in varchar2 default hr_api.g_varchar2
250 ,p_attribute14 in varchar2 default hr_api.g_varchar2
251 ,p_attribute15 in varchar2 default hr_api.g_varchar2
252 ,p_attribute16 in varchar2 default hr_api.g_varchar2
253 ,p_attribute17 in varchar2 default hr_api.g_varchar2
254 ,p_attribute18 in varchar2 default hr_api.g_varchar2
255 ,p_attribute19 in varchar2 default hr_api.g_varchar2
256 ,p_attribute20 in varchar2 default hr_api.g_varchar2
257 ,p_object_version_number in out nocopy number
258 ,p_effective_start_date out nocopy date
259 ,p_effective_end_date out nocopy date
260 ) is
261 --
262 -- Declare cursors and local variables
263 --
264 l_proc varchar2(72) := g_package||'update_premium';
265 l_liability_premiums_id hr_de_liability_premiums_f.liability_premiums_id%TYPE;
266 l_object_version_number hr_de_liability_premiums_f.object_version_number%TYPE := p_object_version_number;
267 l_effective_start_date hr_de_liability_premiums_f.effective_start_date%TYPE;
268 l_effective_end_date hr_de_liability_premiums_f.effective_end_date%TYPE;
269 l_organization_link_id_o number;
270 l_temp_ovn number := p_object_version_number;
271 begin
272 hr_utility.set_location('Entering:'|| l_proc, 10);
273 --
274 -- Issue a savepoint
275 --
276 savepoint update_premium;
277 --
278 -- Call Before Process User Hook
279 --
280 begin
281 hr_de_liability_premiums_bk2.update_premium_b
282 (p_effective_date => trunc(p_effective_date)
283 ,p_datetrack_mode => p_datetrack_mode
284 ,p_liability_premiums_id => p_liability_premiums_id
285 ,p_organization_link_id_o => l_organization_link_id_o
286 ,p_std_percentage => p_std_percentage
287 ,p_calculation_method => p_calculation_method
288 ,p_std_working_hours_per_year => p_std_working_hours_per_year
289 ,p_max_remuneration => p_max_remuneration
290 ,p_attribute_category => p_attribute_category
291 ,p_attribute1 => p_attribute1
292 ,p_attribute2 => p_attribute2
293 ,p_attribute3 => p_attribute3
294 ,p_attribute4 => p_attribute4
295 ,p_attribute5 => p_attribute5
296 ,p_attribute6 => p_attribute6
297 ,p_attribute7 => p_attribute7
298 ,p_attribute8 => p_attribute8
299 ,p_attribute9 => p_attribute9
300 ,p_attribute10 => p_attribute1
301 ,p_attribute11 => p_attribute11
302 ,p_attribute12 => p_attribute12
303 ,p_attribute13 => p_attribute13
304 ,p_attribute14 => p_attribute14
305 ,p_attribute15 => p_attribute15
306 ,p_attribute16 => p_attribute16
307 ,p_attribute17 => p_attribute17
308 ,p_attribute18 => p_attribute18
309 ,p_attribute19 => p_attribute19
310 ,p_attribute20 => p_attribute20
311 ,p_object_version_number => l_object_version_number);
312 exception
313 when hr_api.cannot_find_prog_unit then
314 hr_api.cannot_find_prog_unit_error
315 (p_module_name => 'update_premium'
316 ,p_hook_type => 'BP'
317 );
318 end;
319 --
320 -- Process Logic
321 --
322 hr_lip_upd.upd
323 (p_effective_date => trunc(p_effective_date)
324 ,p_datetrack_mode => p_datetrack_mode
325 ,p_liability_premiums_id => p_liability_premiums_id
326 ,p_std_percentage => p_std_percentage
327 ,p_calculation_method => p_calculation_method
328 ,p_std_working_hours_per_year => p_std_working_hours_per_year
329 ,p_max_remuneration => p_max_remuneration
330 ,p_attribute_category => p_attribute_category
331 ,p_attribute1 => p_attribute1
332 ,p_attribute2 => p_attribute2
333 ,p_attribute3 => p_attribute3
334 ,p_attribute4 => p_attribute4
335 ,p_attribute5 => p_attribute5
336 ,p_attribute6 => p_attribute6
337 ,p_attribute7 => p_attribute7
338 ,p_attribute8 => p_attribute8
339 ,p_attribute9 => p_attribute9
340 ,p_attribute10 => p_attribute10
341 ,p_attribute11 => p_attribute11
342 ,p_attribute12 => p_attribute12
343 ,p_attribute13 => p_attribute13
344 ,p_attribute14 => p_attribute14
345 ,p_attribute15 => p_attribute15
346 ,p_attribute16 => p_attribute16
347 ,p_attribute17 => p_attribute17
348 ,p_attribute18 => p_attribute18
349 ,p_attribute19 => p_attribute19
350 ,p_attribute20 => p_attribute20
351 ,p_object_version_number => l_object_version_number
352 ,p_effective_start_date => l_effective_start_date
353 ,p_effective_end_date => l_effective_end_date);
354 --
355 -- Call After Process User Hook
356 --
357 begin
358 hr_de_liability_premiums_bk2.update_premium_a
359 (p_effective_date => trunc(p_effective_date)
360 ,p_datetrack_mode => p_datetrack_mode
361 ,p_liability_premiums_id => p_liability_premiums_id
362 ,p_organization_link_id_o => l_organization_link_id_o
363 ,p_std_percentage => p_std_percentage
364 ,p_calculation_method => p_calculation_method
365 ,p_std_working_hours_per_year => p_std_working_hours_per_year
366 ,p_max_remuneration => p_max_remuneration
367 ,p_attribute_category => p_attribute_category
368 ,p_attribute1 => p_attribute1
369 ,p_attribute2 => p_attribute2
370 ,p_attribute3 => p_attribute3
371 ,p_attribute4 => p_attribute4
372 ,p_attribute5 => p_attribute5
373 ,p_attribute6 => p_attribute6
374 ,p_attribute7 => p_attribute7
375 ,p_attribute8 => p_attribute8
376 ,p_attribute9 => p_attribute9
377 ,p_attribute10 => p_attribute1
378 ,p_attribute11 => p_attribute11
379 ,p_attribute12 => p_attribute12
380 ,p_attribute13 => p_attribute13
381 ,p_attribute14 => p_attribute14
382 ,p_attribute15 => p_attribute15
383 ,p_attribute16 => p_attribute16
384 ,p_attribute17 => p_attribute17
385 ,p_attribute18 => p_attribute18
386 ,p_attribute19 => p_attribute19
387 ,p_attribute20 => p_attribute20
388 ,p_object_version_number => l_object_version_number
389 ,p_effective_start_date => l_effective_start_date
390 ,p_effective_end_date => l_effective_end_date);
391 exception
392 when hr_api.cannot_find_prog_unit then
393 hr_api.cannot_find_prog_unit_error
394 (p_module_name => 'after_premium'
395 ,p_hook_type => 'AP'
396 );
397 end;
398 --
399 -- When in validation only mode raise the Validate_Enabled exception
400 --
401 if p_validate then
402 raise hr_api.validate_enabled;
403 end if;
404 --
405 -- Set all output arguments
406 --
407 p_object_version_number := l_object_version_number;
408 p_effective_start_date := l_effective_start_date;
409 p_effective_end_date := l_effective_end_date;
410 --
411 hr_utility.set_location(' Leaving:'||l_proc, 70);
412 exception
413 when hr_api.validate_enabled then
414 --
415 -- As the Validate_Enabled exception has been raised
416 -- we must rollback to the savepoint
417 --
418 rollback to update_premium;
419 --
420 -- Only set output warning arguments
421 -- (Any key or derived arguments must be set to null
422 -- when validation only mode is being used.)
423 --
424 p_object_version_number := null;
425 p_effective_start_date := null;
426 p_effective_end_date := null;
427 hr_utility.set_location(' Leaving:'||l_proc, 80);
428 when others then
429 --
430 -- A validation or unexpected error has occured
431 --
432 rollback to update_premium;
433 -- Reset IN OUT and set OUT parameters.
434 p_object_version_number := l_temp_ovn;
435 p_effective_start_date := null;
436 p_effective_end_date := null;
437 hr_utility.set_location(' Leaving:'||l_proc, 90);
438 raise;
439 end update_premium;
440 --
441 -- ----------------------------------------------------------------------------
442 -- |----------------------------< delete_premium >----------------------------|
443 -- ----------------------------------------------------------------------------
444 --
445 procedure delete_premium
446 (p_validate in boolean default false
447 ,p_effective_date in date
448 ,p_datetrack_mode in varchar2
449 ,p_liability_premiums_id in number
450 ,p_object_version_number in out nocopy number
451 ,p_effective_start_date out nocopy date
452 ,p_effective_end_date out nocopy date
453 ) is
454 --
455 -- Declare cursors and local variables
456 --
457 l_proc varchar2(72) := g_package||'delete_premium';
458 l_object_version_number hr_de_liability_premiums_f.object_version_number%TYPE := p_object_version_number;
459 l_effective_start_date hr_de_liability_premiums_f.effective_start_date%TYPE;
460 l_effective_end_date hr_de_liability_premiums_f.effective_end_date%TYPE;
461 l_organization_link_id_o number;
462 l_temp_ovn number := p_object_version_number;
463 begin
464 hr_utility.set_location('Entering:'|| l_proc, 10);
465 --
466 -- Issue a savepoint
467 --
468 savepoint delete_premium;
469 --
470 -- Call Before Process User Hook
471 --
472 begin
473 hr_de_liability_premiums_bk3.delete_premium_b
474 (p_effective_date => trunc(p_effective_date)
475 ,p_datetrack_mode => p_datetrack_mode
476 ,p_liability_premiums_id => p_liability_premiums_id
477 ,p_organization_link_id_o => l_organization_link_id_o
478 ,p_object_version_number => l_object_version_number);
479 exception
480 when hr_api.cannot_find_prog_unit then
481 hr_api.cannot_find_prog_unit_error
482 (p_module_name => 'delete_premium'
483 ,p_hook_type => 'BP'
484 );
485 end;
486 --
487 -- Process Logic
488 --
489 hr_lip_del.del
490 (p_effective_date => trunc(p_effective_date)
491 ,p_datetrack_mode => p_datetrack_mode
492 ,p_liability_premiums_id => p_liability_premiums_id
493 ,p_object_version_number => l_object_version_number
494 ,p_effective_start_date => l_effective_start_date
495 ,p_effective_end_date => l_effective_end_date);
496 --
497 -- Call After Process User Hook
498 --
499 begin
500 hr_de_liability_premiums_bk3.delete_premium_a
501 (p_effective_date => trunc(p_effective_date)
502 ,p_datetrack_mode => p_datetrack_mode
503 ,p_liability_premiums_id => p_liability_premiums_id
504 ,p_organization_link_id_o => l_organization_link_id_o
505 ,p_object_version_number => l_object_version_number
506 ,p_effective_start_date => l_effective_start_date
507 ,p_effective_end_date => l_effective_end_date);
508 exception
509 when hr_api.cannot_find_prog_unit then
510 hr_api.cannot_find_prog_unit_error
511 (p_module_name => 'delete_premium'
512 ,p_hook_type => 'AP'
513 );
514 end;
515 --
516 -- When in validation only mode raise the Validate_Enabled exception
517 --
518 if p_validate then
519 raise hr_api.validate_enabled;
520 end if;
521 --
522 -- Set all output arguments
523 --
524 p_object_version_number := l_object_version_number;
525 p_effective_start_date := l_effective_start_date;
526 p_effective_end_date := l_effective_end_date;
527 --
528 hr_utility.set_location(' Leaving:'||l_proc, 70);
529 exception
530 when hr_api.validate_enabled then
531 --
532 -- As the Validate_Enabled exception has been raised
533 -- we must rollback to the savepoint
534 --
535 rollback to delete_premium;
536 --
537 -- Only set output warning arguments
538 -- (Any key or derived arguments must be set to null
539 -- when validation only mode is being used.)
540 --
541 p_object_version_number := null;
542 p_effective_start_date := null;
543 p_effective_end_date := null;
544 hr_utility.set_location(' Leaving:'||l_proc, 80);
545 when others then
546 --
547 -- A validation or unexpected error has occured
548 --
549 rollback to delete_premium;
550 -- Reset IN OUT and set OUT parameters.
551 p_object_version_number := l_temp_ovn;
552 p_effective_start_date := null;
553 p_effective_end_date := null;
554 hr_utility.set_location(' Leaving:'||l_proc, 90);
555 raise;
556 end delete_premium;
557 --
558 -- ----------------------------------------------------------------------------
559 -- |---------------------------------< lck >----------------------------------|
560 -- ----------------------------------------------------------------------------
561 --
562 procedure lck
563 (p_effective_date in date
564 ,p_datetrack_mode in varchar2
565 ,p_liability_premiums_id in number
566 ,p_object_version_number in number
567 ,p_validation_start_date out nocopy date
568 ,p_validation_end_date out nocopy date
569 ) is
570 --
571 -- Declare cursors and local variables
572 --
573 l_proc varchar2(72) := g_package||'lck';
574 l_validation_start_date date;
575 l_validation_end_date date;
576 begin
577 --
578 hr_utility.set_location('Entering:'|| l_proc, 10);
579 --
580 -- Lock the record.
581 --
582 hr_lip_shd.lck
583 (p_effective_date => trunc(p_effective_date)
584 ,p_datetrack_mode => p_datetrack_mode
585 ,p_liability_premiums_id => p_liability_premiums_id
586 ,p_object_version_number => p_object_version_number
587 ,p_validation_start_date => l_validation_start_date
588 ,p_validation_end_date => l_validation_end_date);
589 --
590 -- Set all output arguments
591 --
592 p_validation_start_date := l_validation_start_date;
593 p_validation_end_date := l_validation_end_date;
594 --
595 hr_utility.set_location('Exiting:'|| l_proc, 70);
596 --
597 end lck;
598 --
599 end hr_de_liability_premiums_api;