[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,
104 attribute6,
105 attribute7,
106 attribute8,
107 attribute9,
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 --
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
317 where t.emp_county_tax_rule_id = p_base_key_value
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 --
445 --
442 --
443 Begin
444 hr_utility.set_location('Entering:'||l_proc, 5);
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;
472 If C_Sel1%notfound then
473 Close C_Sel1;
474 --
475 -- The primary key is invalid therefore we must error
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,
569 p_attribute2 in varchar2,
566 p_object_version_number in number,
567 p_attribute_category in varchar2,
568 p_attribute1 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,
596 p_attribute29 in varchar2,
597 p_attribute30 in varchar2,
598 p_cnt_information_category in varchar2,
599 p_cnt_information1 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;
671 l_rec.attribute9 := p_attribute9;
668 l_rec.attribute6 := p_attribute6;
669 l_rec.attribute7 := p_attribute7;
670 l_rec.attribute8 := p_attribute8;
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;
700 l_rec.cnt_information7 := p_cnt_information7;
701 l_rec.cnt_information8 := p_cnt_information8;
702 l_rec.cnt_information9 := p_cnt_information9;
703 l_rec.cnt_information10 := p_cnt_information10;
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;