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