[Home] [Help]
PACKAGE BODY: APPS.HR_QUALIFICATION_TYPE_API
Source
1 PACKAGE BODY hr_qualification_type_api AS
2 /* $Header: peeqtapi.pkb 115.2 2004/03/17 10:09 ynegoro noship $ */
3 --
4 -- Package Variables
5 --
6 g_package VARCHAR2(33) := 'hr_qualification_type_api.';
7 --
8 -- --------------------------------------------------------------------------
9 -- |--------------------< create_qualification_type >-----------------------|
10 -- --------------------------------------------------------------------------
11 --
12 procedure create_qualification_type
13 (p_validate in boolean default false
14 ,p_effective_date in date
15 ,p_language_code in varchar2 default hr_api.userenv_lang
16 ,p_name in varchar2
17 ,p_category in varchar2
18 ,p_rank in number default null
19 ,p_attribute_category in varchar2 default null
20 ,p_attribute1 in varchar2 default null
21 ,p_attribute2 in varchar2 default null
22 ,p_attribute3 in varchar2 default null
23 ,p_attribute4 in varchar2 default null
24 ,p_attribute5 in varchar2 default null
25 ,p_attribute6 in varchar2 default null
26 ,p_attribute7 in varchar2 default null
27 ,p_attribute8 in varchar2 default null
28 ,p_attribute9 in varchar2 default null
29 ,p_attribute10 in varchar2 default null
30 ,p_attribute11 in varchar2 default null
31 ,p_attribute12 in varchar2 default null
32 ,p_attribute13 in varchar2 default null
33 ,p_attribute14 in varchar2 default null
34 ,p_attribute15 in varchar2 default null
35 ,p_attribute16 in varchar2 default null
36 ,p_attribute17 in varchar2 default null
37 ,p_attribute18 in varchar2 default null
38 ,p_attribute19 in varchar2 default null
39 ,p_attribute20 in varchar2 default null
40 ,p_information_category in varchar2 default null
41 ,p_information1 in varchar2 default null
42 ,p_information2 in varchar2 default null
43 ,p_information3 in varchar2 default null
44 ,p_information4 in varchar2 default null
45 ,p_information5 in varchar2 default null
46 ,p_information6 in varchar2 default null
47 ,p_information7 in varchar2 default null
48 ,p_information8 in varchar2 default null
49 ,p_information9 in varchar2 default null
50 ,p_information10 in varchar2 default null
51 ,p_information11 in varchar2 default null
52 ,p_information12 in varchar2 default null
53 ,p_information13 in varchar2 default null
54 ,p_information14 in varchar2 default null
55 ,p_information15 in varchar2 default null
56 ,p_information16 in varchar2 default null
57 ,p_information17 in varchar2 default null
58 ,p_information18 in varchar2 default null
59 ,p_information19 in varchar2 default null
60 ,p_information20 in varchar2 default null
61 ,p_information21 in varchar2 default null
62 ,p_information22 in varchar2 default null
63 ,p_information23 in varchar2 default null
64 ,p_information24 in varchar2 default null
65 ,p_information25 in varchar2 default null
66 ,p_information26 in varchar2 default null
67 ,p_information27 in varchar2 default null
68 ,p_information28 in varchar2 default null
69 ,p_information29 in varchar2 default null
70 ,p_information30 in varchar2 default null
71 ,p_qual_framework_id in number default null
72 ,p_qualification_type in varchar2 default null
73 ,p_credit_type in varchar2 default null
74 ,p_credits in number default null
75 ,p_level_type in varchar2 default null
76 ,p_level_number in number default null
77 ,p_field in varchar2 default null
78 ,p_sub_field in varchar2 default null
79 ,p_provider in varchar2 default null
80 ,p_qa_organization in varchar2 default null
81 ,p_qualification_type_id out NOCOPY number
82 ,p_object_version_number out NOCOPY number
83 ) is
84
85 --
86 -- Declare cursors and local variables
87 --
88 l_proc varchar2(72) := g_package||'create_qualification_type';
89 l_effective_date date;
90
91 --
92 -- Declare out parameters
93 --
94 l_object_version_number per_qualification_types.object_version_number%TYPE;
95 l_qualification_type_id per_qualification_types.qualification_type_id%TYPE;
96 l_language_code per_qualification_types_tl.language%TYPE;
97 --
98 begin
99 --
100
101 hr_utility.set_location('Entering:'|| l_proc, 10);
102
103 --
104 -- Issue a savepoint
105 --
106 savepoint create_qualification_type;
107
108 hr_utility.set_location(l_proc, 20);
109
110 --
111 -- Truncate the time portion from all IN date parameters
112 --
113 l_effective_date := trunc(p_effective_date);
114
115 --
116 -- Call Before Process User Hook
117 --
118
119 begin
120 hr_qualification_type_bk1.create_qualification_type_b
121 (p_effective_date => l_effective_date
122 ,p_language_code => p_language_code
123 ,p_name => p_name
124 ,p_category => p_category
125 ,p_rank => p_rank
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_qual_framework_id => p_qual_framework_id
179 ,p_qualification_type => p_qualification_type
180 ,p_credit_type => p_credit_type
181 ,p_credits => p_credits
182 ,p_level_type => p_level_type
183 ,p_level_number => p_level_number
184 ,p_field => p_field
185 ,p_sub_field => p_sub_field
186 ,p_provider => p_provider
187 ,p_qa_organization => p_qa_organization
188 );
189 exception
190 when hr_api.cannot_find_prog_unit then
191 hr_api.cannot_find_prog_unit_error
192 (p_module_name => 'create_qualification_type'
193 ,p_hook_type => 'BP'
194 );
195
196 --
197 -- End of before hook process (create_qualification_type)
198 --
199 end;
200
201
202 hr_utility.set_location(l_proc, 30);
203 --
204 -- Process Logic
205 --
206
207 --
208 --
209 -- Validate the language parameter. l_language_code should be passed to functions
210 -- instead of p_language_code from now on, to allow an IN OUT parameter to
211 -- be passed through.
212 --
213 l_language_code := p_language_code;
214 hr_api.validate_language_code(p_language_code => l_language_code);
215
216 hr_utility.set_location(l_proc, 40);
217
218 --
219 --
220 -- Insert qualification type
221 --
222
223 per_eqt_ins.ins
224 (p_effective_date => l_effective_date
225 ,p_name => p_name
226 ,p_category => p_category
227 ,p_rank => p_rank
228 ,p_attribute_category => p_attribute_category
229 ,p_attribute1 => p_attribute1
230 ,p_attribute2 => p_attribute2
231 ,p_attribute3 => p_attribute3
232 ,p_attribute4 => p_attribute4
233 ,p_attribute5 => p_attribute5
234 ,p_attribute6 => p_attribute6
235 ,p_attribute7 => p_attribute7
236 ,p_attribute8 => p_attribute8
237 ,p_attribute9 => p_attribute9
238 ,p_attribute10 => p_attribute10
239 ,p_attribute11 => p_attribute11
240 ,p_attribute12 => p_attribute12
241 ,p_attribute13 => p_attribute13
242 ,p_attribute14 => p_attribute14
243 ,p_attribute15 => p_attribute15
244 ,p_attribute16 => p_attribute16
245 ,p_attribute17 => p_attribute17
246 ,p_attribute18 => p_attribute18
247 ,p_attribute19 => p_attribute19
248 ,p_attribute20 => p_attribute20
249 ,p_information_category => p_information_category
250 ,p_information1 => p_information1
251 ,p_information2 => p_information2
252 ,p_information3 => p_information3
253 ,p_information4 => p_information4
254 ,p_information5 => p_information5
255 ,p_information6 => p_information6
256 ,p_information7 => p_information7
257 ,p_information8 => p_information8
258 ,p_information9 => p_information9
259 ,p_information10 => p_information10
260 ,p_information11 => p_information11
261 ,p_information12 => p_information12
262 ,p_information13 => p_information13
263 ,p_information14 => p_information14
264 ,p_information15 => p_information15
265 ,p_information16 => p_information16
266 ,p_information17 => p_information17
267 ,p_information18 => p_information18
268 ,p_information19 => p_information19
269 ,p_information20 => p_information20
270 ,p_information21 => p_information21
271 ,p_information22 => p_information22
272 ,p_information23 => p_information23
273 ,p_information24 => p_information24
274 ,p_information25 => p_information25
275 ,p_information26 => p_information26
276 ,p_information27 => p_information27
277 ,p_information28 => p_information28
278 ,p_information29 => p_information29
279 ,p_information30 => p_information30
280 ,p_qual_framework_id => p_qual_framework_id
281 ,p_qualification_type => p_qualification_type
282 ,p_credit_type => p_credit_type
283 ,p_credits => p_credits
284 ,p_level_type => p_level_type
285 ,p_level_number => p_level_number
286 ,p_field => p_field
287 ,p_sub_field => p_sub_field
288 ,p_provider => p_provider
289 ,p_qa_organization => p_qa_organization
290 ,p_qualification_type_id => l_qualification_type_id
291 ,p_object_version_number => l_object_version_number
292 );
293
294 hr_utility.set_location(l_proc, 50);
295
296 --
297 -- Insert translatable rows in per_qualification_types_tl table
298 --
299 per_qtt_ins.ins_tl
300 (p_qualification_type_id => l_qualification_type_id
301 ,p_language_code => l_language_code
302 ,p_name => p_name
303 );
304 --
305 hr_utility.set_location(l_proc, 60);
306
307 --
308 -- Call After Process hook for create_qualification_type
309 --
310 begin
311 hr_qualification_type_bk1.create_qualification_type_a
312 (p_effective_date => l_effective_date
313 ,p_qualification_type_id => l_qualification_type_id
314 ,p_object_version_number => l_object_version_number
315 ,p_language_code => l_language_code
316 ,p_name => p_name
317 ,p_category => p_category
318 ,p_rank => p_rank
319 ,p_attribute_category => p_attribute_category
320 ,p_attribute1 => p_attribute1
321 ,p_attribute2 => p_attribute2
322 ,p_attribute3 => p_attribute3
323 ,p_attribute4 => p_attribute4
324 ,p_attribute5 => p_attribute5
325 ,p_attribute6 => p_attribute6
326 ,p_attribute7 => p_attribute7
327 ,p_attribute8 => p_attribute8
328 ,p_attribute9 => p_attribute9
329 ,p_attribute10 => p_attribute10
330 ,p_attribute11 => p_attribute11
331 ,p_attribute12 => p_attribute12
332 ,p_attribute13 => p_attribute13
333 ,p_attribute14 => p_attribute14
334 ,p_attribute15 => p_attribute15
335 ,p_attribute16 => p_attribute16
336 ,p_attribute17 => p_attribute17
337 ,p_attribute18 => p_attribute18
338 ,p_attribute19 => p_attribute19
339 ,p_attribute20 => p_attribute20
340 ,p_information_category => p_information_category
341 ,p_information1 => p_information1
342 ,p_information2 => p_information2
343 ,p_information3 => p_information3
344 ,p_information4 => p_information4
345 ,p_information5 => p_information5
346 ,p_information6 => p_information6
347 ,p_information7 => p_information7
348 ,p_information8 => p_information8
349 ,p_information9 => p_information9
350 ,p_information10 => p_information10
351 ,p_information11 => p_information11
352 ,p_information12 => p_information12
353 ,p_information13 => p_information13
354 ,p_information14 => p_information14
355 ,p_information15 => p_information15
356 ,p_information16 => p_information16
357 ,p_information17 => p_information17
358 ,p_information18 => p_information18
359 ,p_information19 => p_information19
360 ,p_information20 => p_information20
361 ,p_information21 => p_information21
362 ,p_information22 => p_information22
363 ,p_information23 => p_information23
364 ,p_information24 => p_information24
365 ,p_information25 => p_information25
366 ,p_information26 => p_information26
367 ,p_information27 => p_information27
368 ,p_information28 => p_information28
369 ,p_information29 => p_information29
370 ,p_information30 => p_information30
371 ,p_qual_framework_id => p_qual_framework_id
372 ,p_qualification_type => p_qualification_type
373 ,p_credit_type => p_credit_type
374 ,p_credits => p_credits
375 ,p_level_type => p_level_type
376 ,p_level_number => p_level_number
377 ,p_field => p_field
378 ,p_sub_field => p_sub_field
379 ,p_provider => p_provider
380 ,p_qa_organization => p_qa_organization
381 );
382 exception
383 when hr_api.cannot_find_prog_unit then
384 hr_api.cannot_find_prog_unit_error
385 (p_module_name => 'create_qualification_type'
386 ,p_hook_type => 'AP'
387 );
388
389 --
390 -- End of after hook process (create_qualification_type)
391 --
392 end;
393
394 hr_utility.set_location(l_proc, 70);
395
396 --
397 -- When in validation only mode raise the Validate_Enabled exception
398 --
399 if p_validate
400 then
401 raise hr_api.validate_enabled;
402 end if;
403 --
404 hr_utility.set_location(l_proc, 80);
405 --
406 -- Set OUT parameters
407 --
408 p_qualification_type_id := l_qualification_type_id;
409 p_object_version_number := l_object_version_number;
410 --
411 hr_utility.set_location(' Leaving:' ||l_proc, 90);
412 --
413
414
415 EXCEPTION
416 --
417 WHEN hr_api.validate_enabled THEN
418 --
419 -- As the Validate_Enabled exception has been raised
420 -- we must rollback to the savepoint
421 --
422 ROLLBACK TO create_qualification_type;
423 --
424 -- Only set output warning arguments
425 -- (Any key or derived arguments must be set to null
426 -- when validation only mode is being used.)
427 --
428 p_qualification_type_id := null;
429 p_object_version_number := null;
430 hr_utility.set_location(' Leaving:'||l_proc, 100);
431 WHEN OTHERS THEN
432 --
433 -- A validation or unexpected error has occurred
434 ROLLBACK TO create_qualification_type;
435 -- Set OUT parameters.
436 p_qualification_type_id := null;
437 p_object_version_number := null;
438 hr_utility.set_location(' Leaving:'||l_proc, 110);
439 RAISE;
440 --
441 end create_qualification_type;
442
443 --
444 -- ----------------------------------------------------------------------------
445 -- |------------------------< update_qualification_type >----------------------|
446 -- ----------------------------------------------------------------------------
447 --
448 procedure update_qualification_type
449 (p_validate in boolean default false
450 ,p_qualification_type_id in number
451 ,p_object_version_number in out nocopy number
452 ,p_effective_date in date
453 ,p_language_code in varchar2 default hr_api.userenv_lang
454 ,p_name in varchar2 default hr_api.g_varchar2
455 ,p_category in varchar2 default hr_api.g_varchar2
456 ,p_rank in number default hr_api.g_number
457 ,p_attribute_category in varchar2 default hr_api.g_varchar2
458 ,p_attribute1 in varchar2 default hr_api.g_varchar2
459 ,p_attribute2 in varchar2 default hr_api.g_varchar2
460 ,p_attribute3 in varchar2 default hr_api.g_varchar2
461 ,p_attribute4 in varchar2 default hr_api.g_varchar2
462 ,p_attribute5 in varchar2 default hr_api.g_varchar2
463 ,p_attribute6 in varchar2 default hr_api.g_varchar2
464 ,p_attribute7 in varchar2 default hr_api.g_varchar2
465 ,p_attribute8 in varchar2 default hr_api.g_varchar2
466 ,p_attribute9 in varchar2 default hr_api.g_varchar2
467 ,p_attribute10 in varchar2 default hr_api.g_varchar2
468 ,p_attribute11 in varchar2 default hr_api.g_varchar2
469 ,p_attribute12 in varchar2 default hr_api.g_varchar2
470 ,p_attribute13 in varchar2 default hr_api.g_varchar2
471 ,p_attribute14 in varchar2 default hr_api.g_varchar2
472 ,p_attribute15 in varchar2 default hr_api.g_varchar2
473 ,p_attribute16 in varchar2 default hr_api.g_varchar2
474 ,p_attribute17 in varchar2 default hr_api.g_varchar2
475 ,p_attribute18 in varchar2 default hr_api.g_varchar2
476 ,p_attribute19 in varchar2 default hr_api.g_varchar2
477 ,p_attribute20 in varchar2 default hr_api.g_varchar2
478 ,p_information_category in varchar2 default hr_api.g_varchar2
479 ,p_information1 in varchar2 default hr_api.g_varchar2
480 ,p_information2 in varchar2 default hr_api.g_varchar2
481 ,p_information3 in varchar2 default hr_api.g_varchar2
482 ,p_information4 in varchar2 default hr_api.g_varchar2
483 ,p_information5 in varchar2 default hr_api.g_varchar2
484 ,p_information6 in varchar2 default hr_api.g_varchar2
485 ,p_information7 in varchar2 default hr_api.g_varchar2
486 ,p_information8 in varchar2 default hr_api.g_varchar2
487 ,p_information9 in varchar2 default hr_api.g_varchar2
488 ,p_information10 in varchar2 default hr_api.g_varchar2
489 ,p_information11 in varchar2 default hr_api.g_varchar2
490 ,p_information12 in varchar2 default hr_api.g_varchar2
491 ,p_information13 in varchar2 default hr_api.g_varchar2
492 ,p_information14 in varchar2 default hr_api.g_varchar2
493 ,p_information15 in varchar2 default hr_api.g_varchar2
494 ,p_information16 in varchar2 default hr_api.g_varchar2
495 ,p_information17 in varchar2 default hr_api.g_varchar2
496 ,p_information18 in varchar2 default hr_api.g_varchar2
497 ,p_information19 in varchar2 default hr_api.g_varchar2
498 ,p_information20 in varchar2 default hr_api.g_varchar2
499 ,p_information21 in varchar2 default hr_api.g_varchar2
500 ,p_information22 in varchar2 default hr_api.g_varchar2
501 ,p_information23 in varchar2 default hr_api.g_varchar2
502 ,p_information24 in varchar2 default hr_api.g_varchar2
503 ,p_information25 in varchar2 default hr_api.g_varchar2
504 ,p_information26 in varchar2 default hr_api.g_varchar2
505 ,p_information27 in varchar2 default hr_api.g_varchar2
506 ,p_information28 in varchar2 default hr_api.g_varchar2
507 ,p_information29 in varchar2 default hr_api.g_varchar2
508 ,p_information30 in varchar2 default hr_api.g_varchar2
509 ,p_qual_framework_id in number default hr_api.g_number
510 ,p_qualification_type in varchar2 default hr_api.g_varchar2
511 ,p_credit_type in varchar2 default hr_api.g_varchar2
512 ,p_credits in number default hr_api.g_number
513 ,p_level_type in varchar2 default hr_api.g_varchar2
514 ,p_level_number in number default hr_api.g_number
515 ,p_field in varchar2 default hr_api.g_varchar2
516 ,p_sub_field in varchar2 default hr_api.g_varchar2
517 ,p_provider in varchar2 default hr_api.g_varchar2
518 ,p_qa_organization in varchar2 default hr_api.g_varchar2
519 ) is
520
521 --
522 -- Declare cursors and local variables
523 --
524 l_proc varchar2(72) := g_package||'update_qualification_type';
525 l_effective_date date;
526 lv_object_version_number per_qualification_types.object_version_number%TYPE;
527
528 --
529 -- Declare out parameters
530 --
531 l_object_version_number per_qualification_types.object_version_number%TYPE;
532 l_language_code per_qualification_types_tl.language%TYPE;
533
534 --
535 begin
536 --
537 hr_utility.set_location('Entering:'|| l_proc, 10);
538 --
539 lv_object_version_number := p_object_version_number;
540
541
542 --
543 -- Issue a savepoint
544 --
545 savepoint update_qualification_type;
546
547 hr_utility.set_location(l_proc, 20);
548
549 --
550 -- Truncate the time portion from all IN date parameters
551 --
552 l_effective_date := trunc(p_effective_date);
553
554 --
555 -- store object version number passed in
556 --
557 l_object_version_number := p_object_version_number;
558
559 --
560 -- Call Before Process User hook for update_qualification_type
561 --
562
563 begin
564 hr_qualification_type_bk2.update_qualification_type_b
565 (p_qualification_type_id => p_qualification_type_id
566 ,p_effective_date => l_effective_date
567 ,p_language_code => p_language_code
568 ,p_name => p_name
569 ,p_category => p_category
570 ,p_rank => p_rank
571 ,p_attribute_category => p_attribute_category
572 ,p_attribute1 => p_attribute1
573 ,p_attribute2 => p_attribute2
574 ,p_attribute3 => p_attribute3
575 ,p_attribute4 => p_attribute4
576 ,p_attribute5 => p_attribute5
577 ,p_attribute6 => p_attribute6
578 ,p_attribute7 => p_attribute7
579 ,p_attribute8 => p_attribute8
580 ,p_attribute9 => p_attribute9
581 ,p_attribute10 => p_attribute10
582 ,p_attribute11 => p_attribute11
583 ,p_attribute12 => p_attribute12
584 ,p_attribute13 => p_attribute13
585 ,p_attribute14 => p_attribute14
586 ,p_attribute15 => p_attribute15
587 ,p_attribute16 => p_attribute16
588 ,p_attribute17 => p_attribute17
589 ,p_attribute18 => p_attribute18
590 ,p_attribute19 => p_attribute19
591 ,p_attribute20 => p_attribute20
592 ,p_information_category => p_information_category
593 ,p_information1 => p_information1
594 ,p_information2 => p_information2
595 ,p_information3 => p_information3
596 ,p_information4 => p_information4
597 ,p_information5 => p_information5
598 ,p_information6 => p_information6
599 ,p_information7 => p_information7
600 ,p_information8 => p_information8
601 ,p_information9 => p_information9
602 ,p_information10 => p_information10
603 ,p_information11 => p_information11
604 ,p_information12 => p_information12
605 ,p_information13 => p_information13
606 ,p_information14 => p_information14
607 ,p_information15 => p_information15
608 ,p_information16 => p_information16
609 ,p_information17 => p_information17
610 ,p_information18 => p_information18
611 ,p_information19 => p_information19
612 ,p_information20 => p_information20
613 ,p_information21 => p_information21
614 ,p_information22 => p_information22
615 ,p_information23 => p_information23
616 ,p_information24 => p_information24
617 ,p_information25 => p_information25
618 ,p_information26 => p_information26
619 ,p_information27 => p_information27
620 ,p_information28 => p_information28
621 ,p_information29 => p_information29
622 ,p_information30 => p_information30
623 ,p_qual_framework_id => p_qual_framework_id
624 ,p_qualification_type => p_qualification_type
625 ,p_credit_type => p_credit_type
626 ,p_credits => p_credits
627 ,p_level_type => p_level_type
628 ,p_level_number => p_level_number
629 ,p_field => p_field
630 ,p_sub_field => p_sub_field
631 ,p_provider => p_provider
632 ,p_qa_organization => p_qa_organization
633 ,p_object_version_number => l_object_version_number
634 );
635 exception
636 when hr_api.cannot_find_prog_unit then
637 hr_api.cannot_find_prog_unit_error
638 (p_module_name => 'update_qualification_type'
639 ,p_hook_type => 'BP'
640 );
641 --
642 -- End of before hook process (update_qualification_type)
643 --
644 end;
645
646 hr_utility.set_location(l_proc, 30);
647 --
648 -- Process Logic
649 --
650
651 l_object_version_number := p_object_version_number;
652
653 --
654 -- Validate the language parameter. l_language_code should be passed to functions
655 -- instead of p_language_code from now on, to allow an IN OUT parameter to
656 -- be passed through.
657 --
658 l_language_code := p_language_code;
659 hr_api.validate_language_code(p_language_code => l_language_code);
660
661 hr_utility.set_location(l_proc, 40);
662 --
663 --
664 -- Update qualification type
665 --
666
667 per_eqt_upd.upd
668 (p_effective_date => l_effective_date
669 ,p_qualification_type_id => p_qualification_type_id
670 ,p_name => p_name
671 ,p_category => p_category
672 ,p_rank => p_rank
673 ,p_attribute_category => p_attribute_category
674 ,p_attribute1 => p_attribute1
675 ,p_attribute2 => p_attribute2
676 ,p_attribute3 => p_attribute3
677 ,p_attribute4 => p_attribute4
678 ,p_attribute5 => p_attribute5
679 ,p_attribute6 => p_attribute6
680 ,p_attribute7 => p_attribute7
681 ,p_attribute8 => p_attribute8
682 ,p_attribute9 => p_attribute9
683 ,p_attribute10 => p_attribute10
684 ,p_attribute11 => p_attribute11
685 ,p_attribute12 => p_attribute12
686 ,p_attribute13 => p_attribute13
687 ,p_attribute14 => p_attribute14
688 ,p_attribute15 => p_attribute15
689 ,p_attribute16 => p_attribute16
690 ,p_attribute17 => p_attribute17
691 ,p_attribute18 => p_attribute18
692 ,p_attribute19 => p_attribute19
693 ,p_attribute20 => p_attribute20
694 ,p_information_category => p_information_category
695 ,p_information1 => p_information1
696 ,p_information2 => p_information2
697 ,p_information3 => p_information3
698 ,p_information4 => p_information4
699 ,p_information5 => p_information5
700 ,p_information6 => p_information6
701 ,p_information7 => p_information7
702 ,p_information8 => p_information8
703 ,p_information9 => p_information9
704 ,p_information10 => p_information10
705 ,p_information11 => p_information11
706 ,p_information12 => p_information12
707 ,p_information13 => p_information13
708 ,p_information14 => p_information14
709 ,p_information15 => p_information15
710 ,p_information16 => p_information16
711 ,p_information17 => p_information17
712 ,p_information18 => p_information18
713 ,p_information19 => p_information19
714 ,p_information20 => p_information20
715 ,p_information21 => p_information21
716 ,p_information22 => p_information22
717 ,p_information23 => p_information23
718 ,p_information24 => p_information24
719 ,p_information25 => p_information25
720 ,p_information26 => p_information26
721 ,p_information27 => p_information27
722 ,p_information28 => p_information28
723 ,p_information29 => p_information29
724 ,p_information30 => p_information30
725 ,p_qual_framework_id => p_qual_framework_id
726 ,p_qualification_type => p_qualification_type
727 ,p_credit_type => p_credit_type
728 ,p_credits => p_credits
729 ,p_level_type => p_level_type
730 ,p_level_number => p_level_number
731 ,p_field => p_field
732 ,p_sub_field => p_sub_field
733 ,p_provider => p_provider
734 ,p_qa_organization => p_qa_organization
735 ,p_object_version_number => l_object_version_number
736 );
737
738 hr_utility.set_location(l_proc, 50);
739
740 --
741 -- Update per_qualification_types_tl table
742 --
743 per_qtt_upd.upd_tl
744 (p_qualification_type_id => p_qualification_type_id
745 ,p_language_code => p_language_code
746 ,p_name => p_name
747 );
748
749 --
750 -- Assign the out parameters.
751 --
752 p_object_version_number := l_object_version_number;
753
754 hr_utility.set_location(l_proc, 60);
755
756 -- Call After Process User hook for update_qualification_type
757 --
758
759 begin
760 hr_qualification_type_bk2.update_qualification_type_a
761 (p_qualification_type_id => p_qualification_type_id
762 ,p_effective_date => l_effective_date
763 ,p_language_code => p_language_code
764 ,p_name => p_name
765 ,p_category => p_category
766 ,p_rank => p_rank
767 ,p_attribute_category => p_attribute_category
768 ,p_attribute1 => p_attribute1
769 ,p_attribute2 => p_attribute2
770 ,p_attribute3 => p_attribute3
771 ,p_attribute4 => p_attribute4
772 ,p_attribute5 => p_attribute5
773 ,p_attribute6 => p_attribute6
774 ,p_attribute7 => p_attribute7
775 ,p_attribute8 => p_attribute8
776 ,p_attribute9 => p_attribute9
777 ,p_attribute10 => p_attribute10
778 ,p_attribute11 => p_attribute11
779 ,p_attribute12 => p_attribute12
780 ,p_attribute13 => p_attribute13
781 ,p_attribute14 => p_attribute14
782 ,p_attribute15 => p_attribute15
783 ,p_attribute16 => p_attribute16
784 ,p_attribute17 => p_attribute17
785 ,p_attribute18 => p_attribute18
786 ,p_attribute19 => p_attribute19
787 ,p_attribute20 => p_attribute20
788 ,p_information_category => p_information_category
789 ,p_information1 => p_information1
790 ,p_information2 => p_information2
791 ,p_information3 => p_information3
792 ,p_information4 => p_information4
793 ,p_information5 => p_information5
794 ,p_information6 => p_information6
795 ,p_information7 => p_information7
796 ,p_information8 => p_information8
797 ,p_information9 => p_information9
798 ,p_information10 => p_information10
799 ,p_information11 => p_information11
800 ,p_information12 => p_information12
801 ,p_information13 => p_information13
802 ,p_information14 => p_information14
803 ,p_information15 => p_information15
804 ,p_information16 => p_information16
805 ,p_information17 => p_information17
806 ,p_information18 => p_information18
807 ,p_information19 => p_information19
808 ,p_information20 => p_information20
809 ,p_information21 => p_information21
810 ,p_information22 => p_information22
811 ,p_information23 => p_information23
812 ,p_information24 => p_information24
813 ,p_information25 => p_information25
814 ,p_information26 => p_information26
815 ,p_information27 => p_information27
816 ,p_information28 => p_information28
817 ,p_information29 => p_information29
818 ,p_information30 => p_information30
819 ,p_qual_framework_id => p_qual_framework_id
820 ,p_qualification_type => p_qualification_type
821 ,p_credit_type => p_credit_type
822 ,p_credits => p_credits
823 ,p_level_type => p_level_type
824 ,p_level_number => p_level_number
825 ,p_field => p_field
826 ,p_sub_field => p_sub_field
827 ,p_provider => p_provider
828 ,p_qa_organization => p_qa_organization
829 ,p_object_version_number => l_object_version_number
830 );
831 exception
832 when hr_api.cannot_find_prog_unit then
833 hr_api.cannot_find_prog_unit_error
834 (p_module_name => 'update_qualification_type'
835 ,p_hook_type => 'AP'
836 );
837 --
838 -- End of after hook process (update_qualification_type)
839 --
840 end;
841
842 hr_utility.set_location(l_proc, 70);
843
844 if p_validate
845 then
846 raise hr_api.validate_enabled;
847 end if;
848 --
849 hr_utility.set_location(l_proc, 80);
850 --
851 -- Set OUT parameters
852 --
853 p_object_version_number := l_object_version_number;
854 --
855 hr_utility.set_location(' Leaving:' ||l_proc, 90);
856 --
857 exception
858 --
859 when hr_api.validate_enabled then
860 --
861 -- As the Validate_Enabled exception has been raised
862 -- we must rollback to the savepoint
863 --
864 rollback to update_qualification_type;
865 --
866 -- Set OUT parameters to null
867 -- Only set output warning arguments
868 -- (Any key or derived arguments must be set to null
869 -- when validation only mode is being used.)
870 -- when validation only mode is being used.)
871 --
872 p_object_version_number := p_object_version_number;
873 --
874 hr_utility.set_location(' Leaving:'||l_proc, 100);
875 --
876 when others then
877 --
878 -- A validation or unexpected error has occurred
879 --
880 rollback to update_qualification_type;
881 --
882 p_object_version_number := lv_object_version_number;
883 --
884 hr_utility.set_location(' Leaving:'||l_proc, 110);
885 --
886 raise;
887 --
888 --
889 end update_qualification_type;
890 --
891 -- ----------------------------------------------------------------------------
892 -- |-------------------< delete_qualification_type >--------------------------|
893 -- ----------------------------------------------------------------------------
894 --
895 procedure delete_qualification_type
896 (p_validate in boolean
897 ,p_qualification_type_id in number
898 ,p_object_version_number in out nocopy number
899 )
900 IS
901 --
902 -- Declare cursors and local variables
903 --
904 l_proc VARCHAR2(72) := g_package||'delete_qualification_type';
905 lv_object_version_number per_qualification_types.object_version_number%type;
906
907 --
908 -- Declare out parameter
909 --
910 l_object_version_number per_qualification_types.object_version_number%type;
911
912 --
913 begin
914 --
915 hr_utility.set_location('Entering:'|| l_proc, 10);
916
917 lv_object_version_number := p_object_version_number;
918
919 --
920 -- Issue a savepoint
921 --
922 savepoint delete_qualification_type;
923
924 l_object_version_number := p_object_version_number;
925 hr_utility.set_location(l_proc, 20);
926
927 --
928 -- Call Before Process User Hook
929 --
930 begin
931
932 hr_qualification_type_bk3.delete_qualification_type_b
933 (p_qualification_type_id => p_qualification_type_id
934 ,p_object_version_number => l_object_version_number
935 );
936 exception
937 when hr_api.cannot_find_prog_unit then
938 hr_api.cannot_find_prog_unit_error
939 (p_module_name => 'DELETE_QUALIFICATION_TYPE'
940 ,p_hook_type => 'BP'
941 );
942 end;
943
944 hr_utility.set_location(l_proc, 30);
945
946 --
947 -- Remove all matching translation rows in per_qualification_types_tl
948 --
949 per_qtt_del.del_tl
950 (p_qualification_type_id => p_qualification_type_id
951 );
952
953 hr_utility.set_location(l_proc, 40);
954
955 --
956 -- Process Logic
957 --
958 per_eqt_del.del
959 (p_qualification_type_id => p_qualification_type_id
960 ,p_object_version_number => l_object_version_number
961 ,p_validate => p_validate
962 );
963
964 hr_utility.set_location(l_proc, 50);
965
966 --
967 -- Call After Process User Hook
968 --
969 begin
970 hr_qualification_type_bk3.delete_qualification_type_a
971 (p_qualification_type_id => p_qualification_type_id
972 ,p_object_version_number => l_object_version_number
973 );
974 exception
975 when hr_api.cannot_find_prog_unit then
976 hr_api.cannot_find_prog_unit_error
977 (p_module_name => 'DELETE_QUALIFICATION_TYPE'
978 ,p_hook_type => 'AP'
979 );
980 end;
981
982 hr_utility.set_location(l_proc, 60);
983
984 p_object_version_number := l_object_version_number;
985 --
986 -- When in validation only mode raise the Validate_Enabled exception
987 --
988 if p_validate then
989 raise hr_api.validate_enabled;
990 end if;
991
992 --
993 -- Set all output arguments (returned by some dt modes only)
994 --
995 p_object_version_number := l_object_version_number;
996
997 hr_utility.set_location(' Leaving:'||l_proc, 70);
998
999 exception
1000 when hr_api.validate_enabled then
1001 hr_utility.set_location(' Leaving...:'||l_proc, 80);
1002 --
1003 -- As the Validate_Enabled exception has been raised
1004 -- we must rollback to the savepoint
1005 --
1006 rollback to delete_qualification_type;
1007 --
1008 -- Only set output warning arguments
1009 -- (Any key or derived arguments must be set to null
1010 -- when validation only mode is being used.)
1011 --
1012 p_object_version_number := null;
1013 --
1014 when others then
1015 hr_utility.set_location(' Leaving...:'||l_proc, 90);
1016 --
1017 -- A validation or unexpected error has occured
1018 --
1019 rollback to delete_qualification_type;
1020 --
1021 -- set in out parameters and set out parameters
1022 --
1023 p_object_version_number := lv_object_version_number;
1024 --
1025 raise;
1026 --
1027 end delete_qualification_type;
1028 --
1029 end hr_qualification_type_api;