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