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