DBA Data[Home] [Help]

PACKAGE BODY: APPS.PAY_CNT_SHD

Source


1 PACKAGE BODY pay_cnt_shd AS
2 /* $Header: pycntrhi.pkb 120.0.12000000.2 2007/05/01 22:43:42 ahanda noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |                     Private Global Definitions                           |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package  varchar2(33) := '  pay_cnt_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 = 'PAY_USCOUNTY_HT_EXEMPT_CHK') Then
37     hr_utility.set_message(801, 'PAY_72766_CNT_HT_Y_OR_N');
38     hr_utility.raise_error;
39   ElsIf (p_constraint_name = 'PAY_USCOUNTY_LIT_EXEMPT_CHK') Then
40     hr_utility.set_message(801, 'PAY_72767_CNT_LIT_Y_OR_N');
41     hr_utility.raise_error;
42   ElsIf (p_constraint_name = 'PAY_USCOUNTY_SD_EXEMPT_CHK') Then
43     hr_utility.set_message(801, 'PAY_72773_CNT_SD_Y_OR_N');
44     hr_utility.raise_error;
45   ElsIf (p_constraint_name = 'PAY_US_EMP_COUNTY_TAX_RULE_FK1') Then
46     hr_utility.set_message(801, 'HR_7952_ADDR_NO_STATE_CODE');
47     hr_utility.raise_error;
48   ElsIf (p_constraint_name = 'PAY_US_EMP_COUNTY_TAX_RULE_FK2') Then
49     hr_utility.set_message(801, 'PAY_52969_TAX_BG_MATCH_ASG');
50     hr_utility.raise_error;
51   ElsIf (p_constraint_name = 'PAY_US_EMP_COUNTY_TAX_RULE_FK3') Then
52     hr_utility.set_message(801, 'HR_51279_ADD_INV_CTY_CO_ST_CMB');
53     hr_utility.raise_error;
54   Else
55     hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
56     hr_utility.set_message_token('PROCEDURE', l_proc);
57     hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
58     hr_utility.raise_error;
59   End If;
60   --
61   hr_utility.set_location(' Leaving:'||l_proc, 10);
62 End constraint_error;
63 --
64 -- ----------------------------------------------------------------------------
65 -- |-----------------------------< api_updating >-----------------------------|
66 -- ----------------------------------------------------------------------------
67 Function api_updating
68   (p_effective_date           in date,
69    p_emp_county_tax_rule_id   in number,
70    p_object_version_number    in number
71   ) Return Boolean Is
72 --
73   --
74   -- Cursor selects the 'current' row from the HR Schema
75   --
76   Cursor C_Sel1 is
77     select
78       emp_county_tax_rule_id,
79       effective_start_date,
80       effective_end_date,
81       assignment_id,
82       state_code,
83       county_code,
84       business_group_id,
85       additional_wa_rate,
86       filing_status_code,
87       jurisdiction_code,
88       lit_additional_tax,
89       lit_override_amount,
90       lit_override_rate,
91       withholding_allowances,
92       lit_exempt,
93       sd_exempt,
94       ht_exempt,
95       wage_exempt,
96       school_district_code,
97       object_version_number,
98       attribute_category,
99       attribute1,
100       attribute2,
101       attribute3,
102       attribute4,
103       attribute5,
107       attribute9,
104       attribute6,
105       attribute7,
106       attribute8,
108       attribute10,
109       attribute11,
110       attribute12,
111       attribute13,
112       attribute14,
113       attribute15,
114       attribute16,
115       attribute17,
116       attribute18,
117       attribute19,
118       attribute20,
119       attribute21,
120       attribute22,
121       attribute23,
122       attribute24,
123       attribute25,
124       attribute26,
125       attribute27,
126       attribute28,
127       attribute29,
128       attribute30,
129       cnt_information_category,
130       cnt_information1,
131       cnt_information2,
132       cnt_information3,
133       cnt_information4,
134       cnt_information5,
135       cnt_information6,
136       cnt_information7,
137       cnt_information8,
138       cnt_information9,
139       cnt_information10,
140       cnt_information11,
141       cnt_information12,
142       cnt_information13,
143       cnt_information14,
144       cnt_information15,
145       cnt_information16,
146       cnt_information17,
147       cnt_information18,
148       cnt_information19,
149       cnt_information20,
150       cnt_information21,
151       cnt_information22,
152       cnt_information23,
153       cnt_information24,
154       cnt_information25,
155       cnt_information26,
156       cnt_information27,
157       cnt_information28,
158       cnt_information29,
159       cnt_information30
160     from    pay_us_emp_county_tax_rules_f
161     where   emp_county_tax_rule_id = p_emp_county_tax_rule_id
162     and            p_effective_date
163     between effective_start_date and effective_end_date;
164 --
165   l_proc      varchar2(72)      := g_package||'api_updating';
166   l_fct_ret   boolean;
167 --
168 Begin
169   hr_utility.set_location('Entering:'||l_proc, 5);
170   --
171   If (p_effective_date is null or
172       p_emp_county_tax_rule_id is null or
173       p_object_version_number is null) Then
174     --
175     -- One of the primary key arguments is null therefore we must
176     -- set the returning function value to false
177     --
178     l_fct_ret := false;
179   Else
180     If (p_emp_county_tax_rule_id = g_old_rec.emp_county_tax_rule_id and
181         p_object_version_number = g_old_rec.object_version_number) Then
182       hr_utility.set_location(l_proc, 10);
183       --
184       -- The g_old_rec is current therefore we must
185       -- set the returning function to true
186       --
187       l_fct_ret := true;
188     Else
189       --
190       -- Select the current row
191       --
192       Open C_Sel1;
193       Fetch C_Sel1 Into g_old_rec;
194       If C_Sel1%notfound Then
195         Close C_Sel1;
196         --
197         -- The primary key is invalid therefore we must error
198         --
199         hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
200         hr_utility.raise_error;
201       End If;
202       Close C_Sel1;
203       If (p_object_version_number <> g_old_rec.object_version_number) Then
204         hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
205         hr_utility.raise_error;
206       End If;
207       hr_utility.set_location(l_proc, 15);
208       l_fct_ret := true;
209     End If;
210   End If;
211   hr_utility.set_location(' Leaving:'||l_proc, 20);
212   Return (l_fct_ret);
213 --
214 End api_updating;
215 --
216 -- ----------------------------------------------------------------------------
217 -- |--------------------------< find_dt_del_modes >---------------------------|
218 -- ----------------------------------------------------------------------------
219 Procedure find_dt_del_modes
220       (p_effective_date      in  date,
221        p_base_key_value      in  number,
222        p_zap                 out nocopy boolean,
223        p_delete              out nocopy boolean,
224        p_future_change       out nocopy boolean,
225        p_delete_next_change  out nocopy boolean) is
226 --
227   l_proc      varchar2(72)    := g_package||'find_dt_del_modes';
228 --
229   --
230   --
231 --
232 Begin
233   hr_utility.set_location('Entering:'||l_proc, 5);
234     --
235   --
236   -- Call the corresponding datetrack api
237   --
238   dt_api.find_dt_del_modes
239       (p_effective_date     => p_effective_date,
240        p_base_table_name    => 'pay_us_emp_county_tax_rules_f',
241        p_base_key_column    => 'emp_county_tax_rule_id',
242        p_base_key_value     => p_base_key_value,
243        p_zap                => p_zap,
244        p_delete             => p_delete,
245        p_future_change      => p_future_change,
246        p_delete_next_change => p_delete_next_change);
247   --
248   hr_utility.set_location(' Leaving:'||l_proc, 10);
249 End find_dt_del_modes;
250 --
251 -- ----------------------------------------------------------------------------
252 -- |--------------------------< find_dt_upd_modes >---------------------------|
253 -- ----------------------------------------------------------------------------
254 Procedure find_dt_upd_modes
255       (p_effective_date       in  date,
256        p_base_key_value       in  number,
257        p_correction           out nocopy boolean,
258        p_update               out nocopy boolean,
259        p_update_override      out nocopy boolean,
260        p_update_change_insert out nocopy boolean) is
261 --
262   l_proc       varchar2(72) := g_package||'find_dt_upd_modes';
263 --
264 Begin
265   hr_utility.set_location('Entering:'||l_proc, 5);
266   --
267   -- Call the corresponding datetrack api
268   --
269   dt_api.find_dt_upd_modes
270       (p_effective_date       => p_effective_date,
271        p_base_table_name      => 'pay_us_emp_county_tax_rules_f',
272        p_base_key_column      => 'emp_county_tax_rule_id',
273        p_base_key_value       => p_base_key_value,
274        p_correction           => p_correction,
275        p_update               => p_update,
276        p_update_override      => p_update_override,
277        p_update_change_insert => p_update_change_insert);
278   --
279   hr_utility.set_location(' Leaving:'||l_proc, 10);
280 End find_dt_upd_modes;
281 --
282 -- ----------------------------------------------------------------------------
283 -- |------------------------< upd_effective_end_date >------------------------|
284 -- ----------------------------------------------------------------------------
285 Procedure upd_effective_end_date
286       (p_effective_date            in date,
287        p_base_key_value            in number,
288        p_new_effective_end_date    in date,
289        p_validation_start_date     in date,
290        p_validation_end_date       in date,
291          p_object_version_number       out nocopy number) is
292 --
293   l_proc          varchar2(72) := g_package||'upd_effective_end_date';
294   l_object_version_number number;
295 --
296 Begin
297   hr_utility.set_location('Entering:'||l_proc, 5);
298   --
299   -- Because we are updating a row we must get the next object
300   -- version number.
301   --
302   l_object_version_number :=
303     dt_api.get_object_version_number
304       (p_base_table_name      => 'pay_us_emp_county_tax_rules_f',
305        p_base_key_column      => 'emp_county_tax_rule_id',
306        p_base_key_value       => p_base_key_value);
307   --
308   hr_utility.set_location(l_proc, 10);
309   g_api_dml := true;  -- Set the api dml status
310   --
311   -- Update the specified datetrack row setting the effective
312   -- end date to the specified new effective end date.
313   --
317   where   t.emp_county_tax_rule_id  = p_base_key_value
314   update  pay_us_emp_county_tax_rules_f t
315   set   t.effective_end_date    = p_new_effective_end_date,
316         t.object_version_number = l_object_version_number
318   and  p_effective_date
319   between t.effective_start_date and t.effective_end_date;
320   --
321   g_api_dml := false;   -- Unset the api dml status
322   p_object_version_number := l_object_version_number;
323   hr_utility.set_location(' Leaving:'||l_proc, 15);
324 --
325 Exception
326   When Others Then
327     g_api_dml := false;   -- Unset the api dml status
328     Raise;
329 End upd_effective_end_date;
330 --
331 -- ----------------------------------------------------------------------------
332 -- |---------------------------------< lck >----------------------------------|
333 -- ----------------------------------------------------------------------------
334 Procedure lck
335       (p_effective_date       in  date,
336        p_datetrack_mode       in  varchar2,
337        p_emp_county_tax_rule_id       in  number,
338        p_object_version_number in  number,
339        p_validation_start_date out nocopy date,
340        p_validation_end_date   out nocopy date) is
341 --
342   l_proc        varchar2(72) := g_package||'lck';
343   l_validation_start_date date;
344   l_validation_end_date   date;
345   l_object_invalid         exception;
346   l_argument              varchar2(30);
347   --
348   -- Cursor C_Sel1 selects the current locked row as of session date
349   -- ensuring that the object version numbers match.
350   --
351   Cursor C_Sel1 is
352     select
353       emp_county_tax_rule_id,
354       effective_start_date,
355       effective_end_date,
356       assignment_id,
357       state_code,
358       county_code,
359       business_group_id,
360       additional_wa_rate,
361       filing_status_code,
362       jurisdiction_code,
363       lit_additional_tax,
364       lit_override_amount,
365       lit_override_rate,
366       withholding_allowances,
367       lit_exempt,
368       sd_exempt,
369       ht_exempt,
370       wage_exempt,
371       school_district_code,
372       object_version_number,
373       attribute_category,
374       attribute1,
375       attribute2,
376       attribute3,
377       attribute4,
378       attribute5,
379       attribute6,
380       attribute7,
381       attribute8,
382       attribute9,
383       attribute10,
384       attribute11,
385       attribute12,
386       attribute13,
387       attribute14,
388       attribute15,
389       attribute16,
390       attribute17,
391       attribute18,
392       attribute19,
393       attribute20,
394       attribute21,
395       attribute22,
396       attribute23,
397       attribute24,
398       attribute25,
399       attribute26,
400       attribute27,
401       attribute28,
402       attribute29,
403       attribute30,
404       cnt_information_category,
405       cnt_information1,
406       cnt_information2,
407       cnt_information3,
408       cnt_information4,
409       cnt_information5,
410       cnt_information6,
411       cnt_information7,
412       cnt_information8,
413       cnt_information9,
414       cnt_information10,
415       cnt_information11,
416       cnt_information12,
417       cnt_information13,
418       cnt_information14,
419       cnt_information15,
420       cnt_information16,
421       cnt_information17,
422       cnt_information18,
423       cnt_information19,
424       cnt_information20,
425       cnt_information21,
426       cnt_information22,
427       cnt_information23,
428       cnt_information24,
429       cnt_information25,
430       cnt_information26,
431       cnt_information27,
432       cnt_information28,
433       cnt_information29,
434       cnt_information30
435     from    pay_us_emp_county_tax_rules_f
436     where   emp_county_tax_rule_id         = p_emp_county_tax_rule_id
437     and     p_effective_date
438     between effective_start_date and effective_end_date
439     for update nowait;
440   --
441   --
442   --
443 Begin
444   hr_utility.set_location('Entering:'||l_proc, 5);
445   --
446   -- Ensure that all the mandatory arguments are not null
447   --
448   hr_api.mandatory_arg_error(p_api_name       => l_proc,
449                              p_argument       => 'effective_date',
450                              p_argument_value => p_effective_date);
451   --
452   hr_api.mandatory_arg_error(p_api_name       => l_proc,
453                              p_argument       => 'datetrack_mode',
454                              p_argument_value => p_datetrack_mode);
455   --
456   hr_api.mandatory_arg_error(p_api_name       => l_proc,
457                              p_argument       => 'emp_county_tax_rule_id',
458                              p_argument_value => p_emp_county_tax_rule_id);
459   --
460   hr_api.mandatory_arg_error(p_api_name       => l_proc,
461                              p_argument       => 'object_version_number',
462                              p_argument_value => p_object_version_number);
463   --
464   -- Check to ensure the datetrack mode is not INSERT.
465   --
466   If (p_datetrack_mode <> 'INSERT') then
467     --
468     -- We must select and lock the current row.
469     --
470     Open  C_Sel1;
471     Fetch C_Sel1 Into g_old_rec;
475       -- The primary key is invalid therefore we must error
472     If C_Sel1%notfound then
473       Close C_Sel1;
474       --
476       --
477       hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
478       hr_utility.raise_error;
479     End If;
480     Close C_Sel1;
481     If (p_object_version_number <> g_old_rec.object_version_number) Then
482         hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
483         hr_utility.raise_error;
484       End If;
485     hr_utility.set_location(l_proc, 15);
486     --
487     --
488     -- Validate the datetrack mode mode getting the validation start
489     -- and end dates for the specified datetrack operation.
490     --
491     dt_api.validate_dt_mode
492       (p_effective_date   => p_effective_date,
493        p_datetrack_mode   => p_datetrack_mode,
494        p_base_table_name  => 'pay_us_emp_county_tax_rules_f',
495        p_base_key_column  => 'emp_county_tax_rule_id',
496        p_base_key_value   => p_emp_county_tax_rule_id,
497 
498        p_enforce_foreign_locking => true,
499        p_validation_start_date   => l_validation_start_date,
500        p_validation_end_date     => l_validation_end_date);
501   Else
502     --
503     -- We are doing a datetrack 'INSERT' which is illegal within this
504     -- procedure therefore we must error (note: to lck on insert the
505     -- private procedure ins_lck should be called).
506     --
507     hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
508     hr_utility.set_message_token('PROCEDURE', l_proc);
509     hr_utility.set_message_token('STEP','20');
510     hr_utility.raise_error;
511   End If;
512   --
513   -- Set the validation start and end date OUT arguments
514   --
515   p_validation_start_date := l_validation_start_date;
516   p_validation_end_date   := l_validation_end_date;
517   --
518   hr_utility.set_location(' Leaving:'||l_proc, 30);
519 --
520 -- We need to trap the ORA LOCK exception
521 --
522 Exception
523   When HR_Api.Object_Locked then
524     --
525     -- The object is locked therefore we need to supply a meaningful
526     -- error message.
527     --
528     hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
529     hr_utility.set_message_token('TABLE_NAME',
530                                  'pay_us_emp_county_tax_rules_f');
531     hr_utility.raise_error;
532   When l_object_invalid then
533     --
534     -- The object doesn't exist or is invalid
535     --
536     hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
537     hr_utility.set_message_token('TABLE_NAME',
538                                  'pay_us_emp_county_tax_rules_f');
539     hr_utility.raise_error;
540 End lck;
541 --
542 -- ----------------------------------------------------------------------------
543 -- |-----------------------------< convert_args >-----------------------------|
544 -- ----------------------------------------------------------------------------
545 Function convert_args
546       (
547       p_emp_county_tax_rule_id        in number,
548       p_effective_start_date          in date,
549       p_effective_end_date            in date,
550       p_assignment_id                 in number,
551       p_state_code                    in varchar2,
552       p_county_code                   in varchar2,
553       p_business_group_id             in number,
554       p_additional_wa_rate            in number,
555       p_filing_status_code            in varchar2,
556       p_jurisdiction_code             in varchar2,
557       p_lit_additional_tax            in number,
558       p_lit_override_amount           in number,
559       p_lit_override_rate             in number,
560       p_withholding_allowances        in number,
561       p_lit_exempt                    in varchar2,
562       p_sd_exempt                     in varchar2,
563       p_ht_exempt                     in varchar2,
564       p_wage_exempt                   in varchar2,
565       p_school_district_code          in varchar2,
566       p_object_version_number         in number,
567       p_attribute_category              in varchar2,
568       p_attribute1                      in varchar2,
569       p_attribute2                      in varchar2,
570       p_attribute3                      in varchar2,
571       p_attribute4                      in varchar2,
572       p_attribute5                      in varchar2,
573       p_attribute6                      in varchar2,
574       p_attribute7                      in varchar2,
575       p_attribute8                      in varchar2,
576       p_attribute9                      in varchar2,
577       p_attribute10                     in varchar2,
578       p_attribute11                     in varchar2,
579       p_attribute12                     in varchar2,
580       p_attribute13                     in varchar2,
581       p_attribute14                     in varchar2,
582       p_attribute15                     in varchar2,
583       p_attribute16                     in varchar2,
584       p_attribute17                     in varchar2,
585       p_attribute18                     in varchar2,
586       p_attribute19                     in varchar2,
587       p_attribute20                     in varchar2,
588       p_attribute21                     in varchar2,
589       p_attribute22                     in varchar2,
590       p_attribute23                     in varchar2,
591       p_attribute24                     in varchar2,
592       p_attribute25                     in varchar2,
593       p_attribute26                     in varchar2,
594       p_attribute27                     in varchar2,
595       p_attribute28                     in varchar2,
599       p_cnt_information1                in varchar2,
596       p_attribute29                     in varchar2,
597       p_attribute30                     in varchar2,
598       p_cnt_information_category        in varchar2,
600       p_cnt_information2                in varchar2,
601       p_cnt_information3                in varchar2,
602       p_cnt_information4                in varchar2,
603       p_cnt_information5                in varchar2,
604       p_cnt_information6                in varchar2,
605       p_cnt_information7                in varchar2,
606       p_cnt_information8                in varchar2,
607       p_cnt_information9                in varchar2,
608       p_cnt_information10               in varchar2,
609       p_cnt_information11               in varchar2,
610       p_cnt_information12               in varchar2,
611       p_cnt_information13               in varchar2,
612       p_cnt_information14               in varchar2,
613       p_cnt_information15               in varchar2,
614       p_cnt_information16               in varchar2,
615       p_cnt_information17               in varchar2,
616       p_cnt_information18               in varchar2,
617       p_cnt_information19               in varchar2,
618       p_cnt_information20               in varchar2,
619       p_cnt_information21               in varchar2,
620       p_cnt_information22               in varchar2,
621       p_cnt_information23               in varchar2,
622       p_cnt_information24               in varchar2,
623       p_cnt_information25               in varchar2,
624       p_cnt_information26               in varchar2,
625       p_cnt_information27               in varchar2,
626       p_cnt_information28               in varchar2,
627       p_cnt_information29               in varchar2,
628       p_cnt_information30               in varchar2
629 
630       )
631       Return g_rec_type is
632 --
633   l_rec        g_rec_type;
634   l_proc  varchar2(72) := g_package||'convert_args';
635 --
636 Begin
637   --
638   hr_utility.set_location('Entering:'||l_proc, 5);
639   --
640   -- Convert arguments into local l_rec structure.
641   --
642   l_rec.emp_county_tax_rule_id           := p_emp_county_tax_rule_id;
643   l_rec.effective_start_date             := p_effective_start_date;
644   l_rec.effective_end_date               := p_effective_end_date;
645   l_rec.assignment_id                    := p_assignment_id;
646   l_rec.state_code                       := p_state_code;
647   l_rec.county_code                      := p_county_code;
648   l_rec.business_group_id                := p_business_group_id;
649   l_rec.additional_wa_rate               := p_additional_wa_rate;
650   l_rec.filing_status_code               := p_filing_status_code;
651   l_rec.jurisdiction_code                := p_jurisdiction_code;
652   l_rec.lit_additional_tax               := p_lit_additional_tax;
653   l_rec.lit_override_amount              := p_lit_override_amount;
654   l_rec.lit_override_rate                := p_lit_override_rate;
655   l_rec.withholding_allowances           := p_withholding_allowances;
656   l_rec.lit_exempt                       := p_lit_exempt;
657   l_rec.sd_exempt                        := p_sd_exempt;
658   l_rec.ht_exempt                        := p_ht_exempt;
659   l_rec.wage_exempt                      := p_wage_exempt;
660   l_rec.school_district_code             := p_school_district_code;
661   l_rec.object_version_number            := p_object_version_number;
662  l_rec.attribute_category                := p_attribute_category;
663   l_rec.attribute1                       := p_attribute1;
664   l_rec.attribute2                       := p_attribute2;
665   l_rec.attribute3                       := p_attribute3;
666   l_rec.attribute4                       := p_attribute4;
667   l_rec.attribute5                       := p_attribute5;
668   l_rec.attribute6                       := p_attribute6;
669   l_rec.attribute7                       := p_attribute7;
670   l_rec.attribute8                       := p_attribute8;
671   l_rec.attribute9                       := p_attribute9;
672   l_rec.attribute10                      := p_attribute10;
673   l_rec.attribute11                      := p_attribute11;
674   l_rec.attribute12                      := p_attribute12;
675   l_rec.attribute13                      := p_attribute13;
676   l_rec.attribute14                      := p_attribute14;
677   l_rec.attribute15                      := p_attribute15;
678   l_rec.attribute16                      := p_attribute16;
679   l_rec.attribute17                      := p_attribute17;
680   l_rec.attribute18                      := p_attribute18;
681   l_rec.attribute19                      := p_attribute19;
682   l_rec.attribute20                      := p_attribute20;
683   l_rec.attribute21                      := p_attribute21;
684   l_rec.attribute22                      := p_attribute22;
685   l_rec.attribute23                      := p_attribute23;
686   l_rec.attribute24                      := p_attribute24;
687   l_rec.attribute25                      := p_attribute25;
688   l_rec.attribute26                      := p_attribute26;
689   l_rec.attribute27                      := p_attribute27;
690   l_rec.attribute28                      := p_attribute28;
691   l_rec.attribute29                      := p_attribute29;
692   l_rec.attribute30                      := p_attribute30;
693   l_rec.cnt_information_category         := p_cnt_information_category;
694   l_rec.cnt_information1                 := p_cnt_information1;
695   l_rec.cnt_information2                 := p_cnt_information2;
696   l_rec.cnt_information3                 := p_cnt_information3;
697   l_rec.cnt_information4                 := p_cnt_information4;
698   l_rec.cnt_information5                 := p_cnt_information5;
699   l_rec.cnt_information6                 := p_cnt_information6;
703   l_rec.cnt_information10                := p_cnt_information10;
700   l_rec.cnt_information7                 := p_cnt_information7;
701   l_rec.cnt_information8                 := p_cnt_information8;
702   l_rec.cnt_information9                 := p_cnt_information9;
704   l_rec.cnt_information11                := p_cnt_information11;
705   l_rec.cnt_information12                := p_cnt_information12;
706   l_rec.cnt_information13                := p_cnt_information13;
707   l_rec.cnt_information14                := p_cnt_information14;
708   l_rec.cnt_information15                := p_cnt_information15;
709   l_rec.cnt_information16                := p_cnt_information16;
710   l_rec.cnt_information17                := p_cnt_information17;
711   l_rec.cnt_information18                := p_cnt_information18;
712   l_rec.cnt_information19                := p_cnt_information19;
713   l_rec.cnt_information20                := p_cnt_information20;
714   l_rec.cnt_information21                := p_cnt_information21;
715   l_rec.cnt_information22                := p_cnt_information22;
716   l_rec.cnt_information23                := p_cnt_information23;
717   l_rec.cnt_information24                := p_cnt_information24;
718   l_rec.cnt_information25                := p_cnt_information25;
719   l_rec.cnt_information26                := p_cnt_information26;
720   l_rec.cnt_information27                := p_cnt_information27;
721   l_rec.cnt_information28                := p_cnt_information28;
722   l_rec.cnt_information29                := p_cnt_information29;
723   l_rec.cnt_information30                := p_cnt_information30;
724 
725   --
726   -- Return the plsql record structure.
727   --
728   hr_utility.set_location(' Leaving:'||l_proc, 10);
729   Return(l_rec);
730 --
731 End convert_args;
732 --
733 end pay_cnt_shd;