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