DBA Data[Home] [Help]

PACKAGE BODY: APPS.GHR_CMP_SHD

Source


1 Package Body ghr_cmp_shd as
2 /* $Header: ghcmprhi.pkb 120.0 2005/05/29 02:54:02 appldev noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |                     Private Global Definitions                           |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package  varchar2(33) := '  ghr_cmp_shd.';  -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |---------------------------< constraint_error >---------------------------|
12 -- ----------------------------------------------------------------------------
13 Procedure constraint_error
14   (p_constraint_name in all_constraints.constraint_name%TYPE
15   ) Is
16 --
17   l_proc        varchar2(72) := g_package||'constraint_error';
18 --
19 Begin
20   --
21   If (p_constraint_name = 'GHR_COMPLAINTS2_PK') Then
22     fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
23     fnd_message.set_token('PROCEDURE', l_proc);
24     fnd_message.set_token('STEP','5');
25     fnd_message.raise_error;
26   Else
27     fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
28     fnd_message.set_token('PROCEDURE', l_proc);
29     fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
30     fnd_message.raise_error;
31   End If;
32   --
33 End constraint_error;
34 --
35 -- ----------------------------------------------------------------------------
36 -- |-----------------------------< api_updating >-----------------------------|
37 -- ----------------------------------------------------------------------------
38 Function api_updating
39   (p_complaint_id                         in     number
40   ,p_object_version_number                in     number
41   )
42   Return Boolean Is
43   --
44   --
45   -- Cursor selects the 'current' row from the HR Schema
46   --
47   Cursor C_Sel1 is
48     select
49        complaint_id
50       ,complainant_person_id
51       ,business_group_id
52       ,docket_number
53       ,stage
54       ,class_flag
55       ,mixed_flag
56       ,consolidated_flag
57       ,remand_flag
58       ,active_flag
59       ,information_inquiry
60       ,pcom_init
61       ,alleg_incident
62       ,alleg_discrim_org_id
63       ,rr_ltr_date
64       ,rr_ltr_recvd
65       ,pre_com_elec
66       --,adr_offered
67       ,class_agent_flag
68       ,pre_com_desc
69       ,counselor_asg
70       ,init_counselor_interview
71       ,anonymity_requested
72       ,counsel_ext_ltr
73       ,traditional_counsel_outcome
74       ,final_interview
75       ,notice_rtf_recvd
76       ,precom_closed
77       ,precom_closure_nature
78       ,counselor_rpt_sub
79       ,hr_office_org_id
80       ,eeo_office_org_id
81       ,serviced_org_id
82       ,formal_com_filed
83       ,ack_ltr
84       ,clarification_ltr_date
85       ,clarification_response_recvd
86       ,forwarded_legal_review
87       ,returned_from_legal
88       ,letter_type
89       ,letter_date
90       ,letter_recvd
91       ,investigation_source
92       ,investigator_recvd_req
93       ,agency_investigator_req
94       ,investigator_asg
95       ,investigation_start
96       ,investigation_end
97       ,investigation_extended
98       ,invest_extension_desc
99       ,agency_recvd_roi
100       ,comrep_recvd_roi
101       ,options_ltr_date
102       ,comrep_recvd_opt_ltr
103       ,comrep_opt_ltr_response
104       ,resolution_offer
105       ,comrep_resol_offer_recvd
106       ,comrep_resol_offer_response
107       ,comrep_resol_offer_desc
108       ,resol_offer_signed
109       ,resol_offer_desc
110       ,hearing_source
111       ,agency_notified_hearing
112       ,eeoc_hearing_docket_num
113       ,hearing_complete
114       ,aj_merit_decision_date
115       ,agency_recvd_aj_merit_dec
116       ,aj_merit_decision
117       ,aj_ca_decision_date
118       ,agency_recvd_aj_ca_dec
119       ,aj_ca_decision
120       ,fad_requested
121       ,merit_fad
122       ,attorney_fees_fad
123       ,comp_damages_fad
124       ,non_compliance_fad
125       ,fad_req_recvd_eeo_office
126       ,fad_req_forwd_to_agency
127       ,agency_recvd_request
128       ,fad_due
129       ,fad_date
130       ,fad_decision
131       --,fad_final_action_closure
132       ,fad_forwd_to_comrep
133       ,fad_recvd_by_comrep
134       ,fad_imp_ltr_forwd_to_org
135       ,fad_decision_forwd_legal
136       ,fad_decision_recvd_legal
137       ,fa_source
138       ,final_action_due
139       --,final_action_nature_of_closure
140       ,final_act_forwd_comrep
141       ,final_act_recvd_comrep
142       ,final_action_decision_date
143       ,final_action_decision
144       ,fa_imp_ltr_forwd_to_org
145       ,fa_decision_forwd_legal
146       ,fa_decision_recvd_legal
147       ,civil_action_filed
148       ,agency_closure_confirmed
149       ,consolidated_complaint_id
150       ,consolidated
151       ,stage_of_consolidation
152       ,comrep_notif_consolidation
153       ,consolidation_desc
154       ,complaint_closed
155       ,nature_of_closure
156       ,complaint_closed_desc
157       ,filed_formal_class
158       ,forwd_eeoc
159       ,aj_cert_decision_date
160       ,aj_cert_decision_recvd
161       ,aj_cert_decision
162       ,class_members_notified
163       ,number_of_complaintants
164       ,class_hearing
165       ,aj_dec
166       ,agency_recvd_aj_dec
167       ,aj_decision
168       ,object_version_number
169       ,agency_brief_eeoc
170       ,agency_notif_of_civil_action
171       ,fad_source
172       ,agency_files_forwarded_eeoc
173       ,hearing_req
174       ,agency_code
175       ,audited_by
176       ,record_received
177       ,attribute_category
178       ,attribute1
179       ,attribute2
180       ,attribute3
181       ,attribute4
182       ,attribute5
183       ,attribute6
184       ,attribute7
185       ,attribute8
186       ,attribute9
187       ,attribute10
188       ,attribute11
189       ,attribute12
190       ,attribute13
191       ,attribute14
192       ,attribute15
193       ,attribute16
194       ,attribute17
195       ,attribute18
196       ,attribute19
197       ,attribute20
198       ,attribute21
199       ,attribute22
200       ,attribute23
201       ,attribute24
202       ,attribute25
203       ,attribute26
204       ,attribute27
205       ,attribute28
206       ,attribute29
207       ,attribute30
208     from        ghr_complaints2
209     where       complaint_id = p_complaint_id;
210   --
211   l_fct_ret     boolean;
212   --
213 Begin
214   --
215   If (p_complaint_id is null and
216       p_object_version_number is null
217      ) Then
218     --
219     -- One of the primary key arguments is null therefore we must
220     -- set the returning function value to false
221     --
222     l_fct_ret := false;
223   Else
224     If (p_complaint_id
225         = ghr_cmp_shd.g_old_rec.complaint_id and
226         p_object_version_number
227         = ghr_cmp_shd.g_old_rec.object_version_number
228        ) Then
229       --
230       -- The g_old_rec is current therefore we must
231       -- set the returning function to true
232       --
233       l_fct_ret := true;
234     Else
235       --
236       -- Select the current row into g_old_rec
237       --
238       Open C_Sel1;
239       Fetch C_Sel1 Into ghr_cmp_shd.g_old_rec;
240       If C_Sel1%notfound Then
241         Close C_Sel1;
242         --
243         -- The primary key is invalid therefore we must error
244         --
245         fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
246         fnd_message.raise_error;
247       End If;
248       Close C_Sel1;
249       If (p_object_version_number
250           <> ghr_cmp_shd.g_old_rec.object_version_number) Then
251         fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
252         fnd_message.raise_error;
253       End If;
254       l_fct_ret := true;
255     End If;
256   End If;
257   Return (l_fct_ret);
258 --
259 End api_updating;
260 --
261 -- ----------------------------------------------------------------------------
262 -- |---------------------------------< lck >----------------------------------|
263 -- ----------------------------------------------------------------------------
264 Procedure lck
265   (p_complaint_id                         in     number
266   ,p_object_version_number                in     number
267   ) is
268 --
269 -- Cursor selects the 'current' row from the HR Schema
270 --
271   Cursor C_Sel1 is
272     select
273        complaint_id
274       ,complainant_person_id
275       ,business_group_id
276       ,docket_number
277       ,stage
278       ,class_flag
279       ,mixed_flag
280       ,consolidated_flag
281       ,remand_flag
282       ,active_flag
283       ,information_inquiry
284       ,pcom_init
285       ,alleg_incident
286       ,alleg_discrim_org_id
287       ,rr_ltr_date
288       ,rr_ltr_recvd
289       ,pre_com_elec
290       --,adr_offered
291       ,class_agent_flag
292       ,pre_com_desc
293       ,counselor_asg
294       ,init_counselor_interview
295       ,anonymity_requested
296       ,counsel_ext_ltr
297       ,traditional_counsel_outcome
298       ,final_interview
299       ,notice_rtf_recvd
300       ,precom_closed
301       ,precom_closure_nature
302       ,counselor_rpt_sub
303       ,hr_office_org_id
304       ,eeo_office_org_id
305       ,serviced_org_id
306       ,formal_com_filed
307       ,ack_ltr
308       ,clarification_ltr_date
309       ,clarification_response_recvd
310       ,forwarded_legal_review
311       ,returned_from_legal
312       ,letter_type
313       ,letter_date
314       ,letter_recvd
315       ,investigation_source
316       ,investigator_recvd_req
317       ,agency_investigator_req
318       ,investigator_asg
319       ,investigation_start
320       ,investigation_end
321       ,investigation_extended
322       ,invest_extension_desc
323       ,agency_recvd_roi
324       ,comrep_recvd_roi
325       ,options_ltr_date
326       ,comrep_recvd_opt_ltr
327       ,comrep_opt_ltr_response
328       ,resolution_offer
329       ,comrep_resol_offer_recvd
330       ,comrep_resol_offer_response
331       ,comrep_resol_offer_desc
332       ,resol_offer_signed
333       ,resol_offer_desc
334       ,hearing_source
335       ,agency_notified_hearing
336       ,eeoc_hearing_docket_num
337       ,hearing_complete
338       ,aj_merit_decision_date
339       ,agency_recvd_aj_merit_dec
340       ,aj_merit_decision
341       ,aj_ca_decision_date
342       ,agency_recvd_aj_ca_dec
343       ,aj_ca_decision
344       ,fad_requested
345       ,merit_fad
346       ,attorney_fees_fad
347       ,comp_damages_fad
348       ,non_compliance_fad
349       ,fad_req_recvd_eeo_office
350       ,fad_req_forwd_to_agency
351       ,agency_recvd_request
352       ,fad_due
353       ,fad_date
354       ,fad_decision
355       --,fad_final_action_closure
356       ,fad_forwd_to_comrep
357       ,fad_recvd_by_comrep
358       ,fad_imp_ltr_forwd_to_org
359       ,fad_decision_forwd_legal
360       ,fad_decision_recvd_legal
361       ,fa_source
362       ,final_action_due
363       --,final_action_nature_of_closure
364       ,final_act_forwd_comrep
365       ,final_act_recvd_comrep
366       ,final_action_decision_date
367       ,final_action_decision
368       ,fa_imp_ltr_forwd_to_org
369       ,fa_decision_forwd_legal
370       ,fa_decision_recvd_legal
371       ,civil_action_filed
372       ,agency_closure_confirmed
373       ,consolidated_complaint_id
374       ,consolidated
375       ,stage_of_consolidation
376       ,comrep_notif_consolidation
377       ,consolidation_desc
378       ,complaint_closed
379       ,nature_of_closure
380       ,complaint_closed_desc
381       ,filed_formal_class
382       ,forwd_eeoc
383       ,aj_cert_decision_date
384       ,aj_cert_decision_recvd
385       ,aj_cert_decision
386       ,class_members_notified
387       ,number_of_complaintants
388       ,class_hearing
389       ,aj_dec
390       ,agency_recvd_aj_dec
391       ,aj_decision
392       ,object_version_number
393       ,agency_brief_eeoc
394       ,agency_notif_of_civil_action
395       ,fad_source
396       ,agency_files_forwarded_eeoc
397       ,hearing_req
398       ,agency_code
399       ,audited_by
400       ,record_received
401       ,attribute_category
402       ,attribute1
403       ,attribute2
404       ,attribute3
405       ,attribute4
406       ,attribute5
407       ,attribute6
408       ,attribute7
409       ,attribute8
410       ,attribute9
411       ,attribute10
412       ,attribute11
413       ,attribute12
414       ,attribute13
415       ,attribute14
416       ,attribute15
417       ,attribute16
418       ,attribute17
419       ,attribute18
420       ,attribute19
421       ,attribute20
422       ,attribute21
423       ,attribute22
424       ,attribute23
425       ,attribute24
426       ,attribute25
427       ,attribute26
428       ,attribute27
429       ,attribute28
430       ,attribute29
431       ,attribute30
432     from        ghr_complaints2
433     where       complaint_id = p_complaint_id
434     for update nowait;
435 --
436   l_proc        varchar2(72) := g_package||'lck';
437 --
438 Begin
439   hr_utility.set_location('Entering:'||l_proc, 5);
440   --
441   hr_api.mandatory_arg_error
442     (p_api_name           => l_proc
443     ,p_argument           => 'COMPLAINT_ID'
444     ,p_argument_value     => p_complaint_id
445     );
446   hr_utility.set_location(l_proc,6);
447   hr_api.mandatory_arg_error
448     (p_api_name           => l_proc
449     ,p_argument           => 'OBJECT_VERSION_NUMBER'
450     ,p_argument_value     => p_object_version_number
451     );
452   --
453   Open  C_Sel1;
454   Fetch C_Sel1 Into ghr_cmp_shd.g_old_rec;
455   If C_Sel1%notfound then
456     Close C_Sel1;
457     --
458     -- The primary key is invalid therefore we must error
459     --
460     fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
461     fnd_message.raise_error;
462   End If;
463   Close C_Sel1;
464   If (p_object_version_number
465       <> ghr_cmp_shd.g_old_rec.object_version_number) Then
466         fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
467         fnd_message.raise_error;
468   End If;
469   --
470   hr_utility.set_location(' Leaving:'||l_proc, 10);
471   --
472   -- We need to trap the ORA LOCK exception
473   --
474 Exception
475   When HR_Api.Object_Locked then
476     --
477     -- The object is locked therefore we need to supply a meaningful
478     -- error message.
479     --
480     fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
481     fnd_message.set_token('TABLE_NAME', 'ghr_complaints2');
482     fnd_message.raise_error;
483 End lck;
484 --
485 -- ----------------------------------------------------------------------------
486 -- |-----------------------------< convert_args >-----------------------------|
487 -- ----------------------------------------------------------------------------
488 Function convert_args
489   (p_complaint_id                   in number
490   ,p_complainant_person_id          in number
491   ,p_business_group_id              in number
492   ,p_docket_number                  in varchar2
493   ,p_stage                          in varchar2
494   ,p_class_flag                     in varchar2
495   ,p_mixed_flag                     in varchar2
496   ,p_consolidated_flag              in varchar2
497   ,p_remand_flag                    in varchar2
498   ,p_active_flag                    in varchar2
499   ,p_information_inquiry            in date
500   ,p_pcom_init                      in date
501   ,p_alleg_incident                 in date
502   ,p_alleg_discrim_org_id           in number
503   ,p_rr_ltr_date                    in date
504   ,p_rr_ltr_recvd                   in date
505   ,p_pre_com_elec                   in varchar2
506   --,p_adr_offered                    in varchar2
507   ,p_class_agent_flag               in varchar2
508   ,p_pre_com_desc                   in varchar2
509   ,p_counselor_asg                  in date
510   ,p_init_counselor_interview       in date
511   ,p_anonymity_requested            in varchar2
512   ,p_counsel_ext_ltr                in date
513   ,p_traditional_counsel_outcome    in varchar2
514   ,p_final_interview                in date
515   ,p_notice_rtf_recvd               in date
516   ,p_precom_closed                  in date
517   ,p_precom_closure_nature          in varchar2
518   ,p_counselor_rpt_sub              in date
519   ,p_hr_office_org_id               in number
520   ,p_eeo_office_org_id              in number
521   ,p_serviced_org_id                in number
522   ,p_formal_com_filed               in date
523   ,p_ack_ltr                        in date
524   ,p_clarification_ltr_date         in date
525   ,p_clarification_response_recvd   in date
526   ,p_forwarded_legal_review         in date
527   ,p_returned_from_legal            in date
528   ,p_letter_type                    in varchar2
529   ,p_letter_date                    in date
530   ,p_letter_recvd                   in date
531   ,p_investigation_source           in varchar2
532   ,p_investigator_recvd_req         in date
533   ,p_agency_investigator_req        in date
534   ,p_investigator_asg               in date
535   ,p_investigation_start            in date
536   ,p_investigation_end              in date
537   ,p_investigation_extended         in date
538   ,p_invest_extension_desc          in varchar2
539   ,p_agency_recvd_roi               in date
540   ,p_comrep_recvd_roi               in date
541   ,p_options_ltr_date               in date
542   ,p_comrep_recvd_opt_ltr           in date
543   ,p_comrep_opt_ltr_response        in varchar2
544   ,p_resolution_offer               in date
545   ,p_comrep_resol_offer_recvd       in date
546   ,p_comrep_resol_offer_response    in date
547   ,p_comrep_resol_offer_desc        in varchar2
548   ,p_resol_offer_signed             in date
549   ,p_resol_offer_desc               in varchar2
550   ,p_hearing_source                 in varchar2
551   ,p_agency_notified_hearing        in date
552   ,p_eeoc_hearing_docket_num        in varchar2
553   ,p_hearing_complete               in date
554   ,p_aj_merit_decision_date         in date
555   ,p_agency_recvd_aj_merit_dec      in date
556   ,p_aj_merit_decision              in varchar2
557   ,p_aj_ca_decision_date            in date
558   ,p_agency_recvd_aj_ca_dec         in date
559   ,p_aj_ca_decision                 in varchar2
560   ,p_fad_requested                  in date
561   ,p_merit_fad                      in varchar2
562   ,p_attorney_fees_fad              in varchar2
563   ,p_comp_damages_fad               in varchar2
564   ,p_non_compliance_fad             in varchar2
565   ,p_fad_req_recvd_eeo_office       in date
566   ,p_fad_req_forwd_to_agency        in date
567   ,p_agency_recvd_request           in date
568   ,p_fad_due                        in date
569   ,p_fad_date                       in date
570   ,p_fad_decision                   in varchar2
571   --,p_fad_final_action_closure       in varchar2
572   ,p_fad_forwd_to_comrep            in date
573   ,p_fad_recvd_by_comrep            in date
574   ,p_fad_imp_ltr_forwd_to_org       in date
575   ,p_fad_decision_forwd_legal       in date
576   ,p_fad_decision_recvd_legal       in date
577   ,p_fa_source                      in varchar2
578   ,p_final_action_due               in date
579   --,p_final_action_nature_of_closu   in varchar2
580   ,p_final_act_forwd_comrep         in date
581   ,p_final_act_recvd_comrep         in date
582   ,p_final_action_decision_date     in date
583   ,p_final_action_decision          in varchar2
584   ,p_fa_imp_ltr_forwd_to_org        in date
585   ,p_fa_decision_forwd_legal        in date
586   ,p_fa_decision_recvd_legal        in date
587   ,p_civil_action_filed             in date
588   ,p_agency_closure_confirmed       in date
589   ,p_consolidated_complaint_id      in number
590   ,p_consolidated                   in date
591   ,p_stage_of_consolidation         in varchar2
592   ,p_comrep_notif_consolidation     in date
593   ,p_consolidation_desc             in varchar2
594   ,p_complaint_closed               in date
595   ,p_nature_of_closure              in varchar2
596   ,p_complaint_closed_desc          in varchar2
597   ,p_filed_formal_class             in date
598   ,p_forwd_eeoc                     in date
599   ,p_aj_cert_decision_date          in date
600   ,p_aj_cert_decision_recvd         in date
601   ,p_aj_cert_decision               in varchar2
602   ,p_class_members_notified         in date
603   ,p_number_of_complaintants        in number
604   ,p_class_hearing                  in date
605   ,p_aj_dec                         in date
606   ,p_agency_recvd_aj_dec            in date
607   ,p_aj_decision                    in varchar2
608   ,p_object_version_number          in number
609   ,p_agency_brief_eeoc              in date
610   ,p_agency_notif_of_civil_action   in date
611   ,p_fad_source                     in varchar2
612   ,p_agency_files_forwarded_eeoc    in date
613   ,p_hearing_req                    in date
614   ,p_agency_code                    in varchar2
615   ,p_audited_by                     in varchar2
616   ,p_record_received                in date
617   ,p_attribute_category             in varchar2
618   ,p_attribute1                     in varchar2
619   ,p_attribute2                     in varchar2
620   ,p_attribute3                     in varchar2
621   ,p_attribute4                     in varchar2
622   ,p_attribute5                     in varchar2
623   ,p_attribute6                     in varchar2
624   ,p_attribute7                     in varchar2
625   ,p_attribute8                     in varchar2
626   ,p_attribute9                     in varchar2
627   ,p_attribute10                    in varchar2
628   ,p_attribute11                    in varchar2
629   ,p_attribute12                    in varchar2
630   ,p_attribute13                    in varchar2
631   ,p_attribute14                    in varchar2
632   ,p_attribute15                    in varchar2
633   ,p_attribute16                    in varchar2
634   ,p_attribute17                    in varchar2
635   ,p_attribute18                    in varchar2
636   ,p_attribute19                    in varchar2
637   ,p_attribute20                    in varchar2
638   ,p_attribute21                    in varchar2
639   ,p_attribute22                    in varchar2
640   ,p_attribute23                    in varchar2
641   ,p_attribute24                    in varchar2
642   ,p_attribute25                    in varchar2
643   ,p_attribute26                    in varchar2
644   ,p_attribute27                    in varchar2
645   ,p_attribute28                    in varchar2
646   ,p_attribute29                    in varchar2
647   ,p_attribute30                    in varchar2
648   )
649   Return g_rec_type is
650 --
651   l_rec   g_rec_type;
652 --
653 Begin
654   --
655   -- Convert arguments into local l_rec structure.
656   --
657   l_rec.complaint_id                     := p_complaint_id;
658   l_rec.complainant_person_id            := p_complainant_person_id;
659   l_rec.business_group_id                := p_business_group_id;
660   l_rec.docket_number                    := p_docket_number;
661   l_rec.stage                            := p_stage;
662   l_rec.class_flag                       := p_class_flag;
663   l_rec.mixed_flag                       := p_mixed_flag;
664   l_rec.consolidated_flag                := p_consolidated_flag;
665   l_rec.remand_flag                      := p_remand_flag;
666   l_rec.active_flag                      := p_active_flag;
667   l_rec.information_inquiry              := p_information_inquiry;
668   l_rec.pcom_init                        := p_pcom_init;
669   l_rec.alleg_incident                   := p_alleg_incident;
670   l_rec.alleg_discrim_org_id             := p_alleg_discrim_org_id;
671   l_rec.rr_ltr_date                      := p_rr_ltr_date;
672   l_rec.rr_ltr_recvd                     := p_rr_ltr_recvd;
673   l_rec.pre_com_elec                     := p_pre_com_elec;
674   --l_rec.adr_offered                      := p_adr_offered;
675   l_rec.class_agent_flag                 := p_class_agent_flag;
676   l_rec.pre_com_desc                     := p_pre_com_desc;
677   l_rec.counselor_asg                    := p_counselor_asg;
678   l_rec.init_counselor_interview         := p_init_counselor_interview;
679   l_rec.anonymity_requested              := p_anonymity_requested;
680   l_rec.counsel_ext_ltr                  := p_counsel_ext_ltr;
681   l_rec.traditional_counsel_outcome      := p_traditional_counsel_outcome;
682   l_rec.final_interview                  := p_final_interview;
683   l_rec.notice_rtf_recvd                 := p_notice_rtf_recvd;
684   l_rec.precom_closed                    := p_precom_closed;
685   l_rec.precom_closure_nature            := p_precom_closure_nature;
686   l_rec.counselor_rpt_sub                := p_counselor_rpt_sub;
687   l_rec.hr_office_org_id                 := p_hr_office_org_id;
688   l_rec.eeo_office_org_id                := p_eeo_office_org_id;
689   l_rec.serviced_org_id                  := p_serviced_org_id;
690   l_rec.formal_com_filed                 := p_formal_com_filed;
691   l_rec.ack_ltr                          := p_ack_ltr;
692   l_rec.clarification_ltr_date           := p_clarification_ltr_date;
693   l_rec.clarification_response_recvd     := p_clarification_response_recvd;
694   l_rec.forwarded_legal_review           := p_forwarded_legal_review;
695   l_rec.returned_from_legal              := p_returned_from_legal;
696   l_rec.letter_type                      := p_letter_type;
697   l_rec.letter_date                      := p_letter_date;
698   l_rec.letter_recvd                     := p_letter_recvd;
699   l_rec.investigation_source             := p_investigation_source;
700   l_rec.investigator_recvd_req           := p_investigator_recvd_req;
701   l_rec.agency_investigator_req          := p_agency_investigator_req;
702   l_rec.investigator_asg                 := p_investigator_asg;
703   l_rec.investigation_start              := p_investigation_start;
704   l_rec.investigation_end                := p_investigation_end;
705   l_rec.investigation_extended           := p_investigation_extended;
706   l_rec.invest_extension_desc            := p_invest_extension_desc;
707   l_rec.agency_recvd_roi                 := p_agency_recvd_roi;
708   l_rec.comrep_recvd_roi                 := p_comrep_recvd_roi;
709   l_rec.options_ltr_date                 := p_options_ltr_date;
710   l_rec.comrep_recvd_opt_ltr             := p_comrep_recvd_opt_ltr;
711   l_rec.comrep_opt_ltr_response          := p_comrep_opt_ltr_response;
712   l_rec.resolution_offer                 := p_resolution_offer;
713   l_rec.comrep_resol_offer_recvd         := p_comrep_resol_offer_recvd;
714   l_rec.comrep_resol_offer_response      := p_comrep_resol_offer_response;
715   l_rec.comrep_resol_offer_desc          := p_comrep_resol_offer_desc;
716   l_rec.resol_offer_signed               := p_resol_offer_signed;
717   l_rec.resol_offer_desc                 := p_resol_offer_desc;
718   l_rec.hearing_source                   := p_hearing_source;
719   l_rec.agency_notified_hearing          := p_agency_notified_hearing;
720   l_rec.eeoc_hearing_docket_num          := p_eeoc_hearing_docket_num;
721   l_rec.hearing_complete                 := p_hearing_complete;
722   l_rec.aj_merit_decision_date           := p_aj_merit_decision_date;
723   l_rec.agency_recvd_aj_merit_dec        := p_agency_recvd_aj_merit_dec;
724   l_rec.aj_merit_decision                := p_aj_merit_decision;
725   l_rec.aj_ca_decision_date              := p_aj_ca_decision_date;
726   l_rec.agency_recvd_aj_ca_dec           := p_agency_recvd_aj_ca_dec;
727   l_rec.aj_ca_decision                   := p_aj_ca_decision;
728   l_rec.fad_requested                    := p_fad_requested;
729   l_rec.merit_fad                        := p_merit_fad;
730   l_rec.attorney_fees_fad                := p_attorney_fees_fad;
731   l_rec.comp_damages_fad                 := p_comp_damages_fad;
732   l_rec.non_compliance_fad               := p_non_compliance_fad;
733   l_rec.fad_req_recvd_eeo_office         := p_fad_req_recvd_eeo_office;
734   l_rec.fad_req_forwd_to_agency          := p_fad_req_forwd_to_agency;
735   l_rec.agency_recvd_request             := p_agency_recvd_request;
736   l_rec.fad_due                          := p_fad_due;
737   l_rec.fad_date                         := p_fad_date;
738   l_rec.fad_decision                     := p_fad_decision;
739   --l_rec.fad_final_action_closure         := p_fad_final_action_closure;
740   l_rec.fad_forwd_to_comrep              := p_fad_forwd_to_comrep;
741   l_rec.fad_recvd_by_comrep              := p_fad_recvd_by_comrep;
742   l_rec.fad_imp_ltr_forwd_to_org         := p_fad_imp_ltr_forwd_to_org;
743   l_rec.fad_decision_forwd_legal         := p_fad_decision_forwd_legal;
744   l_rec.fad_decision_recvd_legal         := p_fad_decision_recvd_legal;
745   l_rec.fa_source                        := p_fa_source;
746   l_rec.final_action_due                 := p_final_action_due;
747   --l_rec.final_action_nature_of_closure   := p_final_action_nature_of_closu;
748   l_rec.final_act_forwd_comrep           := p_final_act_forwd_comrep;
749   l_rec.final_act_recvd_comrep           := p_final_act_recvd_comrep;
750   l_rec.final_action_decision_date       := p_final_action_decision_date;
751   l_rec.final_action_decision            := p_final_action_decision;
752   l_rec.fa_imp_ltr_forwd_to_org          := p_fa_imp_ltr_forwd_to_org;
753   l_rec.fa_decision_forwd_legal          := p_fa_decision_forwd_legal;
754   l_rec.fa_decision_recvd_legal          := p_fa_decision_recvd_legal;
755   l_rec.civil_action_filed               := p_civil_action_filed;
756   l_rec.agency_closure_confirmed         := p_agency_closure_confirmed;
757   l_rec.consolidated_complaint_id        := p_consolidated_complaint_id;
758   l_rec.consolidated                     := p_consolidated;
759   l_rec.stage_of_consolidation           := p_stage_of_consolidation;
760   l_rec.comrep_notif_consolidation       := p_comrep_notif_consolidation;
761   l_rec.consolidation_desc               := p_consolidation_desc;
762   l_rec.complaint_closed                 := p_complaint_closed;
763   l_rec.nature_of_closure                := p_nature_of_closure;
764   l_rec.complaint_closed_desc            := p_complaint_closed_desc;
765   l_rec.filed_formal_class               := p_filed_formal_class;
766   l_rec.forwd_eeoc                       := p_forwd_eeoc;
767   l_rec.aj_cert_decision_date            := p_aj_cert_decision_date;
768   l_rec.aj_cert_decision_recvd           := p_aj_cert_decision_recvd;
769   l_rec.aj_cert_decision                 := p_aj_cert_decision;
770   l_rec.class_members_notified           := p_class_members_notified;
771   l_rec.number_of_complaintants          := p_number_of_complaintants;
772   l_rec.class_hearing                    := p_class_hearing;
773   l_rec.aj_dec                           := p_aj_dec;
774   l_rec.agency_recvd_aj_dec              := p_agency_recvd_aj_dec;
775   l_rec.aj_decision                      := p_aj_decision;
776   l_rec.object_version_number            := p_object_version_number;
777   l_rec.agency_brief_eeoc                := p_agency_brief_eeoc;
778   l_rec.agency_notif_of_civil_action     := p_agency_notif_of_civil_action;
779   l_rec.fad_source                       := p_fad_source;
780   l_rec.agency_files_forwarded_eeoc      := p_agency_files_forwarded_eeoc;
781   l_rec.hearing_req                      := p_hearing_req;
782   l_rec.agency_code                      := p_agency_code;
783   l_rec.audited_by                       := p_audited_by;
784   l_rec.record_received                  := p_record_received;
785   l_rec.attribute_category               := p_attribute_category;
786   l_rec.attribute1                       := p_attribute1;
787   l_rec.attribute2                       := p_attribute2;
788   l_rec.attribute3                       := p_attribute3;
789   l_rec.attribute4                       := p_attribute4;
790   l_rec.attribute5                       := p_attribute5;
791   l_rec.attribute6                       := p_attribute6;
792   l_rec.attribute7                       := p_attribute7;
793   l_rec.attribute8                       := p_attribute8;
794   l_rec.attribute9                       := p_attribute9;
795   l_rec.attribute10                      := p_attribute10;
796   l_rec.attribute11                      := p_attribute11;
797   l_rec.attribute12                      := p_attribute12;
798   l_rec.attribute13                      := p_attribute13;
799   l_rec.attribute14                      := p_attribute14;
800   l_rec.attribute15                      := p_attribute15;
801   l_rec.attribute16                      := p_attribute16;
802   l_rec.attribute17                      := p_attribute17;
803   l_rec.attribute18                      := p_attribute18;
804   l_rec.attribute19                      := p_attribute19;
805   l_rec.attribute20                      := p_attribute20;
806   l_rec.attribute21                      := p_attribute21;
807   l_rec.attribute22                      := p_attribute22;
808   l_rec.attribute23                      := p_attribute23;
809   l_rec.attribute24                      := p_attribute24;
810   l_rec.attribute25                      := p_attribute25;
811   l_rec.attribute26                      := p_attribute26;
812   l_rec.attribute27                      := p_attribute27;
813   l_rec.attribute28                      := p_attribute28;
814   l_rec.attribute29                      := p_attribute29;
815   l_rec.attribute30                      := p_attribute30;
816 
817   --
818   -- Return the plsql record structure.
819   --
820   Return(l_rec);
821 --
822 End convert_args;
823 --
824 end ghr_cmp_shd;