[Home] [Help]
PACKAGE BODY: APPS.PQH_ROLE_EXTRA_INFO_API
Source
1 Package Body pqh_role_extra_info_api as
2 /* $Header: pqreiapi.pkb 115.1 2002/12/10 11:14:04 mvankada noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' pqh_role_extra_info_api.';
7 --
8 -- ---------------------------------------------------------------------------+
9 -- |----------------------< create_role_extra_info >--------------------------|
10 -- ---------------------------------------------------------------------------+
11 --
12 procedure create_role_extra_info
13 (p_validate in boolean
14 ,p_role_id in number
15 ,p_information_type in varchar2
16 ,p_attribute_category in varchar2
17 ,p_attribute1 in varchar2
18 ,p_attribute2 in varchar2
19 ,p_attribute3 in varchar2
20 ,p_attribute4 in varchar2
21 ,p_attribute5 in varchar2
22 ,p_attribute6 in varchar2
23 ,p_attribute7 in varchar2
24 ,p_attribute8 in varchar2
25 ,p_attribute9 in varchar2
26 ,p_attribute10 in varchar2
27 ,p_attribute11 in varchar2
28 ,p_attribute12 in varchar2
29 ,p_attribute13 in varchar2
30 ,p_attribute14 in varchar2
31 ,p_attribute15 in varchar2
32 ,p_attribute16 in varchar2
33 ,p_attribute17 in varchar2
34 ,p_attribute18 in varchar2
35 ,p_attribute19 in varchar2
36 ,p_attribute20 in varchar2
37 ,p_attribute21 in varchar2
38 ,p_attribute22 in varchar2
39 ,p_attribute23 in varchar2
40 ,p_attribute24 in varchar2
41 ,p_attribute25 in varchar2
42 ,p_attribute26 in varchar2
43 ,p_attribute27 in varchar2
44 ,p_attribute28 in varchar2
45 ,p_attribute29 in varchar2
46 ,p_attribute30 in varchar2
47 ,p_information_category in varchar2
48 ,p_information1 in varchar2
49 ,p_information2 in varchar2
50 ,p_information3 in varchar2
51 ,p_information4 in varchar2
52 ,p_information5 in varchar2
53 ,p_information6 in varchar2
54 ,p_information7 in varchar2
55 ,p_information8 in varchar2
56 ,p_information9 in varchar2
57 ,p_information10 in varchar2
58 ,p_information11 in varchar2
59 ,p_information12 in varchar2
60 ,p_information13 in varchar2
61 ,p_information14 in varchar2
62 ,p_information15 in varchar2
63 ,p_information16 in varchar2
64 ,p_information17 in varchar2
65 ,p_information18 in varchar2
66 ,p_information19 in varchar2
67 ,p_information20 in varchar2
68 ,p_information21 in varchar2
69 ,p_information22 in varchar2
70 ,p_information23 in varchar2
71 ,p_information24 in varchar2
72 ,p_information25 in varchar2
73 ,p_information26 in varchar2
74 ,p_information27 in varchar2
75 ,p_information28 in varchar2
76 ,p_information29 in varchar2
77 ,p_information30 in varchar2
78 ,p_role_extra_info_id out nocopy number
79 ,p_object_version_number out nocopy number
80 ) is
81 --
82 -- Declare cursors and local variables
83 --
84 l_proc varchar2(72) := g_package||'create_role_extra_info';
85 l_object_version_number pqh_role_extra_info.object_version_number%type;
86 l_role_extra_info_id pqh_role_extra_info.role_extra_info_id%type;
87 --
88 begin
89 hr_utility.set_location('Entering:'|| l_proc, 5);
90 --
91 -- Issue a savepoint
92 --
93 savepoint create_role_extra_info;
94 --
95 -- Call Before Process User Hook
96 --
97 begin
98 pqh_role_extra_info_bk1.create_role_extra_info_b
99 (
100 p_information_type => p_information_type,
101 p_role_id => p_role_id,
102 p_attribute_category => p_attribute_category,
103 p_attribute1 => p_attribute1,
104 p_attribute2 => p_attribute2,
105 p_attribute3 => p_attribute3,
106 p_attribute4 => p_attribute4,
107 p_attribute5 => p_attribute5,
108 p_attribute6 => p_attribute6,
109 p_attribute7 => p_attribute7,
110 p_attribute8 => p_attribute8,
111 p_attribute9 => p_attribute9,
112 p_attribute10 => p_attribute10,
113 p_attribute11 => p_attribute11,
114 p_attribute12 => p_attribute12,
115 p_attribute13 => p_attribute13,
116 p_attribute14 => p_attribute14,
117 p_attribute15 => p_attribute15,
118 p_attribute16 => p_attribute16,
119 p_attribute17 => p_attribute17,
120 p_attribute18 => p_attribute18,
121 p_attribute19 => p_attribute19,
122 p_attribute20 => p_attribute20,
123 p_attribute21 => p_attribute21,
124 p_attribute22 => p_attribute22,
125 p_attribute23 => p_attribute23,
126 p_attribute24 => p_attribute24,
127 p_attribute25 => p_attribute25,
128 p_attribute26 => p_attribute26,
129 p_attribute27 => p_attribute27,
130 p_attribute28 => p_attribute28,
131 p_attribute29 => p_attribute29,
132 p_attribute30 => p_attribute30,
133 p_information_category => p_information_category,
134 p_information1 => p_information1,
135 p_information2 => p_information2,
136 p_information3 => p_information3,
137 p_information4 => p_information4,
138 p_information5 => p_information5,
139 p_information6 => p_information6,
140 p_information7 => p_information7,
141 p_information8 => p_information8,
142 p_information9 => p_information9,
143 p_information10 => p_information10,
144 p_information11 => p_information11,
145 p_information12 => p_information12,
146 p_information13 => p_information13,
147 p_information14 => p_information14,
148 p_information15 => p_information15,
149 p_information16 => p_information16,
150 p_information17 => p_information17,
151 p_information18 => p_information18,
152 p_information19 => p_information19,
153 p_information20 => p_information20,
154 p_information21 => p_information21,
155 p_information22 => p_information22,
156 p_information23 => p_information23,
157 p_information24 => p_information24,
158 p_information25 => p_information25,
159 p_information26 => p_information26,
160 p_information27 => p_information27,
161 p_information28 => p_information28,
162 p_information29 => p_information29,
163 p_information30 => p_information30
164 );
165 exception
166 when hr_api.cannot_find_prog_unit then
167 hr_api.cannot_find_prog_unit_error
168 (p_module_name => 'create_role_extra_info',
169 p_hook_type => 'BP'
170 );
171 end;
172 --
173 -- End of Before Process User Hook call
174 hr_utility.set_location(l_proc, 7);
175 --
176 -- Process Logic
177 --
178 pqh_rei_ins.ins
179 (p_role_extra_info_id => l_role_extra_info_id
180 ,p_role_id => p_role_id
181 ,p_information_type => p_information_type
182 ,p_attribute_category => p_attribute_category
183 ,p_attribute1 => p_attribute1
184 ,p_attribute2 => p_attribute2
185 ,p_attribute3 => p_attribute3
186 ,p_attribute4 => p_attribute4
187 ,p_attribute5 => p_attribute5
188 ,p_attribute6 => p_attribute6
189 ,p_attribute7 => p_attribute7
190 ,p_attribute8 => p_attribute8
191 ,p_attribute9 => p_attribute9
192 ,p_attribute10 => p_attribute10
193 ,p_attribute11 => p_attribute11
194 ,p_attribute12 => p_attribute12
195 ,p_attribute13 => p_attribute13
196 ,p_attribute14 => p_attribute14
197 ,p_attribute15 => p_attribute15
198 ,p_attribute16 => p_attribute16
199 ,p_attribute17 => p_attribute17
200 ,p_attribute18 => p_attribute18
201 ,p_attribute19 => p_attribute19
202 ,p_attribute20 => p_attribute20
203 ,p_attribute21 => p_attribute21
204 ,p_attribute22 => p_attribute22
205 ,p_attribute23 => p_attribute23
206 ,p_attribute24 => p_attribute24
207 ,p_attribute25 => p_attribute25
208 ,p_attribute26 => p_attribute26
209 ,p_attribute27 => p_attribute27
210 ,p_attribute28 => p_attribute28
211 ,p_attribute29 => p_attribute29
212 ,p_attribute30 => p_attribute30
213 ,p_information_category => p_information_category
214 ,p_information1 => p_information1
215 ,p_information2 => p_information2
216 ,p_information3 => p_information3
217 ,p_information4 => p_information4
218 ,p_information5 => p_information5
219 ,p_information6 => p_information6
220 ,p_information7 => p_information7
221 ,p_information8 => p_information8
222 ,p_information9 => p_information9
223 ,p_information10 => p_information10
224 ,p_information11 => p_information11
225 ,p_information12 => p_information12
226 ,p_information13 => p_information13
227 ,p_information14 => p_information14
228 ,p_information15 => p_information15
229 ,p_information16 => p_information16
230 ,p_information17 => p_information17
231 ,p_information18 => p_information18
232 ,p_information19 => p_information19
233 ,p_information20 => p_information20
234 ,p_information21 => p_information21
235 ,p_information22 => p_information22
236 ,p_information23 => p_information23
237 ,p_information24 => p_information24
238 ,p_information25 => p_information25
239 ,p_information26 => p_information26
240 ,p_information27 => p_information27
241 ,p_information28 => p_information28
242 ,p_information29 => p_information29
243 ,p_information30 => p_information30
244 ,p_object_version_number => l_object_version_number
245 ,p_validate => false
246 );
247 p_object_version_number := l_object_version_number;
248 p_role_extra_info_id := l_role_extra_info_id;
249 --
250 hr_utility.set_location(l_proc, 8);
251 --
252 -- Call After Process User Hook
253 --
254 begin
255 pqh_role_extra_info_bk1.create_role_extra_info_a
256 (
257 p_role_extra_info_id => l_role_extra_info_id,
258 p_information_type => p_information_type,
259 p_role_id => p_role_id,
260 p_attribute_category => p_attribute_category,
261 p_attribute1 => p_attribute1,
262 p_attribute2 => p_attribute2,
263 p_attribute3 => p_attribute3,
264 p_attribute4 => p_attribute4,
265 p_attribute5 => p_attribute5,
266 p_attribute6 => p_attribute6,
267 p_attribute7 => p_attribute7,
268 p_attribute8 => p_attribute8,
269 p_attribute9 => p_attribute9,
270 p_attribute10 => p_attribute10,
271 p_attribute11 => p_attribute11,
272 p_attribute12 => p_attribute12,
273 p_attribute13 => p_attribute13,
274 p_attribute14 => p_attribute14,
275 p_attribute15 => p_attribute15,
276 p_attribute16 => p_attribute16,
277 p_attribute17 => p_attribute17,
278 p_attribute18 => p_attribute18,
279 p_attribute19 => p_attribute19,
280 p_attribute20 => p_attribute20,
281 p_attribute21 => p_attribute21,
282 p_attribute22 => p_attribute22,
283 p_attribute23 => p_attribute23,
284 p_attribute24 => p_attribute24,
285 p_attribute25 => p_attribute25,
286 p_attribute26 => p_attribute26,
287 p_attribute27 => p_attribute27,
288 p_attribute28 => p_attribute28,
289 p_attribute29 => p_attribute29,
290 p_attribute30 => p_attribute30,
291 p_information_category => p_information_category,
292 p_information1 => p_information1,
293 p_information2 => p_information2,
294 p_information3 => p_information3,
295 p_information4 => p_information4,
296 p_information5 => p_information5,
297 p_information6 => p_information6,
298 p_information7 => p_information7,
299 p_information8 => p_information8,
300 p_information9 => p_information9,
301 p_information10 => p_information10,
302 p_information11 => p_information11,
303 p_information12 => p_information12,
304 p_information13 => p_information13,
305 p_information14 => p_information14,
306 p_information15 => p_information15,
307 p_information16 => p_information16,
308 p_information17 => p_information17,
309 p_information18 => p_information18,
310 p_information19 => p_information19,
311 p_information20 => p_information20,
312 p_information21 => p_information21,
313 p_information22 => p_information22,
314 p_information23 => p_information23,
315 p_information24 => p_information24,
316 p_information25 => p_information25,
317 p_information26 => p_information26,
318 p_information27 => p_information27,
319 p_information28 => p_information28,
320 p_information29 => p_information29,
321 p_information30 => p_information30,
322 p_object_version_number => l_object_version_number
323 );
324 exception
325 when hr_api.cannot_find_prog_unit then
326 hr_api.cannot_find_prog_unit_error
327 (p_module_name => 'create_role_extra_info',
328 p_hook_type => 'AP'
329 );
330 end;
331 --
332 -- When in validation only mode raise the Validate_Enabled exception
333 --
334 if p_validate then
335 raise hr_api.validate_enabled;
336 end if;
337 --
338 hr_utility.set_location(' Leaving:'||l_proc, 11);
339 exception
340 when hr_api.validate_enabled then
341 --
342 -- As the Validate_Enabled exception has been raised
343 -- we must rollback to the savepoint
344 --
345 ROLLBACK TO create_role_extra_info;
346 --
347 -- Only set output warning arguments
348 -- (Any key or derived arguments must be set to null
349 -- when validation only mode is being used.)
350 --
351 p_role_extra_info_id := null;
352 p_object_version_number := null;
353 --
354 hr_utility.set_location(' Leaving:'||l_proc, 12);
355 --
356 when others then
357
358 p_role_extra_info_id := null;
359 p_object_version_number := null;
360 --
361 -- A validation or unexpected error has occurred
362 --
363 -- Added as part of the fix to bug 632479
364 --
365 ROLLBACK TO create_role_extra_info;
366 --
367 raise;
368 --
369 end create_role_extra_info;
370 --
371 -- ----------------------------------------------------------------------------+
372 -- |----------------------< update_role_extra_info >----------------------|
373 -- ---------------------------------------------------------------------------+
374 --
375 procedure update_role_extra_info
376 (p_validate in boolean
377 ,p_role_extra_info_id in number
378 ,p_object_version_number in out nocopy number
379 ,p_attribute_category in varchar2
380 ,p_attribute1 in varchar2
381 ,p_attribute2 in varchar2
382 ,p_attribute3 in varchar2
383 ,p_attribute4 in varchar2
384 ,p_attribute5 in varchar2
385 ,p_attribute6 in varchar2
386 ,p_attribute7 in varchar2
387 ,p_attribute8 in varchar2
388 ,p_attribute9 in varchar2
389 ,p_attribute10 in varchar2
390 ,p_attribute11 in varchar2
391 ,p_attribute12 in varchar2
392 ,p_attribute13 in varchar2
393 ,p_attribute14 in varchar2
394 ,p_attribute15 in varchar2
395 ,p_attribute16 in varchar2
396 ,p_attribute17 in varchar2
397 ,p_attribute18 in varchar2
398 ,p_attribute19 in varchar2
399 ,p_attribute20 in varchar2
400 ,p_attribute21 in varchar2
401 ,p_attribute22 in varchar2
402 ,p_attribute23 in varchar2
403 ,p_attribute24 in varchar2
404 ,p_attribute25 in varchar2
405 ,p_attribute26 in varchar2
406 ,p_attribute27 in varchar2
407 ,p_attribute28 in varchar2
408 ,p_attribute29 in varchar2
409 ,p_attribute30 in varchar2
410 ,p_information_category in varchar2
411 ,p_information1 in varchar2
412 ,p_information2 in varchar2
413 ,p_information3 in varchar2
414 ,p_information4 in varchar2
415 ,p_information5 in varchar2
416 ,p_information6 in varchar2
417 ,p_information7 in varchar2
418 ,p_information8 in varchar2
419 ,p_information9 in varchar2
420 ,p_information10 in varchar2
421 ,p_information11 in varchar2
422 ,p_information12 in varchar2
423 ,p_information13 in varchar2
424 ,p_information14 in varchar2
425 ,p_information15 in varchar2
426 ,p_information16 in varchar2
427 ,p_information17 in varchar2
428 ,p_information18 in varchar2
429 ,p_information19 in varchar2
430 ,p_information20 in varchar2
431 ,p_information21 in varchar2
432 ,p_information22 in varchar2
433 ,p_information23 in varchar2
434 ,p_information24 in varchar2
435 ,p_information25 in varchar2
436 ,p_information26 in varchar2
437 ,p_information27 in varchar2
438 ,p_information28 in varchar2
439 ,p_information29 in varchar2
440 ,p_information30 in varchar2
441 ) is
442 --
443 -- Declare cursors and local variables
444 --
445 l_proc varchar2(72) := g_package||'update_role_extra_info';
446 l_object_version_number pqh_role_extra_info.object_version_number%TYPE;
447 --
448 begin
449 hr_utility.set_location('Entering:'|| l_proc, 5);
450 --
451 -- Issue a savepoint
452 --
453 savepoint update_role_extra_info;
454 --
455 -- Call Before Process User Hook
456 --
457 begin
458 pqh_role_extra_info_bk2.update_role_extra_info_b
459 (
460 p_role_extra_info_id => p_role_extra_info_id,
461 p_attribute_category => p_attribute_category,
462 p_attribute1 => p_attribute1,
463 p_attribute2 => p_attribute2,
464 p_attribute3 => p_attribute3,
465 p_attribute4 => p_attribute4,
466 p_attribute5 => p_attribute5,
467 p_attribute6 => p_attribute6,
468 p_attribute7 => p_attribute7,
469 p_attribute8 => p_attribute8,
470 p_attribute9 => p_attribute9,
471 p_attribute10 => p_attribute10,
472 p_attribute11 => p_attribute11,
473 p_attribute12 => p_attribute12,
474 p_attribute13 => p_attribute13,
475 p_attribute14 => p_attribute14,
476 p_attribute15 => p_attribute15,
477 p_attribute16 => p_attribute16,
478 p_attribute17 => p_attribute17,
479 p_attribute18 => p_attribute18,
480 p_attribute19 => p_attribute19,
481 p_attribute20 => p_attribute20,
482 p_attribute21 => p_attribute21,
483 p_attribute22 => p_attribute22,
484 p_attribute23 => p_attribute23,
485 p_attribute24 => p_attribute24,
486 p_attribute25 => p_attribute25,
487 p_attribute26 => p_attribute26,
488 p_attribute27 => p_attribute27,
489 p_attribute28 => p_attribute28,
490 p_attribute29 => p_attribute29,
491 p_attribute30 => p_attribute30,
492 p_information_category => p_information_category,
493 p_information1 => p_information1,
494 p_information2 => p_information2,
495 p_information3 => p_information3,
496 p_information4 => p_information4,
497 p_information5 => p_information5,
498 p_information6 => p_information6,
499 p_information7 => p_information7,
500 p_information8 => p_information8,
501 p_information9 => p_information9,
502 p_information10 => p_information10,
503 p_information11 => p_information11,
504 p_information12 => p_information12,
505 p_information13 => p_information13,
506 p_information14 => p_information14,
507 p_information15 => p_information15,
508 p_information16 => p_information16,
509 p_information17 => p_information17,
510 p_information18 => p_information18,
511 p_information19 => p_information19,
512 p_information20 => p_information20,
513 p_information21 => p_information21,
514 p_information22 => p_information22,
515 p_information23 => p_information23,
516 p_information24 => p_information24,
517 p_information25 => p_information25,
518 p_information26 => p_information26,
519 p_information27 => p_information27,
520 p_information28 => p_information28,
521 p_information29 => p_information29,
522 p_information30 => p_information30,
523 p_object_version_number => p_object_version_number
524 );
525 exception
526 when hr_api.cannot_find_prog_unit then
527 hr_api.cannot_find_prog_unit_error
528 (p_module_name => 'update_role_extra_info',
529 p_hook_type => 'BP'
530 );
531 end;
532 --
533 -- End of Before Process User Hook call
534 --
535 hr_utility.set_location(l_proc, 7);
536 --
537 -- Store the original ovn in case we rollback when p_validate is true
538 --
539 l_object_version_number := p_object_version_number;
540 --
541 -- Process Logic - Update role Extra Info details
542 --
543 pqh_rei_upd.upd
544 (p_role_extra_info_id => p_role_extra_info_id
545 ,p_attribute_category => p_attribute_category
546 ,p_attribute1 => p_attribute1
547 ,p_attribute2 => p_attribute2
548 ,p_attribute3 => p_attribute3
549 ,p_attribute4 => p_attribute4
550 ,p_attribute5 => p_attribute5
551 ,p_attribute6 => p_attribute6
552 ,p_attribute7 => p_attribute7
553 ,p_attribute8 => p_attribute8
554 ,p_attribute9 => p_attribute9
555 ,p_attribute10 => p_attribute10
556 ,p_attribute11 => p_attribute11
557 ,p_attribute12 => p_attribute12
558 ,p_attribute13 => p_attribute13
559 ,p_attribute14 => p_attribute14
560 ,p_attribute15 => p_attribute15
561 ,p_attribute16 => p_attribute16
562 ,p_attribute17 => p_attribute17
563 ,p_attribute18 => p_attribute18
564 ,p_attribute19 => p_attribute19
565 ,p_attribute20 => p_attribute20
566 ,p_attribute21 => p_attribute21
567 ,p_attribute22 => p_attribute22
568 ,p_attribute23 => p_attribute23
569 ,p_attribute24 => p_attribute24
570 ,p_attribute25 => p_attribute25
571 ,p_attribute26 => p_attribute26
572 ,p_attribute27 => p_attribute27
573 ,p_attribute28 => p_attribute28
574 ,p_attribute29 => p_attribute29
575 ,p_attribute30 => p_attribute30
576 ,p_information_category => p_information_category
577 ,p_information1 => p_information1
578 ,p_information2 => p_information2
579 ,p_information3 => p_information3
580 ,p_information4 => p_information4
581 ,p_information5 => p_information5
582 ,p_information6 => p_information6
583 ,p_information7 => p_information7
584 ,p_information8 => p_information8
585 ,p_information9 => p_information9
586 ,p_information10 => p_information10
587 ,p_information11 => p_information11
588 ,p_information12 => p_information12
589 ,p_information13 => p_information13
590 ,p_information14 => p_information14
591 ,p_information15 => p_information15
592 ,p_information16 => p_information16
593 ,p_information17 => p_information17
594 ,p_information18 => p_information18
595 ,p_information19 => p_information19
596 ,p_information20 => p_information20
597 ,p_information21 => p_information21
601 ,p_information25 => p_information25
598 ,p_information22 => p_information22
599 ,p_information23 => p_information23
600 ,p_information24 => p_information24
602 ,p_information26 => p_information26
603 ,p_information27 => p_information27
604 ,p_information28 => p_information28
605 ,p_information29 => p_information29
606 ,p_information30 => p_information30
607 ,p_object_version_number => p_object_version_number
608 ,p_validate => false
609 );
610 --
611 hr_utility.set_location(l_proc, 8);
612 --
613 -- Call After Process User Hook
614 --
615 begin
616 pqh_role_extra_info_bk2.update_role_extra_info_a
617 (
618 p_role_extra_info_id => p_role_extra_info_id,
619 p_attribute_category => p_attribute_category,
620 p_attribute1 => p_attribute1,
621 p_attribute2 => p_attribute2,
622 p_attribute3 => p_attribute3,
623 p_attribute4 => p_attribute4,
624 p_attribute5 => p_attribute5,
625 p_attribute6 => p_attribute6,
626 p_attribute7 => p_attribute7,
627 p_attribute8 => p_attribute8,
628 p_attribute9 => p_attribute9,
629 p_attribute10 => p_attribute10,
630 p_attribute11 => p_attribute11,
631 p_attribute12 => p_attribute12,
632 p_attribute13 => p_attribute13,
633 p_attribute14 => p_attribute14,
634 p_attribute15 => p_attribute15,
635 p_attribute16 => p_attribute16,
636 p_attribute17 => p_attribute17,
637 p_attribute18 => p_attribute18,
638 p_attribute19 => p_attribute19,
639 p_attribute20 => p_attribute20,
640 p_attribute21 => p_attribute21,
641 p_attribute22 => p_attribute22,
642 p_attribute23 => p_attribute23,
643 p_attribute24 => p_attribute24,
644 p_attribute25 => p_attribute25,
645 p_attribute26 => p_attribute26,
646 p_attribute27 => p_attribute27,
647 p_attribute28 => p_attribute28,
648 p_attribute29 => p_attribute29,
649 p_attribute30 => p_attribute30,
650 p_information_category => p_information_category,
651 p_information1 => p_information1,
652 p_information2 => p_information2,
653 p_information3 => p_information3,
654 p_information4 => p_information4,
655 p_information5 => p_information5,
656 p_information6 => p_information6,
657 p_information7 => p_information7,
658 p_information8 => p_information8,
659 p_information9 => p_information9,
660 p_information10 => p_information10,
661 p_information11 => p_information11,
662 p_information12 => p_information12,
663 p_information13 => p_information13,
664 p_information14 => p_information14,
665 p_information15 => p_information15,
666 p_information16 => p_information16,
667 p_information17 => p_information17,
668 p_information18 => p_information18,
669 p_information19 => p_information19,
670 p_information20 => p_information20,
671 p_information21 => p_information21,
672 p_information22 => p_information22,
673 p_information23 => p_information23,
674 p_information24 => p_information24,
675 p_information25 => p_information25,
676 p_information26 => p_information26,
677 p_information27 => p_information27,
678 p_information28 => p_information28,
679 p_information29 => p_information29,
680 p_information30 => p_information30,
681 p_object_version_number => p_object_version_number
682 );
683 exception
684 when hr_api.cannot_find_prog_unit then
685 hr_api.cannot_find_prog_unit_error
686 (p_module_name => 'update_role_extra_info',
687 p_hook_type => 'AP'
688 );
689 end;
690 --
691 -- When in validation only mode raise the Validate_Enabled exception
692 --
693 if p_validate then
694 raise hr_api.validate_enabled;
695 end if;
696 --
697 hr_utility.set_location(' Leaving:'||l_proc, 11);
698 exception
699 when hr_api.validate_enabled then
700 --
701 -- As the Validate_Enabled exception has been raised
702 -- we must rollback to the savepoint
703 --
704 ROLLBACK TO update_role_extra_info;
705 --
706 -- Only set output warning arguments
707 -- (Any key or derived arguments must be set to null
708 -- when validation only mode is being used.)
709 --
710 p_object_version_number := l_object_version_number;
711 --
712 hr_utility.set_location(' Leaving:'||l_proc, 12);
713 --
714 when others then
715
716 p_object_version_number := l_object_version_number;
717 --
718 -- A validation or unexpected error has occurred
719 --
720 -- Added as part of the fix to bug 632479
721 --
722 ROLLBACK TO update_role_extra_info;
723 --
724 raise;
725 --
726 end update_role_extra_info;
727 --
728 --
729 -- ---------------------------------------------------------------------------+
730 -- |----------------------< delete_role_extra_info >----------------------|
731 -- ---------------------------------------------------------------------------+
732 --
733 procedure delete_role_extra_info
734 (p_validate in boolean
735 ,p_role_extra_info_id in number
736 ,p_object_version_number in number
737 ) is
738 --
739 -- Declare cursors and local variables
740 --
741 l_proc varchar2(72) := g_package||'delete_role_extra_info';
742 --
743 begin
744 hr_utility.set_location('Entering:'|| l_proc, 5);
745 --
746 -- Issue a savepoint
747 --
748 savepoint delete_role_extra_info;
749 --
750 -- Call Before Process User Hook
751 --
752 begin
753 pqh_role_extra_info_bk3.delete_role_extra_info_b
754 (
755 p_role_extra_info_id => p_role_extra_info_id,
756 p_object_version_number => p_object_version_number
757 );
758 exception
759 when hr_api.cannot_find_prog_unit then
760 hr_api.cannot_find_prog_unit_error
761 (p_module_name => 'delete_role_extra_info',
762 p_hook_type => 'BP'
763 );
764 end;
765 --
766 hr_utility.set_location(l_proc, 7);
767 --
768 -- Process Logic - Delete role Extra Info details
769 --
770 pqh_rei_del.del
771 (p_role_extra_info_id => p_role_extra_info_id
772 ,p_object_version_number => p_object_version_number
773 ,p_validate => false
774 );
775 --
776 hr_utility.set_location(l_proc, 8);
777 --
778 -- Call After Process User Hook
779 --
780 begin
781 pqh_role_extra_info_bk3.delete_role_extra_info_a
782 (
783 p_role_extra_info_id => p_role_extra_info_id,
784 p_object_version_number => p_object_version_number
785 );
786 exception
787 when hr_api.cannot_find_prog_unit then
788 hr_api.cannot_find_prog_unit_error
789 (p_module_name => 'delete_role_extra_info',
790 p_hook_type => 'AP'
791 );
792 end;
793 --
794 -- When in validation only mode raise the Validate_Enabled exception
795 --
796 if p_validate then
797 raise hr_api.validate_enabled;
798 end if;
799 --
800 hr_utility.set_location(' Leaving:'||l_proc, 11);
801 exception
802 when hr_api.validate_enabled then
803 --
804 -- As the Validate_Enabled exception has been raised
805 -- we must rollback to the savepoint
806 --
807 ROLLBACK TO delete_role_extra_info;
808 --
809 hr_utility.set_location(' Leaving:'||l_proc, 12);
810 --
811 when others then
812 --
813 -- A validation or unexpected error has occurred
814 --
815 -- Added as part of the fix to bug 632479
816 --
817 ROLLBACK TO delete_role_extra_info;
818 --
819 raise;
820 --
821 end delete_role_extra_info;
822 --
823 end pqh_role_extra_info_api;