[Home] [Help]
PACKAGE BODY: APPS.PAY_ACTION_INFORMATION_API
Source
1 Package Body pay_action_information_api as
2 /* $Header: pyaifapi.pkb 115.8 2003/01/14 17:25:25 dsaxby noship $ */
3 --
4 -- Package Variables
5 --
6 g_debug boolean := hr_utility.debug_enabled;
7 g_package varchar2(33) := ' pay_action_information_api.';
8 --
9 -- ----------------------------------------------------------------------------
10 -- |------------------------< create_action_information >----------------------|
11 -- ----------------------------------------------------------------------------
12 --
13 procedure create_action_information
14 (p_validate in boolean default false
15 ,p_action_context_id in number
16 ,p_action_context_type in varchar2
17 ,p_action_information_category in varchar2
18 ,p_tax_unit_id in number default null
19 ,p_jurisdiction_code in varchar2 default null
20 ,p_source_id in number default null
21 ,p_source_text in varchar2 default null
22 ,p_tax_group in varchar2 default null
23 ,p_effective_date in date default null
24 ,p_assignment_id in number default null
25 ,p_action_information1 in varchar2 default null
26 ,p_action_information2 in varchar2 default null
27 ,p_action_information3 in varchar2 default null
28 ,p_action_information4 in varchar2 default null
29 ,p_action_information5 in varchar2 default null
30 ,p_action_information6 in varchar2 default null
31 ,p_action_information7 in varchar2 default null
32 ,p_action_information8 in varchar2 default null
33 ,p_action_information9 in varchar2 default null
34 ,p_action_information10 in varchar2 default null
35 ,p_action_information11 in varchar2 default null
36 ,p_action_information12 in varchar2 default null
37 ,p_action_information13 in varchar2 default null
38 ,p_action_information14 in varchar2 default null
39 ,p_action_information15 in varchar2 default null
40 ,p_action_information16 in varchar2 default null
41 ,p_action_information17 in varchar2 default null
42 ,p_action_information18 in varchar2 default null
43 ,p_action_information19 in varchar2 default null
44 ,p_action_information20 in varchar2 default null
45 ,p_action_information21 in varchar2 default null
46 ,p_action_information22 in varchar2 default null
47 ,p_action_information23 in varchar2 default null
48 ,p_action_information24 in varchar2 default null
49 ,p_action_information25 in varchar2 default null
50 ,p_action_information26 in varchar2 default null
51 ,p_action_information27 in varchar2 default null
52 ,p_action_information28 in varchar2 default null
53 ,p_action_information29 in varchar2 default null
54 ,p_action_information30 in varchar2 default null
55 ,p_action_information_id out nocopy number
56 ,p_object_version_number out nocopy number
57 ) is
58 --
59 -- Declare cursors and local variables
60 --
61 l_action_information_id pay_action_information.action_information_id%TYPE;
62 l_proc varchar2(72);
63 l_object_version_number pay_action_information.object_version_number%TYPE;
64 l_effective_date pay_action_information.effective_date%TYPE;
65 --
66 begin
67 g_debug := hr_utility.debug_enabled;
68 --
69 if g_debug then
70 l_proc := g_package||'create_action_information';
71 hr_utility.set_location('Entering:'|| l_proc, 10);
72 end if;
73 --
74 -- Issue a savepoint if operating in validation only mode
75 --
76 savepoint create_action_information;
77 --
78 -- Truncate time portion of date.
79 --
80 l_effective_date := trunc(p_effective_date);
81 --
82 if g_debug then
83 hr_utility.set_location(l_proc, 20);
84 end if;
85 --
86 -- Process Logic
87 --
88 begin
89 --
90 -- Start of API User Hook for the before hook of create_action_information
91 --
92 pay_action_information_bk1.create_action_information_b
93 (
94 p_action_context_id => p_action_context_id
95 ,p_action_context_type => p_action_context_type
96 ,p_tax_unit_id => p_tax_unit_id
97 ,p_jurisdiction_code => p_jurisdiction_code
98 ,p_source_id => p_source_id
99 ,p_source_text => p_source_text
100 ,p_tax_group => p_tax_group
101 ,p_effective_date => l_effective_date
102 ,p_assignment_id => p_assignment_id
103 ,p_action_information_category => p_action_information_category
104 ,p_action_information1 => p_action_information1
105 ,p_action_information2 => p_action_information2
106 ,p_action_information3 => p_action_information3
107 ,p_action_information4 => p_action_information4
108 ,p_action_information5 => p_action_information5
109 ,p_action_information6 => p_action_information6
110 ,p_action_information7 => p_action_information7
111 ,p_action_information8 => p_action_information8
112 ,p_action_information9 => p_action_information9
113 ,p_action_information10 => p_action_information10
114 ,p_action_information11 => p_action_information11
115 ,p_action_information12 => p_action_information12
116 ,p_action_information13 => p_action_information13
117 ,p_action_information14 => p_action_information14
118 ,p_action_information15 => p_action_information15
119 ,p_action_information16 => p_action_information16
120 ,p_action_information17 => p_action_information17
121 ,p_action_information18 => p_action_information18
122 ,p_action_information19 => p_action_information19
123 ,p_action_information20 => p_action_information20
124 ,p_action_information21 => p_action_information21
125 ,p_action_information22 => p_action_information22
126 ,p_action_information23 => p_action_information23
127 ,p_action_information24 => p_action_information24
128 ,p_action_information25 => p_action_information25
129 ,p_action_information26 => p_action_information26
130 ,p_action_information27 => p_action_information27
131 ,p_action_information28 => p_action_information28
132 ,p_action_information29 => p_action_information29
133 ,p_action_information30 => p_action_information30
134 );
135 exception
136 when hr_api.cannot_find_prog_unit then
137 hr_api.cannot_find_prog_unit_error
138 (
139 p_module_name => 'CREATE_action_information'
140 ,p_hook_type => 'BP'
141 );
142 --
143 -- End of API User Hook for the before hook of create_action_information
144 --
145 end;
146 --
147 pay_aif_ins.ins
148 (
149 p_action_information_id => l_action_information_id
150 ,p_action_context_id => p_action_context_id
151 ,p_action_context_type => p_action_context_type
152 ,p_tax_unit_id => p_tax_unit_id
153 ,p_jurisdiction_code => p_jurisdiction_code
154 ,p_source_id => p_source_id
155 ,p_source_text => p_source_text
156 ,p_tax_group => p_tax_group
157 ,p_object_version_number => l_object_version_number
158 ,p_effective_date => l_effective_date
159 ,p_assignment_id => p_assignment_id
160 ,p_action_information_category => p_action_information_category
161 ,p_action_information1 => p_action_information1
162 ,p_action_information2 => p_action_information2
163 ,p_action_information3 => p_action_information3
164 ,p_action_information4 => p_action_information4
165 ,p_action_information5 => p_action_information5
166 ,p_action_information6 => p_action_information6
167 ,p_action_information7 => p_action_information7
168 ,p_action_information8 => p_action_information8
169 ,p_action_information9 => p_action_information9
170 ,p_action_information10 => p_action_information10
171 ,p_action_information11 => p_action_information11
172 ,p_action_information12 => p_action_information12
173 ,p_action_information13 => p_action_information13
174 ,p_action_information14 => p_action_information14
175 ,p_action_information15 => p_action_information15
176 ,p_action_information16 => p_action_information16
177 ,p_action_information17 => p_action_information17
178 ,p_action_information18 => p_action_information18
179 ,p_action_information19 => p_action_information19
180 ,p_action_information20 => p_action_information20
181 ,p_action_information21 => p_action_information21
182 ,p_action_information22 => p_action_information22
183 ,p_action_information23 => p_action_information23
184 ,p_action_information24 => p_action_information24
185 ,p_action_information25 => p_action_information25
186 ,p_action_information26 => p_action_information26
187 ,p_action_information27 => p_action_information27
188 ,p_action_information28 => p_action_information28
189 ,p_action_information29 => p_action_information29
190 ,p_action_information30 => p_action_information30
191 );
192 --
193 begin
194 --
195 -- Start of API User Hook for the after hook of create_action_information
196 --
197 pay_action_information_bk1.create_action_information_a
198 (
199 p_action_information_id => l_action_information_id
200 ,p_action_context_id => p_action_context_id
201 ,p_action_context_type => p_action_context_type
202 ,p_tax_unit_id => p_tax_unit_id
203 ,p_jurisdiction_code => p_jurisdiction_code
204 ,p_source_id => p_source_id
205 ,p_source_text => p_source_text
206 ,p_tax_group => p_tax_group
207 ,p_object_version_number => l_object_version_number
208 ,p_effective_date => l_effective_date
209 ,p_assignment_id => p_assignment_id
210 ,p_action_information_category => p_action_information_category
211 ,p_action_information1 => p_action_information1
212 ,p_action_information2 => p_action_information2
213 ,p_action_information3 => p_action_information3
214 ,p_action_information4 => p_action_information4
215 ,p_action_information5 => p_action_information5
216 ,p_action_information6 => p_action_information6
217 ,p_action_information7 => p_action_information7
218 ,p_action_information8 => p_action_information8
219 ,p_action_information9 => p_action_information9
220 ,p_action_information10 => p_action_information10
221 ,p_action_information11 => p_action_information11
222 ,p_action_information12 => p_action_information12
223 ,p_action_information13 => p_action_information13
224 ,p_action_information14 => p_action_information14
225 ,p_action_information15 => p_action_information15
226 ,p_action_information16 => p_action_information16
227 ,p_action_information17 => p_action_information17
228 ,p_action_information18 => p_action_information18
229 ,p_action_information19 => p_action_information19
230 ,p_action_information20 => p_action_information20
231 ,p_action_information21 => p_action_information21
232 ,p_action_information22 => p_action_information22
233 ,p_action_information23 => p_action_information23
234 ,p_action_information24 => p_action_information24
235 ,p_action_information25 => p_action_information25
236 ,p_action_information26 => p_action_information26
237 ,p_action_information27 => p_action_information27
238 ,p_action_information28 => p_action_information28
239 ,p_action_information29 => p_action_information29
240 ,p_action_information30 => p_action_information30
241 );
242 exception
243 when hr_api.cannot_find_prog_unit then
244 hr_api.cannot_find_prog_unit_error
245 (p_module_name => 'CREATE_action_information'
246 ,p_hook_type => 'AP'
247 );
248 --
249 -- End of API User Hook for the after hook of create_action_information
250 --
251 end;
252 --
253 if g_debug then
254 hr_utility.set_location(l_proc, 60);
255 end if;
256 --
257 -- When in validation only mode raise the Validate_Enabled exception
258 --
259 if p_validate then
260 raise hr_api.validate_enabled;
261 end if;
262 --
263 -- Set all output arguments
264 --
265 p_action_information_id := l_action_information_id;
266 p_object_version_number := l_object_version_number;
267 --
268 if g_debug then
269 hr_utility.set_location(' Leaving:'||l_proc, 70);
270 end if;
271 --
275 --
272 exception
273 --
274 when hr_api.validate_enabled then
276 -- As the Validate_Enabled exception has been raised
277 -- we must rollback to the savepoint
278 --
279 ROLLBACK TO create_action_information;
280 --
281 -- Only set output warning arguments
282 -- (Any key or derived arguments must be set to null
283 -- when validation only mode is being used.)
284 --
285 p_action_information_id := null;
286 p_object_version_number := null;
287 if g_debug then
288 hr_utility.set_location(' Leaving:'||l_proc, 80);
289 end if;
290 --
291 when others then
292 --
293 -- A validation or unexpected error has occured
294 --
295 ROLLBACK TO create_action_information;
296 --
297 -- Reset IN OUT parameters and set OUT parameters
298 --
299 p_action_information_id := null;
300 p_object_version_number := null;
301 raise;
302 --
303 end create_action_information;
304 -- ----------------------------------------------------------------------------
305 -- |------------------------< update_action_information >--- ------------------|
306 -- ----------------------------------------------------------------------------
307 --
308 procedure update_action_information
309 (p_validate in boolean default false
310 ,p_action_information_id in number
311 ,p_object_version_number in out nocopy number
312 ,p_action_information1 in varchar2 default hr_api.g_varchar2
313 ,p_action_information2 in varchar2 default hr_api.g_varchar2
314 ,p_action_information3 in varchar2 default hr_api.g_varchar2
315 ,p_action_information4 in varchar2 default hr_api.g_varchar2
316 ,p_action_information5 in varchar2 default hr_api.g_varchar2
317 ,p_action_information6 in varchar2 default hr_api.g_varchar2
318 ,p_action_information7 in varchar2 default hr_api.g_varchar2
319 ,p_action_information8 in varchar2 default hr_api.g_varchar2
320 ,p_action_information9 in varchar2 default hr_api.g_varchar2
321 ,p_action_information10 in varchar2 default hr_api.g_varchar2
322 ,p_action_information11 in varchar2 default hr_api.g_varchar2
323 ,p_action_information12 in varchar2 default hr_api.g_varchar2
324 ,p_action_information13 in varchar2 default hr_api.g_varchar2
325 ,p_action_information14 in varchar2 default hr_api.g_varchar2
326 ,p_action_information15 in varchar2 default hr_api.g_varchar2
327 ,p_action_information16 in varchar2 default hr_api.g_varchar2
328 ,p_action_information17 in varchar2 default hr_api.g_varchar2
329 ,p_action_information18 in varchar2 default hr_api.g_varchar2
330 ,p_action_information19 in varchar2 default hr_api.g_varchar2
331 ,p_action_information20 in varchar2 default hr_api.g_varchar2
332 ,p_action_information21 in varchar2 default hr_api.g_varchar2
333 ,p_action_information22 in varchar2 default hr_api.g_varchar2
334 ,p_action_information23 in varchar2 default hr_api.g_varchar2
335 ,p_action_information24 in varchar2 default hr_api.g_varchar2
336 ,p_action_information25 in varchar2 default hr_api.g_varchar2
337 ,p_action_information26 in varchar2 default hr_api.g_varchar2
338 ,p_action_information27 in varchar2 default hr_api.g_varchar2
339 ,p_action_information28 in varchar2 default hr_api.g_varchar2
340 ,p_action_information29 in varchar2 default hr_api.g_varchar2
341 ,p_action_information30 in varchar2 default hr_api.g_varchar2
342 ) is
343 --
344 -- Declare cursors and local variables
345 --
346 l_proc varchar2(72);
347 l_object_version_number pay_action_information.object_version_number%TYPE;
348 --
349 begin
350 g_debug := hr_utility.debug_enabled;
351 --
352 if g_debug then
353 l_proc := g_package||'update_action_information';
354 hr_utility.set_location('Entering:'|| l_proc, 10);
355 end if;
356 --
357 -- Issue a savepoint if operating in validation only mode
358 --
359 savepoint update_action_information;
360 --
361 if g_debug then
362 hr_utility.set_location(l_proc, 20);
363 end if;
364 --
365 -- Process Logic
366 --
367 l_object_version_number := p_object_version_number;
368 --
369 begin
370 --
371 -- Start of API User Hook for the before hook of update_action_information
372 --
373 pay_action_information_bk2.update_action_information_b
374 (
375 p_action_information_id => p_action_information_id
376 ,p_object_version_number => p_object_version_number
377 ,p_action_information1 => p_action_information1
378 ,p_action_information2 => p_action_information2
379 ,p_action_information3 => p_action_information3
380 ,p_action_information4 => p_action_information4
381 ,p_action_information5 => p_action_information5
382 ,p_action_information6 => p_action_information6
383 ,p_action_information7 => p_action_information7
384 ,p_action_information8 => p_action_information8
388 ,p_action_information12 => p_action_information12
385 ,p_action_information9 => p_action_information9
386 ,p_action_information10 => p_action_information10
387 ,p_action_information11 => p_action_information11
389 ,p_action_information13 => p_action_information13
390 ,p_action_information14 => p_action_information14
391 ,p_action_information15 => p_action_information15
392 ,p_action_information16 => p_action_information16
393 ,p_action_information17 => p_action_information17
394 ,p_action_information18 => p_action_information18
395 ,p_action_information19 => p_action_information19
396 ,p_action_information20 => p_action_information20
397 ,p_action_information21 => p_action_information21
398 ,p_action_information22 => p_action_information22
399 ,p_action_information23 => p_action_information23
400 ,p_action_information24 => p_action_information24
401 ,p_action_information25 => p_action_information25
402 ,p_action_information26 => p_action_information26
403 ,p_action_information27 => p_action_information27
404 ,p_action_information28 => p_action_information28
405 ,p_action_information29 => p_action_information29
406 ,p_action_information30 => p_action_information30
407 );
408 exception
409 when hr_api.cannot_find_prog_unit then
410 hr_api.cannot_find_prog_unit_error
411 (p_module_name => 'UPDATE_action_information'
412 ,p_hook_type => 'BP'
413 );
414 --
415 -- End of API User Hook for the before hook of update_action_information
416 --
417 end;
418 --
419 pay_aif_upd.upd
420 (
421 p_action_information_id => p_action_information_id
422 ,p_object_version_number => l_object_version_number
423 ,p_action_information1 => p_action_information1
424 ,p_action_information2 => p_action_information2
425 ,p_action_information3 => p_action_information3
426 ,p_action_information4 => p_action_information4
427 ,p_action_information5 => p_action_information5
428 ,p_action_information6 => p_action_information6
429 ,p_action_information7 => p_action_information7
430 ,p_action_information8 => p_action_information8
431 ,p_action_information9 => p_action_information9
432 ,p_action_information10 => p_action_information10
433 ,p_action_information11 => p_action_information11
434 ,p_action_information12 => p_action_information12
435 ,p_action_information13 => p_action_information13
436 ,p_action_information14 => p_action_information14
437 ,p_action_information15 => p_action_information15
438 ,p_action_information16 => p_action_information16
439 ,p_action_information17 => p_action_information17
440 ,p_action_information18 => p_action_information18
441 ,p_action_information19 => p_action_information19
442 ,p_action_information20 => p_action_information20
443 ,p_action_information21 => p_action_information21
444 ,p_action_information22 => p_action_information22
445 ,p_action_information23 => p_action_information23
446 ,p_action_information24 => p_action_information24
447 ,p_action_information25 => p_action_information25
448 ,p_action_information26 => p_action_information26
449 ,p_action_information27 => p_action_information27
450 ,p_action_information28 => p_action_information28
451 ,p_action_information29 => p_action_information29
452 ,p_action_information30 => p_action_information30
453 );
454 --
455 begin
456 --
457 -- Start of API User Hook for the after hook of update_action_information
458 --
459 pay_action_information_bk2.update_action_information_a
460 (
461 p_action_information_id => p_action_information_id
462 ,p_object_version_number => l_object_version_number
463 ,p_action_information1 => p_action_information1
464 ,p_action_information2 => p_action_information2
465 ,p_action_information3 => p_action_information3
466 ,p_action_information4 => p_action_information4
467 ,p_action_information5 => p_action_information5
468 ,p_action_information6 => p_action_information6
469 ,p_action_information7 => p_action_information7
470 ,p_action_information8 => p_action_information8
471 ,p_action_information9 => p_action_information9
472 ,p_action_information10 => p_action_information10
473 ,p_action_information11 => p_action_information11
474 ,p_action_information12 => p_action_information12
475 ,p_action_information13 => p_action_information13
476 ,p_action_information14 => p_action_information14
477 ,p_action_information15 => p_action_information15
478 ,p_action_information16 => p_action_information16
479 ,p_action_information17 => p_action_information17
480 ,p_action_information18 => p_action_information18
481 ,p_action_information19 => p_action_information19
485 ,p_action_information23 => p_action_information23
482 ,p_action_information20 => p_action_information20
483 ,p_action_information21 => p_action_information21
484 ,p_action_information22 => p_action_information22
486 ,p_action_information24 => p_action_information24
487 ,p_action_information25 => p_action_information25
488 ,p_action_information26 => p_action_information26
489 ,p_action_information27 => p_action_information27
490 ,p_action_information28 => p_action_information28
491 ,p_action_information29 => p_action_information29
492 ,p_action_information30 => p_action_information30
493 );
494 exception
495 when hr_api.cannot_find_prog_unit then
496 hr_api.cannot_find_prog_unit_error
497 (p_module_name => 'UPDATE_action_information'
498 ,p_hook_type => 'AP'
499 );
500 --
501 -- End of API User Hook for the after hook of update_action_information
502 --
503 end;
504 --
505 if g_debug then
506 hr_utility.set_location(l_proc, 60);
507 end if;
508 --
509 -- When in validation only mode raise the Validate_Enabled exception
510 --
511 if p_validate then
512 raise hr_api.validate_enabled;
513 end if;
514 --
515 -- Set all output arguments
516 --
517 p_object_version_number := l_object_version_number;
518 --
519 if g_debug then
520 hr_utility.set_location(' Leaving:'||l_proc, 70);
521 end if;
522 --
523 exception
524 --
525 when hr_api.validate_enabled then
526 --
527 -- As the Validate_Enabled exception has been raised
528 -- we must rollback to the savepoint
529 --
530 ROLLBACK TO update_action_information;
531 --
532 -- Only set output warning arguments
533 -- (Any key or derived arguments must be set to null
534 -- when validation only mode is being used.)
535 --
536 if g_debug then
537 hr_utility.set_location(' Leaving:'||l_proc, 80);
538 end if;
539 --
540 when others then
541 --
542 -- A validation or unexpected error has occured
543 --
544 ROLLBACK TO update_action_information;
545 p_object_version_number := l_object_version_number;
546 raise;
547 --
548 end update_action_information;
549 -- ----------------------------------------------------------------------------
550 -- |------------------------< delete_action_information >----------------------|
551 -- ----------------------------------------------------------------------------
552 --
553 procedure delete_action_information
554 (p_validate in boolean default false
555 ,p_action_information_id in number
556 ,p_object_version_number in out nocopy number
557 ) is
558 --
559 -- Declare cursors and local variables
560 --
561 l_proc varchar2(72);
562 l_object_version_number pay_action_information.object_version_number%TYPE;
563 --
564 begin
565 g_debug := hr_utility.debug_enabled;
566 --
567 if g_debug then
568 l_proc := g_package||'update_action_information';
569 hr_utility.set_location('Entering:'|| l_proc, 10);
570 end if;
571 --
572 -- Issue a savepoint if operating in validation only mode
573 --
574 savepoint delete_action_information;
575 --
576 if g_debug then
577 hr_utility.set_location(l_proc, 20);
578 end if;
579 --
580 -- Process Logic
581 --
582 l_object_version_number := p_object_version_number;
583 --
584 --
585 begin
586 --
587 -- Start of API User Hook for the before hook of delete_action_information
588 --
589 pay_action_information_bk3.delete_action_information_b
590 (
591 p_action_information_id => p_action_information_id
592 ,p_object_version_number => p_object_version_number
593 );
594 exception
595 when hr_api.cannot_find_prog_unit then
596 hr_api.cannot_find_prog_unit_error
597 (p_module_name => 'DELETE_action_information'
598 ,p_hook_type => 'BP'
599 );
600 --
601 -- End of API User Hook for the before hook of delete_action_information
602 --
603 end;
604 --
605 pay_aif_del.del
606 (
607 p_action_information_id => p_action_information_id
608 ,p_object_version_number => l_object_version_number
609 );
610 --
611 begin
612 --
613 -- Start of API User Hook for the after hook of delete_action_information
614 --
615 pay_action_information_bk3.delete_action_information_a
616 (
617 p_action_information_id => p_action_information_id
618 ,p_object_version_number => l_object_version_number
619 );
620 exception
621 when hr_api.cannot_find_prog_unit then
622 hr_api.cannot_find_prog_unit_error
623 (p_module_name => 'DELETE_action_information'
624 ,p_hook_type => 'AP'
625 );
626 --
627 -- End of API User Hook for the after hook of delete_action_information
628 --
629 end;
630 --
631 if g_debug then
632 hr_utility.set_location(l_proc, 60);
633 end if;
634 --
635 -- When in validation only mode raise the Validate_Enabled exception
636 --
637 if p_validate then
638 raise hr_api.validate_enabled;
639 end if;
640 --
641 if g_debug then
642 hr_utility.set_location(' Leaving:'||l_proc, 70);
643 end if;
644 --
645 exception
646 --
647 when hr_api.validate_enabled then
648 --
649 -- As the Validate_Enabled exception has been raised
650 -- we must rollback to the savepoint
651 --
652 ROLLBACK TO delete_action_information;
653 --
654 -- Only set output warning arguments
655 -- (Any key or derived arguments must be set to null
656 -- when validation only mode is being used.)
657 --
658 --
659 when others then
660 --
661 -- A validation or unexpected error has occured
662 --
663 ROLLBACK TO delete_action_information;
664 p_object_version_number := l_object_version_number;
665 raise;
666 --
667 end delete_action_information;
668 --
669 end pay_action_information_api;