[Home] [Help]
1: PACKAGE BODY Pay_Mag_Utils AS
2: /* $Header: pymagutl.pkb 120.1 2005/10/10 12:03:21 meshah noship $ */
3: --
4: /*
5: ******************************************************************
17: * 500 Oracle Parkway, Redwood City, CA, 94065. *
18: * *
19: ******************************************************************
20:
21: Name : pay_mag_utils
22:
23: Description : Contains procedures and functions used by magnetic reports.
24:
25: Uses :
209: BEGIN
210: --
211: OPEN csr_formula;
212: --
213: hr_utility.set_location('pay_mag_utils.lookup_formula',1);
214: --
215: FETCH csr_formula INTO l_formula_id;
216: --
217: hr_utility.set_location('pay_mag_utils.lookup_formula',2);
213: hr_utility.set_location('pay_mag_utils.lookup_formula',1);
214: --
215: FETCH csr_formula INTO l_formula_id;
216: --
217: hr_utility.set_location('pay_mag_utils.lookup_formula',2);
218: --
219: -- If formula not found, then raise exception in calling package.
220: --
221: IF csr_formula%NOTFOUND THEN
261: l_format varchar2(30);
262: --
263: BEGIN
264: --
265: hr_utility.set_location('pay_mag_utils.lookup_format',1);
266: --
267: -- In the case of a yearly report, period end will be the same as year end.
268: --
269: OPEN csr_format;
413: l_payroll_action_id NUMBER;
414: --
415: BEGIN
416: --
417: hr_utility.set_location('pay_mag_utils.check_report_unique',1);
418: --
419: OPEN csr_payroll_action;
420: --
421: FETCH csr_payroll_action INTO l_payroll_action_id;
450: BEGIN
451: --
452: -- Set the payroll action status to Error if report has failed.
453: --
454: hr_utility.set_location('pay_mag_utils.error_payroll_action',1);
455: --
456: UPDATE pay_payroll_actions pa
457: SET pa.action_status = 'E'
458: WHERE pa.payroll_action_id = p_payroll_action_id;
484: BEGIN
485: --
486: -- Sets the payroll action to a status of 'C'omplete.
487: --
488: hr_utility.set_location('pay_mag_utils.update_action_status',1);
489: --
490: UPDATE pay_payroll_actions pa
491: SET pa.action_status = 'C'
492: WHERE pa.payroll_action_id = p_payroll_action_id;
492: WHERE pa.payroll_action_id = p_payroll_action_id;
493: --
494: -- Sets all successfully processed assignment actions to 'C'omplete.
495: --
496: hr_utility.set_location('pay_mag_utils.update_action_status',2);
497: --
498: UPDATE pay_assignment_actions aa
499: SET aa.action_status = 'C'
500: WHERE aa.payroll_action_id = p_payroll_action_id
535: BEGIN
536: --
537: -- Get the next payroll_action_id value from the sequence.
538: --
539: hr_utility.set_location('pay_mag_utils.create_payroll_action',1);
540: --
541: select pay_payroll_actions_s.nextval
542: into l_payroll_action_id
543: from sys.dual;
544: --
545: -- Create a payroll action dated as of the end of the period being reported
546: -- on. Populate the legislative parameter to identify the report being run.
547: --
548: hr_utility.set_location('pay_mag_utils.create_payroll_action',2);
549: --
550: if p_report_type = '1099R' then
551: l_legislative_parms := 'USMAGTAPE'|| '-' ||
552: lpad(p_report_type,5) || '-' ||
580: p_period_end,
581: l_legislative_parms,
582: 1);
583: --
584: hr_utility.set_location('pay_mag_utils.create_payroll_action',3);
585: --
586: -- Return payroll action id of new row.
587: --
588: RETURN (l_payroll_action_id);
623: l_assignment_action_id pay_assignment_actions.assignment_action_id%type;
624: --
625: BEGIN
626: --
627: hr_utility.set_location('pay_mag_utils.create_assignment_action',1);
628: --
629: -- Create assignment action to identify a specific person's inclusion in the
630: -- magnetic tape report identified by the parent payroll action. The
631: -- assignment action has to be sequenced within the other assignment actions
635: hrassact.inassact(p_payroll_action_id, p_assignment_id);
636: --
637: -- Get the assignment_action_id of the newly created assignment action.
638: --
639: hr_utility.set_location('pay_mag_utils.create_assignment_action',2);
640: --
641: OPEN csr_assignment_action;
642: FETCH csr_assignment_action INTO l_assignment_action_id;
643: CLOSE csr_assignment_action;
645: UPDATE pay_assignment_actions aa
646: SET aa.tax_unit_id = p_tax_unit_id
647: WHERE aa.assignment_action_id = l_assignment_action_id;
648: --
649: hr_utility.set_location('pay_mag_utils.create_assignment_action',3);
650: --
651: -- Return id of new row.
652: --
653: RETURN (l_assignment_action_id);
751: -- p_year_start 01-JAN-1995
752: -- p_year_end 31-DEC-1995
753: -- p_reporting_year 1995
754: --
755: hr_utility.set_location('pay_mag_utils.get_dates',1);
756: --
757: IF p_report_type = '1099R' THEN
758: --
759: hr_utility.set_location('pay_mag_utils.get_dates',2);
755: hr_utility.set_location('pay_mag_utils.get_dates',1);
756: --
757: IF p_report_type = '1099R' THEN
758: --
759: hr_utility.set_location('pay_mag_utils.get_dates',2);
760: --
761: p_rep_year := p_year;
762: --
763: END IF;
761: p_rep_year := p_year;
762: --
763: END IF;
764: --
765: hr_utility.set_location('pay_mag_utils.get_dates',3);
766: --
767: p_year_start := to_date('01-01-'||p_rep_year, 'DD-MM-YYYY');
768: p_year_end := to_date('31-12-'||p_rep_year, 'DD-MM-YYYY');
769: --
1212: return par_value;
1213: --
1214: end get_parameter;
1215:
1216: END Pay_Mag_Utils;