DBA Data[Home] [Help]

PACKAGE BODY: APPS.GHR_PAH_SHD

Source


1 Package Body ghr_pah_shd as
2 /* $Header: ghpahrhi.pkb 115.3 2003/01/30 19:25:31 asubrahm ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |                     Private Global Definitions                           |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package  varchar2(33)	:= '  ghr_pah_shd.';  -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |------------------------< return_api_dml_status >-------------------------|
12 -- ----------------------------------------------------------------------------
13 Function return_api_dml_status Return Boolean Is
14 --
15   l_proc 	varchar2(72) := g_package||'return_api_dml_status';
16 --
17 Begin
18   hr_utility.set_location('Entering:'||l_proc, 5);
19   --
20   Return (nvl(g_api_dml, false));
21   --
22   hr_utility.set_location(' Leaving:'||l_proc, 10);
23 End return_api_dml_status;
24 --
25 -- ----------------------------------------------------------------------------
26 -- |---------------------------< constraint_error >---------------------------|
27 -- ----------------------------------------------------------------------------
28 Procedure constraint_error
29             (p_constraint_name in all_constraints.constraint_name%TYPE) Is
30 --
31   l_proc 	varchar2(72) := g_package||'constraint_error';
32 --
33 Begin
34   hr_utility.set_location('Entering:'||l_proc, 5);
35   --
36   If (p_constraint_name = 'GHR_PA_HISTORY_FK1') Then
37     hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
38     hr_utility.set_message_token('PROCEDURE', l_proc);
39     hr_utility.set_message_token('STEP','5');
40     hr_utility.raise_error;
41   ElsIf (p_constraint_name = 'GHR_PA_HISTORY_FK2') Then
42     hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
43     hr_utility.set_message_token('PROCEDURE', l_proc);
44     hr_utility.set_message_token('STEP','10');
45     hr_utility.raise_error;
46   ElsIf (p_constraint_name = 'GHR_PA_HISTORY_FK3') Then
47     hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
48     hr_utility.set_message_token('PROCEDURE', l_proc);
49     hr_utility.set_message_token('STEP','15');
50     hr_utility.raise_error;
51   ElsIf (p_constraint_name = 'GHR_PA_HISTORY_PK') Then
52     hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
53     hr_utility.set_message_token('PROCEDURE', l_proc);
54     hr_utility.set_message_token('STEP','20');
55     hr_utility.raise_error;
56   Else
57     hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
58     hr_utility.set_message_token('PROCEDURE', l_proc);
59     hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
60     hr_utility.raise_error;
61   End If;
62   --
63   hr_utility.set_location(' Leaving:'||l_proc, 10);
64 End constraint_error;
65 --
66 -- ----------------------------------------------------------------------------
67 -- |-----------------------------< api_updating >-----------------------------|
68 -- ----------------------------------------------------------------------------
69 Function api_updating
70   (
71   p_pa_history_id                      in number
72   )      Return Boolean Is
73 --
74   --
75   -- Cursor selects the 'current' row from the HR Schema
76   --
77   Cursor C_Sel1 is
78     select
79 		pa_history_id,
80 	pa_request_id,
81 	process_date,
82 	nature_of_action_id,
83 	effective_date,
84 	altered_pa_request_id,
85 	person_id,
86 	assignment_id,
87 	dml_operation,
88 	table_name,
89 	pre_values_flag,
90 	information1,
91 	information2,
92 	information3,
93 	information4,
94 	information5,
95 	information6,
96 	information7,
97 	information8,
98 	information9,
99 	information10,
100 	information11,
101 	information12,
102 	information13,
103 	information14,
104 	information15,
105 	information16,
106 	information17,
107 	information18,
108 	information19,
109 	information20,
110 	information21,
111 	information22,
112 	information23,
113 	information24,
114 	information25,
115 	information26,
116 	information27,
117 	information28,
118 	information29,
119 	information30,
120 	information31,
121 	information32,
122 	information33,
123 	information34,
124 	information35,
125 	information36,
126 	information37,
127 	information38,
128 	information39,
129 	information47,
130 	information48,
131 	information49,
132 	information40,
133 	information41,
134 	information42,
135 	information43,
136 	information44,
137 	information45,
138 	information46,
139 	information50,
140 	information51,
141 	information52,
142 	information53,
143 	information54,
144 	information55,
145 	information56,
146 	information57,
147 	information58,
148 	information59,
149 	information60,
150 	information61,
151 	information62,
152 	information63,
153 	information64,
154 	information65,
155 	information66,
156 	information67,
157 	information68,
158 	information69,
159 	information70,
160 	information71,
161 	information72,
162 	information73,
163 	information74,
164 	information75,
165 	information76,
166 	information77,
167 	information78,
168 	information79,
169 	information80,
170 	information81,
171 	information82,
172 	information83,
173 	information84,
174 	information85,
175 	information86,
176 	information87,
177 	information88,
178 	information89,
179 	information90,
180 	information91,
181 	information92,
182 	information93,
183 	information94,
184 	information95,
185 	information96,
186 	information97,
187 	information98,
188 	information99,
189 	information100,
190 	information101,
191 	information102,
192 	information103,
193 	information104,
194 	information105,
195 	information106,
196 	information107,
197 	information108,
198 	information109,
199 	information110,
200 	information111,
201 	information112,
202 	information113,
203 	information114,
204 	information115,
205 	information116,
206 	information117,
207 	information118,
208 	information119,
209 	information120,
210 	information121,
211 	information122,
212 	information123,
213 	information124,
214 	information125,
215 	information126,
216 	information127,
217 	information128,
218 	information129,
219 	information130,
220 	information131,
221 	information132,
222 	information133,
223 	information134,
224 	information135,
225 	information136,
226 	information137,
227 	information138,
228 	information139,
229 	information140,
230 	information141,
231 	information142,
232 	information143,
233 	information144,
234 	information145,
235 	information146,
236 	information147,
237 	information148,
238 	information149,
239 	information150,
240 	information151,
241 	information152,
242 	information153,
243 	information154,
244 	information155,
245 	information156,
246 	information157,
247 	information158,
248 	information159,
249 	information160,
250 	information161,
251 	information162,
252 	information163,
253 	information164,
254 	information165,
255 	information166,
256 	information167,
257 	information168,
258 	information169,
259 	information170,
260 	information171,
261 	information172,
262 	information173,
263 	information174,
264 	information175,
265 	information176,
266 	information177,
267 	information178,
268 	information179,
269 	information180,
270 	information181,
271 	information182,
272 	information183,
273 	information184,
274 	information185,
275 	information186,
276 	information187,
277 	information188,
278 	information189,
279 	information190,
280 	information191,
281 	information192,
282 	information193,
283 	information194,
284 	information195,
285 	information196,
286 	information197,
287 	information198,
288 	information199,
289 	information200
290     from	ghr_pa_history
291     where	pa_history_id = p_pa_history_id;
292 --
293   l_proc	varchar2(72)	:= g_package||'api_updating';
294   l_fct_ret	boolean;
295 --
296 Begin
297   hr_utility.set_location('Entering:'||l_proc, 5);
298   --
299   If (
300 	p_pa_history_id is null
301      ) Then
302     --
303     -- One of the primary key arguments is null therefore we must
304     -- set the returning function value to false
305     --
306     l_fct_ret := false;
307   Else
308     If (
309 	p_pa_history_id = g_old_rec.pa_history_id
310        ) Then
311       hr_utility.set_location(l_proc, 10);
312       --
313       -- The g_old_rec is current therefore we must
314       -- set the returning function to true
315       --
316       l_fct_ret := true;
317     Else
318       --
319       -- Select the current row into g_old_rec
320       --
321       Open C_Sel1;
322       Fetch C_Sel1 Into g_old_rec;
323       If C_Sel1%notfound Then
324         Close C_Sel1;
325         --
326         -- The primary key is invalid therefore we must error
327         --
328         hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
329         hr_utility.raise_error;
330       End If;
331       Close C_Sel1;
332       --
333       hr_utility.set_location(l_proc, 15);
334       l_fct_ret := true;
335     End If;
336   End If;
337   hr_utility.set_location(' Leaving:'||l_proc, 20);
338   Return (l_fct_ret);
339 --
340 End api_updating;
341 --
342 -- ----------------------------------------------------------------------------
343 -- |---------------------------------< lck >----------------------------------|
344 -- ----------------------------------------------------------------------------
345 Procedure lck
346   (
347   p_pa_history_id                      in number
348   ) is
349 --
350 -- Cursor selects the 'current' row from the HR Schema
351 --
352   Cursor C_Sel1 is
353     select 	pa_history_id,
354 	pa_request_id,
355 	process_date,
356 	nature_of_action_id,
357 	effective_date,
358 	altered_pa_request_id,
359 	person_id,
360 	assignment_id,
361 	dml_operation,
362 	table_name,
363 	pre_values_flag,
364 	information1,
365 	information2,
366 	information3,
367 	information4,
368 	information5,
369 	information6,
370 	information7,
371 	information8,
372 	information9,
373 	information10,
374 	information11,
375 	information12,
376 	information13,
377 	information14,
378 	information15,
379 	information16,
380 	information17,
381 	information18,
382 	information19,
383 	information20,
384 	information21,
385 	information22,
386 	information23,
387 	information24,
388 	information25,
389 	information26,
390 	information27,
391 	information28,
392 	information29,
393 	information30,
394 	information31,
395 	information32,
396 	information33,
397 	information34,
398 	information35,
399 	information36,
400 	information37,
401 	information38,
402 	information39,
403 	information47,
404 	information48,
405 	information49,
406 	information40,
407 	information41,
408 	information42,
409 	information43,
410 	information44,
411 	information45,
412 	information46,
413 	information50,
414 	information51,
415 	information52,
416 	information53,
417 	information54,
418 	information55,
419 	information56,
420 	information57,
421 	information58,
422 	information59,
423 	information60,
424 	information61,
425 	information62,
426 	information63,
427 	information64,
428 	information65,
429 	information66,
430 	information67,
431 	information68,
432 	information69,
433 	information70,
434 	information71,
435 	information72,
436 	information73,
437 	information74,
438 	information75,
439 	information76,
440 	information77,
441 	information78,
442 	information79,
443 	information80,
444 	information81,
445 	information82,
446 	information83,
447 	information84,
448 	information85,
449 	information86,
450 	information87,
451 	information88,
452 	information89,
453 	information90,
454 	information91,
455 	information92,
456 	information93,
457 	information94,
458 	information95,
459 	information96,
460 	information97,
461 	information98,
462 	information99,
463 	information100,
464 	information101,
465 	information102,
466 	information103,
467 	information104,
468 	information105,
469 	information106,
470 	information107,
471 	information108,
472 	information109,
473 	information110,
474 	information111,
475 	information112,
476 	information113,
477 	information114,
478 	information115,
479 	information116,
480 	information117,
481 	information118,
482 	information119,
483 	information120,
484 	information121,
485 	information122,
486 	information123,
487 	information124,
488 	information125,
489 	information126,
490 	information127,
491 	information128,
492 	information129,
493 	information130,
494 	information131,
495 	information132,
496 	information133,
497 	information134,
498 	information135,
499 	information136,
500 	information137,
501 	information138,
502 	information139,
506 	information143,
503 	information140,
504 	information141,
505 	information142,
507 	information144,
508 	information145,
509 	information146,
510 	information147,
511 	information148,
512 	information149,
513 	information150,
514 	information151,
515 	information152,
516 	information153,
517 	information154,
518 	information155,
519 	information156,
520 	information157,
521 	information158,
522 	information159,
523 	information160,
524 	information161,
525 	information162,
526 	information163,
527 	information164,
528 	information165,
529 	information166,
530 	information167,
531 	information168,
532 	information169,
533 	information170,
534 	information171,
535 	information172,
536 	information173,
537 	information174,
538 	information175,
539 	information176,
540 	information177,
541 	information178,
542 	information179,
543 	information180,
544 	information181,
545 	information182,
546 	information183,
547 	information184,
548 	information185,
549 	information186,
550 	information187,
551 	information188,
552 	information189,
553 	information190,
554 	information191,
555 	information192,
556 	information193,
557 	information194,
558 	information195,
559 	information196,
560 	information197,
561 	information198,
562 	information199,
563 	information200
564     from	ghr_pa_history
565     where	pa_history_id = p_pa_history_id
566     for	update nowait;
567 --
568   l_proc	varchar2(72) := g_package||'lck';
569 --
570 Begin
571   hr_utility.set_location('Entering:'||l_proc, 5);
572   --
573   -- Add any mandatory argument checking here:
574   -- Example:
575   -- hr_api.mandatory_arg_error
576   --   (p_api_name       => l_proc,
577   --    p_argument       => 'object_version_number',
578   --    p_argument_value => p_object_version_number);
579   --
580   Open  C_Sel1;
581   Fetch C_Sel1 Into g_old_rec;
582   If C_Sel1%notfound then
583     Close C_Sel1;
584     --
585     -- The primary key is invalid therefore we must error
586     --
587     hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
588     hr_utility.raise_error;
589   End If;
590   Close C_Sel1;
591   --
592 --
593   hr_utility.set_location(' Leaving:'||l_proc, 10);
594 --
595 -- We need to trap the ORA LOCK exception
596 --
597 Exception
598   When HR_Api.Object_Locked then
599     --
600     -- The object is locked therefore we need to supply a meaningful
601     -- error message.
602     --
603     hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
604     hr_utility.set_message_token('TABLE_NAME', 'ghr_pa_history');
605     hr_utility.raise_error;
606 End lck;
607 --
608 -- ----------------------------------------------------------------------------
609 -- |-----------------------------< convert_args >-----------------------------|
610 -- ----------------------------------------------------------------------------
611 Function convert_args
612 	(
613 	p_pa_history_id                 in number,
614 	p_pa_request_id                 in number,
615 	p_process_date                  in date,
616 	p_nature_of_action_id           in number,
617 	p_effective_date                in date,
618 	p_altered_pa_request_id         in number,
619 	p_person_id                     in number,
620 	p_assignment_id                 in number,
621 	p_dml_operation                 in varchar2,
622 	p_table_name                    in varchar2,
623 	p_pre_values_flag               in varchar2,
624 	p_information1                  in varchar2,
625 	p_information2                  in varchar2,
626 	p_information3                  in varchar2,
627 	p_information4                  in varchar2,
628 	p_information5                  in varchar2,
629 	p_information6                  in varchar2,
630 	p_information7                  in varchar2,
631 	p_information8                  in varchar2,
632 	p_information9                  in varchar2,
633 	p_information10                 in varchar2,
634 	p_information11                 in varchar2,
635 	p_information12                 in varchar2,
636 	p_information13                 in varchar2,
637 	p_information14                 in varchar2,
638 	p_information15                 in varchar2,
639 	p_information16                 in varchar2,
640 	p_information17                 in varchar2,
641 	p_information18                 in varchar2,
642 	p_information19                 in varchar2,
643 	p_information20                 in varchar2,
644 	p_information21                 in varchar2,
645 	p_information22                 in varchar2,
646 	p_information23                 in varchar2,
647 	p_information24                 in varchar2,
648 	p_information25                 in varchar2,
649 	p_information26                 in varchar2,
650 	p_information27                 in varchar2,
651 	p_information28                 in varchar2,
652 	p_information29                 in varchar2,
653 	p_information30                 in varchar2,
654 	p_information31                 in varchar2,
655 	p_information32                 in varchar2,
656 	p_information33                 in varchar2,
660 	p_information37                 in varchar2,
657 	p_information34                 in varchar2,
658 	p_information35                 in varchar2,
659 	p_information36                 in varchar2,
661 	p_information38                 in varchar2,
662 	p_information39                 in varchar2,
663 	p_information47                 in varchar2,
664 	p_information48                 in varchar2,
665 	p_information49                 in varchar2,
666 	p_information40                 in varchar2,
667 	p_information41                 in varchar2,
668 	p_information42                 in varchar2,
669 	p_information43                 in varchar2,
670 	p_information44                 in varchar2,
671 	p_information45                 in varchar2,
672 	p_information46                 in varchar2,
673 	p_information50                 in varchar2,
674 	p_information51                 in varchar2,
675 	p_information52                 in varchar2,
676 	p_information53                 in varchar2,
677 	p_information54                 in varchar2,
678 	p_information55                 in varchar2,
679 	p_information56                 in varchar2,
680 	p_information57                 in varchar2,
681 	p_information58                 in varchar2,
682 	p_information59                 in varchar2,
683 	p_information60                 in varchar2,
684 	p_information61                 in varchar2,
685 	p_information62                 in varchar2,
686 	p_information63                 in varchar2,
687 	p_information64                 in varchar2,
688 	p_information65                 in varchar2,
689 	p_information66                 in varchar2,
690 	p_information67                 in varchar2,
691 	p_information68                 in varchar2,
692 	p_information69                 in varchar2,
693 	p_information70                 in varchar2,
694 	p_information71                 in varchar2,
695 	p_information72                 in varchar2,
696 	p_information73                 in varchar2,
697 	p_information74                 in varchar2,
698 	p_information75                 in varchar2,
699 	p_information76                 in varchar2,
700 	p_information77                 in varchar2,
701 	p_information78                 in varchar2,
702 	p_information79                 in varchar2,
703 	p_information80                 in varchar2,
704 	p_information81                 in varchar2,
705 	p_information82                 in varchar2,
706 	p_information83                 in varchar2,
707 	p_information84                 in varchar2,
708 	p_information85                 in varchar2,
709 	p_information86                 in varchar2,
710 	p_information87                 in varchar2,
711 	p_information88                 in varchar2,
712 	p_information89                 in varchar2,
713 	p_information90                 in varchar2,
714 	p_information91                 in varchar2,
715 	p_information92                 in varchar2,
716 	p_information93                 in varchar2,
717 	p_information94                 in varchar2,
718 	p_information95                 in varchar2,
719 	p_information96                 in varchar2,
720 	p_information97                 in varchar2,
721 	p_information98                 in varchar2,
722 	p_information99                 in varchar2,
723 	p_information100                in varchar2,
724 	p_information101                in varchar2,
725 	p_information102                in varchar2,
726 	p_information103                in varchar2,
727 	p_information104                in varchar2,
728 	p_information105                in varchar2,
729 	p_information106                in varchar2,
730 	p_information107                in varchar2,
731 	p_information108                in varchar2,
732 	p_information109                in varchar2,
733 	p_information110                in varchar2,
734 	p_information111                in varchar2,
735 	p_information112                in varchar2,
736 	p_information113                in varchar2,
737 	p_information114                in varchar2,
738 	p_information115                in varchar2,
739 	p_information116                in varchar2,
740 	p_information117                in varchar2,
741 	p_information118                in varchar2,
742 	p_information119                in varchar2,
743 	p_information120                in varchar2,
744 	p_information121                in varchar2,
745 	p_information122                in varchar2,
746 	p_information123                in varchar2,
747 	p_information124                in varchar2,
748 	p_information125                in varchar2,
749 	p_information126                in varchar2,
750 	p_information127                in varchar2,
751 	p_information128                in varchar2,
752 	p_information129                in varchar2,
753 	p_information130                in varchar2,
754 	p_information131                in varchar2,
755 	p_information132                in varchar2,
756 	p_information133                in varchar2,
757 	p_information134                in varchar2,
758 	p_information135                in varchar2,
759 	p_information136                in varchar2,
760 	p_information137                in varchar2,
761 	p_information138                in varchar2,
762 	p_information139                in varchar2,
763 	p_information140                in varchar2,
764 	p_information141                in varchar2,
768 	p_information145                in varchar2,
765 	p_information142                in varchar2,
766 	p_information143                in varchar2,
767 	p_information144                in varchar2,
769 	p_information146                in varchar2,
770 	p_information147                in varchar2,
771 	p_information148                in varchar2,
772 	p_information149                in varchar2,
773 	p_information150                in varchar2,
774 	p_information151                in varchar2,
775 	p_information152                in varchar2,
776 	p_information153                in varchar2,
777 	p_information154                in varchar2,
778 	p_information155                in varchar2,
779 	p_information156                in varchar2,
780 	p_information157                in varchar2,
781 	p_information158                in varchar2,
782 	p_information159                in varchar2,
783 	p_information160                in varchar2,
784 	p_information161                in varchar2,
785 	p_information162                in varchar2,
786 	p_information163                in varchar2,
787 	p_information164                in varchar2,
788 	p_information165                in varchar2,
789 	p_information166                in varchar2,
790 	p_information167                in varchar2,
791 	p_information168                in varchar2,
792 	p_information169                in varchar2,
793 	p_information170                in varchar2,
794 	p_information171                in varchar2,
795 	p_information172                in varchar2,
796 	p_information173                in varchar2,
797 	p_information174                in varchar2,
798 	p_information175                in varchar2,
799 	p_information176                in varchar2,
800 	p_information177                in varchar2,
801 	p_information178                in varchar2,
802 	p_information179                in varchar2,
803 	p_information180                in varchar2,
804 	p_information181                in varchar2,
805 	p_information182                in varchar2,
806 	p_information183                in varchar2,
807 	p_information184                in varchar2,
808 	p_information185                in varchar2,
809 	p_information186                in varchar2,
810 	p_information187                in varchar2,
811 	p_information188                in varchar2,
812 	p_information189                in varchar2,
813 	p_information190                in varchar2,
814 	p_information191                in varchar2,
815 	p_information192                in varchar2,
816 	p_information193                in varchar2,
817 	p_information194                in varchar2,
818 	p_information195                in varchar2,
819 	p_information196                in varchar2,
820 	p_information197                in varchar2,
821 	p_information198                in varchar2,
822 	p_information199                in varchar2,
823 	p_information200                in varchar2
824 	)
825 	Return g_rec_type is
826 --
827   l_rec	  g_rec_type;
828   l_proc  varchar2(72) := g_package||'convert_args';
829 --
830 Begin
831   --
832   hr_utility.set_location('Entering:'||l_proc, 5);
833   --
834   -- Convert arguments into local l_rec structure.
835   --
836   l_rec.pa_history_id                    := p_pa_history_id;
837   l_rec.pa_request_id                    := p_pa_request_id;
838   l_rec.process_date                     := p_process_date;
839   l_rec.nature_of_action_id              := p_nature_of_action_id;
840   l_rec.effective_date                   := p_effective_date;
841   l_rec.altered_pa_request_id            := p_altered_pa_request_id;
842   l_rec.person_id                        := p_person_id;
843   l_rec.assignment_id                    := p_assignment_id;
844   l_rec.dml_operation                    := p_dml_operation;
845   l_rec.table_name                       := p_table_name;
846   l_rec.pre_values_flag                  := p_pre_values_flag;
847   l_rec.information1                     := p_information1;
848   l_rec.information2                     := p_information2;
849   l_rec.information3                     := p_information3;
850   l_rec.information4                     := p_information4;
851   l_rec.information5                     := p_information5;
852   l_rec.information6                     := p_information6;
853   l_rec.information7                     := p_information7;
854   l_rec.information8                     := p_information8;
855   l_rec.information9                     := p_information9;
856   l_rec.information10                    := p_information10;
857   l_rec.information11                    := p_information11;
858   l_rec.information12                    := p_information12;
859   l_rec.information13                    := p_information13;
860   l_rec.information14                    := p_information14;
861   l_rec.information15                    := p_information15;
862   l_rec.information16                    := p_information16;
863   l_rec.information17                    := p_information17;
864   l_rec.information18                    := p_information18;
865   l_rec.information19                    := p_information19;
866   l_rec.information20                    := p_information20;
867   l_rec.information21                    := p_information21;
871   l_rec.information25                    := p_information25;
868   l_rec.information22                    := p_information22;
869   l_rec.information23                    := p_information23;
870   l_rec.information24                    := p_information24;
872   l_rec.information26                    := p_information26;
873   l_rec.information27                    := p_information27;
874   l_rec.information28                    := p_information28;
875   l_rec.information29                    := p_information29;
876   l_rec.information30                    := p_information30;
877   l_rec.information31                    := p_information31;
878   l_rec.information32                    := p_information32;
879   l_rec.information33                    := p_information33;
880   l_rec.information34                    := p_information34;
881   l_rec.information35                    := p_information35;
882   l_rec.information36                    := p_information36;
883   l_rec.information37                    := p_information37;
884   l_rec.information38                    := p_information38;
885   l_rec.information39                    := p_information39;
886   l_rec.information47                    := p_information47;
887   l_rec.information48                    := p_information48;
888   l_rec.information49                    := p_information49;
889   l_rec.information40                    := p_information40;
890   l_rec.information41                    := p_information41;
891   l_rec.information42                    := p_information42;
892   l_rec.information43                    := p_information43;
893   l_rec.information44                    := p_information44;
894   l_rec.information45                    := p_information45;
895   l_rec.information46                    := p_information46;
896   l_rec.information50                    := p_information50;
897   l_rec.information51                    := p_information51;
898   l_rec.information52                    := p_information52;
899   l_rec.information53                    := p_information53;
900   l_rec.information54                    := p_information54;
901   l_rec.information55                    := p_information55;
902   l_rec.information56                    := p_information56;
903   l_rec.information57                    := p_information57;
904   l_rec.information58                    := p_information58;
905   l_rec.information59                    := p_information59;
906   l_rec.information60                    := p_information60;
907   l_rec.information61                    := p_information61;
908   l_rec.information62                    := p_information62;
909   l_rec.information63                    := p_information63;
910   l_rec.information64                    := p_information64;
911   l_rec.information65                    := p_information65;
912   l_rec.information66                    := p_information66;
913   l_rec.information67                    := p_information67;
914   l_rec.information68                    := p_information68;
915   l_rec.information69                    := p_information69;
916   l_rec.information70                    := p_information70;
917   l_rec.information71                    := p_information71;
918   l_rec.information72                    := p_information72;
919   l_rec.information73                    := p_information73;
920   l_rec.information74                    := p_information74;
921   l_rec.information75                    := p_information75;
922   l_rec.information76                    := p_information76;
923   l_rec.information77                    := p_information77;
927   l_rec.information81                    := p_information81;
924   l_rec.information78                    := p_information78;
925   l_rec.information79                    := p_information79;
926   l_rec.information80                    := p_information80;
928   l_rec.information82                    := p_information82;
929   l_rec.information83                    := p_information83;
930   l_rec.information84                    := p_information84;
931   l_rec.information85                    := p_information85;
932   l_rec.information86                    := p_information86;
933   l_rec.information87                    := p_information87;
934   l_rec.information88                    := p_information88;
935   l_rec.information89                    := p_information89;
936   l_rec.information90                    := p_information90;
937   l_rec.information91                    := p_information91;
938   l_rec.information92                    := p_information92;
939   l_rec.information93                    := p_information93;
940   l_rec.information94                    := p_information94;
941   l_rec.information95                    := p_information95;
942   l_rec.information96                    := p_information96;
943   l_rec.information97                    := p_information97;
944   l_rec.information98                    := p_information98;
945   l_rec.information99                    := p_information99;
946   l_rec.information100                   := p_information100;
947   l_rec.information101                   := p_information101;
948   l_rec.information102                   := p_information102;
949   l_rec.information103                   := p_information103;
950   l_rec.information104                   := p_information104;
951   l_rec.information105                   := p_information105;
952   l_rec.information106                   := p_information106;
953   l_rec.information107                   := p_information107;
954   l_rec.information108                   := p_information108;
955   l_rec.information109                   := p_information109;
956   l_rec.information110                   := p_information110;
957   l_rec.information111                   := p_information111;
958   l_rec.information112                   := p_information112;
959   l_rec.information113                   := p_information113;
960   l_rec.information114                   := p_information114;
961   l_rec.information115                   := p_information115;
962   l_rec.information116                   := p_information116;
963   l_rec.information117                   := p_information117;
964   l_rec.information118                   := p_information118;
965   l_rec.information119                   := p_information119;
966   l_rec.information120                   := p_information120;
967   l_rec.information121                   := p_information121;
968   l_rec.information122                   := p_information122;
969   l_rec.information123                   := p_information123;
970   l_rec.information124                   := p_information124;
971   l_rec.information125                   := p_information125;
972   l_rec.information126                   := p_information126;
973   l_rec.information127                   := p_information127;
974   l_rec.information128                   := p_information128;
975   l_rec.information129                   := p_information129;
976   l_rec.information130                   := p_information130;
977   l_rec.information131                   := p_information131;
981   l_rec.information135                   := p_information135;
978   l_rec.information132                   := p_information132;
979   l_rec.information133                   := p_information133;
980   l_rec.information134                   := p_information134;
982   l_rec.information136                   := p_information136;
983   l_rec.information137                   := p_information137;
984   l_rec.information138                   := p_information138;
985   l_rec.information139                   := p_information139;
986   l_rec.information140                   := p_information140;
987   l_rec.information141                   := p_information141;
988   l_rec.information142                   := p_information142;
989   l_rec.information143                   := p_information143;
990   l_rec.information144                   := p_information144;
991   l_rec.information145                   := p_information145;
992   l_rec.information146                   := p_information146;
993   l_rec.information147                   := p_information147;
994   l_rec.information148                   := p_information148;
995   l_rec.information149                   := p_information149;
996   l_rec.information150                   := p_information150;
997   l_rec.information151                   := p_information151;
998   l_rec.information152                   := p_information152;
999   l_rec.information153                   := p_information153;
1000   l_rec.information154                   := p_information154;
1001   l_rec.information155                   := p_information155;
1002   l_rec.information156                   := p_information156;
1003   l_rec.information157                   := p_information157;
1004   l_rec.information158                   := p_information158;
1005   l_rec.information159                   := p_information159;
1006   l_rec.information160                   := p_information160;
1007   l_rec.information161                   := p_information161;
1008   l_rec.information162                   := p_information162;
1009   l_rec.information163                   := p_information163;
1010   l_rec.information164                   := p_information164;
1011   l_rec.information165                   := p_information165;
1012   l_rec.information166                   := p_information166;
1013   l_rec.information167                   := p_information167;
1014   l_rec.information168                   := p_information168;
1015   l_rec.information169                   := p_information169;
1016   l_rec.information170                   := p_information170;
1017   l_rec.information171                   := p_information171;
1018   l_rec.information172                   := p_information172;
1019   l_rec.information173                   := p_information173;
1020   l_rec.information174                   := p_information174;
1021   l_rec.information175                   := p_information175;
1022   l_rec.information176                   := p_information176;
1023   l_rec.information177                   := p_information177;
1024   l_rec.information178                   := p_information178;
1025   l_rec.information179                   := p_information179;
1026   l_rec.information180                   := p_information180;
1027   l_rec.information181                   := p_information181;
1028   l_rec.information182                   := p_information182;
1029   l_rec.information183                   := p_information183;
1030   l_rec.information184                   := p_information184;
1031   l_rec.information185                   := p_information185;
1032   l_rec.information186                   := p_information186;
1033   l_rec.information187                   := p_information187;
1034   l_rec.information188                   := p_information188;
1035   l_rec.information189                   := p_information189;
1036   l_rec.information190                   := p_information190;
1037   l_rec.information191                   := p_information191;
1038   l_rec.information192                   := p_information192;
1039   l_rec.information193                   := p_information193;
1040   l_rec.information194                   := p_information194;
1041   l_rec.information195                   := p_information195;
1042   l_rec.information196                   := p_information196;
1043   l_rec.information197                   := p_information197;
1044   l_rec.information198                   := p_information198;
1045   l_rec.information199                   := p_information199;
1046   l_rec.information200                   := p_information200;
1047   --
1048   -- Return the plsql record structure.
1049   --
1050   hr_utility.set_location(' Leaving:'||l_proc, 10);
1051   Return(l_rec);
1052 --
1053 End convert_args;
1054 --
1055 end ghr_pah_shd;