[Home] [Help]
206:
207: Description: User-Defined
208: Functions required for US
209: implementations.
210: 19-MAY-99 gpaytonm 115.12 Removed hr_utility.trace
211: 20-MAY-99 VMehta 115.13 Converted p_tax_unit_id to
212: character while comparing it to segment1 in hr_soft_coding_
213: keyflex table to overcome
214: 'invali number' error.
526:
527: --p_wsched := 'NOT ENTERED';
528: v_prorated_earn := 0;
529:
530: hr_utility.trace('UDFS Entered Prorate Earnings');
531: hr_utility.trace('p_bg_id ='||to_char(p_bg_id));
532: hr_utility.trace('p_asg_hrly_rate ='||to_char(p_asg_hrly_rate));
533: hr_utility.trace('p_wsched ='||p_wsched);
534: hr_utility.trace('p_asg_std_hours ='||to_char(p_asg_std_hours));
527: --p_wsched := 'NOT ENTERED';
528: v_prorated_earn := 0;
529:
530: hr_utility.trace('UDFS Entered Prorate Earnings');
531: hr_utility.trace('p_bg_id ='||to_char(p_bg_id));
532: hr_utility.trace('p_asg_hrly_rate ='||to_char(p_asg_hrly_rate));
533: hr_utility.trace('p_wsched ='||p_wsched);
534: hr_utility.trace('p_asg_std_hours ='||to_char(p_asg_std_hours));
535: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
528: v_prorated_earn := 0;
529:
530: hr_utility.trace('UDFS Entered Prorate Earnings');
531: hr_utility.trace('p_bg_id ='||to_char(p_bg_id));
532: hr_utility.trace('p_asg_hrly_rate ='||to_char(p_asg_hrly_rate));
533: hr_utility.trace('p_wsched ='||p_wsched);
534: hr_utility.trace('p_asg_std_hours ='||to_char(p_asg_std_hours));
535: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
536: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
529:
530: hr_utility.trace('UDFS Entered Prorate Earnings');
531: hr_utility.trace('p_bg_id ='||to_char(p_bg_id));
532: hr_utility.trace('p_asg_hrly_rate ='||to_char(p_asg_hrly_rate));
533: hr_utility.trace('p_wsched ='||p_wsched);
534: hr_utility.trace('p_asg_std_hours ='||to_char(p_asg_std_hours));
535: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
536: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
537: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
530: hr_utility.trace('UDFS Entered Prorate Earnings');
531: hr_utility.trace('p_bg_id ='||to_char(p_bg_id));
532: hr_utility.trace('p_asg_hrly_rate ='||to_char(p_asg_hrly_rate));
533: hr_utility.trace('p_wsched ='||p_wsched);
534: hr_utility.trace('p_asg_std_hours ='||to_char(p_asg_std_hours));
535: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
536: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
537: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
538: hr_utility.trace('p_act_hrs_worked ='||to_char(p_act_hrs_worked));
531: hr_utility.trace('p_bg_id ='||to_char(p_bg_id));
532: hr_utility.trace('p_asg_hrly_rate ='||to_char(p_asg_hrly_rate));
533: hr_utility.trace('p_wsched ='||p_wsched);
534: hr_utility.trace('p_asg_std_hours ='||to_char(p_asg_std_hours));
535: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
536: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
537: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
538: hr_utility.trace('p_act_hrs_worked ='||to_char(p_act_hrs_worked));
539:
532: hr_utility.trace('p_asg_hrly_rate ='||to_char(p_asg_hrly_rate));
533: hr_utility.trace('p_wsched ='||p_wsched);
534: hr_utility.trace('p_asg_std_hours ='||to_char(p_asg_std_hours));
535: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
536: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
537: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
538: hr_utility.trace('p_act_hrs_worked ='||to_char(p_act_hrs_worked));
539:
540: -- Prorate using hourly rate passed in as param:
533: hr_utility.trace('p_wsched ='||p_wsched);
534: hr_utility.trace('p_asg_std_hours ='||to_char(p_asg_std_hours));
535: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
536: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
537: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
538: hr_utility.trace('p_act_hrs_worked ='||to_char(p_act_hrs_worked));
539:
540: -- Prorate using hourly rate passed in as param:
541:
534: hr_utility.trace('p_asg_std_hours ='||to_char(p_asg_std_hours));
535: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
536: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
537: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
538: hr_utility.trace('p_act_hrs_worked ='||to_char(p_act_hrs_worked));
539:
540: -- Prorate using hourly rate passed in as param:
541:
542:
541:
542:
543: IF UPPER(p_wsched) = 'NOT ENTERED' THEN
544:
545: hr_utility.set_location('Prorate_Earnings', 7);
546: hr_utility.trace('p_wsched NOT ENTERED');
547: hr_utility.trace('Calling Standard Hours Worked');
548:
549: v_hours_in_range := Standard_Hours_Worked( p_asg_std_hours,
542:
543: IF UPPER(p_wsched) = 'NOT ENTERED' THEN
544:
545: hr_utility.set_location('Prorate_Earnings', 7);
546: hr_utility.trace('p_wsched NOT ENTERED');
547: hr_utility.trace('Calling Standard Hours Worked');
548:
549: v_hours_in_range := Standard_Hours_Worked( p_asg_std_hours,
550: p_range_start_date,
543: IF UPPER(p_wsched) = 'NOT ENTERED' THEN
544:
545: hr_utility.set_location('Prorate_Earnings', 7);
546: hr_utility.trace('p_wsched NOT ENTERED');
547: hr_utility.trace('Calling Standard Hours Worked');
548:
549: v_hours_in_range := Standard_Hours_Worked( p_asg_std_hours,
550: p_range_start_date,
551: p_range_end_date,
551: p_range_end_date,
552: p_asg_std_freq);
553:
554: -- Keep running total of ACTUAL hours worked.
555: hr_utility.set_location('Prorate_Earnings', 11);
556:
557: hr_utility.trace('Keep running total of ACTUAL hours worked');
558:
559: hr_utility.trace('actual_hours_worked before call= '||
553:
554: -- Keep running total of ACTUAL hours worked.
555: hr_utility.set_location('Prorate_Earnings', 11);
556:
557: hr_utility.trace('Keep running total of ACTUAL hours worked');
558:
559: hr_utility.trace('actual_hours_worked before call= '||
560: to_char(p_act_hrs_worked));
561: hr_utility.trace('v_hours_in_range in current call= '||
555: hr_utility.set_location('Prorate_Earnings', 11);
556:
557: hr_utility.trace('Keep running total of ACTUAL hours worked');
558:
559: hr_utility.trace('actual_hours_worked before call= '||
560: to_char(p_act_hrs_worked));
561: hr_utility.trace('v_hours_in_range in current call= '||
562: to_char(v_hours_in_range));
563:
557: hr_utility.trace('Keep running total of ACTUAL hours worked');
558:
559: hr_utility.trace('actual_hours_worked before call= '||
560: to_char(p_act_hrs_worked));
561: hr_utility.trace('v_hours_in_range in current call= '||
562: to_char(v_hours_in_range));
563:
564: p_act_hrs_worked := p_act_hrs_worked + v_hours_in_range;
565:
562: to_char(v_hours_in_range));
563:
564: p_act_hrs_worked := p_act_hrs_worked + v_hours_in_range;
565:
566: hr_utility.trace('UDFS actual_hours_worked after call = '||
567: to_char(p_act_hrs_worked));
568:
569: ELSE
570:
567: to_char(p_act_hrs_worked));
568:
569: ELSE
570:
571: hr_utility.set_location('Prorate_Earnings', 17);
572: hr_utility.trace('Entered WORK SCHEDULE');
573:
574: hr_utility.trace('Getting WORK SCHEDULE Name');
575:
568:
569: ELSE
570:
571: hr_utility.set_location('Prorate_Earnings', 17);
572: hr_utility.trace('Entered WORK SCHEDULE');
573:
574: hr_utility.trace('Getting WORK SCHEDULE Name');
575:
576: -- Get work schedule name:
570:
571: hr_utility.set_location('Prorate_Earnings', 17);
572: hr_utility.trace('Entered WORK SCHEDULE');
573:
574: hr_utility.trace('Getting WORK SCHEDULE Name');
575:
576: -- Get work schedule name:
577:
578: v_ws_id := fnd_number.canonical_to_number(p_wsched);
576: -- Get work schedule name:
577:
578: v_ws_id := fnd_number.canonical_to_number(p_wsched);
579:
580: hr_utility.trace('v_ws_id ='||to_char(v_ws_id));
581:
582: SELECT user_column_name
583: INTO v_ws_name
584: FROM pay_user_columns
585: WHERE user_column_id = v_ws_id
586: AND NVL(business_group_id, p_bg_id) = p_bg_id
587: AND NVL(legislation_code,'US') = 'US';
588:
589: hr_utility.trace('v_ws_name ='||v_ws_name );
590: hr_utility.trace('Calling Work_Schedule_Total_Hours');
591:
592: v_hours_in_range := Work_Schedule_Total_Hours(
593: p_bg_id,
586: AND NVL(business_group_id, p_bg_id) = p_bg_id
587: AND NVL(legislation_code,'US') = 'US';
588:
589: hr_utility.trace('v_ws_name ='||v_ws_name );
590: hr_utility.trace('Calling Work_Schedule_Total_Hours');
591:
592: v_hours_in_range := Work_Schedule_Total_Hours(
593: p_bg_id,
594: v_ws_name,
595: p_range_start_date,
596: p_range_end_date);
597:
598: p_act_hrs_worked := p_act_hrs_worked + v_hours_in_range;
599: hr_utility.trace('v_hours_in_range = '||to_char(v_hours_in_range));
600:
601: END IF; -- Hours in date range via work schedule or std hours.
602:
603: hr_utility.trace('v_prorated_earnings = p_asg_hrly_rate * v_hours_in_range');
599: hr_utility.trace('v_hours_in_range = '||to_char(v_hours_in_range));
600:
601: END IF; -- Hours in date range via work schedule or std hours.
602:
603: hr_utility.trace('v_prorated_earnings = p_asg_hrly_rate * v_hours_in_range');
604:
605: v_prorated_earn := v_prorated_earn + (p_asg_hrly_rate * v_hours_in_range);
606:
607: hr_utility.trace('UDFS final v_prorated_earnings = '||to_char(v_prorated_earn));
603: hr_utility.trace('v_prorated_earnings = p_asg_hrly_rate * v_hours_in_range');
604:
605: v_prorated_earn := v_prorated_earn + (p_asg_hrly_rate * v_hours_in_range);
606:
607: hr_utility.trace('UDFS final v_prorated_earnings = '||to_char(v_prorated_earn));
608: hr_utility.set_location('Prorate_Earnings', 97);
609: p_act_hrs_worked := ROUND(p_act_hrs_worked, 3);
610: hr_utility.trace('p_act_hrs_worked ='||to_char(p_act_hrs_worked));
611: hr_utility.trace('UDFS Leaving Prorated Earnings');
604:
605: v_prorated_earn := v_prorated_earn + (p_asg_hrly_rate * v_hours_in_range);
606:
607: hr_utility.trace('UDFS final v_prorated_earnings = '||to_char(v_prorated_earn));
608: hr_utility.set_location('Prorate_Earnings', 97);
609: p_act_hrs_worked := ROUND(p_act_hrs_worked, 3);
610: hr_utility.trace('p_act_hrs_worked ='||to_char(p_act_hrs_worked));
611: hr_utility.trace('UDFS Leaving Prorated Earnings');
612:
606:
607: hr_utility.trace('UDFS final v_prorated_earnings = '||to_char(v_prorated_earn));
608: hr_utility.set_location('Prorate_Earnings', 97);
609: p_act_hrs_worked := ROUND(p_act_hrs_worked, 3);
610: hr_utility.trace('p_act_hrs_worked ='||to_char(p_act_hrs_worked));
611: hr_utility.trace('UDFS Leaving Prorated Earnings');
612:
613: RETURN v_prorated_earn;
614:
607: hr_utility.trace('UDFS final v_prorated_earnings = '||to_char(v_prorated_earn));
608: hr_utility.set_location('Prorate_Earnings', 97);
609: p_act_hrs_worked := ROUND(p_act_hrs_worked, 3);
610: hr_utility.trace('p_act_hrs_worked ='||to_char(p_act_hrs_worked));
611: hr_utility.trace('UDFS Leaving Prorated Earnings');
612:
613: RETURN v_prorated_earn;
614:
615: END Prorate_Earnings;
663: --p_work_sched := 'NOT ENTERED';
664: v_eev_prorated_earnings := 0;
665:
666:
667: hr_utility.trace('UDFS Entering PRORATE_EEV');
668: hr_utility.trace('p_bus_group_id ='||to_char(p_bus_group_id));
669: hr_utility.trace('p_pay_id ='||to_char(p_pay_id));
670: hr_utility.trace('p_work_sched ='||p_work_sched);
671: hr_utility.trace('p_asg_std_hrs ='||to_char(p_asg_std_hrs));
664: v_eev_prorated_earnings := 0;
665:
666:
667: hr_utility.trace('UDFS Entering PRORATE_EEV');
668: hr_utility.trace('p_bus_group_id ='||to_char(p_bus_group_id));
669: hr_utility.trace('p_pay_id ='||to_char(p_pay_id));
670: hr_utility.trace('p_work_sched ='||p_work_sched);
671: hr_utility.trace('p_asg_std_hrs ='||to_char(p_asg_std_hrs));
672: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
665:
666:
667: hr_utility.trace('UDFS Entering PRORATE_EEV');
668: hr_utility.trace('p_bus_group_id ='||to_char(p_bus_group_id));
669: hr_utility.trace('p_pay_id ='||to_char(p_pay_id));
670: hr_utility.trace('p_work_sched ='||p_work_sched);
671: hr_utility.trace('p_asg_std_hrs ='||to_char(p_asg_std_hrs));
672: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
673: hr_utility.trace('p_pay_basis ='||p_pay_basis);
666:
667: hr_utility.trace('UDFS Entering PRORATE_EEV');
668: hr_utility.trace('p_bus_group_id ='||to_char(p_bus_group_id));
669: hr_utility.trace('p_pay_id ='||to_char(p_pay_id));
670: hr_utility.trace('p_work_sched ='||p_work_sched);
671: hr_utility.trace('p_asg_std_hrs ='||to_char(p_asg_std_hrs));
672: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
673: hr_utility.trace('p_pay_basis ='||p_pay_basis);
674: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
667: hr_utility.trace('UDFS Entering PRORATE_EEV');
668: hr_utility.trace('p_bus_group_id ='||to_char(p_bus_group_id));
669: hr_utility.trace('p_pay_id ='||to_char(p_pay_id));
670: hr_utility.trace('p_work_sched ='||p_work_sched);
671: hr_utility.trace('p_asg_std_hrs ='||to_char(p_asg_std_hrs));
672: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
673: hr_utility.trace('p_pay_basis ='||p_pay_basis);
674: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
675: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
668: hr_utility.trace('p_bus_group_id ='||to_char(p_bus_group_id));
669: hr_utility.trace('p_pay_id ='||to_char(p_pay_id));
670: hr_utility.trace('p_work_sched ='||p_work_sched);
671: hr_utility.trace('p_asg_std_hrs ='||to_char(p_asg_std_hrs));
672: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
673: hr_utility.trace('p_pay_basis ='||p_pay_basis);
674: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
675: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
676: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
669: hr_utility.trace('p_pay_id ='||to_char(p_pay_id));
670: hr_utility.trace('p_work_sched ='||p_work_sched);
671: hr_utility.trace('p_asg_std_hrs ='||to_char(p_asg_std_hrs));
672: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
673: hr_utility.trace('p_pay_basis ='||p_pay_basis);
674: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
675: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
676: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
677: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
670: hr_utility.trace('p_work_sched ='||p_work_sched);
671: hr_utility.trace('p_asg_std_hrs ='||to_char(p_asg_std_hrs));
672: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
673: hr_utility.trace('p_pay_basis ='||p_pay_basis);
674: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
675: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
676: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
677: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
678: hr_utility.trace('p_element_entry_id ='||to_char(p_element_entry_id));
671: hr_utility.trace('p_asg_std_hrs ='||to_char(p_asg_std_hrs));
672: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
673: hr_utility.trace('p_pay_basis ='||p_pay_basis);
674: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
675: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
676: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
677: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
678: hr_utility.trace('p_element_entry_id ='||to_char(p_element_entry_id));
679: hr_utility.trace('p_inpval_id ='||to_char(p_inpval_id));
672: hr_utility.trace('p_asg_std_freq ='||p_asg_std_freq);
673: hr_utility.trace('p_pay_basis ='||p_pay_basis);
674: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
675: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
676: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
677: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
678: hr_utility.trace('p_element_entry_id ='||to_char(p_element_entry_id));
679: hr_utility.trace('p_inpval_id ='||to_char(p_inpval_id));
680: --
673: hr_utility.trace('p_pay_basis ='||p_pay_basis);
674: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
675: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
676: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
677: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
678: hr_utility.trace('p_element_entry_id ='||to_char(p_element_entry_id));
679: hr_utility.trace('p_inpval_id ='||to_char(p_inpval_id));
680: --
681: -- Find all EEV changes, calculate new hourly rate, prorate:
674: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
675: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
676: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
677: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
678: hr_utility.trace('p_element_entry_id ='||to_char(p_element_entry_id));
679: hr_utility.trace('p_inpval_id ='||to_char(p_inpval_id));
680: --
681: -- Find all EEV changes, calculate new hourly rate, prorate:
682: -- SELECT (EEV1):
675: hr_utility.trace('UDFS p_range_start_date ='||to_char(p_range_start_date));
676: hr_utility.trace('UDFS p_range_end_date ='||to_char(p_range_end_date));
677: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
678: hr_utility.trace('p_element_entry_id ='||to_char(p_element_entry_id));
679: hr_utility.trace('p_inpval_id ='||to_char(p_inpval_id));
680: --
681: -- Find all EEV changes, calculate new hourly rate, prorate:
682: -- SELECT (EEV1):
683: -- Select for SINGLE record that includes Period Start Date but does not
684: -- span entire period.
685: -- We know this select will return a row, otherwise there would be no
686: -- EEV changes to detect.
687: --
688: hr_utility.set_location('Prorate_EEV', 103);
689: SELECT EEV.screen_entry_value,
690: GREATEST(EEV.effective_start_date, p_range_start_date),
691: EEV.effective_end_date
692: INTO v_earnings_entry,
699: AND EEV.effective_end_date >= p_range_start_date
700: AND EEV.effective_end_date < p_range_end_date;
701:
702:
703: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
704: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
705: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
706: hr_utility.trace('Calling Convert_Period_Type ');
707: hr_utility.set_location('Prorate_EEV', 105);
700: AND EEV.effective_end_date < p_range_end_date;
701:
702:
703: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
704: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
705: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
706: hr_utility.trace('Calling Convert_Period_Type ');
707: hr_utility.set_location('Prorate_EEV', 105);
708:
701:
702:
703: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
704: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
705: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
706: hr_utility.trace('Calling Convert_Period_Type ');
707: hr_utility.set_location('Prorate_EEV', 105);
708:
709: v_curr_hrly_rate := Convert_Period_Type( p_bus_group_id,
702:
703: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
704: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
705: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
706: hr_utility.trace('Calling Convert_Period_Type ');
707: hr_utility.set_location('Prorate_EEV', 105);
708:
709: v_curr_hrly_rate := Convert_Period_Type( p_bus_group_id,
710: p_pay_id,
703: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
704: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
705: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
706: hr_utility.trace('Calling Convert_Period_Type ');
707: hr_utility.set_location('Prorate_EEV', 105);
708:
709: v_curr_hrly_rate := Convert_Period_Type( p_bus_group_id,
710: p_pay_id,
711: p_work_sched,
715: 'HOURLY',
716: p_period_start,
717: p_period_end,
718: p_asg_std_freq);
719: hr_utility.trace('v_curr_hrly_rate ='||to_char(v_curr_hrly_rate));
720: hr_utility.set_location('Prorate_EEV', 107);
721:
722: v_eev_prorated_earnings := v_eev_prorated_earnings +
723: Prorate_Earnings (
716: p_period_start,
717: p_period_end,
718: p_asg_std_freq);
719: hr_utility.trace('v_curr_hrly_rate ='||to_char(v_curr_hrly_rate));
720: hr_utility.set_location('Prorate_EEV', 107);
721:
722: v_eev_prorated_earnings := v_eev_prorated_earnings +
723: Prorate_Earnings (
724: p_bg_id => p_bus_group_id,
729: p_range_start_date => v_entry_start,
730: p_range_end_date => v_entry_end,
731: p_act_hrs_worked => p_actual_hrs_worked);
732:
733: hr_utility.trace('v_eev_prorated_earnings ='||
734: to_char(v_eev_prorated_earnings));
735: -- SELECT (EEV2):
736: hr_utility.trace('Opening get_entry_chgs cursor EEV2');
737:
732:
733: hr_utility.trace('v_eev_prorated_earnings ='||
734: to_char(v_eev_prorated_earnings));
735: -- SELECT (EEV2):
736: hr_utility.trace('Opening get_entry_chgs cursor EEV2');
737:
738: OPEN get_entry_chgs (p_range_start_date, p_range_end_date);
739: LOOP
740: --
743: v_entry_start,
744: v_entry_end;
745: EXIT WHEN get_entry_chgs%NOTFOUND;
746: --
747: hr_utility.trace('v_earnings_entry ='||v_earnings_entry);
748: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
749: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
750: hr_utility.set_location('Prorate_EEV', 115);
751: --
744: v_entry_end;
745: EXIT WHEN get_entry_chgs%NOTFOUND;
746: --
747: hr_utility.trace('v_earnings_entry ='||v_earnings_entry);
748: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
749: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
750: hr_utility.set_location('Prorate_EEV', 115);
751: --
752: -- For each range of dates found, add to running prorated earnings total.
745: EXIT WHEN get_entry_chgs%NOTFOUND;
746: --
747: hr_utility.trace('v_earnings_entry ='||v_earnings_entry);
748: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
749: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
750: hr_utility.set_location('Prorate_EEV', 115);
751: --
752: -- For each range of dates found, add to running prorated earnings total.
753: --
746: --
747: hr_utility.trace('v_earnings_entry ='||v_earnings_entry);
748: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
749: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
750: hr_utility.set_location('Prorate_EEV', 115);
751: --
752: -- For each range of dates found, add to running prorated earnings total.
753: --
754: hr_utility.trace('Calling Convert_Period_Type ');
750: hr_utility.set_location('Prorate_EEV', 115);
751: --
752: -- For each range of dates found, add to running prorated earnings total.
753: --
754: hr_utility.trace('Calling Convert_Period_Type ');
755:
756: v_curr_hrly_rate := Convert_Period_Type( p_bus_group_id,
757: p_pay_id,
758: p_work_sched,
764: p_period_end,
765: p_asg_std_freq);
766:
767:
768: hr_utility.trace('v_curr_hrly_rate ='||to_char(v_curr_hrly_rate));
769: hr_utility.set_location('Prorate_EEV', 119);
770: v_eev_prorated_earnings := v_eev_prorated_earnings +
771: Prorate_Earnings (
772: p_bg_id => p_bus_group_id,
765: p_asg_std_freq);
766:
767:
768: hr_utility.trace('v_curr_hrly_rate ='||to_char(v_curr_hrly_rate));
769: hr_utility.set_location('Prorate_EEV', 119);
770: v_eev_prorated_earnings := v_eev_prorated_earnings +
771: Prorate_Earnings (
772: p_bg_id => p_bus_group_id,
773: p_asg_hrly_rate => v_curr_hrly_rate,
777: p_range_start_date => v_entry_start,
778: p_range_end_date => v_entry_end,
779: p_act_hrs_worked => p_actual_hrs_worked);
780:
781: hr_utility.trace('v_eev_prorated_earnings ='||to_char(v_eev_prorated_earnings));
782:
783: END LOOP;
784: --
785: CLOSE get_entry_chgs;
788: -- Select for SINGLE record that exists across Period End Date:
789: -- NOTE: Will only return a row if select (2) does not return a row where
790: -- Effective End Date = Period End Date !
791:
792: hr_utility.trace('Select EEV3');
793: hr_utility.set_location('Prorate_EEV', 141);
794: SELECT EEV.screen_entry_value,
795: EEV.effective_start_date,
796: LEAST(EEV.effective_end_date, p_range_end_date)
789: -- NOTE: Will only return a row if select (2) does not return a row where
790: -- Effective End Date = Period End Date !
791:
792: hr_utility.trace('Select EEV3');
793: hr_utility.set_location('Prorate_EEV', 141);
794: SELECT EEV.screen_entry_value,
795: EEV.effective_start_date,
796: LEAST(EEV.effective_end_date, p_range_end_date)
797: INTO v_earnings_entry,
802: AND EEV.input_value_id = p_inpval_id
803: AND EEV.effective_start_date > p_range_start_date
804: AND EEV.effective_start_date <= p_range_end_date
805: AND EEV.effective_end_date > p_range_end_date;
806: hr_utility.set_location('Prorate_EEV', 147);
807: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
808: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
809: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
810:
803: AND EEV.effective_start_date > p_range_start_date
804: AND EEV.effective_start_date <= p_range_end_date
805: AND EEV.effective_end_date > p_range_end_date;
806: hr_utility.set_location('Prorate_EEV', 147);
807: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
808: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
809: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
810:
811: hr_utility.trace('Calling Convert_Period_Type ');
804: AND EEV.effective_start_date <= p_range_end_date
805: AND EEV.effective_end_date > p_range_end_date;
806: hr_utility.set_location('Prorate_EEV', 147);
807: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
808: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
809: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
810:
811: hr_utility.trace('Calling Convert_Period_Type ');
812:
805: AND EEV.effective_end_date > p_range_end_date;
806: hr_utility.set_location('Prorate_EEV', 147);
807: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
808: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
809: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
810:
811: hr_utility.trace('Calling Convert_Period_Type ');
812:
813: v_curr_hrly_rate := Convert_Period_Type( p_bus_group_id,
807: hr_utility.trace('screen_entry_value ='||v_earnings_entry);
808: hr_utility.trace('v_entry_start ='||to_char(v_entry_start));
809: hr_utility.trace('v_entry_end ='||to_char(v_entry_end));
810:
811: hr_utility.trace('Calling Convert_Period_Type ');
812:
813: v_curr_hrly_rate := Convert_Period_Type( p_bus_group_id,
814: p_pay_id,
815: p_work_sched,
819: 'HOURLY',
820: p_period_start,
821: p_period_end,
822: p_asg_std_freq);
823: hr_utility.set_location('Prorate_EEV', 151);
824: hr_utility.trace('After Call v_curr_hrly_rate ='||to_char(v_curr_hrly_rate));
825:
826: v_eev_prorated_earnings := v_eev_prorated_earnings +
827: Prorate_Earnings (
820: p_period_start,
821: p_period_end,
822: p_asg_std_freq);
823: hr_utility.set_location('Prorate_EEV', 151);
824: hr_utility.trace('After Call v_curr_hrly_rate ='||to_char(v_curr_hrly_rate));
825:
826: v_eev_prorated_earnings := v_eev_prorated_earnings +
827: Prorate_Earnings (
828: p_bg_id => p_bus_group_id,
834: p_range_end_date => v_entry_end,
835: p_act_hrs_worked => p_actual_hrs_worked);
836:
837: -- We're Done!
838: hr_utility.trace('v_eev_prorated_earnings ='||
839: to_char(v_eev_prorated_earnings));
840: hr_utility.set_location('Prorate_EEV', 167);
841: p_actual_hrs_worked := ROUND(p_actual_hrs_worked, 3);
842: p_hrly_rate := v_curr_hrly_rate;
836:
837: -- We're Done!
838: hr_utility.trace('v_eev_prorated_earnings ='||
839: to_char(v_eev_prorated_earnings));
840: hr_utility.set_location('Prorate_EEV', 167);
841: p_actual_hrs_worked := ROUND(p_actual_hrs_worked, 3);
842: p_hrly_rate := v_curr_hrly_rate;
843:
844: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
840: hr_utility.set_location('Prorate_EEV', 167);
841: p_actual_hrs_worked := ROUND(p_actual_hrs_worked, 3);
842: p_hrly_rate := v_curr_hrly_rate;
843:
844: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
845: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
846:
847: hr_utility.trace('UDFS Leaving Prorated EEV');
848:
841: p_actual_hrs_worked := ROUND(p_actual_hrs_worked, 3);
842: p_hrly_rate := v_curr_hrly_rate;
843:
844: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
845: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
846:
847: hr_utility.trace('UDFS Leaving Prorated EEV');
848:
849: RETURN v_eev_prorated_earnings;
843:
844: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
845: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
846:
847: hr_utility.trace('UDFS Leaving Prorated EEV');
848:
849: RETURN v_eev_prorated_earnings;
850:
851: EXCEPTION WHEN NO_DATA_FOUND THEN
848:
849: RETURN v_eev_prorated_earnings;
850:
851: EXCEPTION WHEN NO_DATA_FOUND THEN
852: hr_utility.set_location('Prorate_EEV', 177);
853: hr_utility.trace('Into exception of Prorate_EEV');
854:
855: p_actual_hrs_worked := ROUND(p_actual_hrs_worked, 3);
856: p_hrly_rate := v_curr_hrly_rate;
849: RETURN v_eev_prorated_earnings;
850:
851: EXCEPTION WHEN NO_DATA_FOUND THEN
852: hr_utility.set_location('Prorate_EEV', 177);
853: hr_utility.trace('Into exception of Prorate_EEV');
854:
855: p_actual_hrs_worked := ROUND(p_actual_hrs_worked, 3);
856: p_hrly_rate := v_curr_hrly_rate;
857:
854:
855: p_actual_hrs_worked := ROUND(p_actual_hrs_worked, 3);
856: p_hrly_rate := v_curr_hrly_rate;
857:
858: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
859: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
860:
861: RETURN v_eev_prorated_earnings;
862:
855: p_actual_hrs_worked := ROUND(p_actual_hrs_worked, 3);
856: p_hrly_rate := v_curr_hrly_rate;
857:
858: hr_utility.trace('p_actual_hrs_worked ='||to_char(p_actual_hrs_worked));
859: hr_utility.trace('p_hrly_rate ='||to_char(p_hrly_rate));
860:
861: RETURN v_eev_prorated_earnings;
862:
863: END Prorate_EEV;
896:
897: /* Init */
898: l_vac_pay := 0;
899:
900: hr_utility.set_location('get_vac_pay', 11);
901: hr_utility.trace('Entered Vacation Pay');
902:
903: OPEN get_vac_hours (p_asg_id, p_eff_date);
904: LOOP
897: /* Init */
898: l_vac_pay := 0;
899:
900: hr_utility.set_location('get_vac_pay', 11);
901: hr_utility.trace('Entered Vacation Pay');
902:
903: OPEN get_vac_hours (p_asg_id, p_eff_date);
904: LOOP
905:
902:
903: OPEN get_vac_hours (p_asg_id, p_eff_date);
904: LOOP
905:
906: hr_utility.set_location('get_vac_pay', 13);
907: hr_utility.trace('Opened get_vac_hours');
908:
909: FETCH get_vac_hours
910: INTO l_vac_hours;
903: OPEN get_vac_hours (p_asg_id, p_eff_date);
904: LOOP
905:
906: hr_utility.set_location('get_vac_pay', 13);
907: hr_utility.trace('Opened get_vac_hours');
908:
909: FETCH get_vac_hours
910: INTO l_vac_hours;
911: EXIT WHEN get_vac_hours%NOTFOUND;
914:
915: END LOOP;
916: CLOSE get_vac_hours;
917:
918: hr_utility.set_location('get_vac_pay', 15);
919:
920: IF p_vac_hours <> 0 THEN
921:
922: l_vac_pay := p_vac_hours * p_curr_rate;
922: l_vac_pay := p_vac_hours * p_curr_rate;
923:
924: END IF;
925:
926: hr_utility.trace('Leaving Vacation Pay');
927: RETURN l_vac_pay;
928:
929: END vacation_pay;
930:
960:
961: /* Init */
962: l_sick_pay :=0;
963:
964: hr_utility.set_location('get_sick_pay', 11);
965: hr_utility.trace('Entered Sick Pay');
966:
967: OPEN get_sick_hours (p_asg_id, p_eff_date);
968: LOOP
961: /* Init */
962: l_sick_pay :=0;
963:
964: hr_utility.set_location('get_sick_pay', 11);
965: hr_utility.trace('Entered Sick Pay');
966:
967: OPEN get_sick_hours (p_asg_id, p_eff_date);
968: LOOP
969:
966:
967: OPEN get_sick_hours (p_asg_id, p_eff_date);
968: LOOP
969:
970: hr_utility.trace('get_sick_pay');
971: hr_utility.set_location('get_sick_pay', 13);
972:
973: FETCH get_sick_hours
974: INTO l_sick_hours;
967: OPEN get_sick_hours (p_asg_id, p_eff_date);
968: LOOP
969:
970: hr_utility.trace('get_sick_pay');
971: hr_utility.set_location('get_sick_pay', 13);
972:
973: FETCH get_sick_hours
974: INTO l_sick_hours;
975: EXIT WHEN get_sick_hours%NOTFOUND;
978:
979: END LOOP;
980: CLOSE get_sick_hours;
981:
982: hr_utility.set_location('get_sick_pay', 15);
983: hr_utility.trace('get_sick_pay');
984:
985: IF p_sick_hours <> 0 THEN
986:
979: END LOOP;
980: CLOSE get_sick_hours;
981:
982: hr_utility.set_location('get_sick_pay', 15);
983: hr_utility.trace('get_sick_pay');
984:
985: IF p_sick_hours <> 0 THEN
986:
987: l_sick_pay := p_sick_hours * p_curr_rate;
987: l_sick_pay := p_sick_hours * p_curr_rate;
988:
989: END IF;
990:
991: hr_utility.trace('Leaving get_sick_pay');
992: RETURN l_sick_pay;
993:
994: END sick_pay;
995:
1001: v_prorated_earnings := 0;
1002: v_curr_hrly_rate := 0;
1003: l_mid_period_asg_change := FALSE;
1004:
1005: hr_utility.trace('UDFS Entered Calculate_Period_Earnings');
1006: hr_utility.trace('p_asst_id ='||to_char(p_asst_id));
1007: hr_utility.trace('p_payroll_id ='||to_char(p_payroll_id));
1008: hr_utility.trace('p_ele_entry_id ='||to_char(p_ele_entry_id));
1009: hr_utility.trace('p_tax_unit_id ='||to_char(p_tax_unit_id));
1002: v_curr_hrly_rate := 0;
1003: l_mid_period_asg_change := FALSE;
1004:
1005: hr_utility.trace('UDFS Entered Calculate_Period_Earnings');
1006: hr_utility.trace('p_asst_id ='||to_char(p_asst_id));
1007: hr_utility.trace('p_payroll_id ='||to_char(p_payroll_id));
1008: hr_utility.trace('p_ele_entry_id ='||to_char(p_ele_entry_id));
1009: hr_utility.trace('p_tax_unit_id ='||to_char(p_tax_unit_id));
1010: hr_utility.trace('p_date_earned ='||to_char(p_date_earned));
1003: l_mid_period_asg_change := FALSE;
1004:
1005: hr_utility.trace('UDFS Entered Calculate_Period_Earnings');
1006: hr_utility.trace('p_asst_id ='||to_char(p_asst_id));
1007: hr_utility.trace('p_payroll_id ='||to_char(p_payroll_id));
1008: hr_utility.trace('p_ele_entry_id ='||to_char(p_ele_entry_id));
1009: hr_utility.trace('p_tax_unit_id ='||to_char(p_tax_unit_id));
1010: hr_utility.trace('p_date_earned ='||to_char(p_date_earned));
1011: hr_utility.trace('p_pay_basis ='||p_pay_basis);
1004:
1005: hr_utility.trace('UDFS Entered Calculate_Period_Earnings');
1006: hr_utility.trace('p_asst_id ='||to_char(p_asst_id));
1007: hr_utility.trace('p_payroll_id ='||to_char(p_payroll_id));
1008: hr_utility.trace('p_ele_entry_id ='||to_char(p_ele_entry_id));
1009: hr_utility.trace('p_tax_unit_id ='||to_char(p_tax_unit_id));
1010: hr_utility.trace('p_date_earned ='||to_char(p_date_earned));
1011: hr_utility.trace('p_pay_basis ='||p_pay_basis);
1012: hr_utility.trace('p_inpval_name ='||p_inpval_name);
1005: hr_utility.trace('UDFS Entered Calculate_Period_Earnings');
1006: hr_utility.trace('p_asst_id ='||to_char(p_asst_id));
1007: hr_utility.trace('p_payroll_id ='||to_char(p_payroll_id));
1008: hr_utility.trace('p_ele_entry_id ='||to_char(p_ele_entry_id));
1009: hr_utility.trace('p_tax_unit_id ='||to_char(p_tax_unit_id));
1010: hr_utility.trace('p_date_earned ='||to_char(p_date_earned));
1011: hr_utility.trace('p_pay_basis ='||p_pay_basis);
1012: hr_utility.trace('p_inpval_name ='||p_inpval_name);
1013: hr_utility.trace('p_ass_hrly_figure ='||to_char(p_ass_hrly_figure));
1006: hr_utility.trace('p_asst_id ='||to_char(p_asst_id));
1007: hr_utility.trace('p_payroll_id ='||to_char(p_payroll_id));
1008: hr_utility.trace('p_ele_entry_id ='||to_char(p_ele_entry_id));
1009: hr_utility.trace('p_tax_unit_id ='||to_char(p_tax_unit_id));
1010: hr_utility.trace('p_date_earned ='||to_char(p_date_earned));
1011: hr_utility.trace('p_pay_basis ='||p_pay_basis);
1012: hr_utility.trace('p_inpval_name ='||p_inpval_name);
1013: hr_utility.trace('p_ass_hrly_figure ='||to_char(p_ass_hrly_figure));
1014: hr_utility.trace('UDFS p_period_start ='||to_char(p_period_start));
1007: hr_utility.trace('p_payroll_id ='||to_char(p_payroll_id));
1008: hr_utility.trace('p_ele_entry_id ='||to_char(p_ele_entry_id));
1009: hr_utility.trace('p_tax_unit_id ='||to_char(p_tax_unit_id));
1010: hr_utility.trace('p_date_earned ='||to_char(p_date_earned));
1011: hr_utility.trace('p_pay_basis ='||p_pay_basis);
1012: hr_utility.trace('p_inpval_name ='||p_inpval_name);
1013: hr_utility.trace('p_ass_hrly_figure ='||to_char(p_ass_hrly_figure));
1014: hr_utility.trace('UDFS p_period_start ='||to_char(p_period_start));
1015: hr_utility.trace('UDFS p_period_end ='||to_char(p_period_end));
1008: hr_utility.trace('p_ele_entry_id ='||to_char(p_ele_entry_id));
1009: hr_utility.trace('p_tax_unit_id ='||to_char(p_tax_unit_id));
1010: hr_utility.trace('p_date_earned ='||to_char(p_date_earned));
1011: hr_utility.trace('p_pay_basis ='||p_pay_basis);
1012: hr_utility.trace('p_inpval_name ='||p_inpval_name);
1013: hr_utility.trace('p_ass_hrly_figure ='||to_char(p_ass_hrly_figure));
1014: hr_utility.trace('UDFS p_period_start ='||to_char(p_period_start));
1015: hr_utility.trace('UDFS p_period_end ='||to_char(p_period_end));
1016: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1009: hr_utility.trace('p_tax_unit_id ='||to_char(p_tax_unit_id));
1010: hr_utility.trace('p_date_earned ='||to_char(p_date_earned));
1011: hr_utility.trace('p_pay_basis ='||p_pay_basis);
1012: hr_utility.trace('p_inpval_name ='||p_inpval_name);
1013: hr_utility.trace('p_ass_hrly_figure ='||to_char(p_ass_hrly_figure));
1014: hr_utility.trace('UDFS p_period_start ='||to_char(p_period_start));
1015: hr_utility.trace('UDFS p_period_end ='||to_char(p_period_end));
1016: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1017: hr_utility.trace('p_asst_std_hrs ='||to_char(p_asst_std_hrs));
1010: hr_utility.trace('p_date_earned ='||to_char(p_date_earned));
1011: hr_utility.trace('p_pay_basis ='||p_pay_basis);
1012: hr_utility.trace('p_inpval_name ='||p_inpval_name);
1013: hr_utility.trace('p_ass_hrly_figure ='||to_char(p_ass_hrly_figure));
1014: hr_utility.trace('UDFS p_period_start ='||to_char(p_period_start));
1015: hr_utility.trace('UDFS p_period_end ='||to_char(p_period_end));
1016: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1017: hr_utility.trace('p_asst_std_hrs ='||to_char(p_asst_std_hrs));
1018: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1011: hr_utility.trace('p_pay_basis ='||p_pay_basis);
1012: hr_utility.trace('p_inpval_name ='||p_inpval_name);
1013: hr_utility.trace('p_ass_hrly_figure ='||to_char(p_ass_hrly_figure));
1014: hr_utility.trace('UDFS p_period_start ='||to_char(p_period_start));
1015: hr_utility.trace('UDFS p_period_end ='||to_char(p_period_end));
1016: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1017: hr_utility.trace('p_asst_std_hrs ='||to_char(p_asst_std_hrs));
1018: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1019: hr_utility.trace('p_vac_hours_worked ='||to_char(p_vac_hours_worked));
1012: hr_utility.trace('p_inpval_name ='||p_inpval_name);
1013: hr_utility.trace('p_ass_hrly_figure ='||to_char(p_ass_hrly_figure));
1014: hr_utility.trace('UDFS p_period_start ='||to_char(p_period_start));
1015: hr_utility.trace('UDFS p_period_end ='||to_char(p_period_end));
1016: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1017: hr_utility.trace('p_asst_std_hrs ='||to_char(p_asst_std_hrs));
1018: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1019: hr_utility.trace('p_vac_hours_worked ='||to_char(p_vac_hours_worked));
1020: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1013: hr_utility.trace('p_ass_hrly_figure ='||to_char(p_ass_hrly_figure));
1014: hr_utility.trace('UDFS p_period_start ='||to_char(p_period_start));
1015: hr_utility.trace('UDFS p_period_end ='||to_char(p_period_end));
1016: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1017: hr_utility.trace('p_asst_std_hrs ='||to_char(p_asst_std_hrs));
1018: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1019: hr_utility.trace('p_vac_hours_worked ='||to_char(p_vac_hours_worked));
1020: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1021: hr_utility.trace('p_sick_hours_worked ='||to_char(p_sick_hours_worked));
1014: hr_utility.trace('UDFS p_period_start ='||to_char(p_period_start));
1015: hr_utility.trace('UDFS p_period_end ='||to_char(p_period_end));
1016: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1017: hr_utility.trace('p_asst_std_hrs ='||to_char(p_asst_std_hrs));
1018: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1019: hr_utility.trace('p_vac_hours_worked ='||to_char(p_vac_hours_worked));
1020: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1021: hr_utility.trace('p_sick_hours_worked ='||to_char(p_sick_hours_worked));
1022: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1015: hr_utility.trace('UDFS p_period_end ='||to_char(p_period_end));
1016: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1017: hr_utility.trace('p_asst_std_hrs ='||to_char(p_asst_std_hrs));
1018: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1019: hr_utility.trace('p_vac_hours_worked ='||to_char(p_vac_hours_worked));
1020: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1021: hr_utility.trace('p_sick_hours_worked ='||to_char(p_sick_hours_worked));
1022: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1023: hr_utility.trace('UDFS p_prorate ='||p_prorate);
1016: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1017: hr_utility.trace('p_asst_std_hrs ='||to_char(p_asst_std_hrs));
1018: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1019: hr_utility.trace('p_vac_hours_worked ='||to_char(p_vac_hours_worked));
1020: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1021: hr_utility.trace('p_sick_hours_worked ='||to_char(p_sick_hours_worked));
1022: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1023: hr_utility.trace('UDFS p_prorate ='||p_prorate);
1024: hr_utility.trace('p_asst_std_freq ='||p_asst_std_freq);
1017: hr_utility.trace('p_asst_std_hrs ='||to_char(p_asst_std_hrs));
1018: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1019: hr_utility.trace('p_vac_hours_worked ='||to_char(p_vac_hours_worked));
1020: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1021: hr_utility.trace('p_sick_hours_worked ='||to_char(p_sick_hours_worked));
1022: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1023: hr_utility.trace('UDFS p_prorate ='||p_prorate);
1024: hr_utility.trace('p_asst_std_freq ='||p_asst_std_freq);
1025:
1018: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1019: hr_utility.trace('p_vac_hours_worked ='||to_char(p_vac_hours_worked));
1020: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1021: hr_utility.trace('p_sick_hours_worked ='||to_char(p_sick_hours_worked));
1022: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1023: hr_utility.trace('UDFS p_prorate ='||p_prorate);
1024: hr_utility.trace('p_asst_std_freq ='||p_asst_std_freq);
1025:
1026: hr_utility.trace('Find earnings element input value id');
1019: hr_utility.trace('p_vac_hours_worked ='||to_char(p_vac_hours_worked));
1020: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1021: hr_utility.trace('p_sick_hours_worked ='||to_char(p_sick_hours_worked));
1022: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1023: hr_utility.trace('UDFS p_prorate ='||p_prorate);
1024: hr_utility.trace('p_asst_std_freq ='||p_asst_std_freq);
1025:
1026: hr_utility.trace('Find earnings element input value id');
1027:
1020: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1021: hr_utility.trace('p_sick_hours_worked ='||to_char(p_sick_hours_worked));
1022: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1023: hr_utility.trace('UDFS p_prorate ='||p_prorate);
1024: hr_utility.trace('p_asst_std_freq ='||p_asst_std_freq);
1025:
1026: hr_utility.trace('Find earnings element input value id');
1027:
1028: p_actual_hours_worked := 0;
1022: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1023: hr_utility.trace('UDFS p_prorate ='||p_prorate);
1024: hr_utility.trace('p_asst_std_freq ='||p_asst_std_freq);
1025:
1026: hr_utility.trace('Find earnings element input value id');
1027:
1028: p_actual_hours_worked := 0;
1029:
1030: -- Step (1): Find earnings element input value.
1035: IF p_pay_basis IS NOT NULL THEN
1036:
1037: BEGIN
1038:
1039: hr_utility.trace(' p_pay_basis IS NOT NULL');
1040: hr_utility.set_location('calculate_period_earnings', 10);
1041:
1042: SELECT PYB.input_value_id,
1043: FCL.meaning
1036:
1037: BEGIN
1038:
1039: hr_utility.trace(' p_pay_basis IS NOT NULL');
1040: hr_utility.set_location('calculate_period_earnings', 10);
1041:
1042: SELECT PYB.input_value_id,
1043: FCL.meaning
1044: INTO v_inpval_id,
1054: AND p_date_earned BETWEEN ASG.effective_start_date
1055: AND ASG.effective_end_date;
1056:
1057: EXCEPTION WHEN NO_DATA_FOUND THEN
1058: hr_utility.set_location('calculate_period_earnings', 11);
1059: hr_utility.trace(' In EXCEPTION p_pay_basis IS NOT NULL');
1060:
1061: v_period_earn := 0;
1062: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1055: AND ASG.effective_end_date;
1056:
1057: EXCEPTION WHEN NO_DATA_FOUND THEN
1058: hr_utility.set_location('calculate_period_earnings', 11);
1059: hr_utility.trace(' In EXCEPTION p_pay_basis IS NOT NULL');
1060:
1061: v_period_earn := 0;
1062: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1063:
1060:
1061: v_period_earn := 0;
1062: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1063:
1064: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1065:
1066: RETURN v_period_earn;
1067:
1068:
1067:
1068:
1069: END;
1070:
1071: hr_utility.trace('p_inpval_name = '||p_inpval_name);
1072:
1073: ELSIF UPPER(p_inpval_name) = 'RATE' THEN
1074:
1075: hr_utility.trace(' p_pay_basis IS NULL');
1071: hr_utility.trace('p_inpval_name = '||p_inpval_name);
1072:
1073: ELSIF UPPER(p_inpval_name) = 'RATE' THEN
1074:
1075: hr_utility.trace(' p_pay_basis IS NULL');
1076: hr_utility.trace('In p_inpval_name = RATE');
1077: /* Changed the element_name and name to init case and added
1078: the date join for pay_element_types_f */
1079:
1072:
1073: ELSIF UPPER(p_inpval_name) = 'RATE' THEN
1074:
1075: hr_utility.trace(' p_pay_basis IS NULL');
1076: hr_utility.trace('In p_inpval_name = RATE');
1077: /* Changed the element_name and name to init case and added
1078: the date join for pay_element_types_f */
1079:
1080: begin
1094: v_pay_basis := 'HOURLY';
1095: --
1096: EXCEPTION WHEN NO_DATA_FOUND THEN
1097:
1098: hr_utility.trace('Exception of RATE ');
1099:
1100: v_period_earn := 0;
1101: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1102:
1099:
1100: v_period_earn := 0;
1101: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1102:
1103: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1104:
1105: RETURN v_period_earn;
1106: end;
1107: --
1109: /* Changed the element_name and name to init case and added
1110: the date join for pay_element_types_f */
1111:
1112: begin
1113: hr_utility.trace('In RATE CODE');
1114:
1115: SELECT IPV.input_value_id
1116: INTO v_inpval_id
1117: FROM pay_input_values_f IPV,
1127: --
1128: v_pay_basis := 'HOURLY';
1129: --
1130: EXCEPTION WHEN NO_DATA_FOUND THEN
1131: hr_utility.trace('Exception of Rate Code');
1132:
1133: v_period_earn := 0;
1134: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1135:
1132:
1133: v_period_earn := 0;
1134: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1135:
1136: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1137:
1138: RETURN v_period_earn;
1139:
1140: end;
1144: /* Changed the element_name and name to init case and added
1145: the date join for pay_element_types_f */
1146:
1147: begin
1148: hr_utility.trace('in MONTHLY SALARY');
1149:
1150: SELECT IPV.input_value_id
1151: INTO v_inpval_id
1152: FROM pay_input_values_f IPV,
1162:
1163: v_pay_basis := 'MONTHLY';
1164:
1165: EXCEPTION WHEN NO_DATA_FOUND THEN
1166: hr_utility.set_location('calculate_period_earnings', 18);
1167: v_period_earn := 0;
1168: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1169: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1170: RETURN v_period_earn;
1165: EXCEPTION WHEN NO_DATA_FOUND THEN
1166: hr_utility.set_location('calculate_period_earnings', 18);
1167: v_period_earn := 0;
1168: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1169: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1170: RETURN v_period_earn;
1171: END;
1172:
1173: END IF;
1171: END;
1172:
1173: END IF;
1174:
1175: hr_utility.trace('Now know the pay basis for this assignment');
1176: hr_utility.trace('v_inpval_id ='||to_char(v_inpval_id));
1177: hr_utility.trace('v_pay_basis ='||v_pay_basis);
1178: /*
1179: -- Now know the pay basis for this assignment (v_pay_basis).
1172:
1173: END IF;
1174:
1175: hr_utility.trace('Now know the pay basis for this assignment');
1176: hr_utility.trace('v_inpval_id ='||to_char(v_inpval_id));
1177: hr_utility.trace('v_pay_basis ='||v_pay_basis);
1178: /*
1179: -- Now know the pay basis for this assignment (v_pay_basis).
1180: -- Want to convert entered earnings to pay period earnings.
1173: END IF;
1174:
1175: hr_utility.trace('Now know the pay basis for this assignment');
1176: hr_utility.trace('v_inpval_id ='||to_char(v_inpval_id));
1177: hr_utility.trace('v_pay_basis ='||v_pay_basis);
1178: /*
1179: -- Now know the pay basis for this assignment (v_pay_basis).
1180: -- Want to convert entered earnings to pay period earnings.
1181: -- For pay basis of Annual, Monthly, Bi-Weekly, Semi-Monthly,
1211: -- Find # of payroll period types per fiscal year:
1212:
1213: begin
1214:
1215: hr_utility.trace('Find # of payroll period types per fiscal year');
1216: hr_utility.set_location('calculate_period_earnings', 40);
1217:
1218: SELECT TPT.number_per_fiscal_year
1219: INTO v_pay_periods_per_year
1212:
1213: begin
1214:
1215: hr_utility.trace('Find # of payroll period types per fiscal year');
1216: hr_utility.set_location('calculate_period_earnings', 40);
1217:
1218: SELECT TPT.number_per_fiscal_year
1219: INTO v_pay_periods_per_year
1220: FROM pay_payrolls_f PRL,
1224: and PRL.effective_end_date
1225: AND PRL.payroll_id = p_payroll_id
1226: AND PRL.business_group_id + 0 = p_bus_grp_id;
1227:
1228: hr_utility.trace('v_pay_periods_per_year ='||to_char(v_pay_periods_per_year));
1229:
1230: exception when NO_DATA_FOUND then
1231:
1232: hr_utility.set_location('calculate_period_earnings', 41);
1228: hr_utility.trace('v_pay_periods_per_year ='||to_char(v_pay_periods_per_year));
1229:
1230: exception when NO_DATA_FOUND then
1231:
1232: hr_utility.set_location('calculate_period_earnings', 41);
1233: hr_utility.trace('Exception Find # of payroll period');
1234: v_period_earn := 0;
1235: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1236: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1229:
1230: exception when NO_DATA_FOUND then
1231:
1232: hr_utility.set_location('calculate_period_earnings', 41);
1233: hr_utility.trace('Exception Find # of payroll period');
1234: v_period_earn := 0;
1235: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1236: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1237:
1232: hr_utility.set_location('calculate_period_earnings', 41);
1233: hr_utility.trace('Exception Find # of payroll period');
1234: v_period_earn := 0;
1235: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1236: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1237:
1238: RETURN v_period_earn;
1239:
1240: end;
1253: -- scheduled hours, not
1254: -- actual hours for a week, converted to a period figure.
1255: */
1256: --
1257: hr_utility.set_location('calculate_period_earnings', 45);
1258: hr_utility.trace('Get hours scheduled for the current period');
1259:
1260: IF p_work_schedule <> 'NOT ENTERED' THEN
1261: --
1254: -- actual hours for a week, converted to a period figure.
1255: */
1256: --
1257: hr_utility.set_location('calculate_period_earnings', 45);
1258: hr_utility.trace('Get hours scheduled for the current period');
1259:
1260: IF p_work_schedule <> 'NOT ENTERED' THEN
1261: --
1262: -- Find hours worked between period start and end dates.
1260: IF p_work_schedule <> 'NOT ENTERED' THEN
1261: --
1262: -- Find hours worked between period start and end dates.
1263: --
1264: hr_utility.trace('Asg has Work Schedule');
1265: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1266:
1267: v_ws_id := fnd_number.canonical_to_number(p_work_schedule);
1268: hr_utility.trace('v_ws_id ='||to_char(v_ws_id));
1261: --
1262: -- Find hours worked between period start and end dates.
1263: --
1264: hr_utility.trace('Asg has Work Schedule');
1265: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1266:
1267: v_ws_id := fnd_number.canonical_to_number(p_work_schedule);
1268: hr_utility.trace('v_ws_id ='||to_char(v_ws_id));
1269: --
1264: hr_utility.trace('Asg has Work Schedule');
1265: hr_utility.trace('p_work_schedule ='||p_work_schedule);
1266:
1267: v_ws_id := fnd_number.canonical_to_number(p_work_schedule);
1268: hr_utility.trace('v_ws_id ='||to_char(v_ws_id));
1269: --
1270: SELECT user_column_name
1271: INTO v_work_sched_name
1272: FROM pay_user_columns
1273: WHERE user_column_id = v_ws_id
1274: AND NVL(business_group_id, p_bus_grp_id) = p_bus_grp_id
1275: AND NVL(legislation_code,'US') = 'US';
1276:
1277: hr_utility.trace('v_work_sched_name ='||v_work_sched_name);
1278: hr_utility.trace('Calling Work_Schedule_Total_Hours');
1279:
1280: v_hrs_per_range := Work_Schedule_Total_Hours( p_bus_grp_id,
1281: v_work_sched_name,
1274: AND NVL(business_group_id, p_bus_grp_id) = p_bus_grp_id
1275: AND NVL(legislation_code,'US') = 'US';
1276:
1277: hr_utility.trace('v_work_sched_name ='||v_work_sched_name);
1278: hr_utility.trace('Calling Work_Schedule_Total_Hours');
1279:
1280: v_hrs_per_range := Work_Schedule_Total_Hours( p_bus_grp_id,
1281: v_work_sched_name,
1282: p_period_start,
1280: v_hrs_per_range := Work_Schedule_Total_Hours( p_bus_grp_id,
1281: v_work_sched_name,
1282: p_period_start,
1283: p_period_end);
1284: hr_utility.trace('v_hrs_per_range ='||to_char(v_hrs_per_range));
1285: ELSE
1286:
1287: hr_utility.trace('Asg has No Work Schedule');
1288: hr_utility.trace('Calling Standard_Hours_Worked');
1283: p_period_end);
1284: hr_utility.trace('v_hrs_per_range ='||to_char(v_hrs_per_range));
1285: ELSE
1286:
1287: hr_utility.trace('Asg has No Work Schedule');
1288: hr_utility.trace('Calling Standard_Hours_Worked');
1289:
1290: v_hrs_per_range := Standard_Hours_Worked( p_asst_std_hrs,
1291: p_period_start,
1284: hr_utility.trace('v_hrs_per_range ='||to_char(v_hrs_per_range));
1285: ELSE
1286:
1287: hr_utility.trace('Asg has No Work Schedule');
1288: hr_utility.trace('Calling Standard_Hours_Worked');
1289:
1290: v_hrs_per_range := Standard_Hours_Worked( p_asst_std_hrs,
1291: p_period_start,
1292: p_period_end,
1290: v_hrs_per_range := Standard_Hours_Worked( p_asst_std_hrs,
1291: p_period_start,
1292: p_period_end,
1293: p_asst_std_freq);
1294: hr_utility.trace('v_hrs_per_range ='||to_char(v_hrs_per_range));
1295:
1296: END IF;
1297:
1298:
1295:
1296: END IF;
1297:
1298:
1299: hr_utility.trace('Compute earnings and actual hours');
1300: hr_utility.trace('calling convert_period_type from calculate_period_earnings');
1301: hr_utility.set_location('calculate_period_earnings', 46);
1302:
1303: v_period_earn := Convert_Period_Type( p_bus_grp_id,
1296: END IF;
1297:
1298:
1299: hr_utility.trace('Compute earnings and actual hours');
1300: hr_utility.trace('calling convert_period_type from calculate_period_earnings');
1301: hr_utility.set_location('calculate_period_earnings', 46);
1302:
1303: v_period_earn := Convert_Period_Type( p_bus_grp_id,
1304: p_payroll_id,
1297:
1298:
1299: hr_utility.trace('Compute earnings and actual hours');
1300: hr_utility.trace('calling convert_period_type from calculate_period_earnings');
1301: hr_utility.set_location('calculate_period_earnings', 46);
1302:
1303: v_period_earn := Convert_Period_Type( p_bus_grp_id,
1304: p_payroll_id,
1305: p_work_schedule,
1310: p_period_start,
1311: p_period_end,
1312: p_asst_std_freq);
1313:
1314: hr_utility.trace('v_period_earn ='||to_char(v_period_earn));
1315: hr_utility.set_location('calculate_period_earnings', 47);
1316:
1317: p_actual_hours_worked := v_hrs_per_range;
1318:
1311: p_period_end,
1312: p_asst_std_freq);
1313:
1314: hr_utility.trace('v_period_earn ='||to_char(v_period_earn));
1315: hr_utility.set_location('calculate_period_earnings', 47);
1316:
1317: p_actual_hours_worked := v_hrs_per_range;
1318:
1319: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1315: hr_utility.set_location('calculate_period_earnings', 47);
1316:
1317: p_actual_hours_worked := v_hrs_per_range;
1318:
1319: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1320:
1321: IF p_prorate = 'N' THEN
1322:
1323: hr_utility.trace('No proration');
1319: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1320:
1321: IF p_prorate = 'N' THEN
1322:
1323: hr_utility.trace('No proration');
1324: hr_utility.trace('Calling p_vac_pay');
1325: hr_utility.set_location('calculate_period_earnings', 49);
1326:
1327: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
1320:
1321: IF p_prorate = 'N' THEN
1322:
1323: hr_utility.trace('No proration');
1324: hr_utility.trace('Calling p_vac_pay');
1325: hr_utility.set_location('calculate_period_earnings', 49);
1326:
1327: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
1328: p_asg_id => p_asst_id,
1321: IF p_prorate = 'N' THEN
1322:
1323: hr_utility.trace('No proration');
1324: hr_utility.trace('Calling p_vac_pay');
1325: hr_utility.set_location('calculate_period_earnings', 49);
1326:
1327: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
1328: p_asg_id => p_asst_id,
1329: p_eff_date => p_period_end,
1328: p_asg_id => p_asst_id,
1329: p_eff_date => p_period_end,
1330: p_curr_rate => p_ass_hrly_figure);
1331:
1332: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1333:
1334: hr_utility.trace('Calling sick Pay');
1335: p_sick_pay := sick_pay( p_sick_hours => p_sick_hours_worked,
1336: p_asg_id => p_asst_id,
1330: p_curr_rate => p_ass_hrly_figure);
1331:
1332: hr_utility.trace('p_vac_pay ='||to_char(p_vac_pay));
1333:
1334: hr_utility.trace('Calling sick Pay');
1335: p_sick_pay := sick_pay( p_sick_hours => p_sick_hours_worked,
1336: p_asg_id => p_asst_id,
1337: p_eff_date => p_period_end,
1338: p_curr_rate => p_ass_hrly_figure);
1337: p_eff_date => p_period_end,
1338: p_curr_rate => p_ass_hrly_figure);
1339:
1340:
1341: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1342:
1343: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1344:
1345: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1341: hr_utility.trace('p_sick_pay ='||to_char(p_sick_pay));
1342:
1343: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1344:
1345: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1346: hr_utility.trace('UDFS v_period_earn ='||to_char(v_period_earn));
1347:
1348: RETURN v_period_earn;
1349:
1342:
1343: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1344:
1345: hr_utility.trace('p_actual_hours_worked ='||to_char(p_actual_hours_worked));
1346: hr_utility.trace('UDFS v_period_earn ='||to_char(v_period_earn));
1347:
1348: RETURN v_period_earn;
1349:
1350: END IF; /* IF p_prorate = 'N' */
1349:
1350: END IF; /* IF p_prorate = 'N' */
1351:
1352:
1353: hr_utility.trace('UDFS check for ASGMPE changes');
1354: hr_utility.set_location('calculate_period_earnings', 51);
1355: /* ************************************************************** */
1356:
1357: BEGIN /* Check ASGMPE */
1350: END IF; /* IF p_prorate = 'N' */
1351:
1352:
1353: hr_utility.trace('UDFS check for ASGMPE changes');
1354: hr_utility.set_location('calculate_period_earnings', 51);
1355: /* ************************************************************** */
1356:
1357: BEGIN /* Check ASGMPE */
1358:
1372: AND SCL.soft_coding_keyflex_id = ASG.soft_coding_keyflex_id
1373: AND SCL.segment1 = TO_CHAR(p_tax_unit_id)
1374: AND SCL.enabled_flag = 'Y' );
1375:
1376: hr_utility.trace('ASGMPE Changes found');
1377: hr_utility.trace('Need to prorate b/c of ASGMPE');
1378: hr_utility.trace('Set l_mid_period_asg_change to TRUE I');
1379:
1380: l_mid_period_asg_change := TRUE;
1373: AND SCL.segment1 = TO_CHAR(p_tax_unit_id)
1374: AND SCL.enabled_flag = 'Y' );
1375:
1376: hr_utility.trace('ASGMPE Changes found');
1377: hr_utility.trace('Need to prorate b/c of ASGMPE');
1378: hr_utility.trace('Set l_mid_period_asg_change to TRUE I');
1379:
1380: l_mid_period_asg_change := TRUE;
1381:
1374: AND SCL.enabled_flag = 'Y' );
1375:
1376: hr_utility.trace('ASGMPE Changes found');
1377: hr_utility.trace('Need to prorate b/c of ASGMPE');
1378: hr_utility.trace('Set l_mid_period_asg_change to TRUE I');
1379:
1380: l_mid_period_asg_change := TRUE;
1381:
1382: hr_utility.set_location('calculate_period_earnings', 56);
1378: hr_utility.trace('Set l_mid_period_asg_change to TRUE I');
1379:
1380: l_mid_period_asg_change := TRUE;
1381:
1382: hr_utility.set_location('calculate_period_earnings', 56);
1383: hr_utility.trace('Look for EEVMPE changes');
1384:
1385: BEGIN /* EEVMPE check - maybe pick*/
1386:
1379:
1380: l_mid_period_asg_change := TRUE;
1381:
1382: hr_utility.set_location('calculate_period_earnings', 56);
1383: hr_utility.trace('Look for EEVMPE changes');
1384:
1385: BEGIN /* EEVMPE check - maybe pick*/
1386:
1387: select 1 INTO l_eev_info_changes
1398: ) );
1399:
1400:
1401:
1402: hr_utility.trace('EEVMPE changes found after ASGMPE');
1403:
1404: EXCEPTION
1405:
1406: WHEN NO_DATA_FOUND THEN
1405:
1406: WHEN NO_DATA_FOUND THEN
1407: l_eev_info_changes := 0;
1408:
1409: hr_utility.trace('From EXCEPTION ASGMPE changes found No EEVMPE changes');
1410:
1411: END; /* EEV1 check*/
1412:
1413: EXCEPTION
1414:
1415: WHEN NO_DATA_FOUND THEN
1416:
1417: l_asg_info_changes := 0;
1418: hr_utility.trace('From EXCEPTION No ASGMPE changes, nor EEVMPE changes');
1419:
1420: END; /* ASGMPE check*/
1421:
1422: /* ************************************************ */
1422: /* ************************************************ */
1423:
1424: IF l_asg_info_changes = 0 THEN /* Check ASGMPS */
1425:
1426: hr_utility.trace(' Into l_asg_info_changes = 0');
1427: hr_utility.trace('UDFS looking for ASGMPS changes');
1428: hr_utility.set_location('calculate_period_earnings', 56);
1429:
1430: BEGIN /* ASGMPS changes */
1423:
1424: IF l_asg_info_changes = 0 THEN /* Check ASGMPS */
1425:
1426: hr_utility.trace(' Into l_asg_info_changes = 0');
1427: hr_utility.trace('UDFS looking for ASGMPS changes');
1428: hr_utility.set_location('calculate_period_earnings', 56);
1429:
1430: BEGIN /* ASGMPS changes */
1431:
1424: IF l_asg_info_changes = 0 THEN /* Check ASGMPS */
1425:
1426: hr_utility.trace(' Into l_asg_info_changes = 0');
1427: hr_utility.trace('UDFS looking for ASGMPS changes');
1428: hr_utility.set_location('calculate_period_earnings', 56);
1429:
1430: BEGIN /* ASGMPS changes */
1431:
1432: select 1 INTO l_asg_info_changes
1446: AND SCL.enabled_flag = 'Y');
1447:
1448: l_mid_period_asg_change := TRUE;
1449:
1450: hr_utility.trace('Need to prorate for ASGMPS changes');
1451: hr_utility.set_location('calculate_period_earnings', 57);
1452:
1453: BEGIN /* EEVMPE changes ASGMPS */
1454:
1447:
1448: l_mid_period_asg_change := TRUE;
1449:
1450: hr_utility.trace('Need to prorate for ASGMPS changes');
1451: hr_utility.set_location('calculate_period_earnings', 57);
1452:
1453: BEGIN /* EEVMPE changes ASGMPS */
1454:
1455: select 1 INTO l_eev_info_changes
1465: --OR ( EEV.effective_start_date between p_period_start and p_period_end)
1466: ) );
1467:
1468:
1469: hr_utility.trace('Need to prorate EEVMPS changes after ASGMPS ');
1470:
1471: EXCEPTION
1472:
1473: WHEN NO_DATA_FOUND THEN
1473: WHEN NO_DATA_FOUND THEN
1474:
1475: l_eev_info_changes := 0;
1476:
1477: hr_utility.trace('From EXCEPTIION No EEVMPE changes');
1478:
1479: END; /* EEVMPE changes */
1480:
1481: EXCEPTION
1483: WHEN NO_DATA_FOUND THEN
1484:
1485: l_asg_info_changes := 0;
1486:
1487: hr_utility.trace('From EXCEPTION no changes due to ASGMPS or EEVMPE');
1488:
1489: END; /* ASGMPS changes */
1490:
1491: END IF; /* Check ASGMPS */
1495: IF l_asg_info_changes = 0 THEN /* ASGMPE=0 and ASGMPS=0 */
1496:
1497: BEGIN /* Check for EEVMPE changes */
1498:
1499: hr_utility.set_location('calculate_period_earnings', 58);
1500: hr_utility.trace('Check for EEVMPE changes nevertheless');
1501:
1502: select 1 INTO l_eev_info_changes
1503: from dual
1496:
1497: BEGIN /* Check for EEVMPE changes */
1498:
1499: hr_utility.set_location('calculate_period_earnings', 58);
1500: hr_utility.trace('Check for EEVMPE changes nevertheless');
1501:
1502: select 1 INTO l_eev_info_changes
1503: from dual
1504: where exists (
1509: AND EEV.effective_start_date <= p_period_start
1510: AND EEV.effective_end_date >= p_period_start
1511: AND EEV.effective_end_date < p_period_end);
1512:
1513: hr_utility.trace('Proration due to EEVMPE changes');
1514:
1515:
1516: EXCEPTION
1517:
1516: EXCEPTION
1517:
1518: WHEN NO_DATA_FOUND THEN
1519:
1520: hr_utility.trace('ASG AND EEV changes DO NOT EXIST EXCEPT ');
1521:
1522: -- Either there are no changes to an Active Assignment OR
1523: -- the assignment was not active at all this period.
1524: -- Check assignment status of current asg record.
1522: -- Either there are no changes to an Active Assignment OR
1523: -- the assignment was not active at all this period.
1524: -- Check assignment status of current asg record.
1525:
1526: hr_utility.trace(' Check assignment status of current asg record');
1527:
1528: SELECT AST.per_system_status
1529: INTO v_asg_status
1530: FROM per_assignments_f ASG,
1539: AND SCL.enabled_flag = 'Y';
1540:
1541: IF v_asg_status <> 'ACTIVE_ASSIGN' THEN
1542:
1543: hr_utility.trace(' Asg not active');
1544: v_period_earn := 0;
1545: p_actual_hours_worked := 0;
1546:
1547: END IF;
1545: p_actual_hours_worked := 0;
1546:
1547: END IF;
1548:
1549: hr_utility.trace('Chk for vac pay since no ASG EEV changes to prorate' );
1550:
1551: p_vac_pay := vacation_pay(p_vac_hours => p_vac_hours_worked,
1552: p_asg_id => p_asst_id,
1553: p_eff_date => p_period_end,
1552: p_asg_id => p_asst_id,
1553: p_eff_date => p_period_end,
1554: p_curr_rate => p_ass_hrly_figure);
1555:
1556: hr_utility.trace('p_vac_pay ='||p_vac_pay);
1557: p_sick_pay := sick_pay( p_sick_hours => p_sick_hours_worked,
1558: p_asg_id => p_asst_id,
1559: p_eff_date => p_period_end,
1560: p_curr_rate => p_ass_hrly_figure);
1559: p_eff_date => p_period_end,
1560: p_curr_rate => p_ass_hrly_figure);
1561:
1562:
1563: hr_utility.trace('p_sick_pay ='||p_sick_pay);
1564:
1565: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1566: RETURN v_period_earn;
1567:
1579:
1580: /* ************** ONLY ASG CHANGES START **** */
1581:
1582: p_actual_hours_worked := 0;
1583: hr_utility.set_location('calculate_period_earnings', 70);
1584: hr_utility.trace('UDFS ONLY ASG CHANGES START');
1585:
1586: BEGIN /* Get Asg Details ASGMPE */
1587:
1580: /* ************** ONLY ASG CHANGES START **** */
1581:
1582: p_actual_hours_worked := 0;
1583: hr_utility.set_location('calculate_period_earnings', 70);
1584: hr_utility.trace('UDFS ONLY ASG CHANGES START');
1585:
1586: BEGIN /* Get Asg Details ASGMPE */
1587:
1588: hr_utility.trace('Get Asg details - ASGMPE');
1584: hr_utility.trace('UDFS ONLY ASG CHANGES START');
1585:
1586: BEGIN /* Get Asg Details ASGMPE */
1587:
1588: hr_utility.trace('Get Asg details - ASGMPE');
1589: hr_utility.set_location('calculate_period_earnings', 71);
1590:
1591: SELECT GREATEST(ASG.effective_start_date, p_period_start),
1592: ASG.effective_end_date,
1585:
1586: BEGIN /* Get Asg Details ASGMPE */
1587:
1588: hr_utility.trace('Get Asg details - ASGMPE');
1589: hr_utility.set_location('calculate_period_earnings', 71);
1590:
1591: SELECT GREATEST(ASG.effective_start_date, p_period_start),
1592: ASG.effective_end_date,
1593: NVL(ASG.NORMAL_HOURS, 0),
1615: AND HRL.lookup_code(+) = ASG.frequency
1616: AND HRL.lookup_type(+) = 'FREQUENCY';
1617:
1618:
1619: hr_utility.trace('If ASGMPE Details succ. then Calling Prorate_Earnings');
1620: hr_utility.set_location('calculate_period_earnings', 72);
1621: v_prorated_earnings := v_prorated_earnings +
1622: Prorate_Earnings (
1623: p_bg_id => p_bus_grp_id,
1616: AND HRL.lookup_type(+) = 'FREQUENCY';
1617:
1618:
1619: hr_utility.trace('If ASGMPE Details succ. then Calling Prorate_Earnings');
1620: hr_utility.set_location('calculate_period_earnings', 72);
1621: v_prorated_earnings := v_prorated_earnings +
1622: Prorate_Earnings (
1623: p_bg_id => p_bus_grp_id,
1624: p_asg_hrly_rate => p_ass_hrly_figure,
1628: p_range_start_date => v_range_start,
1629: p_range_end_date => v_range_end,
1630: p_act_hrs_worked => p_actual_hours_worked);
1631:
1632: hr_utility.trace('After Calling Prorate_Earnings');
1633:
1634: EXCEPTION WHEN NO_DATA_FOUND THEN
1635:
1636: NULL;
1637:
1638: END; /* Get Asg Details */
1639:
1640:
1641: hr_utility.trace('ONLY ASG , select MULTIASG');
1642: hr_utility.set_location('calculate_period_earnings', 77);
1643:
1644: OPEN get_asst_chgs; -- SELECT (ASG2 MULTIASG)
1645: LOOP
1638: END; /* Get Asg Details */
1639:
1640:
1641: hr_utility.trace('ONLY ASG , select MULTIASG');
1642: hr_utility.set_location('calculate_period_earnings', 77);
1643:
1644: OPEN get_asst_chgs; -- SELECT (ASG2 MULTIASG)
1645: LOOP
1646:
1650: v_asst_std_hrs,
1651: v_asst_std_freq,
1652: v_work_schedule;
1653: EXIT WHEN get_asst_chgs%NOTFOUND;
1654: hr_utility.set_location('calculate_period_earnings', 79);
1655:
1656:
1657: hr_utility.trace('ONLY ASG Calling Prorate_Earning as MULTIASG successful');
1658:
1653: EXIT WHEN get_asst_chgs%NOTFOUND;
1654: hr_utility.set_location('calculate_period_earnings', 79);
1655:
1656:
1657: hr_utility.trace('ONLY ASG Calling Prorate_Earning as MULTIASG successful');
1658:
1659: v_prorated_earnings := v_prorated_earnings +
1660: Prorate_Earnings (
1661: p_bg_id => p_bus_grp_id,
1667: p_range_end_date => v_range_end,
1668: p_act_hrs_worked => p_actual_hours_worked);
1669:
1670:
1671: hr_utility.trace('After calling Prorate_Earnings from MULTIASG');
1672:
1673: END LOOP;
1674:
1675: CLOSE get_asst_chgs;
1675: CLOSE get_asst_chgs;
1676:
1677: BEGIN /* END_SPAN_RECORD */
1678:
1679: hr_utility.set_location('calculate_period_earnings', 89);
1680: hr_utility.trace('ONLY ASG , select END_SPAN_RECORD');
1681:
1682: SELECT ASG.effective_start_date,
1683: LEAST(ASG.effective_end_date, p_period_end),
1676:
1677: BEGIN /* END_SPAN_RECORD */
1678:
1679: hr_utility.set_location('calculate_period_earnings', 89);
1680: hr_utility.trace('ONLY ASG , select END_SPAN_RECORD');
1681:
1682: SELECT ASG.effective_start_date,
1683: LEAST(ASG.effective_end_date, p_period_end),
1684: NVL(ASG.normal_hours, 0),
1705: AND SCL.enabled_flag = 'Y'
1706: AND HRL.lookup_code(+) = ASG.frequency
1707: AND HRL.lookup_type(+) = 'FREQUENCY';
1708:
1709: hr_utility.trace('Calling Prorate_Earnings for ONLY ASG END_SPAN_RECORD');
1710: hr_utility.set_location('calculate_period_earnings', 91);
1711: v_prorated_earnings := v_prorated_earnings +
1712: Prorate_Earnings (
1713: p_bg_id => p_bus_grp_id,
1706: AND HRL.lookup_code(+) = ASG.frequency
1707: AND HRL.lookup_type(+) = 'FREQUENCY';
1708:
1709: hr_utility.trace('Calling Prorate_Earnings for ONLY ASG END_SPAN_RECORD');
1710: hr_utility.set_location('calculate_period_earnings', 91);
1711: v_prorated_earnings := v_prorated_earnings +
1712: Prorate_Earnings (
1713: p_bg_id => p_bus_grp_id,
1714: p_asg_hrly_rate => p_ass_hrly_figure,
1719: p_range_end_date => v_range_end,
1720: p_act_hrs_worked => p_actual_hours_worked);
1721:
1722:
1723: hr_utility.trace('Calling Vacation Pay as END_SPAN succ');
1724: hr_utility.set_location('calculate_period_earnings', 101);
1725:
1726: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
1727: p_asg_id => p_asst_id,
1720: p_act_hrs_worked => p_actual_hours_worked);
1721:
1722:
1723: hr_utility.trace('Calling Vacation Pay as END_SPAN succ');
1724: hr_utility.set_location('calculate_period_earnings', 101);
1725:
1726: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
1727: p_asg_id => p_asst_id,
1728: p_eff_date => p_period_end,
1727: p_asg_id => p_asst_id,
1728: p_eff_date => p_period_end,
1729: p_curr_rate => p_ass_hrly_figure);
1730:
1731: hr_utility.trace('Calling Sick Pay as ASG3 succ');
1732:
1733: p_sick_pay := sick_pay( p_sick_hours => p_sick_hours_worked,
1734: p_asg_id => p_asst_id,
1735: p_eff_date => p_period_end,
1739: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
1740: RETURN v_prorated_earnings;
1741:
1742: EXCEPTION WHEN NO_DATA_FOUND THEN
1743: hr_utility.set_location('calculate_period_earnings', 102);
1744: hr_utility.trace('Exception of ASG_MID_START_LAST_SPAN_END_DT');
1745:
1746: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
1747: p_asg_id => p_asst_id,
1740: RETURN v_prorated_earnings;
1741:
1742: EXCEPTION WHEN NO_DATA_FOUND THEN
1743: hr_utility.set_location('calculate_period_earnings', 102);
1744: hr_utility.trace('Exception of ASG_MID_START_LAST_SPAN_END_DT');
1745:
1746: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
1747: p_asg_id => p_asst_id,
1748: p_eff_date => p_period_end,
1747: p_asg_id => p_asst_id,
1748: p_eff_date => p_period_end,
1749: p_curr_rate => p_ass_hrly_figure);
1750:
1751: hr_utility.trace('Calling Sick Pay as ASG3 not succ');
1752: p_sick_pay := sick_pay( p_sick_hours => p_sick_hours_worked,
1753: p_asg_id => p_asst_id,
1754: p_eff_date => p_period_end,
1755: p_curr_rate => p_ass_hrly_figure);
1766: ELSIF (l_asg_info_changes = 0) AND (l_eev_info_changes > 0) THEN
1767:
1768: /* ******************* ONLY EEV CHANGES START ****** */
1769:
1770: hr_utility.trace(' Only EEV changes exist');
1771: hr_utility.set_location('calculate_period_earnings', 103);
1772: p_actual_hours_worked := 0;
1773:
1774:
1767:
1768: /* ******************* ONLY EEV CHANGES START ****** */
1769:
1770: hr_utility.trace(' Only EEV changes exist');
1771: hr_utility.set_location('calculate_period_earnings', 103);
1772: p_actual_hours_worked := 0;
1773:
1774:
1775: hr_utility.trace('Calling Prorate_EEV');
1771: hr_utility.set_location('calculate_period_earnings', 103);
1772: p_actual_hours_worked := 0;
1773:
1774:
1775: hr_utility.trace('Calling Prorate_EEV');
1776:
1777: v_prorated_earnings := v_prorated_earnings +
1778: Prorate_EEV (
1779: p_bus_group_id => p_bus_grp_id,
1788: p_actual_hrs_worked => p_actual_hours_worked,
1789: p_element_entry_id => p_ele_entry_id,
1790: p_inpval_id => v_inpval_id);
1791:
1792: hr_utility.trace('After Calling Prorate_EEV');
1793: hr_utility.set_location('calculate_period_earnings', 127);
1794:
1795: hr_utility.trace('Calling vacation_pay');
1796:
1789: p_element_entry_id => p_ele_entry_id,
1790: p_inpval_id => v_inpval_id);
1791:
1792: hr_utility.trace('After Calling Prorate_EEV');
1793: hr_utility.set_location('calculate_period_earnings', 127);
1794:
1795: hr_utility.trace('Calling vacation_pay');
1796:
1797: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
1791:
1792: hr_utility.trace('After Calling Prorate_EEV');
1793: hr_utility.set_location('calculate_period_earnings', 127);
1794:
1795: hr_utility.trace('Calling vacation_pay');
1796:
1797: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
1798: p_asg_id => p_asst_id,
1799: p_eff_date => p_period_end,
1798: p_asg_id => p_asst_id,
1799: p_eff_date => p_period_end,
1800: p_curr_rate => p_ass_hrly_figure);
1801:
1802: hr_utility.trace('Calling sick_pay');
1803:
1804: p_sick_pay := sick_pay( p_sick_hours => p_sick_hours_worked,
1805: p_asg_id => p_asst_id,
1806: p_eff_date => p_period_end,
1816:
1817: /* ******************* BOTH ASG AND EEV CHANGES START ************ */
1818:
1819:
1820: hr_utility.trace('UDFS BOTH ASG and EEV chages exist');
1821:
1822:
1823: p_actual_hours_worked := 0;
1824:
1824:
1825:
1826: BEGIN /* Latest Screen Entry Value */
1827:
1828: hr_utility.trace('BOTH ASG Get latest screen entry value for EEVMPE');
1829: hr_utility.set_location('calculate_period_earnings', 128);
1830:
1831: SELECT fnd_number.canonical_to_number(EEV.screen_entry_value)
1832: INTO v_earnings_entry
1825:
1826: BEGIN /* Latest Screen Entry Value */
1827:
1828: hr_utility.trace('BOTH ASG Get latest screen entry value for EEVMPE');
1829: hr_utility.set_location('calculate_period_earnings', 128);
1830:
1831: SELECT fnd_number.canonical_to_number(EEV.screen_entry_value)
1832: INTO v_earnings_entry
1833: FROM pay_element_entry_values_f EEV
1840: AND EEV.effective_end_date > p_period_start;
1841: */
1842: --AND EEV.effective_end_date < p_period_end
1843:
1844: hr_utility.trace('BOTH ASG Get ASGMPE ');
1845:
1846: SELECT GREATEST(ASG.effective_start_date, p_period_start),
1847: ASG.effective_end_date,
1848: NVL(ASG.NORMAL_HOURS, 0),
1869: AND SCL.enabled_flag = 'Y'
1870: AND HRL.lookup_code(+) = ASG.frequency
1871: AND HRL.lookup_type(+) = 'FREQUENCY';
1872:
1873: hr_utility.trace('Calling Convert_Period_Type from ASGMPE');
1874: hr_utility.set_location('v_earnings_entry='||v_earnings_entry, 129);
1875:
1876: v_curr_hrly_rate := Convert_Period_Type( p_bus_grp_id,
1877: p_payroll_id,
1870: AND HRL.lookup_code(+) = ASG.frequency
1871: AND HRL.lookup_type(+) = 'FREQUENCY';
1872:
1873: hr_utility.trace('Calling Convert_Period_Type from ASGMPE');
1874: hr_utility.set_location('v_earnings_entry='||v_earnings_entry, 129);
1875:
1876: v_curr_hrly_rate := Convert_Period_Type( p_bus_grp_id,
1877: p_payroll_id,
1878: v_work_schedule,
1883: p_period_start,
1884: p_period_end,
1885: v_asst_std_freq);
1886:
1887: hr_utility.trace('Select app. EEVMPE again after range is determined');
1888: hr_utility.set_location('calculate_period_earnings', 130);
1889:
1890: SELECT COUNT(EEV.element_entry_value_id)
1891: INTO l_eev_info_changes
1884: p_period_end,
1885: v_asst_std_freq);
1886:
1887: hr_utility.trace('Select app. EEVMPE again after range is determined');
1888: hr_utility.set_location('calculate_period_earnings', 130);
1889:
1890: SELECT COUNT(EEV.element_entry_value_id)
1891: INTO l_eev_info_changes
1892: FROM pay_element_entry_values_f EEV
1898:
1899: IF l_eev_info_changes = 0 THEN
1900:
1901:
1902: hr_utility.trace('NO EEVMPE changes');
1903: hr_utility.set_location('calculate_period_earnings', 132);
1904:
1905: SELECT fnd_number.canonical_to_number(EEV.screen_entry_value)
1906: INTO v_earnings_entry
1899: IF l_eev_info_changes = 0 THEN
1900:
1901:
1902: hr_utility.trace('NO EEVMPE changes');
1903: hr_utility.set_location('calculate_period_earnings', 132);
1904:
1905: SELECT fnd_number.canonical_to_number(EEV.screen_entry_value)
1906: INTO v_earnings_entry
1907: FROM pay_element_entry_values_f EEV
1909: AND EEV.input_value_id = v_inpval_id
1910: AND v_range_end BETWEEN EEV.effective_start_date
1911: AND EEV.effective_end_date;
1912:
1913: hr_utility.trace('Calling Convert_Period_Type');
1914: hr_utility.set_location('calculate_period_earnings', 134);
1915:
1916: v_curr_hrly_rate := Convert_Period_Type( p_bus_grp_id,
1917: p_payroll_id,
1910: AND v_range_end BETWEEN EEV.effective_start_date
1911: AND EEV.effective_end_date;
1912:
1913: hr_utility.trace('Calling Convert_Period_Type');
1914: hr_utility.set_location('calculate_period_earnings', 134);
1915:
1916: v_curr_hrly_rate := Convert_Period_Type( p_bus_grp_id,
1917: p_payroll_id,
1918: v_work_schedule,
1923: p_period_start,
1924: p_period_end,
1925: v_asst_std_freq);
1926:
1927: hr_utility.trace('Calling Prorate_Earnings');
1928: hr_utility.set_location('calculate_period_earnings', 135);
1929:
1930: v_prorated_earnings := v_prorated_earnings +
1931: Prorate_Earnings (
1924: p_period_end,
1925: v_asst_std_freq);
1926:
1927: hr_utility.trace('Calling Prorate_Earnings');
1928: hr_utility.set_location('calculate_period_earnings', 135);
1929:
1930: v_prorated_earnings := v_prorated_earnings +
1931: Prorate_Earnings (
1932: p_bg_id => p_bus_grp_id,
1937: p_range_start_date => v_range_start,
1938: p_range_end_date => v_range_end,
1939: p_act_hrs_worked => p_actual_hours_worked);
1940:
1941: hr_utility.set_location('calculate_period_earnings', 137);
1942:
1943: ELSE
1944: -- Do proration for this ASG range by EEV !
1945:
1942:
1943: ELSE
1944: -- Do proration for this ASG range by EEV !
1945:
1946: hr_utility.trace('EEVMPE True');
1947: hr_utility.trace('Do proration for this ASG range by EEV');
1948: hr_utility.set_location('calculate_period_earnings', 139);
1949:
1950: hr_utility.trace('Calling Prorate_EEV');
1943: ELSE
1944: -- Do proration for this ASG range by EEV !
1945:
1946: hr_utility.trace('EEVMPE True');
1947: hr_utility.trace('Do proration for this ASG range by EEV');
1948: hr_utility.set_location('calculate_period_earnings', 139);
1949:
1950: hr_utility.trace('Calling Prorate_EEV');
1951:
1944: -- Do proration for this ASG range by EEV !
1945:
1946: hr_utility.trace('EEVMPE True');
1947: hr_utility.trace('Do proration for this ASG range by EEV');
1948: hr_utility.set_location('calculate_period_earnings', 139);
1949:
1950: hr_utility.trace('Calling Prorate_EEV');
1951:
1952: v_prorated_earnings := v_prorated_earnings +
1946: hr_utility.trace('EEVMPE True');
1947: hr_utility.trace('Do proration for this ASG range by EEV');
1948: hr_utility.set_location('calculate_period_earnings', 139);
1949:
1950: hr_utility.trace('Calling Prorate_EEV');
1951:
1952: v_prorated_earnings := v_prorated_earnings +
1953: Prorate_EEV (
1954: p_bus_group_id => p_bus_grp_id,
1962: p_range_end_date => v_range_end,
1963: p_actual_hrs_worked => p_actual_hours_worked,
1964: p_element_entry_id => p_ele_entry_id,
1965: p_inpval_id => v_inpval_id);
1966: hr_utility.set_location('calculate_period_earnings', 140);
1967:
1968: END IF; -- EEV info changes
1969:
1970: EXCEPTION WHEN NO_DATA_FOUND THEN
1971: NULL;
1972:
1973: END; /* Latest Screen Entry Value */
1974:
1975: hr_utility.trace(' BOTH ASG - SELECT ASG_MULTI_WITHIN');
1976: hr_utility.set_location('calculate_period_earnings', 141);
1977:
1978: OPEN get_asst_chgs; -- SELECT ( ASG_MULTI_WITHIN)
1979: LOOP
1972:
1973: END; /* Latest Screen Entry Value */
1974:
1975: hr_utility.trace(' BOTH ASG - SELECT ASG_MULTI_WITHIN');
1976: hr_utility.set_location('calculate_period_earnings', 141);
1977:
1978: OPEN get_asst_chgs; -- SELECT ( ASG_MULTI_WITHIN)
1979: LOOP
1980:
1986: v_work_schedule;
1987: EXIT WHEN get_asst_chgs%NOTFOUND;
1988:
1989: --EEV_BEFORE_RANGE_END
1990: hr_utility.trace('BOTH ASG MULTI select app. EEVMPE again after range det.');
1991: hr_utility.set_location('calculate_period_earnings', 145);
1992:
1993: SELECT COUNT(EEV.element_entry_value_id)
1994: INTO l_eev_info_changes
1987: EXIT WHEN get_asst_chgs%NOTFOUND;
1988:
1989: --EEV_BEFORE_RANGE_END
1990: hr_utility.trace('BOTH ASG MULTI select app. EEVMPE again after range det.');
1991: hr_utility.set_location('calculate_period_earnings', 145);
1992:
1993: SELECT COUNT(EEV.element_entry_value_id)
1994: INTO l_eev_info_changes
1995: FROM pay_element_entry_values_f EEV
2002: IF l_eev_info_changes = 0 THEN /* IF l_eev_info_changes = 0 */
2003:
2004: -- EEV_FOR_CURR_RANGE_END
2005:
2006: hr_utility.trace('BOTH ASG - EEV false');
2007: SELECT fnd_number.canonical_to_number(EEV.screen_entry_value)
2008: INTO v_earnings_entry
2009: FROM pay_element_entry_values_f EEV
2010: WHERE EEV.element_entry_id = p_ele_entry_id
2010: WHERE EEV.element_entry_id = p_ele_entry_id
2011: AND EEV.input_value_id = v_inpval_id
2012: AND v_range_end BETWEEN EEV.effective_start_date
2013: AND EEV.effective_end_date;
2014: hr_utility.set_location('calculate_period_earnings', 150);
2015: v_curr_hrly_rate := Convert_Period_Type( p_bus_grp_id,
2016: p_payroll_id,
2017: v_work_schedule,
2018: v_asst_std_hrs,
2033: p_range_start_date => v_range_start,
2034: p_range_end_date => v_range_end,
2035: p_act_hrs_worked => p_actual_hours_worked);
2036:
2037: hr_utility.set_location('calculate_period_earnings', 155);
2038: ELSE
2039: hr_utility.trace('BOTH ASG - EEV true');
2040: v_prorated_earnings := v_prorated_earnings +
2041: Prorate_EEV (
2035: p_act_hrs_worked => p_actual_hours_worked);
2036:
2037: hr_utility.set_location('calculate_period_earnings', 155);
2038: ELSE
2039: hr_utility.trace('BOTH ASG - EEV true');
2040: v_prorated_earnings := v_prorated_earnings +
2041: Prorate_EEV (
2042: p_bus_group_id => p_bus_grp_id,
2043: p_pay_id => p_payroll_id,
2060:
2061:
2062: BEGIN /* SPAN_RECORD */
2063:
2064: hr_utility.trace('BOTH ASG SELECT END_SPAN_RECORD');
2065: hr_utility.set_location('calculate_period_earnings', 160);
2066:
2067: SELECT ASG.effective_start_date,
2068: LEAST(ASG.effective_end_date, p_period_end),
2061:
2062: BEGIN /* SPAN_RECORD */
2063:
2064: hr_utility.trace('BOTH ASG SELECT END_SPAN_RECORD');
2065: hr_utility.set_location('calculate_period_earnings', 160);
2066:
2067: SELECT ASG.effective_start_date,
2068: LEAST(ASG.effective_end_date, p_period_end),
2069: NVL(ASG.normal_hours, 0),
2092: AND HRL.lookup_type(+) = 'FREQUENCY';
2093:
2094:
2095:
2096: hr_utility.trace('SELECT EEVMPE');
2097:
2098: SELECT COUNT(EEV.element_entry_value_id)
2099: INTO l_eev_info_changes
2100: FROM pay_element_entry_values_f EEV
2105: AND EEV.effective_end_date < v_range_end;
2106:
2107: IF l_eev_info_changes = 0 THEN
2108:
2109: hr_utility.trace('BOTH ASG SPAN - SELECT EEV_FOR_CURR_RANGE_END');
2110: hr_utility.set_location('calculate_period_earnings', 165);
2111:
2112: SELECT fnd_number.canonical_to_number(EEV.screen_entry_value)
2113: INTO v_earnings_entry
2106:
2107: IF l_eev_info_changes = 0 THEN
2108:
2109: hr_utility.trace('BOTH ASG SPAN - SELECT EEV_FOR_CURR_RANGE_END');
2110: hr_utility.set_location('calculate_period_earnings', 165);
2111:
2112: SELECT fnd_number.canonical_to_number(EEV.screen_entry_value)
2113: INTO v_earnings_entry
2114: FROM pay_element_entry_values_f EEV
2138: p_range_start_date => v_range_start,
2139: p_range_end_date => v_range_end,
2140: p_act_hrs_worked => p_actual_hours_worked);
2141:
2142: hr_utility.set_location('calculate_period_earnings', 170);
2143: ELSE /* EEV succ */
2144:
2145: hr_utility.trace('BOTH ASG END_SPAN - EEV true');
2146: v_prorated_earnings := v_prorated_earnings +
2141:
2142: hr_utility.set_location('calculate_period_earnings', 170);
2143: ELSE /* EEV succ */
2144:
2145: hr_utility.trace('BOTH ASG END_SPAN - EEV true');
2146: v_prorated_earnings := v_prorated_earnings +
2147: Prorate_EEV (
2148: p_bus_group_id => p_bus_grp_id,
2149: p_pay_id => p_payroll_id,
2156: p_range_end_date => v_range_end,
2157: p_actual_hrs_worked => p_actual_hours_worked,
2158: p_element_entry_id => p_ele_entry_id,
2159: p_inpval_id => v_inpval_id);
2160: hr_utility.set_location('calculate_period_earnings', 175);
2161: END IF;
2162:
2163:
2164: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
2164: p_vac_pay := vacation_pay( p_vac_hours => p_vac_hours_worked,
2165: p_asg_id => p_asst_id,
2166: p_eff_date => p_period_end,
2167: p_curr_rate => p_ass_hrly_figure);
2168: hr_utility.set_location('calculate_period_earnings', 180);
2169:
2170: p_sick_pay := sick_pay( p_sick_hours => p_sick_hours_worked,
2171: p_asg_id => p_asst_id,
2172: p_eff_date => p_period_end,
2170: p_sick_pay := sick_pay( p_sick_hours => p_sick_hours_worked,
2171: p_asg_id => p_asst_id,
2172: p_eff_date => p_period_end,
2173: p_curr_rate => p_ass_hrly_figure);
2174: hr_utility.set_location('calculate_period_earnings', 185);
2175:
2176: p_actual_hours_worked := ROUND(p_actual_hours_worked, 3);
2177: RETURN v_prorated_earnings;
2178:
2248: v_curr_date := NULL;
2249: v_curr_day :=NULL;
2250:
2251: -- Check for valid range
2252: hr_utility.trace('Entered standard_hours_worked');
2253:
2254: IF p_range_start > p_range_end THEN
2255: hr_utility.trace('p_range_start greater than p_range_end');
2256: RETURN v_total_hours;
2251: -- Check for valid range
2252: hr_utility.trace('Entered standard_hours_worked');
2253:
2254: IF p_range_start > p_range_end THEN
2255: hr_utility.trace('p_range_start greater than p_range_end');
2256: RETURN v_total_hours;
2257: -- hr_utility.set_message(801,'PAY_xxxx_INVALID_DATE_RANGE');
2258: -- hr_utility.raise_error;
2259: END IF;
2253:
2254: IF p_range_start > p_range_end THEN
2255: hr_utility.trace('p_range_start greater than p_range_end');
2256: RETURN v_total_hours;
2257: -- hr_utility.set_message(801,'PAY_xxxx_INVALID_DATE_RANGE');
2258: -- hr_utility.raise_error;
2259: END IF;
2260: --
2261:
2254: IF p_range_start > p_range_end THEN
2255: hr_utility.trace('p_range_start greater than p_range_end');
2256: RETURN v_total_hours;
2257: -- hr_utility.set_message(801,'PAY_xxxx_INVALID_DATE_RANGE');
2258: -- hr_utility.raise_error;
2259: END IF;
2260: --
2261:
2262: IF UPPER(p_std_freq) = 'WEEK' THEN
2259: END IF;
2260: --
2261:
2262: IF UPPER(p_std_freq) = 'WEEK' THEN
2263: hr_utility.trace('p_std_freq = WEEK ');
2264:
2265: v_wrkday_hours := p_std_hrs / c_wkdays_per_week;
2266:
2267: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2263: hr_utility.trace('p_std_freq = WEEK ');
2264:
2265: v_wrkday_hours := p_std_hrs / c_wkdays_per_week;
2266:
2267: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2268: hr_utility.trace('c_wkdays_per_week ='||to_number(c_wkdays_per_week));
2269: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2270:
2271: ELSIF UPPER(p_std_freq) = 'MONTH' THEN
2264:
2265: v_wrkday_hours := p_std_hrs / c_wkdays_per_week;
2266:
2267: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2268: hr_utility.trace('c_wkdays_per_week ='||to_number(c_wkdays_per_week));
2269: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2270:
2271: ELSIF UPPER(p_std_freq) = 'MONTH' THEN
2272:
2265: v_wrkday_hours := p_std_hrs / c_wkdays_per_week;
2266:
2267: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2268: hr_utility.trace('c_wkdays_per_week ='||to_number(c_wkdays_per_week));
2269: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2270:
2271: ELSIF UPPER(p_std_freq) = 'MONTH' THEN
2272:
2273: hr_utility.trace('p_std_freq = MONTH ');
2269: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2270:
2271: ELSIF UPPER(p_std_freq) = 'MONTH' THEN
2272:
2273: hr_utility.trace('p_std_freq = MONTH ');
2274:
2275: v_wrkday_hours := p_std_hrs / c_wkdays_per_month;
2276:
2277:
2274:
2275: v_wrkday_hours := p_std_hrs / c_wkdays_per_month;
2276:
2277:
2278: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2279: hr_utility.trace('c_wkdays_per_month ='||to_number(c_wkdays_per_month));
2280: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2281:
2282: ELSIF UPPER(p_std_freq) = 'YEAR' THEN
2275: v_wrkday_hours := p_std_hrs / c_wkdays_per_month;
2276:
2277:
2278: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2279: hr_utility.trace('c_wkdays_per_month ='||to_number(c_wkdays_per_month));
2280: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2281:
2282: ELSIF UPPER(p_std_freq) = 'YEAR' THEN
2283:
2276:
2277:
2278: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2279: hr_utility.trace('c_wkdays_per_month ='||to_number(c_wkdays_per_month));
2280: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2281:
2282: ELSIF UPPER(p_std_freq) = 'YEAR' THEN
2283:
2284: hr_utility.trace('p_std_freq = YEAR ');
2280: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2281:
2282: ELSIF UPPER(p_std_freq) = 'YEAR' THEN
2283:
2284: hr_utility.trace('p_std_freq = YEAR ');
2285: v_wrkday_hours := p_std_hrs / c_wkdays_per_year;
2286:
2287: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2288: hr_utility.trace('c_wkdays_per_year ='||to_number(c_wkdays_per_year));
2283:
2284: hr_utility.trace('p_std_freq = YEAR ');
2285: v_wrkday_hours := p_std_hrs / c_wkdays_per_year;
2286:
2287: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2288: hr_utility.trace('c_wkdays_per_year ='||to_number(c_wkdays_per_year));
2289: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2290:
2291: ELSE
2284: hr_utility.trace('p_std_freq = YEAR ');
2285: v_wrkday_hours := p_std_hrs / c_wkdays_per_year;
2286:
2287: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2288: hr_utility.trace('c_wkdays_per_year ='||to_number(c_wkdays_per_year));
2289: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2290:
2291: ELSE
2292: hr_utility.trace('p_std_freq in ELSE ');
2285: v_wrkday_hours := p_std_hrs / c_wkdays_per_year;
2286:
2287: hr_utility.trace('p_std_hrs ='||to_number(p_std_hrs));
2288: hr_utility.trace('c_wkdays_per_year ='||to_number(c_wkdays_per_year));
2289: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2290:
2291: ELSE
2292: hr_utility.trace('p_std_freq in ELSE ');
2293: v_wrkday_hours := p_std_hrs;
2288: hr_utility.trace('c_wkdays_per_year ='||to_number(c_wkdays_per_year));
2289: hr_utility.trace('v_wrkday_hours ='||to_number(v_wrkday_hours));
2290:
2291: ELSE
2292: hr_utility.trace('p_std_freq in ELSE ');
2293: v_wrkday_hours := p_std_hrs;
2294: END IF;
2295:
2296: v_curr_date := p_range_start;
2294: END IF;
2295:
2296: v_curr_date := p_range_start;
2297:
2298: hr_utility.trace('v_curr_date is range start'||to_char(v_curr_date));
2299:
2300:
2301: LOOP
2302:
2307:
2308:
2309: v_total_hours := nvl(v_total_hours,0) + v_wrkday_hours;
2310:
2311: hr_utility.trace(' v_day_no = '||to_char(v_day_no));
2312: hr_utility.trace(' v_total_hours = '||to_char(v_total_hours));
2313: END IF;
2314:
2315: v_curr_date := v_curr_date + 1;
2308:
2309: v_total_hours := nvl(v_total_hours,0) + v_wrkday_hours;
2310:
2311: hr_utility.trace(' v_day_no = '||to_char(v_day_no));
2312: hr_utility.trace(' v_total_hours = '||to_char(v_total_hours));
2313: END IF;
2314:
2315: v_curr_date := v_curr_date + 1;
2316: EXIT WHEN v_curr_date > p_range_end;
2314:
2315: v_curr_date := v_curr_date + 1;
2316: EXIT WHEN v_curr_date > p_range_end;
2317: END LOOP;
2318: hr_utility.trace(' Final v_total_hours = '||to_char(v_total_hours));
2319: hr_utility.trace(' Leaving standard_hours_worked' );
2320: --
2321: RETURN v_total_hours;
2322: --
2315: v_curr_date := v_curr_date + 1;
2316: EXIT WHEN v_curr_date > p_range_end;
2317: END LOOP;
2318: hr_utility.trace(' Final v_total_hours = '||to_char(v_total_hours));
2319: hr_utility.trace(' Leaving standard_hours_worked' );
2320: --
2321: RETURN v_total_hours;
2322: --
2323: END standard_hours_worked;
2389: -- Selecting "count" because we want to continue processing even if
2390: -- the from_freq is not a pay basis.
2391: --
2392:
2393: hr_utility.trace(' Entered Get_Annualizing_Factor ');
2394:
2395: BEGIN -- Is Freq pay basis?
2396:
2397: --
2398: -- Decode pay basis and set v_annualizing_factor accordingly.
2399: -- PAY_BASIS "Meaning" is passed from FF !
2400: --
2401:
2402: hr_utility.trace(' Getting lookup code for lookup_type = PAY_BASIS');
2403: hr_utility.trace(' p_freq ='||p_freq);
2404:
2405: SELECT lookup_code
2406: INTO v_pay_basis
2399: -- PAY_BASIS "Meaning" is passed from FF !
2400: --
2401:
2402: hr_utility.trace(' Getting lookup code for lookup_type = PAY_BASIS');
2403: hr_utility.trace(' p_freq ='||p_freq);
2404:
2405: SELECT lookup_code
2406: INTO v_pay_basis
2407: FROM hr_lookups lkp
2408: WHERE lkp.application_id = 800
2409: AND lkp.lookup_type = 'PAY_BASIS'
2410: AND lkp.meaning = p_freq;
2411:
2412: hr_utility.trace(' Lookup_code ie v_pay_basis ='||v_pay_basis);
2413: v_use_pay_basis := 1;
2414:
2415: IF v_pay_basis = 'MONTHLY' THEN
2416:
2413: v_use_pay_basis := 1;
2414:
2415: IF v_pay_basis = 'MONTHLY' THEN
2416:
2417: hr_utility.trace(' Entered for MONTHLY v_pay_basis');
2418:
2419: v_annualizing_factor := 12;
2420:
2421: hr_utility.trace(' v_annualizing_factor = 12 ');
2417: hr_utility.trace(' Entered for MONTHLY v_pay_basis');
2418:
2419: v_annualizing_factor := 12;
2420:
2421: hr_utility.trace(' v_annualizing_factor = 12 ');
2422: ELSIF v_pay_basis = 'HOURLY' THEN
2423:
2424: hr_utility.trace(' Entered for HOURLY v_pay_basis');
2425:
2420:
2421: hr_utility.trace(' v_annualizing_factor = 12 ');
2422: ELSIF v_pay_basis = 'HOURLY' THEN
2423:
2424: hr_utility.trace(' Entered for HOURLY v_pay_basis');
2425:
2426: IF p_period_start_date IS NOT NULL THEN
2427:
2428: hr_utility.trace(' p_period_start_date IS NOT NULL v_period_hours=T');
2424: hr_utility.trace(' Entered for HOURLY v_pay_basis');
2425:
2426: IF p_period_start_date IS NOT NULL THEN
2427:
2428: hr_utility.trace(' p_period_start_date IS NOT NULL v_period_hours=T');
2429: v_range_start := p_period_start_date;
2430: v_range_end := p_period_end_date;
2431: v_period_hours := TRUE;
2432: ELSE
2430: v_range_end := p_period_end_date;
2431: v_period_hours := TRUE;
2432: ELSE
2433:
2434: hr_utility.trace(' p_period_start_date IS NULL');
2435:
2436: v_range_start := sysdate;
2437: v_range_end := sysdate + 6;
2438: v_period_hours := FALSE;
2442:
2443: -- Hourly employee using work schedule.
2444: -- Get work schedule name
2445:
2446: hr_utility.trace(' Hourly employee using work schedule');
2447: hr_utility.trace(' Get work schedule name');
2448:
2449: v_ws_id := fnd_number.canonical_to_number(p_asg_work_sched);
2450:
2443: -- Hourly employee using work schedule.
2444: -- Get work schedule name
2445:
2446: hr_utility.trace(' Hourly employee using work schedule');
2447: hr_utility.trace(' Get work schedule name');
2448:
2449: v_ws_id := fnd_number.canonical_to_number(p_asg_work_sched);
2450:
2451: hr_utility.trace(' v_ws_id ='||to_number(v_ws_id));
2447: hr_utility.trace(' Get work schedule name');
2448:
2449: v_ws_id := fnd_number.canonical_to_number(p_asg_work_sched);
2450:
2451: hr_utility.trace(' v_ws_id ='||to_number(v_ws_id));
2452:
2453:
2454: SELECT user_column_name
2455: INTO v_work_sched_name
2457: WHERE user_column_id = v_ws_id
2458: AND NVL(business_group_id, p_bg) = p_bg
2459: AND NVL(legislation_code,'US') = 'US';
2460:
2461: hr_utility.trace(' v_work_sched_name ='||v_work_sched_name);
2462: hr_utility.trace(' Calling Work_Schedule_Total_Hours');
2463:
2464: v_hrs_per_range := Work_Schedule_Total_Hours( p_bg,
2465: v_work_sched_name,
2458: AND NVL(business_group_id, p_bg) = p_bg
2459: AND NVL(legislation_code,'US') = 'US';
2460:
2461: hr_utility.trace(' v_work_sched_name ='||v_work_sched_name);
2462: hr_utility.trace(' Calling Work_Schedule_Total_Hours');
2463:
2464: v_hrs_per_range := Work_Schedule_Total_Hours( p_bg,
2465: v_work_sched_name,
2466: v_range_start,
2467: v_range_end);
2468:
2469: ELSE-- Hourly emp using Standard Hours on asg.
2470:
2471: hr_utility.trace(' Hourly emp using Standard Hours on asg');
2472:
2473:
2474: hr_utility.trace(' calling Standard_Hours_Worked');
2475: v_hrs_per_range := Standard_Hours_Worked( p_asg_std_hrs,
2470:
2471: hr_utility.trace(' Hourly emp using Standard Hours on asg');
2472:
2473:
2474: hr_utility.trace(' calling Standard_Hours_Worked');
2475: v_hrs_per_range := Standard_Hours_Worked( p_asg_std_hrs,
2476: v_range_start,
2477: v_range_end,
2478: p_asg_std_freq);
2480: END IF;
2481:
2482: IF v_period_hours THEN
2483:
2484: hr_utility.trace(' v_period_hours is TRUE');
2485:
2486: select TPT.number_per_fiscal_year
2487: into v_periods_per_fiscal_yr
2488: from pay_payrolls_f PPF,
2502: END IF;
2503:
2504: ELSIF v_pay_basis = 'PERIOD' THEN
2505:
2506: hr_utility.trace(' v_pay_basis = PERIOD');
2507:
2508: SELECT TPT.number_per_fiscal_year
2509: INTO v_annualizing_factor
2510: FROM pay_payrolls_f PRL,
2520:
2521: ELSIF v_pay_basis = 'ANNUAL' THEN
2522:
2523:
2524: hr_utility.trace(' v_pay_basis = ANNUAL');
2525: v_annualizing_factor := 1;
2526:
2527: ELSE
2528:
2528:
2529: -- Did not recognize "pay basis", return -999 as annualizing factor.
2530: -- Remember this for debugging when zeroes come out as results!!!
2531:
2532: hr_utility.trace(' Did not recognize pay basis');
2533:
2534: v_annualizing_factor := 0;
2535: RETURN v_annualizing_factor;
2536:
2539: EXCEPTION
2540:
2541: WHEN NO_DATA_FOUND THEN
2542:
2543: hr_utility.trace(' When no data found' );
2544: v_use_pay_basis := 0;
2545:
2546: END; /* SELECT LOOKUP CODE */
2547:
2546: END; /* SELECT LOOKUP CODE */
2547:
2548: IF v_use_pay_basis = 0 THEN
2549:
2550: hr_utility.trace(' Not using pay basis as frequency');
2551:
2552: -- Not using pay basis as frequency...
2553:
2554: IF (p_freq IS NULL) OR
2556: (UPPER(p_freq) = 'NOT ENTERED') THEN
2557:
2558: -- Get "annuallizing factor" from period type of the payroll.
2559:
2560: hr_utility.trace('Get annuallizing factor from period type of the payroll');
2561:
2562: SELECT TPT.number_per_fiscal_year
2563: INTO v_annualizing_factor
2564: FROM pay_payrolls_f PRL,
2570: AND PRL.effective_end_date
2571: AND PRL.payroll_id = p_payroll
2572: AND PRL.business_group_id + 0 = p_bg;
2573:
2574: hr_utility.trace('v_annualizing_factor ='||to_number(v_annualizing_factor));
2575:
2576: ELSIF UPPER(p_freq) <> 'HOURLY' THEN
2577:
2578: -- Not hourly, an actual time period type!
2575:
2576: ELSIF UPPER(p_freq) <> 'HOURLY' THEN
2577:
2578: -- Not hourly, an actual time period type!
2579: hr_utility.trace('Not hourly - an actual time period type');
2580:
2581: BEGIN
2582:
2583: hr_utility.trace(' selecting from per_time_period_types');
2579: hr_utility.trace('Not hourly - an actual time period type');
2580:
2581: BEGIN
2582:
2583: hr_utility.trace(' selecting from per_time_period_types');
2584:
2585: SELECT PT.number_per_fiscal_year
2586: INTO v_annualizing_factor
2587: FROM per_time_period_types PT
2586: INTO v_annualizing_factor
2587: FROM per_time_period_types PT
2588: WHERE UPPER(PT.period_type) = UPPER(p_freq);
2589:
2590: hr_utility.trace('v_annualizing_factor ='||to_number(v_annualizing_factor));
2591:
2592: EXCEPTION when NO_DATA_FOUND then
2593:
2594: -- Added as part of SALLY CLEANUP.
2595: -- Could have been passed in an ASG_FREQ dbi which might have the values of
2596: -- 'Day' or 'Month' which do not map to a time period type. So we'll do these by hand.
2597:
2598: IF UPPER(p_freq) = 'DAY' THEN
2599: hr_utility.trace(' p_freq = DAY');
2600: v_annualizing_factor := c_days_per_year;
2601: ELSIF UPPER(p_freq) = 'MONTH' THEN
2602: v_annualizing_factor := c_months_per_year;
2603: hr_utility.trace(' p_freq = MONTH');
2599: hr_utility.trace(' p_freq = DAY');
2600: v_annualizing_factor := c_days_per_year;
2601: ELSIF UPPER(p_freq) = 'MONTH' THEN
2602: v_annualizing_factor := c_months_per_year;
2603: hr_utility.trace(' p_freq = MONTH');
2604: END IF;
2605:
2606: END;
2607:
2605:
2606: END;
2607:
2608: ELSE -- Hourly employee...
2609: hr_utility.trace(' Hourly Employee');
2610:
2611: IF p_period_start_date IS NOT NULL THEN
2612: v_range_start := p_period_start_date;
2613: v_range_end := p_period_end_date;
2639: v_range_end);
2640:
2641: ELSE-- Hourly emp using Standard Hours on asg.
2642:
2643: hr_utility.trace(' Hourly emp using Standard Hours on asg');
2644:
2645: hr_utility.trace('calling Standard_Hours_Worked');
2646:
2647: v_hrs_per_range := Standard_Hours_Worked(p_asg_std_hrs,
2641: ELSE-- Hourly emp using Standard Hours on asg.
2642:
2643: hr_utility.trace(' Hourly emp using Standard Hours on asg');
2644:
2645: hr_utility.trace('calling Standard_Hours_Worked');
2646:
2647: v_hrs_per_range := Standard_Hours_Worked(p_asg_std_hrs,
2648: v_range_start,
2649: v_range_end,
2648: v_range_start,
2649: v_range_end,
2650: p_asg_std_freq);
2651:
2652: hr_utility.trace('returned Standard_Hours_Worked');
2653: END IF;
2654:
2655:
2656: IF v_period_hours THEN
2654:
2655:
2656: IF v_period_hours THEN
2657:
2658: hr_utility.trace('v_period_hours = TRUE');
2659:
2660: select TPT.number_per_fiscal_year
2661: into v_periods_per_fiscal_yr
2662: from pay_payrolls_f PPF,
2667: and fs.effective_date between PPF.effective_start_date and PPF.effective_end_date
2668: and TPT.period_type = PPF.period_type;
2669:
2670: v_annualizing_factor := v_hrs_per_range * v_periods_per_fiscal_yr;
2671: hr_utility.trace('v_hrs_per_range ='||to_number(v_hrs_per_range));
2672: hr_utility.trace('v_periods_per_fiscal_yr ='||to_number(v_periods_per_fiscal_yr));
2673: hr_utility.trace('v_annualizing_factor ='||to_number(v_annualizing_factor));
2674:
2675: ELSE
2668: and TPT.period_type = PPF.period_type;
2669:
2670: v_annualizing_factor := v_hrs_per_range * v_periods_per_fiscal_yr;
2671: hr_utility.trace('v_hrs_per_range ='||to_number(v_hrs_per_range));
2672: hr_utility.trace('v_periods_per_fiscal_yr ='||to_number(v_periods_per_fiscal_yr));
2673: hr_utility.trace('v_annualizing_factor ='||to_number(v_annualizing_factor));
2674:
2675: ELSE
2676:
2669:
2670: v_annualizing_factor := v_hrs_per_range * v_periods_per_fiscal_yr;
2671: hr_utility.trace('v_hrs_per_range ='||to_number(v_hrs_per_range));
2672: hr_utility.trace('v_periods_per_fiscal_yr ='||to_number(v_periods_per_fiscal_yr));
2673: hr_utility.trace('v_annualizing_factor ='||to_number(v_annualizing_factor));
2674:
2675: ELSE
2676:
2677: hr_utility.trace('v_period_hours = FALSE');
2673: hr_utility.trace('v_annualizing_factor ='||to_number(v_annualizing_factor));
2674:
2675: ELSE
2676:
2677: hr_utility.trace('v_period_hours = FALSE');
2678:
2679: v_annualizing_factor := v_hrs_per_range * c_weeks_per_year;
2680:
2681: hr_utility.trace('v_hrs_per_range ='||to_number(v_hrs_per_range));
2677: hr_utility.trace('v_period_hours = FALSE');
2678:
2679: v_annualizing_factor := v_hrs_per_range * c_weeks_per_year;
2680:
2681: hr_utility.trace('v_hrs_per_range ='||to_number(v_hrs_per_range));
2682: hr_utility.trace('c_weeks_per_year ='||to_number(c_weeks_per_year));
2683: hr_utility.trace('v_annualizing_factor ='||to_number(v_annualizing_factor));
2684:
2685: END IF;
2678:
2679: v_annualizing_factor := v_hrs_per_range * c_weeks_per_year;
2680:
2681: hr_utility.trace('v_hrs_per_range ='||to_number(v_hrs_per_range));
2682: hr_utility.trace('c_weeks_per_year ='||to_number(c_weeks_per_year));
2683: hr_utility.trace('v_annualizing_factor ='||to_number(v_annualizing_factor));
2684:
2685: END IF;
2686:
2679: v_annualizing_factor := v_hrs_per_range * c_weeks_per_year;
2680:
2681: hr_utility.trace('v_hrs_per_range ='||to_number(v_hrs_per_range));
2682: hr_utility.trace('c_weeks_per_year ='||to_number(c_weeks_per_year));
2683: hr_utility.trace('v_annualizing_factor ='||to_number(v_annualizing_factor));
2684:
2685: END IF;
2686:
2687: END IF;
2688:
2689: END IF; -- (v_use_pay_basis = 0)
2690:
2691:
2692: hr_utility.trace(' Getting out of Get_Annualizing_Factor for '||v_pay_basis);
2693: RETURN v_annualizing_factor;
2694:
2695: END Get_Annualizing_Factor;
2696:
2697:
2698: BEGIN -- Convert Figure
2699: --begin_convert_period_type
2700:
2701: --hr_utility.trace_on(null,'UDFS');
2702:
2703: hr_utility.trace('UDFS Entered Convert_Period_Type');
2704:
2705: hr_utility.trace(' p_bus_grp_id: '|| p_bus_grp_id);
2699: --begin_convert_period_type
2700:
2701: --hr_utility.trace_on(null,'UDFS');
2702:
2703: hr_utility.trace('UDFS Entered Convert_Period_Type');
2704:
2705: hr_utility.trace(' p_bus_grp_id: '|| p_bus_grp_id);
2706: hr_utility.trace(' p_payroll_id: '||p_payroll_id);
2707: hr_utility.trace(' p_asst_work_schedule: '||p_asst_work_schedule);
2701: --hr_utility.trace_on(null,'UDFS');
2702:
2703: hr_utility.trace('UDFS Entered Convert_Period_Type');
2704:
2705: hr_utility.trace(' p_bus_grp_id: '|| p_bus_grp_id);
2706: hr_utility.trace(' p_payroll_id: '||p_payroll_id);
2707: hr_utility.trace(' p_asst_work_schedule: '||p_asst_work_schedule);
2708: hr_utility.trace(' p_asst_std_hours: '||p_asst_std_hours);
2709: hr_utility.trace(' p_figure: '||p_figure);
2702:
2703: hr_utility.trace('UDFS Entered Convert_Period_Type');
2704:
2705: hr_utility.trace(' p_bus_grp_id: '|| p_bus_grp_id);
2706: hr_utility.trace(' p_payroll_id: '||p_payroll_id);
2707: hr_utility.trace(' p_asst_work_schedule: '||p_asst_work_schedule);
2708: hr_utility.trace(' p_asst_std_hours: '||p_asst_std_hours);
2709: hr_utility.trace(' p_figure: '||p_figure);
2710: hr_utility.trace(' p_from_freq : '||p_from_freq);
2703: hr_utility.trace('UDFS Entered Convert_Period_Type');
2704:
2705: hr_utility.trace(' p_bus_grp_id: '|| p_bus_grp_id);
2706: hr_utility.trace(' p_payroll_id: '||p_payroll_id);
2707: hr_utility.trace(' p_asst_work_schedule: '||p_asst_work_schedule);
2708: hr_utility.trace(' p_asst_std_hours: '||p_asst_std_hours);
2709: hr_utility.trace(' p_figure: '||p_figure);
2710: hr_utility.trace(' p_from_freq : '||p_from_freq);
2711: hr_utility.trace(' p_to_freq: '||p_to_freq);
2704:
2705: hr_utility.trace(' p_bus_grp_id: '|| p_bus_grp_id);
2706: hr_utility.trace(' p_payroll_id: '||p_payroll_id);
2707: hr_utility.trace(' p_asst_work_schedule: '||p_asst_work_schedule);
2708: hr_utility.trace(' p_asst_std_hours: '||p_asst_std_hours);
2709: hr_utility.trace(' p_figure: '||p_figure);
2710: hr_utility.trace(' p_from_freq : '||p_from_freq);
2711: hr_utility.trace(' p_to_freq: '||p_to_freq);
2712: hr_utility.trace(' p_period_start_date: '||to_char(p_period_start_date));
2705: hr_utility.trace(' p_bus_grp_id: '|| p_bus_grp_id);
2706: hr_utility.trace(' p_payroll_id: '||p_payroll_id);
2707: hr_utility.trace(' p_asst_work_schedule: '||p_asst_work_schedule);
2708: hr_utility.trace(' p_asst_std_hours: '||p_asst_std_hours);
2709: hr_utility.trace(' p_figure: '||p_figure);
2710: hr_utility.trace(' p_from_freq : '||p_from_freq);
2711: hr_utility.trace(' p_to_freq: '||p_to_freq);
2712: hr_utility.trace(' p_period_start_date: '||to_char(p_period_start_date));
2713:
2706: hr_utility.trace(' p_payroll_id: '||p_payroll_id);
2707: hr_utility.trace(' p_asst_work_schedule: '||p_asst_work_schedule);
2708: hr_utility.trace(' p_asst_std_hours: '||p_asst_std_hours);
2709: hr_utility.trace(' p_figure: '||p_figure);
2710: hr_utility.trace(' p_from_freq : '||p_from_freq);
2711: hr_utility.trace(' p_to_freq: '||p_to_freq);
2712: hr_utility.trace(' p_period_start_date: '||to_char(p_period_start_date));
2713:
2714: hr_utility.trace(' p_period_end_date: '||to_char(p_period_end_date));
2707: hr_utility.trace(' p_asst_work_schedule: '||p_asst_work_schedule);
2708: hr_utility.trace(' p_asst_std_hours: '||p_asst_std_hours);
2709: hr_utility.trace(' p_figure: '||p_figure);
2710: hr_utility.trace(' p_from_freq : '||p_from_freq);
2711: hr_utility.trace(' p_to_freq: '||p_to_freq);
2712: hr_utility.trace(' p_period_start_date: '||to_char(p_period_start_date));
2713:
2714: hr_utility.trace(' p_period_end_date: '||to_char(p_period_end_date));
2715: hr_utility.trace(' p_asst_std_freq: '||p_asst_std_freq);
2708: hr_utility.trace(' p_asst_std_hours: '||p_asst_std_hours);
2709: hr_utility.trace(' p_figure: '||p_figure);
2710: hr_utility.trace(' p_from_freq : '||p_from_freq);
2711: hr_utility.trace(' p_to_freq: '||p_to_freq);
2712: hr_utility.trace(' p_period_start_date: '||to_char(p_period_start_date));
2713:
2714: hr_utility.trace(' p_period_end_date: '||to_char(p_period_end_date));
2715: hr_utility.trace(' p_asst_std_freq: '||p_asst_std_freq);
2716:
2710: hr_utility.trace(' p_from_freq : '||p_from_freq);
2711: hr_utility.trace(' p_to_freq: '||p_to_freq);
2712: hr_utility.trace(' p_period_start_date: '||to_char(p_period_start_date));
2713:
2714: hr_utility.trace(' p_period_end_date: '||to_char(p_period_end_date));
2715: hr_utility.trace(' p_asst_std_freq: '||p_asst_std_freq);
2716:
2717:
2718: --
2711: hr_utility.trace(' p_to_freq: '||p_to_freq);
2712: hr_utility.trace(' p_period_start_date: '||to_char(p_period_start_date));
2713:
2714: hr_utility.trace(' p_period_end_date: '||to_char(p_period_end_date));
2715: hr_utility.trace(' p_asst_std_freq: '||p_asst_std_freq);
2716:
2717:
2718: --
2719: -- If From_Freq and To_Freq are the same, then we're done.
2723:
2724: RETURN p_figure;
2725:
2726: END IF;
2727: hr_utility.trace('Calling Get_Annualizing_Factor for FROM case');
2728: v_from_annualizing_factor := Get_Annualizing_Factor(
2729: p_bg => p_bus_grp_id,
2730: p_payroll => p_payroll_id,
2731: p_freq => p_from_freq,
2732: p_asg_work_sched => p_asst_work_schedule,
2733: p_asg_std_hrs => p_asst_std_hours,
2734: p_asg_std_freq => p_asst_std_freq);
2735:
2736: hr_utility.trace('Calling Get_Annualizing_Factor for TO case');
2737:
2738: v_to_annualizing_factor := Get_Annualizing_Factor(
2739: p_bg => p_bus_grp_id,
2740: p_payroll => p_payroll_id,
2745:
2746: --
2747: -- Annualize "Figure" and convert to To_Freq.
2748: --
2749: hr_utility.trace('v_from_annualizing_factor ='||to_char(v_from_annualizing_factor));
2750: hr_utility.trace('v_to_annualizing_factor ='||to_char(v_to_annualizing_factor));
2751:
2752: IF v_to_annualizing_factor = 0 OR
2753: v_to_annualizing_factor = -999 OR
2746: --
2747: -- Annualize "Figure" and convert to To_Freq.
2748: --
2749: hr_utility.trace('v_from_annualizing_factor ='||to_char(v_from_annualizing_factor));
2750: hr_utility.trace('v_to_annualizing_factor ='||to_char(v_to_annualizing_factor));
2751:
2752: IF v_to_annualizing_factor = 0 OR
2753: v_to_annualizing_factor = -999 OR
2754: v_from_annualizing_factor = -999 THEN
2752: IF v_to_annualizing_factor = 0 OR
2753: v_to_annualizing_factor = -999 OR
2754: v_from_annualizing_factor = -999 THEN
2755:
2756: hr_utility.trace(' v_to_ann =0 or -999 or v_from = -999');
2757:
2758: v_converted_figure := 0;
2759: RETURN v_converted_figure;
2760:
2759: RETURN v_converted_figure;
2760:
2761: ELSE
2762:
2763: hr_utility.trace(' v_to_ann NOT 0 or -999 or v_from = -999');
2764:
2765: hr_utility.trace('p_figure Monthly Salary = '||p_figure);
2766: hr_utility.trace('v_from_annualizing_factor = '||v_from_annualizing_factor);
2767: hr_utility.trace('v_to_annualizing_factor = '||v_to_annualizing_factor);
2761: ELSE
2762:
2763: hr_utility.trace(' v_to_ann NOT 0 or -999 or v_from = -999');
2764:
2765: hr_utility.trace('p_figure Monthly Salary = '||p_figure);
2766: hr_utility.trace('v_from_annualizing_factor = '||v_from_annualizing_factor);
2767: hr_utility.trace('v_to_annualizing_factor = '||v_to_annualizing_factor);
2768:
2769: v_converted_figure := (p_figure * v_from_annualizing_factor) / v_to_annualizing_factor;
2762:
2763: hr_utility.trace(' v_to_ann NOT 0 or -999 or v_from = -999');
2764:
2765: hr_utility.trace('p_figure Monthly Salary = '||p_figure);
2766: hr_utility.trace('v_from_annualizing_factor = '||v_from_annualizing_factor);
2767: hr_utility.trace('v_to_annualizing_factor = '||v_to_annualizing_factor);
2768:
2769: v_converted_figure := (p_figure * v_from_annualizing_factor) / v_to_annualizing_factor;
2770: hr_utility.trace('conv figure is monthly_sal * ann_from div by ann to');
2763: hr_utility.trace(' v_to_ann NOT 0 or -999 or v_from = -999');
2764:
2765: hr_utility.trace('p_figure Monthly Salary = '||p_figure);
2766: hr_utility.trace('v_from_annualizing_factor = '||v_from_annualizing_factor);
2767: hr_utility.trace('v_to_annualizing_factor = '||v_to_annualizing_factor);
2768:
2769: v_converted_figure := (p_figure * v_from_annualizing_factor) / v_to_annualizing_factor;
2770: hr_utility.trace('conv figure is monthly_sal * ann_from div by ann to');
2771:
2766: hr_utility.trace('v_from_annualizing_factor = '||v_from_annualizing_factor);
2767: hr_utility.trace('v_to_annualizing_factor = '||v_to_annualizing_factor);
2768:
2769: v_converted_figure := (p_figure * v_from_annualizing_factor) / v_to_annualizing_factor;
2770: hr_utility.trace('conv figure is monthly_sal * ann_from div by ann to');
2771:
2772: hr_utility.trace('UDFS v_converted_figure := '||v_converted_figure);
2773:
2774: END IF;
2768:
2769: v_converted_figure := (p_figure * v_from_annualizing_factor) / v_to_annualizing_factor;
2770: hr_utility.trace('conv figure is monthly_sal * ann_from div by ann to');
2771:
2772: hr_utility.trace('UDFS v_converted_figure := '||v_converted_figure);
2773:
2774: END IF;
2775:
2776: -- Done
2896: -- Check for valid range
2897: IF v_range_start > v_range_end THEN
2898: --
2899: RETURN v_total_hours;
2900: -- hr_utility.set_message(801,'PAY_xxxx_INVALID_DATE_RANGE');
2901: -- hr_utility.raise_error;
2902: --
2903: END IF;
2904: --
2897: IF v_range_start > v_range_end THEN
2898: --
2899: RETURN v_total_hours;
2900: -- hr_utility.set_message(801,'PAY_xxxx_INVALID_DATE_RANGE');
2901: -- hr_utility.raise_error;
2902: --
2903: END IF;
2904: --
2905: -- Get_Table_Value requires row in FND_SESSIONS. We must insert this
3002: -- Get formula context values: bg, payroll, asst ids; date earned.
3003: --
3004: -- ...
3005: --
3006: hr_utility.trace('UDFS Entered chained_element_exists');
3007:
3008: SELECT DECODE(COUNT(0), 0, 'N', 'Y')
3009: INTO v_ele_exists
3010: FROM PAY_ELEMENT_ENTRIES_F ELE,
3018: AND ELI.element_type_id = ELT.element_type_id
3019: AND NVL(ELT.business_group_id, p_bg_id) = p_bg_id
3020: AND UPPER(ELT.element_name) = UPPER(p_ele_name);
3021:
3022: hr_utility.trace('UDFS Leaving chained_element_exists');
3023: RETURN v_ele_exists;
3024:
3025: END chained_element_exists;
3026:
3115: --
3116: RETURN v_proc_run_type;
3117: --
3118: exception when NO_DATA_FOUND then
3119: hr_utility.set_location('get_process_run_flag', 30);
3120: RETURN v_proc_run_type;
3121: end;
3122: --
3123: END get_process_run_flag;
3144:
3145: -- Check that
3146: -- This DDF info is held in ELEMENT_INFORMATION3.
3147:
3148: hr_utility.set_location('check_dedn_freq', 10);
3149:
3150: begin
3151: SELECT element_information3
3152: INTO v_proc_run_type
3171: p_date_earned,
3172: p_ele_type_id,
3173: v_skip_element);
3174:
3175: hr_utility.set_location('check_dedn_freq', 45);
3176:
3177: RETURN v_skip_element;
3178:
3179: END check_dedn_freq;
3212: /* Init */
3213: v_skip_element := 'N';
3214: --
3215:
3216: hr_utility.set_location('Separate_Check_Skip', 7);
3217:
3218: SELECT RRV.result_value
3219: INTO v_dedn_proc
3220: FROM pay_run_result_values RRV,
3237: --
3238:
3239: v_skip_element := 'Y';
3240:
3241: hr_utility.set_location('Separate_Check_Skip', 9);
3242:
3243: begin
3244:
3245: SELECT ECL.classification_name
3257: -- Change v_skip_element back to 'N' if this a tax deduction.
3258: -- ie. we know DEDN PROC inpval is not null, meaning it's either TAX ONLY
3259: -- or PRETAX AND TAX ONLY.
3260:
3261: hr_utility.set_location('Separate_Check_Skip', 10);
3262: v_skip_element := 'N';
3263: RETURN v_skip_element;
3264:
3265: ELSIF UPPER(v_ele_class_name) = 'PRE-TAX DEDUCTIONS' AND
3266: v_dedn_proc = 'PTT' THEN
3267:
3268: -- Change v_skip_element back to 'N' if dedn proc = 'PTT'
3269:
3270: hr_utility.set_location('Separate_Check_Skip', 11);
3271: v_skip_element := 'N';
3272: RETURN v_skip_element;
3273:
3274: END IF;
3273:
3274: END IF;
3275:
3276: exception WHEN NO_DATA_FOUND THEN
3277: hr_utility.set_location('Separate_Check_Skip - Error EleClass NOTFOUND', 12);
3278: v_skip_element := 'Y';
3279: -- hr_utility.set_message(801, 'PAY_ELE_CLASS_NOTFOUND');
3280: -- hr_utility.raise_error;
3281: end;
3275:
3276: exception WHEN NO_DATA_FOUND THEN
3277: hr_utility.set_location('Separate_Check_Skip - Error EleClass NOTFOUND', 12);
3278: v_skip_element := 'Y';
3279: -- hr_utility.set_message(801, 'PAY_ELE_CLASS_NOTFOUND');
3280: -- hr_utility.raise_error;
3281: end;
3282:
3283: RETURN v_skip_element;
3276: exception WHEN NO_DATA_FOUND THEN
3277: hr_utility.set_location('Separate_Check_Skip - Error EleClass NOTFOUND', 12);
3278: v_skip_element := 'Y';
3279: -- hr_utility.set_message(801, 'PAY_ELE_CLASS_NOTFOUND');
3280: -- hr_utility.raise_error;
3281: end;
3282:
3283: RETURN v_skip_element;
3284:
3283: RETURN v_skip_element;
3284:
3285: EXCEPTION
3286: WHEN NO_DATA_FOUND THEN
3287: hr_utility.set_location('Separate_Check_Skip', 21);
3288: RETURN v_skip_element;
3289: -- Special Dedn Proc not required. SKIP_FLAG = 'N'.
3290: --
3291: END Separate_Check_Skip;
3312: /* Init */
3313: sepcheck_flag :='N';
3314:
3315:
3316: hr_utility.set_location('Other_Non_Separate_Check', 10);
3317:
3318: SELECT DECODE(COUNT(IPV.input_value_id), 0, 'N', 'Y')
3319: INTO sepcheck_flag
3320: FROM pay_element_entry_values_f EEV,
3330: AND EEV.input_value_id = IPV.input_value_id
3331: AND UPPER(IPV.name) = 'SEPARATE CHECK';
3332: --
3333: IF sepcheck_flag = 'Y' THEN
3334: hr_utility.set_location('Other_Non_Separate_Check', 15);
3335: RETURN sepcheck_flag;
3336: END IF;
3337: --
3338: hr_utility.set_location('Other_Non_Separate_Check', 20);
3334: hr_utility.set_location('Other_Non_Separate_Check', 15);
3335: RETURN sepcheck_flag;
3336: END IF;
3337: --
3338: hr_utility.set_location('Other_Non_Separate_Check', 20);
3339:
3340: SELECT DECODE(COUNT(ELE.element_entry_id), 0, 'N', 'Y')
3341: INTO sepcheck_flag
3342: FROM pay_element_entries_f ELE,
3370:
3371: --
3372: EXCEPTION
3373: WHEN NO_DATA_FOUND THEN
3374: hr_utility.set_location('Other_Non_Separate_Check', 30);
3375: RETURN sepcheck_flag;
3376: --
3377: END Other_Non_Separate_Check;
3378: --
3672: -- Remember to check for a rate via Rate Code!
3673: --
3674: -- Go ahead and set pay_basis_rate now - will most likely be used somewhere.
3675: --
3676: hr_utility.set_location('OT_Base_Rate', 5);
3677:
3678: select start_date,
3679: end_date
3680: into v_range_start,
3697: --
3698: OPEN get_tew_rate;
3699: --
3700: LOOP
3701: hr_utility.set_location('OT_Base_Rate', 10);
3702: FETCH get_tew_rate
3703: INTO v_tew_rate, v_entry_id;
3704: EXIT WHEN get_tew_rate%NOTFOUND;
3705: --
3706: v_tew_count := v_tew_count + 1;
3707: IF v_tew_rate <> 0 THEN
3708: v_tew_total_rate := v_tew_total_rate + v_tew_rate;
3709: ELSE -- no Rate entered, check Rate Code
3710: hr_utility.set_location('OT_Base_Rate', 15);
3711: SELECT /*+ ORDERED */ NVL(EEV.screen_entry_value, 'NOT ENTERED')
3712: INTO v_tew_rcode
3713: FROM pay_element_entries_f ELE,
3714: pay_element_entry_values_f EEV,
3735: -- Use pay basis salary converted to hourly rate.
3736: v_tew_total_rate := v_tew_total_rate + v_pay_basis_rate;
3737: ELSE
3738: -- Find rate from rate table.
3739: hr_utility.set_location('OT_Base_Rate', 17);
3740: v_tew_total_rate := v_tew_total_rate +
3741: FND_NUMBER.CANONICAL_TO_NUMBER(hruserdt.get_table_value(
3742: p_bg_id,
3743: c_rate_table_name,
3751: --
3752: CLOSE get_tew_rate;
3753: --
3754: IF v_tew_count = 0 THEN -- ie. only use "Regular" rates if TEW not entered.
3755: hr_utility.set_location('OT_Base_Rate', 20);
3756: SELECT /*+ ORDERED */ COUNT(IPV.input_value_id)
3757: INTO v_use_regwage
3758: FROM pay_element_entries_f ELE,
3759: pay_element_entry_values_f EEV,
3777: AND IPV.name = 'Rate';
3778:
3779: --
3780: IF v_use_regwage <> 0 THEN
3781: hr_utility.set_location('OT_Base_Rate', 30);
3782: SELECT /*+ ORDERED */ NVL(fnd_number.canonical_to_number(EEV.screen_entry_value), 0),
3783: EEV.element_entry_id
3784: INTO v_regwage_rate,
3785: v_entry_id
3805: AND IPV.legislation_code = ELT.legislation_code;
3806:
3807: --
3808: IF v_regwage_rate = 0 THEN
3809: hr_utility.set_location('OT_Base_Rate', 40);
3810: SELECT /*+ ORDERED */ NVL(EEV.screen_entry_value, 'NOT ENTERED')
3811: INTO v_regwage_rcode
3812: FROM pay_element_entries_f ELE,
3813: pay_element_entry_values_f EEV,
3831: AND IPV.business_group_id = ELT.business_group_id
3832: AND IPV.legislation_code = ELT.legislation_code;
3833:
3834: --
3835: hr_utility.set_location('OT_Base_Rate', 41);
3836: v_regwage_rate := FND_NUMBER.CANONICAL_TO_NUMBER(hruserdt.get_table_value(
3837: p_bus_group_id => p_bg_id,
3838: p_table_name => c_rate_table_name,
3839: p_col_name => c_rate_table_column,
3841: END IF;
3842: v_ot_base_rate := v_ot_base_rate + v_regwage_rate;
3843: --
3844: ELSE
3845: hr_utility.set_location('OT_Base_Rate', 50);
3846: SELECT /*+ ORDERED */ COUNT(IPV.input_value_id)
3847: INTO v_use_regsal
3848: FROM pay_element_entries_f ELE,
3849: pay_element_entry_values_f EEV,
3867: AND IPV.legislation_code = ELT.legislation_code;
3868:
3869: --
3870: IF v_use_regsal <> 0 THEN
3871: hr_utility.set_location('OT_Base_Rate', 51);
3872: SELECT /*+ ORDERED */ NVL(fnd_number.canonical_to_number(EEV.screen_entry_value), 0)
3873: INTO v_regsal_mosal
3874: FROM pay_element_entries_f ELE,
3875: pay_element_entry_values_f EEV,
3892: AND IPV.business_group_id = ELT.business_group_id
3893: AND IPV.legislation_code = ELT.legislation_code;
3894:
3895: --
3896: hr_utility.set_location('OT_Base_Rate', 60);
3897:
3898: v_regsal_rate := hr_us_ff_udfs.Convert_Period_Type(
3899: p_bus_grp_id => p_bg_id,
3900: p_payroll_id => p_pay_id,
3921: --
3922: OPEN get_include_in_ot;
3923: LOOP
3924: --
3925: hr_utility.set_location('OT_Base_Rate', 70);
3926: FETCH get_include_in_ot
3927: INTO v_eletype_id,
3928: v_ele_name,
3929: v_ff_name;
3930: EXIT WHEN get_include_in_ot%NOTFOUND;
3931: --
3932: IF SUBSTR(v_ff_name,1,11) = 'FLAT_AMOUNT' THEN
3933: -- Find "Amount" entered, convert to hourly figure.
3934: hr_utility.set_location('OT_Base_Rate', 80);
3935: OPEN get_flat_amounts;
3936: LOOP
3937: FETCH get_flat_amounts
3938: INTO v_flat_amount;
3937: FETCH get_flat_amounts
3938: INTO v_flat_amount;
3939: EXIT WHEN get_flat_amounts%NOTFOUND;
3940: v_flat_count := v_flat_count + 1;
3941: hr_utility.set_location('OT_Base_Rate', 90);
3942:
3943: v_flat_total := v_flat_total + hr_us_ff_udfs.Convert_Period_Type(
3944: p_bus_grp_id => p_bg_id,
3945: p_payroll_id => p_pay_id,
3954: --
3955: END LOOP;
3956: CLOSE get_flat_amounts;
3957: --
3958: hr_utility.set_location('OT_Base_Rate', 100);
3959: v_ot_base_rate := v_ot_base_rate + (v_flat_total / v_flat_count);
3960: --
3961: ELSIF SUBSTR(v_ff_name,1,10) = 'PERCENTAGE' THEN
3962: hr_utility.set_location('OT_Base_Rate', 110);
3958: hr_utility.set_location('OT_Base_Rate', 100);
3959: v_ot_base_rate := v_ot_base_rate + (v_flat_total / v_flat_count);
3960: --
3961: ELSIF SUBSTR(v_ff_name,1,10) = 'PERCENTAGE' THEN
3962: hr_utility.set_location('OT_Base_Rate', 110);
3963: OPEN get_percentages;
3964: LOOP
3965: FETCH get_percentages
3966: INTO v_percentage;
3967: EXIT WHEN get_percentages%NOTFOUND;
3968: v_pct_count := v_pct_count + 1;
3969: --
3970: IF v_regsal_rate <> 0 THEN
3971: hr_utility.set_location('OT_Base_Rate', 105);
3972: v_pct_total := v_percentage * v_regsal_rate;
3973: END IF;
3974: --
3975: END LOOP;
3975: END LOOP;
3976: --
3977: CLOSE get_percentages;
3978: --
3979: hr_utility.set_location('OT_Base_Rate', 110);
3980: v_ot_base_rate := v_ot_base_rate + (v_pct_total / v_pct_count);
3981: --
3982: ELSIF SUBSTR(v_ff_name,1,12) = 'HOURS_X_RATE' THEN
3983: --
3982: ELSIF SUBSTR(v_ff_name,1,12) = 'HOURS_X_RATE' THEN
3983: --
3984: -- Remember to look for "Rate Code" if necessary and "Multiple" always.
3985: --
3986: hr_utility.set_location('OT_Base_Rate', 115);
3987: OPEN get_rates;
3988: LOOP
3989: FETCH get_rates
3990: INTO v_rate, v_entry_id;
3988: LOOP
3989: FETCH get_rates
3990: INTO v_rate, v_entry_id;
3991: EXIT WHEN get_rates%NOTFOUND;
3992: hr_utility.set_location('OT_Base_Rate', 120);
3993: v_rate_count := v_rate_count + 1;
3994: IF v_rate = 0 THEN
3995: hr_utility.set_location('OT_Base_Rate', 125);
3996: SELECT NVL(EEV.screen_entry_value, 'NOT ENTERED')
3991: EXIT WHEN get_rates%NOTFOUND;
3992: hr_utility.set_location('OT_Base_Rate', 120);
3993: v_rate_count := v_rate_count + 1;
3994: IF v_rate = 0 THEN
3995: hr_utility.set_location('OT_Base_Rate', 125);
3996: SELECT NVL(EEV.screen_entry_value, 'NOT ENTERED')
3997: INTO v_rate_rcode
3998: FROM pay_element_entry_values_f EEV,
3999: pay_element_entries_f ELE,
4009: AND ELT.element_type_id = IPV.element_type_id
4010: AND UPPER(IPV.name) = 'RATE CODE';
4011: --
4012: IF v_rate_rcode <> 'NOT ENTERED' THEN
4013: hr_utility.set_location('OT_Base_Rate', 130);
4014: v_rate := FND_NUMBER.CANONICAL_TO_NUMBER(hruserdt.get_table_value(
4015: p_bg_id,
4016: c_rate_table_name,
4017: c_rate_table_column,
4020: --
4021: END IF;
4022: -- Now get "Multiple" on this entry, if any.
4023: IF v_rate <> 0 THEN
4024: hr_utility.set_location('OT_Base_Rate', 135);
4025: SELECT COUNT(0)
4026: INTO v_rate_mult_count
4027: FROM pay_element_entry_values_f EEV,
4028: pay_element_entries_f ELE,
4038: AND ELT.element_type_id = IPV.element_type_id
4039: AND UPPER(IPV.name) = 'MULTIPLE';
4040: --
4041: IF v_rate_mult_count <> 0 THEN
4042: hr_utility.set_location('OT_Base_Rate', 140);
4043: SELECT NVL(fnd_number.canonical_to_number(EEV.screen_entry_value), 0)
4044: INTO v_rate_multiple
4045: FROM pay_element_entry_values_f EEV,
4046: pay_element_entries_f ELE,
4071: --
4072: v_ot_base_rate := v_ot_base_rate + (v_rate_total / v_rate_count);
4073: --
4074: ELSIF SUBSTR(v_ff_name,1,8) = 'GROSS_UP' THEN
4075: hr_utility.set_location('OT_Base_Rate', 150);
4076: OPEN get_grosses;
4077: LOOP
4078: FETCH get_grosses
4079: INTO v_gross_results;
4080: EXIT WHEN get_grosses%NOTFOUND;
4081: v_gross_count := v_gross_count + 1;
4082: IF v_gross_results <> 0 THEN
4083: -- Convert gross result to hourly figure.
4084: hr_utility.set_location('OT_Base_Rate', 160);
4085:
4086: v_gross_total := v_gross_total + hr_us_ff_udfs.Convert_Period_Type(
4087: p_bus_grp_id => p_bg_id,
4088: p_payroll_id => p_pay_id,
4111: RETURN v_ot_base_rate;
4112: --
4113: EXCEPTION
4114: WHEN NO_DATA_FOUND THEN
4115: hr_utility.set_location('OT_Base_Rate', 170);
4116: RETURN v_ot_base_rate;
4117: -- hr_utility.set_message(801, 'PAY_SCL_SEG_NOTFOUND');
4118: -- hr_utility.raise_error;
4119: --
4113: EXCEPTION
4114: WHEN NO_DATA_FOUND THEN
4115: hr_utility.set_location('OT_Base_Rate', 170);
4116: RETURN v_ot_base_rate;
4117: -- hr_utility.set_message(801, 'PAY_SCL_SEG_NOTFOUND');
4118: -- hr_utility.raise_error;
4119: --
4120: END OT_Base_Rate;
4121: --
4114: WHEN NO_DATA_FOUND THEN
4115: hr_utility.set_location('OT_Base_Rate', 170);
4116: RETURN v_ot_base_rate;
4117: -- hr_utility.set_message(801, 'PAY_SCL_SEG_NOTFOUND');
4118: -- hr_utility.raise_error;
4119: --
4120: END OT_Base_Rate;
4121: --
4122: /*
4227: c_months_per_fy := 12;
4228: c_years_per_fy := 1;
4229:
4230:
4231: hr_utility.set_location('Dedn_Freq_Factor', 10);
4232: SELECT DECODE(COUNT(FRP.freq_rule_period_id), 0, 'N', 'Y')
4233: INTO v_freq_rules_exist
4234: FROM pay_freq_rule_periods FRP,
4235: pay_ele_payroll_freq_rules EPF
4248: v_dedn_freq_factor := 1;
4249: --
4250: ELSIF p_ele_period_type = 'NOT ENTERED' AND v_freq_rules_exist = 'Y' THEN
4251: --
4252: hr_utility.set_location('Dedn_Freq_Factor', 15);
4253: SELECT TPT.number_per_fiscal_year
4254: INTO v_pay_period_num_per_fy
4255: FROM pay_payrolls_f PPF,
4256: per_time_period_types TPT
4262: IF v_pay_period_num_per_fy >= 12 THEN
4263: IF v_pay_period_num_per_fy = 12 THEN
4264: v_dedn_freq_factor := 1;
4265: ELSE
4266: hr_utility.set_location('Dedn_Freq_Factor', 20);
4267: SELECT COUNT(0)
4268: INTO v_pay_periods_in_month
4269: FROM per_time_periods PTP
4270: WHERE PTP.end_date
4270: WHERE PTP.end_date
4271: BETWEEN TRUNC(p_date_earned, 'MONTH')
4272: AND LAST_DAY(p_date_earned)
4273: AND PTP.payroll_id = p_payroll_id;
4274: hr_utility.set_location('v_pay_periods_in_month', v_pay_periods_in_month);
4275: --
4276: -- Frequency rules exist, so this select should never return 0.
4277: -- Just in case, we'll decode for 0 and set v_pay_periods_in_reset to 1.
4278: -- ie. so v_dedn_freq_factor will also equal 1.
4276: -- Frequency rules exist, so this select should never return 0.
4277: -- Just in case, we'll decode for 0 and set v_pay_periods_in_reset to 1.
4278: -- ie. so v_dedn_freq_factor will also equal 1.
4279: --
4280: hr_utility.set_location('Dedn_Freq_Factor', 25);
4281: SELECT DECODE(COUNT(0), 0, 1, COUNT(0))
4282: INTO v_pay_periods_in_reset
4283: FROM pay_ele_payroll_freq_rules EPF,
4284: pay_freq_rule_periods FRP
4286: AND FRP.ele_payroll_freq_rule_id = EPF.ele_payroll_freq_rule_id
4287: AND EPF.payroll_id = p_payroll_id
4288: AND EPF.element_type_id = p_element_type_id;
4289: --
4290: hr_utility.set_location('v_pay_periods_in_reset = ', v_pay_periods_in_reset);
4291: v_dedn_freq_factor := 1 / v_pay_periods_in_reset;
4292: --
4293: END IF;
4294: ELSE
4291: v_dedn_freq_factor := 1 / v_pay_periods_in_reset;
4292: --
4293: END IF;
4294: ELSE
4295: hr_utility.set_location('Dedn_Freq_Factor', 30);
4296: SELECT COUNT(0)
4297: INTO v_pay_periods_in_year
4298: FROM per_time_periods PTP
4299: WHERE PTP.end_date
4304: -- Frequency rules exist, so this select should never return 0.
4305: -- Just in case, we'll decode for 0 and set v_pay_periods_in_reset to 1.
4306: -- ie. so v_dedn_freq_factor will also equal 1.
4307: --
4308: hr_utility.set_location('Dedn_Freq_Factor', 35);
4309: SELECT DECODE(COUNT(0), 0, 1, COUNT(0))
4310: INTO v_pay_periods_in_reset
4311: FROM pay_ele_payroll_freq_rules EPF,
4312: pay_freq_rule_periods FRP
4314: AND FRP.ele_payroll_freq_rule_id = EPF.ele_payroll_freq_rule_id
4315: AND EPF.payroll_id = p_payroll_id
4316: AND EPF.element_type_id = p_element_type_id;
4317: --
4318: hr_utility.set_location('v_pay_periods_in_reset = ', v_pay_periods_in_reset);
4319: v_dedn_freq_factor := 1 / v_pay_periods_in_reset;
4320: --
4321: END IF;
4322: --
4321: END IF;
4322: --
4323: ELSIF p_ele_period_type <> 'NOT ENTERED' AND v_freq_rules_exist = 'N' THEN
4324: --
4325: hr_utility.set_location('Dedn_Freq_Factor', 40);
4326: SELECT number_per_fiscal_year
4327: INTO v_ele_period_num_per_fy
4328: FROM per_time_period_types TPT
4329: WHERE UPPER(period_type) = UPPER(p_ele_period_type);
4327: INTO v_ele_period_num_per_fy
4328: FROM per_time_period_types TPT
4329: WHERE UPPER(period_type) = UPPER(p_ele_period_type);
4330: --
4331: hr_utility.set_location('Dedn_Freq_Factor', 45);
4332: SELECT TPT.number_per_fiscal_year
4333: INTO v_pay_period_num_per_fy
4334: FROM per_time_period_types TPT,
4335: pay_payrolls_f PPF
4341: v_dedn_freq_factor := v_ele_period_num_per_fy / v_pay_period_num_per_fy;
4342: --
4343: ELSIF p_ele_period_type <> 'NOT ENTERED' AND v_freq_rules_exist = 'Y' THEN
4344: --
4345: hr_utility.set_location('Dedn_Freq_Factor', 50);
4346: SELECT number_per_fiscal_year
4347: INTO v_ele_period_num_per_fy
4348: FROM per_time_period_types TPT
4349: WHERE UPPER(period_type) = UPPER(p_ele_period_type);
4347: INTO v_ele_period_num_per_fy
4348: FROM per_time_period_types TPT
4349: WHERE UPPER(period_type) = UPPER(p_ele_period_type);
4350: --
4351: hr_utility.set_location('Dedn_Freq_Factor', 55);
4352: SELECT TPT.number_per_fiscal_year
4353: INTO v_pay_period_num_per_fy
4354: FROM pay_payrolls_f PPF,
4355: per_time_period_types TPT
4358: AND p_date_earned BETWEEN PPF.effective_start_date
4359: AND PPF.effective_end_date;
4360: --
4361: IF v_pay_period_num_per_fy >= 12 THEN
4362: hr_utility.set_location('Dedn_Freq_Factor', 60);
4363: SELECT COUNT(0)
4364: INTO v_pay_periods_in_month
4365: FROM per_time_periods PTP
4366: WHERE PTP.end_date
4371: -- Frequency rules exist, so this select should never return 0.
4372: -- Just in case, we'll decode for 0 and set v_pay_periods_in_reset to 1.
4373: -- ie. so v_dedn_freq_factor will also equal 1.
4374: --
4375: hr_utility.set_location('Dedn_Freq_Factor', 65);
4376: SELECT COUNT(0)
4377: INTO v_pay_periods_in_reset
4378: FROM pay_ele_payroll_freq_rules EPF,
4379: pay_freq_rule_periods FRP
4380: WHERE FRP.period_no_in_reset_period <= v_pay_periods_in_month
4381: AND FRP.ele_payroll_freq_rule_id = EPF.ele_payroll_freq_rule_id
4382: AND EPF.payroll_id = p_payroll_id
4383: AND EPF.element_type_id = p_element_type_id;
4384: hr_utility.set_location('v_pay_periods_in_reset = ', v_pay_periods_in_reset);
4385: --
4386: IF v_ele_period_num_per_fy = v_pay_period_num_per_fy THEN
4387: v_dedn_freq_factor := 1;
4388: ELSIF v_pay_periods_in_reset = 0 THEN
4394: v_dedn_freq_factor := v_ele_period_num_per_fy / c_months_per_fy / v_pay_periods_in_reset;
4395: END IF;
4396: --
4397: ELSE
4398: hr_utility.set_location('Dedn_Freq_Factor', 70);
4399: SELECT COUNT(0)
4400: INTO v_pay_periods_in_year
4401: FROM per_time_periods PTP
4402: WHERE PTP.end_date
4407: -- Frequency rules exist, so this select should never return 0.
4408: -- Just in case, we'll decode for 0 and set v_pay_periods_in_reset to 1.
4409: -- ie. so v_dedn_freq_factor will also equal 1.
4410: --
4411: hr_utility.set_location('Dedn_Freq_Factor', 75);
4412: SELECT DECODE(COUNT(0), 0, 1, COUNT(0))
4413: INTO v_pay_periods_in_reset
4414: FROM pay_ele_payroll_freq_rules EPF,
4415: pay_freq_rule_periods FRP
4417: AND FRP.ele_payroll_freq_rule_id = EPF.ele_payroll_freq_rule_id
4418: AND EPF.payroll_id = p_payroll_id
4419: AND EPF.element_type_id = p_element_type_id;
4420: --
4421: hr_utility.set_location('v_pay_periods_in_reset = ', v_pay_periods_in_reset);
4422: IF v_ele_period_num_per_fy = v_pay_period_num_per_fy THEN
4423: v_dedn_freq_factor := 1;
4424: ELSE
4425: v_dedn_freq_factor := v_ele_period_num_per_fy / c_months_per_fy / v_pay_periods_in_reset;
4428: END IF;
4429: --
4430: END IF;
4431: --
4432: hr_utility.set_location('Dedn_Freq_Factor', 80);
4433: RETURN v_dedn_freq_factor;
4434: --
4435: END Dedn_Freq_Factor;
4436: --
4479: p_to_arrears := 0;
4480: p_not_taken := 0;
4481: l_arrear_contr_value := 0 ;
4482:
4483: hr_utility.set_location('hr_us_ff_udfs.arrearage', 1);
4484:
4485: -- Determine if Arrears = 'Y' for this dedn
4486: -- Can do this by checking for "Clear Arrears" input value on base ele.
4487: -- This input value is only created when Arrears is marked Yes on Deductions
4488: -- screen.
4489:
4490: begin
4491:
4492: hr_utility.set_location('Shadow elename = '||v_shadow_ele_name, 38 );
4493:
4494: select 'Y'
4495: into v_arrears_flag
4496: from pay_input_values_f ipv
4501:
4502: exception
4503:
4504: WHEN NO_DATA_FOUND THEN
4505: hr_utility.set_location('Arrearage is NOT ON for this ele.', 99);
4506: v_arrears_flag := 'N';
4507:
4508: WHEN TOO_MANY_ROWS THEN
4509: hr_utility.set_location('Too many rows returned for Clear Arrears inpval.', 99);
4505: hr_utility.set_location('Arrearage is NOT ON for this ele.', 99);
4506: v_arrears_flag := 'N';
4507:
4508: WHEN TOO_MANY_ROWS THEN
4509: hr_utility.set_location('Too many rows returned for Clear Arrears inpval.', 99);
4510: v_arrears_flag := 'N';
4511:
4512: end;
4513:
4517:
4518: p_to_arrears := 0;
4519: p_not_taken := 0;
4520: l_dedn_amt := p_dedn_amt;
4521: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4522: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', p_dedn_amt);
4523: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4524:
4525: ELSIF p_net_asg_run <= p_guaranteed_net THEN
4518: p_to_arrears := 0;
4519: p_not_taken := 0;
4520: l_dedn_amt := p_dedn_amt;
4521: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4522: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', p_dedn_amt);
4523: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4524:
4525: ELSIF p_net_asg_run <= p_guaranteed_net THEN
4526: -- Don't take anything, no arrears contr either.
4519: p_not_taken := 0;
4520: l_dedn_amt := p_dedn_amt;
4521: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4522: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', p_dedn_amt);
4523: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4524:
4525: ELSIF p_net_asg_run <= p_guaranteed_net THEN
4526: -- Don't take anything, no arrears contr either.
4527: p_to_arrears := 0;
4526: -- Don't take anything, no arrears contr either.
4527: p_to_arrears := 0;
4528: p_not_taken := p_dedn_amt;
4529: l_dedn_amt := 0;
4530: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4531: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4532: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4533:
4534: ELSIF p_net_asg_run - p_dedn_amt < p_guaranteed_net THEN
4527: p_to_arrears := 0;
4528: p_not_taken := p_dedn_amt;
4529: l_dedn_amt := 0;
4530: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4531: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4532: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4533:
4534: ELSIF p_net_asg_run - p_dedn_amt < p_guaranteed_net THEN
4535:
4528: p_not_taken := p_dedn_amt;
4529: l_dedn_amt := 0;
4530: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4531: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4532: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4533:
4534: ELSIF p_net_asg_run - p_dedn_amt < p_guaranteed_net THEN
4535:
4536: IF p_partial_flag = 'Y' THEN
4542: l_dedn_amt := 0 ;
4543: ELSE
4544: l_dedn_amt := p_net_asg_run - p_guaranteed_net;
4545: END IF;
4546: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4547: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4548: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4549:
4550: ELSE
4543: ELSE
4544: l_dedn_amt := p_net_asg_run - p_guaranteed_net;
4545: END IF;
4546: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4547: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4548: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4549:
4550: ELSE
4551:
4544: l_dedn_amt := p_net_asg_run - p_guaranteed_net;
4545: END IF;
4546: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4547: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4548: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4549:
4550: ELSE
4551:
4552: p_to_arrears := 0;
4551:
4552: p_to_arrears := 0;
4553: p_not_taken := p_dedn_amt;
4554: l_dedn_amt := 0;
4555: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4556: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4557: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4558:
4559: END IF;
4552: p_to_arrears := 0;
4553: p_not_taken := p_dedn_amt;
4554: l_dedn_amt := 0;
4555: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4556: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4557: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4558:
4559: END IF;
4560:
4553: p_not_taken := p_dedn_amt;
4554: l_dedn_amt := 0;
4555: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4556: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4557: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4558:
4559: END IF;
4560:
4561: END IF;
4613: -- Don't take anything, put it all in arrears.
4614: p_to_arrears := p_dedn_amt + l_arrear_contr_value ;
4615: p_not_taken := p_dedn_amt + l_arrear_contr_value ;
4616: l_dedn_amt := 0;
4617: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4618: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4619: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4620:
4621: ELSE
4614: p_to_arrears := p_dedn_amt + l_arrear_contr_value ;
4615: p_not_taken := p_dedn_amt + l_arrear_contr_value ;
4616: l_dedn_amt := 0;
4617: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4618: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4619: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4620:
4621: ELSE
4622:
4615: p_not_taken := p_dedn_amt + l_arrear_contr_value ;
4616: l_dedn_amt := 0;
4617: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4618: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4619: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4620:
4621: ELSE
4622:
4623: l_total_dedn := p_dedn_amt + p_arrears_itd + l_arrear_contr_value ;
4629: -- there's enough net to take it all, clear arrears:
4630: p_to_arrears := -1 * ( p_arrears_itd + l_arrear_contr_value ) ;
4631: l_dedn_amt := l_total_dedn;
4632: p_not_taken := 0;
4633: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4634: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4635: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4636:
4637: /* Deleted a load of code above to fix 504970. If partial_flag = Y, then
4630: p_to_arrears := -1 * ( p_arrears_itd + l_arrear_contr_value ) ;
4631: l_dedn_amt := l_total_dedn;
4632: p_not_taken := 0;
4633: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4634: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4635: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4636:
4637: /* Deleted a load of code above to fix 504970. If partial_flag = Y, then
4638: try and take as much of the total deduction amount (current dedn +
4631: l_dedn_amt := l_total_dedn;
4632: p_not_taken := 0;
4633: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4634: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4635: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4636:
4637: /* Deleted a load of code above to fix 504970. If partial_flag = Y, then
4638: try and take as much of the total deduction amount (current dedn +
4639: arrears) and leave the rest in arrears. */
4655: ELSE
4656: l_dedn_amt := p_net_asg_run - p_guaranteed_net + l_arrear_contr_value ;
4657: END IF;
4658:
4659: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4660: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4661: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4662:
4663: ELSE -- p_partial_flag = 'N'
4656: l_dedn_amt := p_net_asg_run - p_guaranteed_net + l_arrear_contr_value ;
4657: END IF;
4658:
4659: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4660: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4661: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4662:
4663: ELSE -- p_partial_flag = 'N'
4664: IF (p_net_asg_run - p_guaranteed_net + l_arrear_contr_value ) >= p_dedn_amt THEN
4657: END IF;
4658:
4659: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4660: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4661: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4662:
4663: ELSE -- p_partial_flag = 'N'
4664: IF (p_net_asg_run - p_guaranteed_net + l_arrear_contr_value ) >= p_dedn_amt THEN
4665: -- Take the whole deduction amount.
4671: p_to_arrears := p_dedn_amt ;
4672: p_not_taken := p_dedn_amt ;
4673: l_dedn_amt := 0;
4674: END IF;
4675: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4676: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4677: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4678:
4679: END IF;
4672: p_not_taken := p_dedn_amt ;
4673: l_dedn_amt := 0;
4674: END IF;
4675: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4676: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4677: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4678:
4679: END IF;
4680:
4673: l_dedn_amt := 0;
4674: END IF;
4675: -- hr_utility.set_location('pyusudfs.arrearage.to_arrears = ', p_to_arrears);
4676: hr_utility.set_location('pyusudfs.arrearage.dedn_amt = ', l_dedn_amt);
4677: -- hr_utility.set_location('pyusudfs.arrearage.not_taken = ', p_not_taken);
4678:
4679: END IF;
4680:
4681: END IF;
4728: RETURN l_geocode;
4729: --
4730: EXCEPTION
4731: WHEN OTHERS THEN
4732: hr_utility.set_location('hr_us_ff_udfs.addr_val', 20);
4733: l_geocode := '00-000-0000';
4734: RETURN l_geocode;
4735: --
4736: END addr_val; -- addr_val
4807: IF (p_skip_rule = 'Y') THEN
4808: RAISE TOO_MANY_ROWS;
4809: END IF;
4810:
4811: hr_utility.set_location('hr_us_ff_udfs.addr_val', 1);
4812:
4813: IF (nvl(hr_general2.get_oracle_db_version, 0) < 9.0) THEN
4814: SELECT /*+ ORDERED */ a.state_code||'-'||a.county_code||'-'||a.city_code
4815: INTO l_geocode
4837: --
4838: EXCEPTION -- (2)
4839: --
4840: WHEN NO_DATA_FOUND THEN -- Invalid city/zip combo
4841: hr_utility.set_location('hr_us_ff_udfs.addr_val', 3);
4842: l_geocode := '00-000-0000';
4843: RETURN l_geocode;
4844: --
4845:
4849: INTO l_state_code
4850: FROM pay_us_states
4851: WHERE state_abbrev = p_state_abbrev;
4852:
4853: hr_utility.set_location('hr_us_ff_udfs.addr_val', 5);
4854: SELECT a.state_code||'-'||a.county_code||'-'||a.city_code
4855: INTO l_geocode
4856: FROM pay_us_zip_codes z,
4857: pay_us_city_names a,
4871: --
4872: -- Fallout from (2) ie. county/city/zip combo invalid or does not
4873: -- uniquely define geocode.
4874: WHEN NO_DATA_FOUND THEN
4875: hr_utility.set_location('hr_us_ff_udfs.addr_val', 7);
4876: l_geocode := '00-000-0000';
4877: RETURN l_geocode;
4878: --
4879: WHEN TOO_MANY_ROWS THEN
4876: l_geocode := '00-000-0000';
4877: RETURN l_geocode;
4878: --
4879: WHEN TOO_MANY_ROWS THEN
4880: hr_utility.set_location('hr_us_ff_udfs.addr_val', 9);
4881: SELECT a.state_code||'-'||a.county_code||'-'||a.city_code
4882: INTO l_geocode
4883: FROM pay_us_zip_codes z,
4884: pay_us_city_names a,
4902: end; -- (1)
4903: --
4904: -- We're in Main
4905: --
4906: hr_utility.set_location('hr_us_ff_udfs.addr_val', 11);
4907: --
4908: if (substr(l_geocode,8,1) = 'U') THEN
4909: l_geocode := substr(l_geocode,1,7)||'0000';
4910: END IF;
4914: EXCEPTION -- Main addr_val
4915: -- Fallout from (1) state/county/city/zip does not uniquely define a geo.
4916: -- Return failure geocode.
4917: WHEN NO_DATA_FOUND THEN
4918: hr_utility.set_location('hr_us_ff_udfs.addr_val', 13);
4919: l_geocode := '00-000-0000';
4920: RETURN l_geocode;
4921: --
4922: WHEN TOO_MANY_ROWS THEN
4919: l_geocode := '00-000-0000';
4920: RETURN l_geocode;
4921: --
4922: WHEN TOO_MANY_ROWS THEN
4923: hr_utility.set_location('hr_us_ff_udfs.addr_val', 15);
4924: l_geocode := '00-000-0000';
4925: RETURN l_geocode;
4926: --
4927: END addr_val; -- Main addr_val
4935: RETURN varchar2 IS
4936: r_territory_short_name fnd_territories_tl.territory_short_name%type;
4937: BEGIN
4938:
4939: hr_utility.set_location('Pay us country territory code : ', p_territory_code);
4940: IF p_territory_code IS NOT NULL THEN
4941:
4942:
4943: SELECT territory_short_name
4970: RETURN VARCHAR2 IS
4971:
4972: BEGIN
4973:
4974: hr_utility.trace('Entering hr_us_ff_udfs.catchup_type_details in '||p_mode||' Mode');
4975: hr_utility.trace('p_plan : '||p_plan);
4976: hr_utility.trace('p_assignment_action_id : '||p_assignment_action_id);
4977: hr_utility.trace('p_base_element_name : '||p_base_element_name);
4978: hr_utility.trace('p_catchup_type : '||p_catchup_type);
4971:
4972: BEGIN
4973:
4974: hr_utility.trace('Entering hr_us_ff_udfs.catchup_type_details in '||p_mode||' Mode');
4975: hr_utility.trace('p_plan : '||p_plan);
4976: hr_utility.trace('p_assignment_action_id : '||p_assignment_action_id);
4977: hr_utility.trace('p_base_element_name : '||p_base_element_name);
4978: hr_utility.trace('p_catchup_type : '||p_catchup_type);
4979:
4972: BEGIN
4973:
4974: hr_utility.trace('Entering hr_us_ff_udfs.catchup_type_details in '||p_mode||' Mode');
4975: hr_utility.trace('p_plan : '||p_plan);
4976: hr_utility.trace('p_assignment_action_id : '||p_assignment_action_id);
4977: hr_utility.trace('p_base_element_name : '||p_base_element_name);
4978: hr_utility.trace('p_catchup_type : '||p_catchup_type);
4979:
4980: IF p_mode = 'IN' THEN
4973:
4974: hr_utility.trace('Entering hr_us_ff_udfs.catchup_type_details in '||p_mode||' Mode');
4975: hr_utility.trace('p_plan : '||p_plan);
4976: hr_utility.trace('p_assignment_action_id : '||p_assignment_action_id);
4977: hr_utility.trace('p_base_element_name : '||p_base_element_name);
4978: hr_utility.trace('p_catchup_type : '||p_catchup_type);
4979:
4980: IF p_mode = 'IN' THEN
4981:
4974: hr_utility.trace('Entering hr_us_ff_udfs.catchup_type_details in '||p_mode||' Mode');
4975: hr_utility.trace('p_plan : '||p_plan);
4976: hr_utility.trace('p_assignment_action_id : '||p_assignment_action_id);
4977: hr_utility.trace('p_base_element_name : '||p_base_element_name);
4978: hr_utility.trace('p_catchup_type : '||p_catchup_type);
4979:
4980: IF p_mode = 'IN' THEN
4981:
4982: IF p_plan = 403 THEN
4984: catchup_type_table(p_assignment_action_id).base_element_403 := p_base_element_name;
4985: catchup_type_table(p_assignment_action_id).catchup_type_403 := p_catchup_type;
4986: catchup_type_table(p_assignment_action_id).catchup_403 := 'Y';
4987:
4988: hr_utility.trace('catchup_type_details: Stored 403 Catchup Type as '||catchup_type_table(p_assignment_action_id).catchup_type_403);
4989:
4990: ELSIF p_plan = 457 THEN
4991:
4992: catchup_type_table(p_assignment_action_id).base_element_457 := p_base_element_name;
4992: catchup_type_table(p_assignment_action_id).base_element_457 := p_base_element_name;
4993: catchup_type_table(p_assignment_action_id).catchup_type_457 := p_catchup_type;
4994: catchup_type_table(p_assignment_action_id).catchup_457 := 'Y';
4995:
4996: hr_utility.trace('catchup_type_details: Stored 457 Catchup Type as '||catchup_type_table(p_assignment_action_id).catchup_type_457);
4997:
4998: END IF;
4999:
5000: END IF; /* p_mode = 'IN' IF */
5002: IF p_mode = 'OUT' THEN
5003:
5004: IF catchup_type_table.EXISTS(p_assignment_action_id) THEN
5005:
5006: hr_utility.trace('catchup_type_details: Record found for given assignment_action_id');
5007:
5008: IF p_plan = 403
5009: AND catchup_type_table(p_assignment_action_id).catchup_403 = 'Y'
5010: AND catchup_type_table(p_assignment_action_id).base_element_403 = p_base_element_name
5010: AND catchup_type_table(p_assignment_action_id).base_element_403 = p_base_element_name
5011: THEN
5012:
5013: p_catchup_type := catchup_type_table(p_assignment_action_id).catchup_type_403;
5014: hr_utility.trace('catchup_type_details: Found 403 Catchup Type as '||p_catchup_type);
5015:
5016: IF nvl(catchup_type_table(p_assignment_action_id).catchup_457,'N') <> 'Y' THEN
5017: /*Delete the record if 457 details are not present */
5018: catchup_type_table.DELETE(p_assignment_action_id);
5029: AND catchup_type_table(p_assignment_action_id).base_element_457 = p_base_element_name
5030: THEN
5031:
5032: p_catchup_type := catchup_type_table(p_assignment_action_id).catchup_type_457;
5033: hr_utility.trace('catchup_type_details: Found 457 Catchup Type as '||p_catchup_type);
5034:
5035: IF nvl(catchup_type_table(p_assignment_action_id).catchup_403,'N') <> 'Y' THEN
5036: /*Delete the record if 403 details are not present */
5037: catchup_type_table.DELETE(p_assignment_action_id);
5055: END IF; /*catchup_type_table.EXISTS IF*/
5056:
5057: END IF; /* p_mode = 'OUT' IF */
5058:
5059: hr_utility.trace('Leaving hr_us_ff_udfs.catchup_type_details successfully');
5060:
5061: RETURN 'Y';
5062:
5063: EXCEPTION
5061: RETURN 'Y';
5062:
5063: EXCEPTION
5064: WHEN others THEN
5065: hr_utility.trace('Exception raised in hr_us_ff_udfs.catchup_type_details');
5066: RETURN NULL ;
5067: END catchup_type_details;
5068:
5069: --
5098: BEGIN
5099:
5100: /*Added for Bug#14385437 */
5101:
5102: hr_utility.trace('Entering hr_us_ff_udfs.direct_fed_data_archived for year '||p_reporting_year);
5103:
5104: l_direct_fed_bal_starting_year := NVL(fnd_profile.value('PAY_US_DIRECT_BALANCE_START_YEAR'),'0001');
5105:
5106: hr_utility.trace('Starting year for Direct US Federal Balances :'||l_direct_fed_bal_starting_year);
5102: hr_utility.trace('Entering hr_us_ff_udfs.direct_fed_data_archived for year '||p_reporting_year);
5103:
5104: l_direct_fed_bal_starting_year := NVL(fnd_profile.value('PAY_US_DIRECT_BALANCE_START_YEAR'),'0001');
5105:
5106: hr_utility.trace('Starting year for Direct US Federal Balances :'||l_direct_fed_bal_starting_year);
5107:
5108: IF l_direct_fed_bal_starting_year > p_reporting_year THEN
5109:
5110: RETURN 'N';
5121: l_return := 'N';
5122: END IF;
5123: CLOSE check_archive_data;
5124:
5125: hr_utility.trace('Leaving hr_us_ff_udfs.direct_fed_data_archived successfully');
5126:
5127: RETURN l_return;
5128:
5129: EXCEPTION
5127: RETURN l_return;
5128:
5129: EXCEPTION
5130: WHEN others THEN
5131: hr_utility.trace('Exception raised in hr_us_ff_udfs.direct_fed_data_archived');
5132: RETURN NULL ;
5133: END direct_fed_data_archived;
5134:
5135: /*End of changes for Bug#13614766* */