[Home] [Help]
452: l_grade_or_level := p_grade_or_level;
453: l_to_grade_or_level := p_to_grade_or_level;
454: l_step_or_rate := P_step_or_rate;
455: l_pay_basis := p_pay_basis;
456: hr_utility.set_location('The location id is:'||l_location_id,1);
457:
458: --------GPPA Update 46 start
459: ghr_msl_pkg.g_first_noa_code := NULL;
460: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
497: LOOP
498: l_ds_end_date := rec_ds.end_Date;
499: END LOOP;
500: IF l_ds_end_date IS NULL THEN
501: hr_utility.set_location('Under DS null check'||l_duty_station_id, 1);
502: l_mslerrbuf := ' Error: Duty Station associated with the location is INVALID. '||
503: 'Salary cannot be calculated correctly without valid duty station. ';
504: RAISE msl_error;
505: END IF;
512: (p_location_id => l_location_id
513: ,p_duty_station_id => l_duty_station_id);
514: / *exception
515: when others then
516: hr_utility.set_location(
517: 'Error in Ghr_pa_requests_pkg.get_sf52_loc_ddf_details'||
518: 'Err is '||sqlerrm(sqlcode),20);
519: l_mslerrbuf := 'Error in get_sf52_loc_ddf_details '||
520: 'Sql Err is '|| sqlerrm(sqlcode);
539: l_position_title,
540: l_position_number,
541: l_position_seq_no);
542:
543: hr_utility.set_location('The duty station id is:'||l_duty_station_id,12345);
544:
545: if check_init_eligibility(l_p_duty_station_id,
546: l_p_PERSONNEL_OFFICE_ID,
547: l_p_AGENCY_CODE_SUBELEMENT,
548: l_duty_station_id,
549: l_personnel_office_id,
550: l_sub_element_code) then
551:
552: hr_utility.set_location('check_init_eligibility ' || l_proc,6);
553: -- Bug 3457205 Filter the Pay plan table id condition also b4 checking any other thing
554: -- Moving check_eligibility to here.
555: -- Get PRD, work schedule etc form ASG EI
556: begin
563: l_work_schedule,
564: l_part_time_hour);
565: exception
566: when others then
567: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_sf52_asg_ddf_details'||
568: 'Err is '||sqlerrm(sqlcode),20);
569: l_mslerrbuf := 'Error in get_sf52_asgddf_details Sql Err is '|| sqlerrm(sqlcode);
570: raise msl_error;
571: end;
587: l_grade_or_level, l_to_grade_or_level, l_step_or_rate,
588: l_pay_basis);
589: EXCEPTION
590: when msl_error then
591: l_mslerrbuf := hr_utility.get_message;
592: raise;
593: END;
594:
595: IF ( nvl(rec_pp_prd(l_cnt).pay_plan,l_pay_plan) = l_pay_plan
602: l_pay_rate_determinant,
603: p_person_id,
604: l_effective_date,
605: p_action) THEN
606: hr_utility.set_location('check_eligibility ' || l_proc,8); */
607: -- Bug#5063304 Moved this call outside check_init_eligibility condition to
608: -- this location.
609: -- BUG 3377958 Madhuri
610: -- Pick the organization name
619: ELSE
620: if check_select_flg(p_person_id,upper(p_action),
621: l_effective_date,p_mass_salary_id,l_sel_flg) then
622:
623: hr_utility.set_location('check_select_flg ' || l_proc,7);
624: BEGIN
625: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
626: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
627: ghr_pa_requests_pkg.get_duty_station_details
621: l_effective_date,p_mass_salary_id,l_sel_flg) then
622:
623: hr_utility.set_location('check_select_flg ' || l_proc,7);
624: BEGIN
625: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
626: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
627: ghr_pa_requests_pkg.get_duty_station_details
628: (p_duty_station_id => l_duty_station_id
629: ,p_effective_date => l_effective_date
622:
623: hr_utility.set_location('check_select_flg ' || l_proc,7);
624: BEGIN
625: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
626: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
627: ghr_pa_requests_pkg.get_duty_station_details
628: (p_duty_station_id => l_duty_station_id
629: ,p_effective_date => l_effective_date
630: ,p_duty_station_code => l_duty_station_code
630: ,p_duty_station_code => l_duty_station_code
631: ,p_duty_station_desc => l_duty_station_desc);
632: EXCEPTION
633: WHEN others THEN
634: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_duty_station_details'||
635: 'Err is '||sqlerrm(sqlcode),20);
636: l_mslerrbuf := 'Error in get_duty_station_details Sql Err is '|| sqlerrm(sqlcode);
637: RAISE msl_error;
638:
705: ,l_message_set
706: ,l_calculated);
707:
708: IF l_message_set THEN
709: hr_utility.set_location( l_proc, 40);
710: l_calculated := FALSE;
711: l_mslerrbuf := hr_utility.get_message;
712: -- raise msl_error;
713: END IF;
707:
708: IF l_message_set THEN
709: hr_utility.set_location( l_proc, 40);
710: l_calculated := FALSE;
711: l_mslerrbuf := hr_utility.get_message;
712: -- raise msl_error;
713: END IF;
714: EXCEPTION
715: when msl_error then
795: ins_upd_per_extra_info
796: (p_person_id,l_effective_date, l_sel_flg, l_comment,p_mass_salary_id);
797: l_comment := NULL;
798: ------ BUG 3287299 End
799: hr_utility.set_location('Error in Ghr_pay_calc.sql_main_pay_calc '||
800: 'Err is '||sqlerrm(sqlcode),20);
801: l_mslerrbuf := 'Error in ghr_pay_calc Sql Err is '|| sqlerrm(sqlcode);
802: g_proc := 'ghr_pay_calc';
803: raise msl_error;
829: l_new_other_pay_amount := null;
830: end if;
831: l_new_total_salary := l_pay_calc_out_data.total_salary;
832:
833: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
834: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
835:
836:
837: -------------Call Pay cap Procedure
830: end if;
831: l_new_total_salary := l_pay_calc_out_data.total_salary;
832:
833: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
834: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
835:
836:
837: -------------Call Pay cap Procedure
838: begin
839: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
840: ,p_effective_date => l_effective_date);
841: l_old_capped_other_pay := l_capped_other_pay;
842: -- Sundar Added the following if statement to improve performance
843: if hr_utility.debug_enabled = true then
844: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
845: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
846: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
847: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
840: ,p_effective_date => l_effective_date);
841: l_old_capped_other_pay := l_capped_other_pay;
842: -- Sundar Added the following if statement to improve performance
843: if hr_utility.debug_enabled = true then
844: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
845: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
846: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
847: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
848: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
841: l_old_capped_other_pay := l_capped_other_pay;
842: -- Sundar Added the following if statement to improve performance
843: if hr_utility.debug_enabled = true then
844: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
845: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
846: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
847: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
848: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
849: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
842: -- Sundar Added the following if statement to improve performance
843: if hr_utility.debug_enabled = true then
844: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
845: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
846: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
847: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
848: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
849: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
850: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
843: if hr_utility.debug_enabled = true then
844: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
845: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
846: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
847: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
848: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
849: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
850: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
851: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
844: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
845: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
846: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
847: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
848: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
849: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
850: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
851: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
852: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
845: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
846: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
847: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
848: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
849: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
850: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
851: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
852: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
853: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
846: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
847: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
848: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
849: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
850: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
851: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
852: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
853: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
854: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
847: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
848: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
849: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
850: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
851: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
852: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
853: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
854: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
855: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
848: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
849: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
850: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
851: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
852: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
853: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
854: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
855: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
856: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
849: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
850: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
851: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
852: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
853: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
854: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
855: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
856: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
857: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
850: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
851: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
852: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
853: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
854: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
855: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
856: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
857: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
858: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
851: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
852: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
853: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
854: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
855: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
856: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
857: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
858: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
859: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
852: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
853: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
854: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
855: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
856: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
857: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
858: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
859: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
860: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
853: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
854: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
855: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
856: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
857: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
858: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
859: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
860: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
861: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
854: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
855: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
856: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
857: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
858: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
859: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
860: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
861: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
862:
855: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
856: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
857: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
858: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
859: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
860: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
861: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
862:
863: end if;
856: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
857: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
858: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
859: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
860: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
861: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
862:
863: end if;
864:
857: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
858: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
859: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
860: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
861: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
862:
863: end if;
864:
865:
895:
896: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
897:
898: -- Sundar Added the following statement to improve performance
899: if hr_utility.debug_enabled = true then
900: hr_utility.set_location('After Pay Cap ' || l_proc,22);
901: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
902: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
903: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
896: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
897:
898: -- Sundar Added the following statement to improve performance
899: if hr_utility.debug_enabled = true then
900: hr_utility.set_location('After Pay Cap ' || l_proc,22);
901: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
902: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
903: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
904: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
897:
898: -- Sundar Added the following statement to improve performance
899: if hr_utility.debug_enabled = true then
900: hr_utility.set_location('After Pay Cap ' || l_proc,22);
901: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
902: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
903: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
904: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
905: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
898: -- Sundar Added the following statement to improve performance
899: if hr_utility.debug_enabled = true then
900: hr_utility.set_location('After Pay Cap ' || l_proc,22);
901: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
902: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
903: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
904: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
905: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
906: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
899: if hr_utility.debug_enabled = true then
900: hr_utility.set_location('After Pay Cap ' || l_proc,22);
901: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
902: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
903: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
904: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
905: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
906: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
907: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
900: hr_utility.set_location('After Pay Cap ' || l_proc,22);
901: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
902: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
903: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
904: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
905: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
906: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
907: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
908: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
901: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
902: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
903: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
904: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
905: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
906: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
907: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
908: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
909: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
902: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
903: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
904: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
905: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
906: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
907: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
908: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
909: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
910: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
903: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
904: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
905: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
906: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
907: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
908: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
909: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
910: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
911: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
904: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
905: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
906: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
907: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
908: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
909: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
910: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
911: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
912: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
905: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
906: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
907: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
908: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
909: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
910: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
911: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
912: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
913: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
906: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
907: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
908: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
909: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
910: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
911: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
912: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
913: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
914: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
907: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
908: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
909: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
910: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
911: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
912: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
913: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
914: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
915: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
908: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
909: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
910: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
911: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
912: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
913: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
914: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
915: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
916: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
909: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
910: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
911: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
912: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
913: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
914: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
915: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
916: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
917: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
910: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
911: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
912: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
913: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
914: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
915: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
916: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
917: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
918: end if;
911: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
912: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
913: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
914: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
915: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
916: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
917: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
918: end if;
919:
912: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
913: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
914: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
915: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
916: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
917: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
918: end if;
919:
920: IF l_pay_cap_message THEN
913: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
914: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
915: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
916: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
917: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
918: end if;
919:
920: IF l_pay_cap_message THEN
921: IF nvl(l_temp_retention_allowance,0) > 0 THEN
958: exception
959: when msl_error then
960: raise;
961: when others then
962: hr_utility.set_location('Error in ghr_pay_caps.do_pay_caps_main ' ||
963: 'Err is '||sqlerrm(sqlcode),23);
964: l_mslerrbuf := 'Error in do_pay_caps_main Sql Err is '|| sqlerrm(sqlcode);
965: raise msl_error;
966: end;
1055: l_grade_or_level, l_to_grade_or_level, l_step_or_rate,
1056: l_pay_basis);
1057: EXCEPTION
1058: when msl_error then
1059: l_mslerrbuf := hr_utility.get_message;
1060: raise;
1061: END;
1062:
1063: --6753050 modified if user manually changes position table from special
1123: (l_pay_calc_out_data,
1124: l_sf52_rec);
1125: EXCEPTION
1126: when others then
1127: hr_utility.set_location('Error in Ghr_mass_actions_pkg.pay_calc_rec_to_sf52_rec '||
1128: 'Err is '||sqlerrm(sqlcode),20);
1129: l_mslerrbuf := 'Error in ghr_mass_act_pkg.pay_calc_to_sf52 Sql Err is '|| sqlerrm(sqlcode);
1130: raise msl_error;
1131: END;
1232: END IF;
1233: END IF;
1234: EXCEPTION
1235: WHEN MSL_ERROR THEN
1236: HR_UTILITY.SET_LOCATION('Error occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),10);
1237: begin
1238: ------ BUG 3287299 -- Not to rollback for preview.
1239: if upper(p_action) <> 'SHOW' then
1240: ROLLBACK TO EXECUTE_MSL_SP;
1246: l_log_text := 'Error in '||l_proc||' '||
1247: ' For Mass Salary Name : '||p_mass_salary||
1248: 'Name: '|| p_full_name || ' Emp No: ' || p_employee_number ||
1249: l_mslerrbuf;
1250: hr_utility.set_location('before creating entry in log file',10);
1251: l_recs_failed := l_recs_failed + 1;
1252: begin
1253: ghr_mto_int.log_message(
1254: p_procedure => g_proc,
1254: p_procedure => g_proc,
1255: p_message => l_log_text);
1256: exception
1257: when others then
1258: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
1259: hr_utility.raise_error;
1260: end;
1261: when others then
1262: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
1255: p_message => l_log_text);
1256: exception
1257: when others then
1258: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
1259: hr_utility.raise_error;
1260: end;
1261: when others then
1262: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
1263: BEGIN
1258: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
1259: hr_utility.raise_error;
1260: end;
1261: when others then
1262: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
1263: BEGIN
1264: ROLLBACK TO EXECUTE_MSL_SP;
1265: EXCEPTION
1266: WHEN OTHERS THEN NULL;
1269: l_log_text := 'Error (others) in '||l_proc||
1270: ' For Mass Salary Name : '||p_mass_salary||
1271: 'Name: '|| p_full_name || ' Emp No: ' || p_employee_number ||
1272: ' Sql Err is '||sqlerrm(sqlcode);
1273: hr_utility.set_location('before creating entry in log file',20);
1274: l_recs_failed := l_recs_failed + 1;
1275: begin
1276: ghr_mto_int.log_message(
1277: p_procedure => g_proc,
1277: p_procedure => g_proc,
1278: p_message => l_log_text);
1279: exception
1280: when others then
1281: hr_utility.set_message(8301, 'Create Error Log failed');
1282: hr_utility.raise_error;
1283: end;
1284: END;
1285:
1278: p_message => l_log_text);
1279: exception
1280: when others then
1281: hr_utility.set_message(8301, 'Create Error Log failed');
1282: hr_utility.raise_error;
1283: end;
1284: END;
1285:
1286: --
1289: --
1290: --
1291: BEGIN
1292: g_proc := 'execute_msl';
1293: hr_utility.set_location('Entering ' || l_proc,5);
1294:
1295: g_first_noa_code := null;
1296: p_retcode := 0;
1297: BEGIN
1318: exit;
1319: END LOOP;
1320: EXCEPTION
1321: when REC_BUSY then
1322: hr_utility.set_location('Mass Salary is in use',1);
1323: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
1324: -- raise error;
1325: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
1326: hr_utility.raise_error;
1321: when REC_BUSY then
1322: hr_utility.set_location('Mass Salary is in use',1);
1323: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
1324: -- raise error;
1325: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
1326: hr_utility.raise_error;
1327: --
1328: when others then
1329: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
1322: hr_utility.set_location('Mass Salary is in use',1);
1323: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
1324: -- raise error;
1325: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
1326: hr_utility.raise_error;
1327: --
1328: when others then
1329: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
1330: -- raise_application_error(-20111,'Error while selecting from Ghr Mass Salaries');
1325: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
1326: hr_utility.raise_error;
1327: --
1328: when others then
1329: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
1330: -- raise_application_error(-20111,'Error while selecting from Ghr Mass Salaries');
1331: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
1332: raise msl_error;
1333: END;
1339: END LOOP;
1340:
1341: IF l_process_type = 'P' THEN
1342:
1343: hr_utility.set_location('befo perc' || l_proc,5);
1344: execute_msl_perc( p_errbuf,
1345: p_retcode,
1346: p_mass_salary_id,
1347: p_action );
1360: p_mass_salary_id,
1361: p_action );
1362:
1363: ELSIF l_process_type = 'R' THEN
1364: hr_utility.set_location('befo proc' || l_proc,5);
1365: execute_msl_ses_range( p_errbuf,
1366: p_retcode,
1367: p_mass_salary_id,
1368: p_action);
1388: END IF;
1389:
1390: get_lac_dtls(l_pa_request_id, l_lac_sf52_rec);
1391:
1392: hr_utility.set_location('After fetch msl '||to_char(l_effective_date)||' '||to_char(l_user_table_id),20);
1393: IF l_p_ORGANIZATION_ID is not null then
1394: FOR per IN cur_people_org (l_effective_date,l_p_ORGANIZATION_ID)
1395: LOOP
1396:
1422: l_step_or_rate := NULL;
1423: l_pay_basis := NULL;
1424: l_elig_flag := FALSE;
1425: --
1426: hr_utility.set_location('SSN: '||per.national_identifier,1000);
1427: BEGIN
1428: fetch_and_validate_emp(
1429: p_action => p_action
1430: ,p_mass_salary_id => p_mass_salary_id
1547: l_step_or_rate := NULL;
1548: l_pay_basis := NULL;
1549: l_elig_flag := FALSE;
1550: --
1551: hr_utility.set_location('SSN: '||per.national_identifier,2000);
1552: BEGIN
1553: fetch_and_validate_emp(
1554: p_action => p_action
1555: ,p_mass_salary_id => p_mass_salary_id
1651: SET submit_flag = 'P'
1652: WHERE rowid = l_rowid;
1653: EXCEPTION
1654: WHEN others THEN
1655: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
1656: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
1657: hr_utility.raise_error;
1658: END;
1659: END IF;
1652: WHERE rowid = l_rowid;
1653: EXCEPTION
1654: WHEN others THEN
1655: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
1656: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
1657: hr_utility.raise_error;
1658: END;
1659: END IF;
1660: ELSE
1653: EXCEPTION
1654: WHEN others THEN
1655: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
1656: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
1657: hr_utility.raise_error;
1658: END;
1659: END IF;
1660: ELSE
1661: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
1673: END IF;
1674:
1675: EXCEPTION
1676: when others then
1677: HR_UTILITY.SET_LOCATION('Error (Others2) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),30);
1678: BEGIN
1679: ROLLBACK TO EXECUTE_MSL_SP;
1680: EXCEPTION
1681: WHEN OTHERS THEN NULL;
1683: l_log_text := 'Error in '||l_proc||
1684: ' For Mass Salary Name : '||p_mass_salary||
1685: ' Sql Err is '||sqlerrm(sqlcode);
1686: l_recs_failed := l_recs_failed + 1;
1687: hr_utility.set_location('before creating entry in log file',30);
1688:
1689: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
1690: p_retcode := 2;
1691: IF upper(p_action) = 'CREATE' THEN
1700: p_procedure => g_proc,
1701: p_message => l_log_text);
1702: EXCEPTION
1703: WHEN others THEN
1704: hr_utility.set_message(8301, 'Create Error Log failed');
1705: hr_utility.raise_error;
1706: END;
1707:
1708:
1701: p_message => l_log_text);
1702: EXCEPTION
1703: WHEN others THEN
1704: hr_utility.set_message(8301, 'Create Error Log failed');
1705: hr_utility.raise_error;
1706: END;
1707:
1708:
1709: END EXECUTE_MSL;
1852:
1853: BEGIN
1854: g_proc := 'pop_dtls_from_pa_req';
1855:
1856: hr_utility.set_location('Entering ' || l_proc,5);
1857: FOR pa_req_rec in ghr_pa_req_cur
1858: LOOP
1859: -- To calculate percent increase from From Pay and To Pay if rpa_type = 'MPC'.
1860: IF pa_req_rec.rpa_type = 'MPC' THEN
1949: -- FWFA Changes
1950: );
1951: exit;
1952: END LOOP;
1953: hr_utility.set_location('Exiting ' || l_proc,10);
1954: exception
1955: when msl_error then raise;
1956: when others then
1957: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
1953: hr_utility.set_location('Exiting ' || l_proc,10);
1954: exception
1955: when msl_error then raise;
1956: when others then
1957: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
1958: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
1959: raise msl_error;
1960: end pop_dtls_from_pa_req;
1961:
1985:
1986: g_proc := 'check_select_flg_msl_perc';
1987: l_temp_increase_percent := p_increase_percent;
1988:
1989: hr_utility.set_location('Entering ' || l_proc,5);
1990:
1991: l_line := 5;
1992: get_extra_info_comments(p_person_id,p_effective_date,l_sel_flag,l_comments,p_mass_salary_id,l_increase_percent,l_ses_basic_pay); -- Added by Sundar 3843306
1993:
2041: exception
2042: when msl_error then raise;
2043: when others then
2044: p_increase_percent := l_temp_increase_percent ;
2045: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2046: l_mslerrbuf := 'Error in '||l_proc||' @'||to_char(l_line)||' Sql Err is '|| sqlerrm(sqlcode);
2047: raise msl_error;
2048: end;
2049:
2069: begin
2070:
2071: g_proc := 'check_select_flg';
2072:
2073: hr_utility.set_location('Entering ' || l_proc,5);
2074:
2075: l_line := 5;
2076: get_extra_info_comments(p_person_id,p_effective_date,l_sel_flag,l_comments,p_mass_salary_id,l_temp,l_ses_basic_pay);
2077:
2111: end if;
2112: exception
2113: when msl_error then raise;
2114: when others then
2115: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2116: l_mslerrbuf := 'Error in '||l_proc||' @'||to_char(l_line)||' Sql Err is '|| sqlerrm(sqlcode);
2117: raise msl_error;
2118: end;
2119:
2127: l_proc varchar2(72) := g_package || '.purge_old_data';
2128: BEGIN
2129: g_proc := 'purge_old_data';
2130:
2131: hr_utility.set_location('Entering ' || l_proc,5);
2132: delete from ghr_mass_actions_preview
2133: where mass_action_type = 'SALARY'
2134: and session_id = p_mass_salary_id;
2135: commit;
2132: delete from ghr_mass_actions_preview
2133: where mass_action_type = 'SALARY'
2134: and session_id = p_mass_salary_id;
2135: commit;
2136: hr_utility.set_location('Exiting ' || l_proc,10);
2137: exception
2138: when msl_error then raise;
2139: when others then
2140: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2136: hr_utility.set_location('Exiting ' || l_proc,10);
2137: exception
2138: when msl_error then raise;
2139: when others then
2140: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2141: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2142: raise msl_error;
2143: END;
2144:
2178: l_line number := 0;
2179: l_check_grade_retention VARCHAR2(200);
2180: BEGIN
2181: g_proc := 'get_pay_plan_and_table_id';
2182: hr_utility.set_location('Entering ' || l_proc,5);
2183: ghr_mre_pkg.pr('Entering ',l_proc,'ACTION '||p_action);
2184: -- Bug# 4126137,4179270,4086677
2185: l_check_grade_retention := CHECK_GRADE_RETENTION(P_PRD,P_PERSON_ID,P_EFFECTIVE_DATE);
2186:
2194: exit;
2195: end loop;
2196:
2197: l_line := 20;
2198: hr_utility.set_location('Got grade or level and pay plan',2);
2199: ghr_mre_pkg.pr('Got grade or level and pay plan');
2200:
2201: ghr_history_fetch.fetch_positionei
2202: (p_position_id => p_position_id
2221: l_line := 40;
2222: p_step_or_rate := l_asg_ei_data.aei_information3;
2223:
2224: ELSIF l_check_grade_retention = 'REGULAR' THEN
2225: hr_utility.set_location('Grade retention is regular',1);
2226:
2227: ghr_mre_pkg.pr('Grade retention is regular',1);
2228:
2229: FOR c_grade_kff_rec IN c_grade_kff (p_grade_id)
2232: p_grade_or_level := c_grade_kff_rec.segment2;
2233: exit;
2234: end loop;
2235:
2236: hr_utility.set_location('Got grade or level and pay plan',2);
2237:
2238: ghr_mre_pkg.pr('Got grade or level and pay plan',2);
2239:
2240: l_line := 50;
2264: ELSIF l_check_grade_retention = 'RETAIN' THEN
2265: --
2266: -- get retained details
2267: --
2268: hr_utility.set_location('Before get retained grade',4);
2269:
2270: l_line := 80;
2271: ghr_mre_pkg.pr('Retained prd ',P_PRD);
2272:
2301: END;
2302: l_line := 90;
2303: -- Bug#4179270,4126137,4086677 Added the following ELSIF Condition.
2304: ELSIF l_check_grade_retention ='MSL_ERROR' THEN
2305: hr_utility.set_message(8301,'GHR_38927_MISSING_MA_RET_DET');
2306: raise msl_error;
2307: ELSIF l_check_grade_retention = 'OTHER_ERROR' THEN
2308: l_mslerrbuf := 'Others error in check_grade_retention function while fetching retained grade record. Please
2309: verify the retained grade record';
2308: l_mslerrbuf := 'Others error in check_grade_retention function while fetching retained grade record. Please
2309: verify the retained grade record';
2310: raise msl_error;
2311: END IF;
2312: hr_utility.set_location('Exiting ' || l_proc,10);
2313: l_line := 100;
2314: EXCEPTION
2315: when msl_error then raise;
2316: when others then
2357: l_line number := 0;
2358: l_check_grade_retention VARCHAR2(200);
2359: BEGIN
2360: g_proc := 'get_pay_plan_and_table_id';
2361: hr_utility.set_location('Entering ' || l_proc,5);
2362: ghr_mre_pkg.pr('Entering ',l_proc,'ACTION '||p_action);
2363: -- Bug# 4126137,4179270,4086677
2364: l_check_grade_retention := CHECK_GRADE_RETENTION(P_PRD,P_PERSON_ID,P_EFFECTIVE_DATE);
2365:
2373: exit;
2374: end loop;
2375:
2376: l_line := 20;
2377: hr_utility.set_location('Got grade or level and pay plan',2);
2378: ghr_mre_pkg.pr('Got grade or level and pay plan');
2379:
2380: ghr_history_fetch.fetch_positionei
2381: (p_position_id => p_position_id
2414: l_line := 40;
2415: p_step_or_rate := l_asg_ei_data.aei_information3;
2416:
2417: ELSIF l_check_grade_retention = 'REGULAR' THEN
2418: hr_utility.set_location('Grade retention is regular',1);
2419:
2420: ghr_mre_pkg.pr('Grade retention is regular',1);
2421:
2422: FOR c_grade_kff_rec IN c_grade_kff (p_grade_id)
2425: p_grade_or_level := c_grade_kff_rec.segment2;
2426: exit;
2427: end loop;
2428:
2429: hr_utility.set_location('Got grade or level and pay plan',2);
2430:
2431: ghr_mre_pkg.pr('Got grade or level and pay plan',2);
2432:
2433: l_line := 50;
2469: ELSIF l_check_grade_retention = 'RETAIN' THEN
2470: --
2471: -- get retained details
2472: --
2473: hr_utility.set_location('Before get retained grade',4);
2474:
2475: l_line := 80;
2476: ghr_mre_pkg.pr('Retained prd ',P_PRD);
2477:
2515: END LOOP;
2516: l_line := 90;
2517: -- Bug#4179270,4126137,4086677 Added the following ELSIF Condition.
2518: ELSIF l_check_grade_retention ='MSL_ERROR' THEN
2519: hr_utility.set_message(8301,'GHR_38927_MISSING_MA_RET_DET');
2520: raise msl_error;
2521: ELSIF l_check_grade_retention = 'OTHER_ERROR' THEN
2522: l_mslerrbuf := 'Others error in check_grade_retention function while fetching retained grade record. Please
2523: verify the retained grade record';
2522: l_mslerrbuf := 'Others error in check_grade_retention function while fetching retained grade record. Please
2523: verify the retained grade record';
2524: raise msl_error;
2525: END IF;
2526: hr_utility.set_location('Exiting ' || l_proc,10);
2527: l_line := 100;
2528: EXCEPTION
2529: when msl_error then raise;
2530: when others then
2542: l_proc varchar2(72) := g_package || '.update_sel_flg';
2543: l_ind number := 1;
2544: begin
2545: g_proc := 'update_sel_flg';
2546: hr_utility.set_location('Entering ' || l_proc,5);
2547: pr('Inside '||l_proc,to_char(p_person_id));
2548: l_ind := 10;
2549: ghr_history_fetch.fetch_peopleei
2550: (p_person_id => p_person_id
2568: ,p_pei_information10 => NULL
2569: ,P_PEI_INFORMATION_CATEGORY => 'GHR_US_PER_MASS_ACTIONS');
2570:
2571: l_ind := 30;
2572: hr_utility.set_location('Exiting ' || l_proc,10);
2573: -- There is a trigger on PER_PEOPLE_EXTRA_INFO to make the employee INVALID
2574: -- when there is a update done on the table.
2575: ---Commented the following three lines to remove Validation functionality on Person.
2576: --- ghr_validate_perwsepi.validate_perwsepi(p_person_id);
2582: pr('Exiting '||l_proc,to_char(p_person_id));
2583: exception
2584: when msl_error then raise;
2585: when others then
2586: hr_utility.set_location('Error in '||l_proc||
2587: ' Err is '||sqlerrm(sqlcode),20);
2588: l_mslerrbuf := 'Error in '||l_proc||' at '||to_char(l_ind)||
2589: ' Sql Err is '|| sqlerrm(sqlcode);
2590: raise msl_error;
2665: group by information11);
2666:
2667: begin
2668: g_proc := 'get_extra_info_comments';
2669: hr_utility.set_location('Entering ' || l_proc,5);
2670:
2671: l_eff_date := p_effective_date;
2672:
2673: ghr_history_fetch.fetch_peopleei
2708: when msl_error then
2709: p_increase_percent := NULL;
2710: raise;
2711: when others then
2712: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2713: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2714: p_increase_percent := NULL;
2715: p_ses_basic_pay := NULL;
2716: raise msl_error;
2744: l_eff_date date;
2745:
2746: begin
2747: g_proc := 'ins_upd_per_extra_info';
2748: hr_utility.set_location('Entering ' || l_proc,5);
2749: if p_effective_date > sysdate then
2750: l_eff_date := sysdate;
2751: else
2752: l_eff_date := p_effective_date;
2796: ---Commented the following two lines to remove Validation functionality on Person.
2797: -- ghr_validate_perwsepi.validate_perwsepi(p_person_id);
2798: -- ghr_validate_perwsepi.update_person_user_type(p_person_id);
2799:
2800: hr_utility.set_location('Exiting ' || l_proc,10);
2801: exception
2802: when msl_error then raise;
2803: when others then
2804: pr('Error in '||l_proc);
2801: exception
2802: when msl_error then raise;
2803: when others then
2804: pr('Error in '||l_proc);
2805: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2806: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2807: raise msl_error;
2808: end ins_upd_per_extra_info;
2809:
2910:
2911: BEGIN
2912:
2913: g_proc := 'fetch_and_validate_emp';
2914: hr_utility.set_location('Entering ' || l_proc,5);
2915: -- Bug#5623035 Moved the local variable assigning to here.
2916: l_assignment_id := p_assignment_id;
2917: l_position_id := p_position_id;
2918: l_grade_id := p_grade_id;
2927: p_msl_agency_code_subelement IS NOT NULL THEN
2928: -- get the values and verify whether the record meets the condition or not.
2929: -- If Yes, proceed further. Otherwise, skip the other checks for this record
2930:
2931: hr_utility.set_location('The location id is:'||l_location_id,12345);
2932: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
2933: hr_utility.set_location('Org ID:'||p_organization_id,22222);
2934: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
2935: hr_utility.set_location('Org ID PASS',10);
2928: -- get the values and verify whether the record meets the condition or not.
2929: -- If Yes, proceed further. Otherwise, skip the other checks for this record
2930:
2931: hr_utility.set_location('The location id is:'||l_location_id,12345);
2932: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
2933: hr_utility.set_location('Org ID:'||p_organization_id,22222);
2934: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
2935: hr_utility.set_location('Org ID PASS',10);
2936: IF p_msl_personnel_office_id IS NOT NULL THEN
2929: -- If Yes, proceed further. Otherwise, skip the other checks for this record
2930:
2931: hr_utility.set_location('The location id is:'||l_location_id,12345);
2932: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
2933: hr_utility.set_location('Org ID:'||p_organization_id,22222);
2934: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
2935: hr_utility.set_location('Org ID PASS',10);
2936: IF p_msl_personnel_office_id IS NOT NULL THEN
2937: hr_utility.set_location('POID CHECK',15);
2931: hr_utility.set_location('The location id is:'||l_location_id,12345);
2932: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
2933: hr_utility.set_location('Org ID:'||p_organization_id,22222);
2934: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
2935: hr_utility.set_location('Org ID PASS',10);
2936: IF p_msl_personnel_office_id IS NOT NULL THEN
2937: hr_utility.set_location('POID CHECK',15);
2938: get_pos_grp1_ddf(l_position_id,
2939: l_effective_date,
2933: hr_utility.set_location('Org ID:'||p_organization_id,22222);
2934: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
2935: hr_utility.set_location('Org ID PASS',10);
2936: IF p_msl_personnel_office_id IS NOT NULL THEN
2937: hr_utility.set_location('POID CHECK',15);
2938: get_pos_grp1_ddf(l_position_id,
2939: l_effective_date,
2940: l_pos_grp1_rec);
2941:
2944: l_fetch_poid_data := TRUE;
2945: END IF;
2946: IF (p_msl_personnel_office_id = l_personnel_office_id) OR
2947: NOT(l_fetch_poid_data) THEN
2948: hr_utility.set_location('POID PASS',20);
2949: IF p_msl_agency_code_subelement IS NOT NULL THEN
2950: hr_utility.set_location('Agency CHECK',25);
2951: get_sub_element_code_pos_title(l_position_id,
2952: p_person_id,
2946: IF (p_msl_personnel_office_id = l_personnel_office_id) OR
2947: NOT(l_fetch_poid_data) THEN
2948: hr_utility.set_location('POID PASS',20);
2949: IF p_msl_agency_code_subelement IS NOT NULL THEN
2950: hr_utility.set_location('Agency CHECK',25);
2951: get_sub_element_code_pos_title(l_position_id,
2952: p_person_id,
2953: l_business_group_id,
2954: l_assignment_id,
2964: NVL(SUBSTR(p_msl_agency_code_subelement,3,2),SUBSTR(l_sub_element_code,3,2))=
2965: SUBSTR(l_sub_element_code,3,2)
2966: ) OR
2967: NOT(l_fetch_agency_data) THEN
2968: hr_utility.set_location('Agency PASS',30);
2969: IF p_msl_duty_station_id IS NOT NULL THEN
2970: hr_utility.set_location('DS CHECK',35);
2971: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
2972: (p_location_id => l_location_id
2966: ) OR
2967: NOT(l_fetch_agency_data) THEN
2968: hr_utility.set_location('Agency PASS',30);
2969: IF p_msl_duty_station_id IS NOT NULL THEN
2970: hr_utility.set_location('DS CHECK',35);
2971: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
2972: (p_location_id => l_location_id
2973: ,p_duty_station_id => l_duty_station_id);
2974: l_fetch_ds_data := TRUE;
2974: l_fetch_ds_data := TRUE;
2975: END IF;
2976: IF (p_msl_duty_station_id = l_duty_station_id) OR
2977: NOT(l_fetch_ds_data)THEN
2978: hr_utility.set_location('DS PASS',40);
2979: init_elig_flag := TRUE;
2980: ELSE -- Duty Station not matching.
2981: hr_utility.set_location('DS FAIL',45);
2982: init_elig_flag := FALSE;
2977: NOT(l_fetch_ds_data)THEN
2978: hr_utility.set_location('DS PASS',40);
2979: init_elig_flag := TRUE;
2980: ELSE -- Duty Station not matching.
2981: hr_utility.set_location('DS FAIL',45);
2982: init_elig_flag := FALSE;
2983: END IF;
2984: ELSE -- Agency Code Subelement Not matching.
2985: hr_utility.set_location('Agency FAIL',55);
2981: hr_utility.set_location('DS FAIL',45);
2982: init_elig_flag := FALSE;
2983: END IF;
2984: ELSE -- Agency Code Subelement Not matching.
2985: hr_utility.set_location('Agency FAIL',55);
2986: init_elig_flag := FALSE;
2987: END IF;
2988: ELSE -- Personnel Office ID not matching
2989: hr_utility.set_location('POID FAIL',65);
2985: hr_utility.set_location('Agency FAIL',55);
2986: init_elig_flag := FALSE;
2987: END IF;
2988: ELSE -- Personnel Office ID not matching
2989: hr_utility.set_location('POID FAIL',65);
2990: init_elig_flag := FALSE;
2991: END IF;
2992: ELSE -- Organization_id is not matching.
2993: hr_utility.set_location('Org FAIL',75);
2989: hr_utility.set_location('POID FAIL',65);
2990: init_elig_flag := FALSE;
2991: END IF;
2992: ELSE -- Organization_id is not matching.
2993: hr_utility.set_location('Org FAIL',75);
2994: init_elig_flag := FALSE;
2995: END IF;
2996: ELSE -- If No value is entered for organization, Duty Station, Agency, POID of MSL Criteria.
2997: hr_utility.set_location('No INIT CRITERIA',85);
2993: hr_utility.set_location('Org FAIL',75);
2994: init_elig_flag := FALSE;
2995: END IF;
2996: ELSE -- If No value is entered for organization, Duty Station, Agency, POID of MSL Criteria.
2997: hr_utility.set_location('No INIT CRITERIA',85);
2998: init_elig_flag := TRUE;
2999: END IF;
3000:
3001: -- If the initial eligibility is passed then proceed further. Otherwise move to next record.
2999: END IF;
3000:
3001: -- If the initial eligibility is passed then proceed further. Otherwise move to next record.
3002: IF init_elig_flag THEN
3003: hr_utility.set_location('Init Criteria Pass',95);
3004: ghr_pa_requests_pkg.get_sf52_asg_ddf_details
3005: (l_assignment_id,
3006: l_effective_date,
3007: l_tenure,
3011: l_part_time_hour);
3012:
3013: FOR l_cnt in 1..p_rec_pp_prd.COUNT LOOP
3014: IF nvl(p_rec_pp_prd(l_cnt).prd,l_pay_rate_determinant) = l_pay_rate_determinant THEN
3015: hr_utility.set_location('PRD PASS',105);
3016: l_prd_matched := TRUE;
3017: exit;
3018: END IF;
3019: END LOOP;
3032: EXCEPTION
3033: WHEN OTHERS THEN
3034: -- Report the record in the process log if the pay table ID matches.
3035: BEGIN
3036: hr_utility.set_location('before calling expired_rg_det',10);
3037: l_retained_grade_rec := ghr_pc_basic_pay.get_expired_rg_details
3038: (p_person_id => p_person_id
3039: ,p_effective_date => l_effective_date);
3040: hr_utility.set_location('ret grd tableid:'||l_retained_grade_rec.user_table_id,99999);
3036: hr_utility.set_location('before calling expired_rg_det',10);
3037: l_retained_grade_rec := ghr_pc_basic_pay.get_expired_rg_details
3038: (p_person_id => p_person_id
3039: ,p_effective_date => l_effective_date);
3040: hr_utility.set_location('ret grd tableid:'||l_retained_grade_rec.user_table_id,99999);
3041: hr_utility.set_location('MSL tableid:'||p_msl_user_table_id,99999);
3042: IF l_retained_grade_rec.user_table_id = p_msl_user_table_id THEN
3043: hr_utility.set_location('Rg table matches with MSL table ID',10);
3044: --Bug # 9329643 Modified SSN to Emp No
3037: l_retained_grade_rec := ghr_pc_basic_pay.get_expired_rg_details
3038: (p_person_id => p_person_id
3039: ,p_effective_date => l_effective_date);
3040: hr_utility.set_location('ret grd tableid:'||l_retained_grade_rec.user_table_id,99999);
3041: hr_utility.set_location('MSL tableid:'||p_msl_user_table_id,99999);
3042: IF l_retained_grade_rec.user_table_id = p_msl_user_table_id THEN
3043: hr_utility.set_location('Rg table matches with MSL table ID',10);
3044: --Bug # 9329643 Modified SSN to Emp No
3045: l_log_text := 'Error in RG Record In Mass Salary Name: '||
3039: ,p_effective_date => l_effective_date);
3040: hr_utility.set_location('ret grd tableid:'||l_retained_grade_rec.user_table_id,99999);
3041: hr_utility.set_location('MSL tableid:'||p_msl_user_table_id,99999);
3042: IF l_retained_grade_rec.user_table_id = p_msl_user_table_id THEN
3043: hr_utility.set_location('Rg table matches with MSL table ID',10);
3044: --Bug # 9329643 Modified SSN to Emp No
3045: l_log_text := 'Error in RG Record In Mass Salary Name: '||
3046: p_mass_salary_name||'; Employee Name: '|| p_full_name ||
3047: '; Emp No: ' || p_employee_number || '; '||
3044: --Bug # 9329643 Modified SSN to Emp No
3045: l_log_text := 'Error in RG Record In Mass Salary Name: '||
3046: p_mass_salary_name||'; Employee Name: '|| p_full_name ||
3047: '; Emp No: ' || p_employee_number || '; '||
3048: hr_utility.get_message;
3049: BEGIN
3050: ghr_mto_int.log_message(
3051: p_procedure => 'check_grade_retention',
3052: p_message => l_log_text);
3059: l_prd_pp_matched := FALSE;
3060: END IF;
3061: EXCEPTION
3062: WHEN OTHERS THEN
3063: hr_utility.set_location('WHEN OTHERS of EXPIRED RG ',999999);
3064: l_prd_pp_matched := FALSE;
3065: END;
3066: --WHEN OTHERS THEN
3067: -- Skip this record from reporting.
3071:
3072: FOR l_cnt in 1..p_rec_pp_prd.COUNT LOOP
3073: IF nvl(p_rec_pp_prd(l_cnt).prd,l_pay_rate_determinant) = l_pay_rate_determinant AND
3074: nvl(p_rec_pp_prd(l_cnt).pay_plan,l_pay_plan) = l_pay_plan THEN
3075: hr_utility.set_location('PP/PRD PASS',115);
3076: l_prd_pp_matched := TRUE;
3077: exit;
3078: END IF;
3079: END LOOP;
3079: END LOOP;
3080:
3081: IF l_prd_pp_matched THEN
3082: IF l_pay_table_id = p_msl_user_table_id THEN
3083: hr_utility.set_location('Table ID PASS',125);
3084: IF NOT (p_action = 'CREATE' AND
3085: person_in_pa_req_1noa
3086: (p_person_id => p_person_id,
3087: p_effective_date => l_effective_date,
3097: END IF;
3098: END LOOP;
3099:
3100: IF l_row_cnt <> 0 THEN
3101: hr_utility.set_location('ROW COUNT PASS',135);
3102: -- Get the required details if the related check has not been done above.
3103: IF NOT l_fetch_poid_data THEN
3104:
3105: get_pos_grp1_ddf(l_position_id,
3153: -- Raise Error
3154: NULL;
3155: END IF;
3156: ELSE -- Not (Create and RPA exists)
3157: hr_utility.set_location('ROW COUNT FAIL',145);
3158: p_elig_flag := FALSE;
3159: END IF;
3160: ELSE -- Pay table id is not matched
3161: hr_utility.set_location('Pay Table FAIL',155);
3157: hr_utility.set_location('ROW COUNT FAIL',145);
3158: p_elig_flag := FALSE;
3159: END IF;
3160: ELSE -- Pay table id is not matched
3161: hr_utility.set_location('Pay Table FAIL',155);
3162: p_elig_flag := FALSE;
3163: END IF;
3164: ELSE -- Pay Plan and PRD not matched
3165: hr_utility.set_location('PP/PRD FAIL',165);
3161: hr_utility.set_location('Pay Table FAIL',155);
3162: p_elig_flag := FALSE;
3163: END IF;
3164: ELSE -- Pay Plan and PRD not matched
3165: hr_utility.set_location('PP/PRD FAIL',165);
3166: p_elig_flag := FALSE;
3167: END IF;
3168: ELSE
3169: hr_utility.set_location('PP FAIL',175);
3165: hr_utility.set_location('PP/PRD FAIL',165);
3166: p_elig_flag := FALSE;
3167: END IF;
3168: ELSE
3169: hr_utility.set_location('PP FAIL',175);
3170: p_elig_flag := FALSE;
3171: END IF;
3172: EXCEPTION
3173: WHEN others THEN
3170: p_elig_flag := FALSE;
3171: END IF;
3172: EXCEPTION
3173: WHEN others THEN
3174: hr_utility.set_location('WHEN OTHERS',185);
3175: RAISE;
3176: END fetch_and_validate_emp;
3177: --
3178: --
3270:
3271: BEGIN
3272:
3273: g_proc := 'fetch_and_validate_emp_perc';
3274: hr_utility.set_location('Entering ' || l_proc,5);
3275: -- Bug#5623035 Moved the local variable declaratio to here.
3276: l_assignment_id := p_assignment_id;
3277: l_position_id := p_position_id;
3278: l_grade_id := p_grade_id;
3286: p_msl_agency_code_subelement IS NOT NULL THEN
3287: -- get the values and verify whether the record meets the condition or not.
3288: -- If Yes, proceed further. Otherwise, skip the other checks for this record
3289:
3290: hr_utility.set_location('The location id is:'||l_location_id,12345);
3291: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
3292: hr_utility.set_location('Org ID:'||p_organization_id,22222);
3293: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
3294: hr_utility.set_location('Org ID PASS',10);
3287: -- get the values and verify whether the record meets the condition or not.
3288: -- If Yes, proceed further. Otherwise, skip the other checks for this record
3289:
3290: hr_utility.set_location('The location id is:'||l_location_id,12345);
3291: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
3292: hr_utility.set_location('Org ID:'||p_organization_id,22222);
3293: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
3294: hr_utility.set_location('Org ID PASS',10);
3295: IF p_msl_personnel_office_id IS NOT NULL THEN
3288: -- If Yes, proceed further. Otherwise, skip the other checks for this record
3289:
3290: hr_utility.set_location('The location id is:'||l_location_id,12345);
3291: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
3292: hr_utility.set_location('Org ID:'||p_organization_id,22222);
3293: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
3294: hr_utility.set_location('Org ID PASS',10);
3295: IF p_msl_personnel_office_id IS NOT NULL THEN
3296: hr_utility.set_location('POID CHECK',15);
3290: hr_utility.set_location('The location id is:'||l_location_id,12345);
3291: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
3292: hr_utility.set_location('Org ID:'||p_organization_id,22222);
3293: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
3294: hr_utility.set_location('Org ID PASS',10);
3295: IF p_msl_personnel_office_id IS NOT NULL THEN
3296: hr_utility.set_location('POID CHECK',15);
3297: get_pos_grp1_ddf(l_position_id,
3298: l_effective_date,
3292: hr_utility.set_location('Org ID:'||p_organization_id,22222);
3293: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
3294: hr_utility.set_location('Org ID PASS',10);
3295: IF p_msl_personnel_office_id IS NOT NULL THEN
3296: hr_utility.set_location('POID CHECK',15);
3297: get_pos_grp1_ddf(l_position_id,
3298: l_effective_date,
3299: l_pos_grp1_rec);
3300:
3303: l_fetch_poid_data := TRUE;
3304: END IF;
3305: IF (p_msl_personnel_office_id = l_personnel_office_id) OR
3306: NOT(l_fetch_poid_data) THEN
3307: hr_utility.set_location('POID PASS',20);
3308: IF p_msl_agency_code_subelement IS NOT NULL THEN
3309: hr_utility.set_location('Agency CHECK',25);
3310: get_sub_element_code_pos_title(l_position_id,
3311: p_person_id,
3305: IF (p_msl_personnel_office_id = l_personnel_office_id) OR
3306: NOT(l_fetch_poid_data) THEN
3307: hr_utility.set_location('POID PASS',20);
3308: IF p_msl_agency_code_subelement IS NOT NULL THEN
3309: hr_utility.set_location('Agency CHECK',25);
3310: get_sub_element_code_pos_title(l_position_id,
3311: p_person_id,
3312: l_business_group_id,
3313: l_assignment_id,
3323: NVL(SUBSTR(p_msl_agency_code_subelement,3,2),SUBSTR(l_sub_element_code,3,2))=
3324: SUBSTR(l_sub_element_code,3,2)
3325: ) OR
3326: NOT(l_fetch_agency_data) THEN
3327: hr_utility.set_location('Agency PASS',30);
3328: IF p_msl_duty_station_id IS NOT NULL THEN
3329: hr_utility.set_location('DS CHECK',35);
3330: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
3331: (p_location_id => l_location_id
3325: ) OR
3326: NOT(l_fetch_agency_data) THEN
3327: hr_utility.set_location('Agency PASS',30);
3328: IF p_msl_duty_station_id IS NOT NULL THEN
3329: hr_utility.set_location('DS CHECK',35);
3330: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
3331: (p_location_id => l_location_id
3332: ,p_duty_station_id => l_duty_station_id);
3333: l_fetch_ds_data := TRUE;
3333: l_fetch_ds_data := TRUE;
3334: END IF;
3335: IF (p_msl_duty_station_id = l_duty_station_id) OR
3336: NOT(l_fetch_ds_data)THEN
3337: hr_utility.set_location('DS PASS',40);
3338: init_elig_flag := TRUE;
3339: ELSE -- Duty Station not matching.
3340: hr_utility.set_location('DS FAIL',45);
3341: init_elig_flag := FALSE;
3336: NOT(l_fetch_ds_data)THEN
3337: hr_utility.set_location('DS PASS',40);
3338: init_elig_flag := TRUE;
3339: ELSE -- Duty Station not matching.
3340: hr_utility.set_location('DS FAIL',45);
3341: init_elig_flag := FALSE;
3342: END IF;
3343: ELSE -- Agency Code Subelement Not matching.
3344: hr_utility.set_location('Agency FAIL',55);
3340: hr_utility.set_location('DS FAIL',45);
3341: init_elig_flag := FALSE;
3342: END IF;
3343: ELSE -- Agency Code Subelement Not matching.
3344: hr_utility.set_location('Agency FAIL',55);
3345: init_elig_flag := FALSE;
3346: END IF;
3347: ELSE -- Personnel Office ID not matching
3348: hr_utility.set_location('POID FAIL',65);
3344: hr_utility.set_location('Agency FAIL',55);
3345: init_elig_flag := FALSE;
3346: END IF;
3347: ELSE -- Personnel Office ID not matching
3348: hr_utility.set_location('POID FAIL',65);
3349: init_elig_flag := FALSE;
3350: END IF;
3351: ELSE -- Organization_id is not matching.
3352: hr_utility.set_location('Org FAIL',75);
3348: hr_utility.set_location('POID FAIL',65);
3349: init_elig_flag := FALSE;
3350: END IF;
3351: ELSE -- Organization_id is not matching.
3352: hr_utility.set_location('Org FAIL',75);
3353: init_elig_flag := FALSE;
3354: END IF;
3355: ELSE -- If No value is entered for organization, Duty Station, Agency, POID of MSL Criteria.
3356: hr_utility.set_location('No INIT CRITERIA',85);
3352: hr_utility.set_location('Org FAIL',75);
3353: init_elig_flag := FALSE;
3354: END IF;
3355: ELSE -- If No value is entered for organization, Duty Station, Agency, POID of MSL Criteria.
3356: hr_utility.set_location('No INIT CRITERIA',85);
3357: init_elig_flag := TRUE;
3358: END IF;
3359:
3360: -- If the initial eligibility is passed then proceed further. Otherwise move to next record.
3358: END IF;
3359:
3360: -- If the initial eligibility is passed then proceed further. Otherwise move to next record.
3361: IF init_elig_flag THEN
3362: hr_utility.set_location('Init Criteria Pass',95);
3363: ghr_pa_requests_pkg.get_sf52_asg_ddf_details
3364: (l_assignment_id,
3365: l_effective_date,
3366: l_tenure,
3370: l_part_time_hour);
3371:
3372: FOR l_cnt in 1..p_rec_pp_prd_per_gr.COUNT LOOP
3373: IF nvl(p_rec_pp_prd_per_gr(l_cnt).prd,l_pay_rate_determinant) = l_pay_rate_determinant THEN
3374: hr_utility.set_location('PRD PASS',105);
3375: l_prd_matched := TRUE;
3376: exit;
3377: END IF;
3378: END LOOP;
3398: --Bug # 9329643 Modified SSN to Emp No
3399: l_log_text := 'Error in RG Record In Mass Salary Name: '||
3400: p_mass_salary_name||'; Employee Name: '|| p_full_name ||
3401: '; Emp No: ' || p_employee_number || '; '||
3402: hr_utility.get_message;
3403: BEGIN
3404: ghr_mto_int.log_message(
3405: p_procedure => 'check_grade_retention',
3406: p_message => l_log_text);
3433: END LOOP;
3434:
3435: IF l_prd_pp_matched THEN
3436: IF l_pay_table_id = p_msl_user_table_id THEN
3437: hr_utility.set_location('Table ID PASS',125);
3438: IF NOT (p_action = 'CREATE' AND
3439: person_in_pa_req_1noa
3440: (p_person_id => p_person_id,
3441: p_effective_date => l_effective_date,
3450: END IF;
3451: END LOOP;
3452:
3453: IF l_row_cnt <> 0 THEN
3454: hr_utility.set_location('ROW COUNT PASS',135);
3455: -- Get the required details if the related check has not been done above.
3456: IF NOT l_fetch_poid_data THEN
3457:
3458: get_pos_grp1_ddf(l_position_id,
3504: -- Raise Error
3505: NULL;
3506: END IF;
3507: ELSE -- Not (Create and RPA exists)
3508: hr_utility.set_location('ROW COUNT FAIL',145);
3509: p_elig_flag := FALSE;
3510: END IF;
3511: ELSE -- Pay table id is not matched
3512: hr_utility.set_location('Pay Table FAIL',155);
3508: hr_utility.set_location('ROW COUNT FAIL',145);
3509: p_elig_flag := FALSE;
3510: END IF;
3511: ELSE -- Pay table id is not matched
3512: hr_utility.set_location('Pay Table FAIL',155);
3513: p_elig_flag := FALSE;
3514: END IF;
3515: ELSE -- Pay Plan and PRD not matched
3516: hr_utility.set_location('PP/PRD FAIL',165);
3512: hr_utility.set_location('Pay Table FAIL',155);
3513: p_elig_flag := FALSE;
3514: END IF;
3515: ELSE -- Pay Plan and PRD not matched
3516: hr_utility.set_location('PP/PRD FAIL',165);
3517: p_elig_flag := FALSE;
3518: END IF;
3519: ELSE
3520: hr_utility.set_location('PP FAIL',175);
3516: hr_utility.set_location('PP/PRD FAIL',165);
3517: p_elig_flag := FALSE;
3518: END IF;
3519: ELSE
3520: hr_utility.set_location('PP FAIL',175);
3521: p_elig_flag := FALSE;
3522: END IF;
3523: EXCEPTION
3524: WHEN others THEN
3521: p_elig_flag := FALSE;
3522: END IF;
3523: EXCEPTION
3524: WHEN others THEN
3525: hr_utility.set_location('WHEN OTHERS',185);
3526: RAISE;
3527: END fetch_and_validate_emp_perc;
3528: --
3529: --
3550: l_proc varchar2(72) := g_package || '.check_init_eligibility';
3551: BEGIN
3552:
3553: g_proc := 'check_init_eligibility';
3554: hr_utility.set_location('Entering ' || l_proc,5);
3555:
3556: if p_personnel_office_id is not null then
3557: if p_personnel_office_id <> nvl(p_l_personnel_office_id,'NULL!~') then
3558: return false;
3587: l_ds_end_date := rec_ds.end_Date;
3588: END LOOP;
3589:
3590: If l_ds_end_date IS NULL THEN
3591: hr_utility.set_location('Under DS null check'||p_l_duty_station_id,12345);
3592: raise msl_error;
3593: return false;
3594: end if;
3595: -- End of bug 3437354
3597: pr('Eligible');
3598: return true;
3599: exception
3600: when msl_error then --raise;
3601: hr_utility.set_location('Error NO DUTY STATION '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3602: l_mslerrbuf :=
3603: 'Error - No valid Location found, salary cannot be correctly calculated without the employee''s duty location ';
3604: raise msl_error;
3605: when others then
3602: l_mslerrbuf :=
3603: 'Error - No valid Location found, salary cannot be correctly calculated without the employee''s duty location ';
3604: raise msl_error;
3605: when others then
3606: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3607: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3608: raise msl_error;
3609: END check_init_eligibility;
3610:
3629: l_row_cnt number := 0;
3630: l_proc varchar2(72) := g_package || '.check_eligibility';
3631: BEGIN
3632: g_proc := 'check_eligibility';
3633: hr_utility.set_location('Entering ' || l_proc,5);
3634: --return true;
3635:
3636: if p_user_table_id is null or p_pay_table_id is null then
3637: return false;
3693: return true;
3694: exception
3695: when msl_error then raise;
3696: when others then
3697: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3698: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3699: raise msl_error;
3700: END check_eligibility;
3701:
3763: l_eq_pay_plan ghr_pay_plans.equivalent_pay_plan%type;
3764:
3765: begin
3766: g_proc := 'person_in_pa_req_1noa';
3767: hr_utility.set_location('Entering ' || l_proc,5);
3768: -- Bug 1631952 start
3769: for csr_eq_pay_plan_rec in csr_eq_pay_plan loop
3770: l_eq_pay_plan := csr_eq_pay_plan_rec.equivalent_pay_plan;
3771: end loop;
3874: l_action_taken ghr_pa_routing_history.action_taken%TYPE;
3875: l_proc varchar2(72) := g_package || '.person_in_pa_req_2noa';
3876: begin
3877: g_proc := 'person_in_pa_req_2noa';
3878: hr_utility.set_location('Entering ' || l_proc,5);
3879: for v_action_taken in csr_action_taken loop
3880: for pa_hist_rec in pa_hist_cur (v_action_taken.pa_routing_history_id)
3881: loop
3882: l_action_taken := pa_hist_rec.action_taken;
3903: l_proc varchar2(72) := g_package || '.check_grade_retention';
3904:
3905: BEGIN
3906: g_proc := 'check_grade_retention';
3907: hr_utility.set_location('Entering ' || l_proc,5);
3908: IF p_prd in ('A','B','E','F','U','V') THEN
3909: IF p_prd in ('A','B','E','F') THEN
3910: -- Bug#4179270,4126137,4086677 Removed the History Fetch call.
3911: -- Note: Do not use fetch_peopleei to get Retained grade details as it
3949: --l_pos_ei_data per_position_extra_info%type;
3950:
3951: begin
3952: g_proc := 'get_pos_grp1_ddf';
3953: hr_utility.set_location('Entering ' || l_proc,5);
3954: ghr_history_fetch.fetch_positionei
3955: (p_position_id => p_position_id
3956: ,p_information_type => 'GHR_US_POS_GRP1'
3957: ,p_date_effective => p_effective_date
3956: ,p_information_type => 'GHR_US_POS_GRP1'
3957: ,p_date_effective => p_effective_date
3958: ,p_pos_ei_data => p_pos_ei_data
3959: );
3960: hr_utility.set_location('Exiting ' || l_proc,10);
3961: exception
3962: when msl_error then raise;
3963: when others then
3964: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3960: hr_utility.set_location('Exiting ' || l_proc,10);
3961: exception
3962: when msl_error then raise;
3963: when others then
3964: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3965: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3966: raise msl_error;
3967: END get_pos_grp1_ddf;
3968:
4006:
4007: BEGIN
4008:
4009: g_proc := 'get_from_sf52_data_elements';
4010: hr_utility.set_location('Entering ' || l_proc,5);
4011:
4012: -- Processing Total Pay and Adjusted Basic Pay
4013: -- NAME DATE BUG COMMENTS
4014: -- Ashley 17-JUL-03 Payroll Intg Modified the Input Value name
4022: ,p_effective_date => p_effective_date
4023: ,p_value => l_total_salary
4024: ,p_multiple_error_flag => l_multi_error_flag);
4025:
4026: hr_utility.set_location('Total Pay = ' || to_char(l_total_salary), 6);
4027:
4028: if l_multi_error_flag then
4029: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4030: hr_utility.raise_error;
4025:
4026: hr_utility.set_location('Total Pay = ' || to_char(l_total_salary), 6);
4027:
4028: if l_multi_error_flag then
4029: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4030: hr_utility.raise_error;
4031: end if;
4032:
4033: ghr_api.retrieve_element_entry_value
4026: hr_utility.set_location('Total Pay = ' || to_char(l_total_salary), 6);
4027:
4028: if l_multi_error_flag then
4029: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4030: hr_utility.raise_error;
4031: end if;
4032:
4033: ghr_api.retrieve_element_entry_value
4034: (p_element_name => 'Basic Salary Rate'
4037: ,p_effective_date => p_effective_date
4038: ,p_value => l_basic_pay
4039: ,p_multiple_error_flag => l_multi_error_flag);
4040:
4041: hr_utility.set_location('Basic Salary Rate = ' || to_char(l_basic_pay), 6);
4042:
4043: if l_multi_error_flag then
4044: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4045: hr_utility.raise_error;
4040:
4041: hr_utility.set_location('Basic Salary Rate = ' || to_char(l_basic_pay), 6);
4042:
4043: if l_multi_error_flag then
4044: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4045: hr_utility.raise_error;
4046: end if;
4047:
4048: ghr_api.retrieve_element_entry_value
4041: hr_utility.set_location('Basic Salary Rate = ' || to_char(l_basic_pay), 6);
4042:
4043: if l_multi_error_flag then
4044: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4045: hr_utility.raise_error;
4046: end if;
4047:
4048: ghr_api.retrieve_element_entry_value
4049: -- FWFA Changes Bug#4444609
4055: ,p_effective_date => p_effective_date
4056: ,p_value => l_locality_adj
4057: ,p_multiple_error_flag => l_multi_error_flag);
4058:
4059: hr_utility.set_location('Locality Pay = ' || to_char(l_locality_adj), 6);
4060:
4061: if l_multi_error_flag then
4062: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4063: hr_utility.raise_error;
4058:
4059: hr_utility.set_location('Locality Pay = ' || to_char(l_locality_adj), 6);
4060:
4061: if l_multi_error_flag then
4062: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4063: hr_utility.raise_error;
4064: end if;
4065:
4066: ghr_api.retrieve_element_entry_value
4059: hr_utility.set_location('Locality Pay = ' || to_char(l_locality_adj), 6);
4060:
4061: if l_multi_error_flag then
4062: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4063: hr_utility.raise_error;
4064: end if;
4065:
4066: ghr_api.retrieve_element_entry_value
4067: (p_element_name => 'Adjusted Basic Pay'
4070: ,p_effective_date => p_effective_date
4071: ,p_value => l_adj_basic_pay
4072: ,p_multiple_error_flag => l_multi_error_flag);
4073:
4074: hr_utility.set_location('Adjusted Basic Pay = ' || to_char(l_adj_basic_pay), 6);
4075:
4076: if l_multi_error_flag then
4077: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4078: hr_utility.raise_error;
4073:
4074: hr_utility.set_location('Adjusted Basic Pay = ' || to_char(l_adj_basic_pay), 6);
4075:
4076: if l_multi_error_flag then
4077: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4078: hr_utility.raise_error;
4079: end if;
4080:
4081: ghr_api.retrieve_element_entry_value
4074: hr_utility.set_location('Adjusted Basic Pay = ' || to_char(l_adj_basic_pay), 6);
4075:
4076: if l_multi_error_flag then
4077: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4078: hr_utility.raise_error;
4079: end if;
4080:
4081: ghr_api.retrieve_element_entry_value
4082: (p_element_name => 'Other Pay'
4085: ,p_effective_date => p_effective_date
4086: ,p_value => l_other_pay
4087: ,p_multiple_error_flag => l_multi_error_flag);
4088:
4089: hr_utility.set_location('Other Pay = ' || to_char(l_other_pay), 6);
4090:
4091: if l_multi_error_flag then
4092: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4093: hr_utility.raise_error;
4088:
4089: hr_utility.set_location('Other Pay = ' || to_char(l_other_pay), 6);
4090:
4091: if l_multi_error_flag then
4092: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4093: hr_utility.raise_error;
4094: end if;
4095:
4096: ghr_api.retrieve_element_entry_value
4089: hr_utility.set_location('Other Pay = ' || to_char(l_other_pay), 6);
4090:
4091: if l_multi_error_flag then
4092: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4093: hr_utility.raise_error;
4094: end if;
4095:
4096: ghr_api.retrieve_element_entry_value
4097: (p_element_name => 'AUO'
4100: ,p_effective_date => p_effective_date
4101: ,p_value => l_au_overtime
4102: ,p_multiple_error_flag => l_multi_error_flag);
4103:
4104: hr_utility.set_location('AUO Amount = ' || to_char(l_au_overtime), 6);
4105:
4106: if l_multi_error_flag then
4107: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4108: hr_utility.raise_error;
4103:
4104: hr_utility.set_location('AUO Amount = ' || to_char(l_au_overtime), 6);
4105:
4106: if l_multi_error_flag then
4107: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4108: hr_utility.raise_error;
4109: end if;
4110:
4111: ghr_api.retrieve_element_entry_value
4104: hr_utility.set_location('AUO Amount = ' || to_char(l_au_overtime), 6);
4105:
4106: if l_multi_error_flag then
4107: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4108: hr_utility.raise_error;
4109: end if;
4110:
4111: ghr_api.retrieve_element_entry_value
4112: (p_element_name => 'AUO'
4116: ,p_value => l_auo_premium_pay_indicator
4117: ,p_multiple_error_flag => l_multi_error_flag);
4118:
4119: if l_multi_error_flag then
4120: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4121: hr_utility.raise_error;
4122: end if;
4123:
4124: ghr_api.retrieve_element_entry_value
4117: ,p_multiple_error_flag => l_multi_error_flag);
4118:
4119: if l_multi_error_flag then
4120: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4121: hr_utility.raise_error;
4122: end if;
4123:
4124: ghr_api.retrieve_element_entry_value
4125: (p_element_name => 'Availability Pay'
4128: ,p_effective_date => p_effective_date
4129: ,p_value => l_availability_pay
4130: ,p_multiple_error_flag => l_multi_error_flag);
4131:
4132: hr_utility.set_location('Availability Pay Amount = ' || to_char(l_availability_pay), 6);
4133:
4134: if l_multi_error_flag then
4135: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4136: hr_utility.raise_error;
4131:
4132: hr_utility.set_location('Availability Pay Amount = ' || to_char(l_availability_pay), 6);
4133:
4134: if l_multi_error_flag then
4135: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4136: hr_utility.raise_error;
4137: end if;
4138:
4139: ghr_api.retrieve_element_entry_value
4132: hr_utility.set_location('Availability Pay Amount = ' || to_char(l_availability_pay), 6);
4133:
4134: if l_multi_error_flag then
4135: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4136: hr_utility.raise_error;
4137: end if;
4138:
4139: ghr_api.retrieve_element_entry_value
4140: (p_element_name => 'Availability Pay'
4144: ,p_value => l_ap_premium_pay_indicator
4145: ,p_multiple_error_flag => l_multi_error_flag);
4146:
4147: if l_multi_error_flag then
4148: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4149: hr_utility.raise_error;
4150: end if;
4151: --
4152: ghr_api.retrieve_element_entry_value
4145: ,p_multiple_error_flag => l_multi_error_flag);
4146:
4147: if l_multi_error_flag then
4148: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4149: hr_utility.raise_error;
4150: end if;
4151: --
4152: ghr_api.retrieve_element_entry_value
4153: (p_element_name => 'Retention Allowance'
4156: ,p_effective_date => p_effective_date
4157: ,p_value => l_retention_allowance
4158: ,p_multiple_error_flag => l_multi_error_flag);
4159:
4160: hr_utility.set_location('Retention Allowance Amount = ' || to_char(l_retention_allowance), 6);
4161:
4162: if l_multi_error_flag then
4163: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4164: hr_utility.raise_error;
4159:
4160: hr_utility.set_location('Retention Allowance Amount = ' || to_char(l_retention_allowance), 6);
4161:
4162: if l_multi_error_flag then
4163: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4164: hr_utility.raise_error;
4165: end if;
4166:
4167: ghr_api.retrieve_element_entry_value
4160: hr_utility.set_location('Retention Allowance Amount = ' || to_char(l_retention_allowance), 6);
4161:
4162: if l_multi_error_flag then
4163: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4164: hr_utility.raise_error;
4165: end if;
4166:
4167: ghr_api.retrieve_element_entry_value
4168: (p_element_name => 'Retention Allowance'
4171: ,p_effective_date => p_effective_date
4172: ,p_value => l_retention_allow_perc
4173: ,p_multiple_error_flag => l_multi_error_flag);
4174:
4175: hr_utility.set_location('Retention Allowance Percent = ' || to_char(l_retention_allow_perc), 6);
4176:
4177: if l_multi_error_flag then
4178: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4179: hr_utility.raise_error;
4174:
4175: hr_utility.set_location('Retention Allowance Percent = ' || to_char(l_retention_allow_perc), 6);
4176:
4177: if l_multi_error_flag then
4178: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4179: hr_utility.raise_error;
4180: end if;
4181:
4182: ghr_api.retrieve_element_entry_value
4175: hr_utility.set_location('Retention Allowance Percent = ' || to_char(l_retention_allow_perc), 6);
4176:
4177: if l_multi_error_flag then
4178: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4179: hr_utility.raise_error;
4180: end if;
4181:
4182: ghr_api.retrieve_element_entry_value
4183: (p_element_name => 'Supervisory Differential'
4186: ,p_effective_date => p_effective_date
4187: ,p_value => l_supervisory_differential
4188: ,p_multiple_error_flag => l_multi_error_flag);
4189:
4190: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential), 6);
4191:
4192: if l_multi_error_flag then
4193: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4194: hr_utility.raise_error;
4189:
4190: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential), 6);
4191:
4192: if l_multi_error_flag then
4193: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4194: hr_utility.raise_error;
4195: end if;
4196:
4197: ghr_api.retrieve_element_entry_value
4190: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential), 6);
4191:
4192: if l_multi_error_flag then
4193: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4194: hr_utility.raise_error;
4195: end if;
4196:
4197: ghr_api.retrieve_element_entry_value
4198: (p_element_name => 'Supervisory Differential'
4201: ,p_effective_date => p_effective_date
4202: ,p_value => l_supervisory_diff_perc
4203: ,p_multiple_error_flag => l_multi_error_flag);
4204:
4205: hr_utility.set_location('Supervisory Diff Percent = ' || to_char(l_supervisory_diff_perc), 6);
4206:
4207: if l_multi_error_flag then
4208: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4209: hr_utility.raise_error;
4204:
4205: hr_utility.set_location('Supervisory Diff Percent = ' || to_char(l_supervisory_diff_perc), 6);
4206:
4207: if l_multi_error_flag then
4208: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4209: hr_utility.raise_error;
4210: end if;
4211:
4212: --
4205: hr_utility.set_location('Supervisory Diff Percent = ' || to_char(l_supervisory_diff_perc), 6);
4206:
4207: if l_multi_error_flag then
4208: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4209: hr_utility.raise_error;
4210: end if;
4211:
4212: --
4213: --
4218: ,p_effective_date => p_effective_date
4219: ,p_value => l_staffing_differential
4220: ,p_multiple_error_flag => l_multi_error_flag);
4221:
4222: hr_utility.set_location('Staffing Diff Amount = ' || to_char(l_staffing_differential), 6);
4223:
4224: if l_multi_error_flag then
4225: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4226: hr_utility.raise_error;
4221:
4222: hr_utility.set_location('Staffing Diff Amount = ' || to_char(l_staffing_differential), 6);
4223:
4224: if l_multi_error_flag then
4225: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4226: hr_utility.raise_error;
4227: end if;
4228:
4229: p_tot_old_sal := round(l_total_salary,2);
4222: hr_utility.set_location('Staffing Diff Amount = ' || to_char(l_staffing_differential), 6);
4223:
4224: if l_multi_error_flag then
4225: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4226: hr_utility.raise_error;
4227: end if;
4228:
4229: p_tot_old_sal := round(l_total_salary,2);
4230: p_OLD_BASIC_PAY := round(l_basic_pay,2);
4240: p_supervisory_differential := l_supervisory_differential;
4241: p_supervisory_diff_perc := l_supervisory_diff_perc;
4242: p_staffing_differential := l_staffing_differential;
4243:
4244: hr_utility.set_location('Exiting ' || l_proc,10);
4245:
4246: exception
4247: when msl_error then raise;
4248: when others then
4245:
4246: exception
4247: when msl_error then raise;
4248: when others then
4249: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4250: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4251: raise msl_error;
4252: END GET_FROM_SF52_DATA_ELEMENTS;
4253:
4267: p_position_seq_no out nocopy varchar2) is
4268: l_proc varchar2(72) := g_package || '.get_sub_element_code_pos_title';
4269: begin
4270: g_proc := 'get_sub_element_code_pos_title';
4271: hr_utility.set_location('Entering ' || l_proc,5);
4272: p_sub_element_code := ghr_api.get_position_agency_code_pos
4273: (p_position_id,p_business_group_id,p_effective_date);
4274:
4275: p_position_title := ghr_api.get_position_title_pos
4290: ,p_effective_date => p_effective_date
4291: );
4292: end if;
4293:
4294: hr_utility.set_location('Exiting ' || l_proc,10);
4295: end get_sub_element_code_pos_title;
4296:
4297: --
4298: -- Get all details for the reporting...
4308: ) is
4309: l_proc varchar2(72) := g_package || '.get_other_dtls_for_rep';
4310: BEGIN
4311: g_proc := 'get_other_dtls_for_rep';
4312: hr_utility.set_location('Entering ' || l_proc,5);
4313: p_first_action_la_code1 := 'QWM';
4314: p_first_action_la_code2 := 'ZLM';
4315:
4316: /**
4332: p_first_action_la_code2 := 'ZLM';
4333: End if;
4334: */
4335:
4336: hr_utility.set_location('Exiting ' || l_proc,10);
4337:
4338: exception
4339: when msl_error then raise;
4340: when others then
4337:
4338: exception
4339: when msl_error then raise;
4340: when others then
4341: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4342: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4343: raise msl_error;
4344: END get_other_dtls_for_rep;
4345:
4426: l_check_grade_retention VARCHAR2(200);
4427:
4428: begin
4429: g_proc := 'create_mass_act_prev';
4430: hr_utility.set_location('Entering ' || l_proc,5);
4431: if p_remark_code2 is not null then
4432: l_comb_rem := p_remark_code1||', '||p_remark_code2;
4433: else
4434: l_comb_rem := p_remark_code1;
4450: p_cust_rec => l_cust_rec);
4451:
4452: exception
4453: when others then
4454: hr_utility.set_location('Error in Mass Act Custom '||
4455: 'Err is '||sqlerrm(sqlcode),20);
4456: l_mslerrbuf := 'Error in Mass Act Custom '||
4457: 'Err is '|| sqlerrm(sqlcode);
4458: raise msl_error;
4480: ghr_mre_pkg.pr('Person ID '||to_char(p_person_id),'ERROR 2',l_mslerrbuf);
4481: raise msl_error;
4482: END;
4483: ELSIF l_check_grade_retention ='MSL_ERROR' THEN
4484: hr_utility.set_message(8301,'GHR_38927_MISSING_MA_RET_DET');
4485: raise msl_error;
4486: ELSIF l_check_grade_retention = 'OTHER_ERROR' THEN
4487: l_mslerrbuf := 'Others error in check_grade_retention function while fetching retained grade record. Please
4488: verify the retained grade record';
4662: l_cust_rec.user_attribute20,
4663: p_increase_percent
4664: );
4665:
4666: hr_utility.set_location('Exiting ' || l_proc,10);
4667: exception
4668: when msl_error then raise;
4669: when others then
4670: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4666: hr_utility.set_location('Exiting ' || l_proc,10);
4667: exception
4668: when msl_error then raise;
4669: when others then
4670: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4671: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4672: raise msl_error;
4673: end create_mass_act_prev;
4674:
4687: where pa_request_id = p_pa_request_id;
4688:
4689: begin
4690: g_proc := 'get_lac_dtls';
4691: hr_utility.set_location('Entering ' || l_proc,5);
4692:
4693: pr('Entering '||l_proc||' Pa req id ',to_char(p_pa_request_id));
4694: if p_pa_request_id is null then
4695: pr('PA request id is null.................');
4701: exit;
4702: end loop;
4703: end if;
4704:
4705: hr_utility.set_location('Exiting ' || l_proc,10);
4706: exception
4707: when others then
4708: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4709: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4704:
4705: hr_utility.set_location('Exiting ' || l_proc,10);
4706: exception
4707: when others then
4708: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4709: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4710: raise msl_error;
4711: end get_lac_dtls;
4712:
4727: l_remarks_rec ghr_pa_remarks%rowtype;
4728:
4729: begin
4730: g_proc := 'create_lac_remarks';
4731: hr_utility.set_location('Entering ' || l_proc,5);
4732:
4733: pr('Inside '||l_proc,to_char(p_pa_request_id),to_char(p_new_pa_request_id));
4734:
4735: FOR CUR_PA_REM_rec in cur_pa_rem_cur
4753: );
4754:
4755: end loop;
4756:
4757: hr_utility.set_location('Exiting ' || l_proc,10);
4758:
4759: exception
4760: when others then
4761: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4757: hr_utility.set_location('Exiting ' || l_proc,10);
4758:
4759: exception
4760: when others then
4761: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4762: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4763: raise msl_error;
4764: end create_lac_remarks;
4765:
4780: l_proc varchar2(72) := g_package || '.upd_ext_info_to_null';
4781:
4782: begin
4783: g_proc := 'upd_ext_info_to_null';
4784: hr_utility.set_location('Entering ' || l_proc,5);
4785:
4786: pr('Inside '||l_proc);
4787:
4788: for per_ext_rec in cur1
4793:
4794: commit;
4795:
4796: pr('Exiting '||l_proc);
4797: hr_utility.set_location('Exiting ' || l_proc,10);
4798:
4799: exception
4800: when msl_error then raise;
4801: when others then
4798:
4799: exception
4800: when msl_error then raise;
4801: when others then
4802: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4803: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4804: raise msl_error;
4805: end;
4806:
4860: begin
4861:
4862: g_proc := 'assign_to_sf52_rec';
4863:
4864: hr_utility.set_location('Entering ' || l_proc,5);
4865:
4866: p_sf52_rec.person_id := p_person_id;
4867: p_sf52_rec.employee_first_name := p_first_name;
4868: p_sf52_rec.employee_last_name := p_last_name;
4929: p_sf52_rec.FIRST_ACTION_LA_CODE2 := p_lac_sf52_rec.FIRST_ACTION_LA_CODE2;
4930: p_sf52_rec.FIRST_ACTION_LA_DESC1 := p_lac_sf52_rec.FIRST_ACTION_LA_DESC1;
4931: p_sf52_rec.FIRST_ACTION_LA_DESC2 := p_lac_sf52_rec.FIRST_ACTION_LA_DESC2;
4932:
4933: hr_utility.set_location('Exiting ' || l_proc,10);
4934:
4935: exception
4936: when msl_error then raise;
4937: when others then
4934:
4935: exception
4936: when msl_error then raise;
4937: when others then
4938: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4939: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4940: raise msl_error;
4941: end assign_to_sf52_rec;
4942:
4953:
4954: ghr_mto_int.put_line(msg||'-'||par1||' -'||par2||'-');
4955: exception
4956: when others then
4957: hr_utility.set_location('Error in pr '||' Err is '||sqlerrm(sqlcode),20);
4958: l_mslerrbuf := 'Error in pr Sql Err is '|| sqlerrm(sqlcode);
4959: raise msl_error;
4960: end;
4961:
5371: l_grade_or_level := p_grade_or_level;
5372: l_step_or_rate := P_step_or_rate;
5373: l_pay_basis := p_pay_basis;
5374:
5375: hr_utility.set_location('The location id is:'||l_location_id,12345);
5376:
5377: ghr_msl_pkg.g_first_noa_code := '894';
5378: --------GPPA Update 46 start
5379: -- ghr_msl_pkg.g_first_noa_code := NULL;
5435: ,p_value => l_locality_adj
5436: ,p_multiple_error_flag => l_multi_error_flag);
5437:
5438: if l_multi_error_flag then
5439: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
5440: hr_utility.raise_error;
5441: end if;
5442:
5443: If NVL(l_locality_adj,0) > 0 then
5436: ,p_multiple_error_flag => l_multi_error_flag);
5437:
5438: if l_multi_error_flag then
5439: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
5440: hr_utility.raise_error;
5441: end if;
5442:
5443: If NVL(l_locality_adj,0) > 0 then
5444: ghr_msl_pkg.g_sl_payband_conv := TRUE;
5470: LOOP
5471: l_ds_end_date := rec_ds.end_Date;
5472: END LOOP;
5473: IF l_ds_end_date IS NULL THEN
5474: hr_utility.set_location('Under DS null check'||l_duty_station_id,12345);
5475: l_mslerrbuf := 'Error - Duty Station associated with the location is INVALID. '||
5476: 'Salary cannot be calculated correctly without valid duty station. ';
5477: RAISE msl_error;
5478: END IF;
5485: (p_location_id => l_location_id
5486: ,p_duty_station_id => l_duty_station_id);
5487: exception
5488: when others then
5489: hr_utility.set_location(
5490: 'Error in Ghr_pa_requests_pkg.get_sf52_loc_ddf_details'||
5491: 'Err is '||sqlerrm(sqlcode),20);
5492: l_mslerrbuf := 'Error in get_sf52_loc_ddf_details '||
5493: 'Sql Err is '|| sqlerrm(sqlcode);
5517: l_position_title,
5518: l_position_number,
5519: l_position_seq_no);
5520:
5521: hr_utility.set_location('The duty station id is:'||l_duty_station_id,12345);
5522:
5523: if check_init_eligibility(l_p_duty_station_id,
5524: l_p_PERSONNEL_OFFICE_ID,
5525: l_p_AGENCY_CODE_SUBELEMENT,
5526: l_duty_station_id,
5527: l_personnel_office_id,
5528: l_sub_element_code) then
5529:
5530: hr_utility.set_location('check_init_eligibility ' || l_proc,6);
5531: -- Bug 3457205 Filter the Pay plan table id condition also b4 checking any other thing
5532: -- Moving check_eligibility to here.
5533: -- Get PRD, work schedule etc form ASG EI
5534: begin
5541: l_work_schedule,
5542: l_part_time_hour);
5543: exception
5544: when others then
5545: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_sf52_asg_ddf_details'||
5546: 'Err is '||sqlerrm(sqlcode),20);
5547: l_mslerrbuf := 'Error in get_sf52_asgddf_details Sql Err is '|| sqlerrm(sqlcode);
5548: raise msl_error;
5549: end;
5566: l_pay_table_id,l_grade_or_level, l_step_or_rate,
5567: l_pay_basis);
5568: EXCEPTION
5569: when msl_error then
5570: l_mslerrbuf := hr_utility.get_message;
5571: raise;
5572: END;
5573:
5574: IF ( nvl(rec_pp_prd_per_gr(l_cnt).pay_plan,l_pay_plan) = l_pay_plan
5585: l_pay_rate_determinant,
5586: p_person_id,
5587: l_effective_date,
5588: p_action) THEN
5589: hr_utility.set_location('check_eligibility ' || l_proc,8);
5590:
5591: l_increase_percent := nvl(rec_pp_prd_per_gr(l_cnt).percent,0);*/
5592:
5593: if upper(p_action) = 'REPORT' AND l_submit_flag = 'P' THEN
5598: if check_select_flg_msl_perc(p_person_id,upper(p_action),
5599: l_effective_date,p_mass_salary_id,l_sel_flg,
5600: l_increase_percent ) then
5601:
5602: hr_utility.set_location('check_select_flg ' || l_proc,7);
5603: begin
5604: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
5605: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
5606:
5600: l_increase_percent ) then
5601:
5602: hr_utility.set_location('check_select_flg ' || l_proc,7);
5603: begin
5604: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
5605: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
5606:
5607: ghr_pa_requests_pkg.get_duty_station_details
5608: (p_duty_station_id => l_duty_station_id
5601:
5602: hr_utility.set_location('check_select_flg ' || l_proc,7);
5603: begin
5604: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
5605: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
5606:
5607: ghr_pa_requests_pkg.get_duty_station_details
5608: (p_duty_station_id => l_duty_station_id
5609: ,p_effective_date => l_effective_date
5610: ,p_duty_station_code => l_duty_station_code
5611: ,p_duty_station_desc => l_duty_station_desc);
5612: exception
5613: when others then
5614: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_duty_station_details'||
5615: 'Err is '||sqlerrm(sqlcode),20);
5616: l_mslerrbuf := 'Error in get_duty_station_details Sql Err is '|| sqlerrm(sqlcode);
5617: raise msl_error;
5618:
5744: ,l_message_set
5745: ,l_calculated);
5746:
5747: IF l_message_set THEN
5748: hr_utility.set_location( l_proc, 40);
5749: l_calculated := FALSE;
5750: l_mslerrbuf := hr_utility.get_message;
5751: -- raise msl_error;
5752: END IF;
5746:
5747: IF l_message_set THEN
5748: hr_utility.set_location( l_proc, 40);
5749: l_calculated := FALSE;
5750: l_mslerrbuf := hr_utility.get_message;
5751: -- raise msl_error;
5752: END IF;
5753: exception
5754: when msl_error then
5834: ins_upd_per_extra_info
5835: (p_person_id,l_effective_date, l_sel_flg, l_comments,p_mass_salary_id,l_cust_percent);
5836: l_comment := NULL;
5837: ------ BUG 3287299 End
5838: hr_utility.set_location('Error in Ghr_pay_calc.sql_main_pay_calc '||
5839: 'Err is '||sqlerrm(sqlcode),20);
5840: l_mslerrbuf := 'Error in ghr_pay_calc Sql Err is '|| sqlerrm(sqlcode);
5841: g_proc := 'ghr_pay_calc';
5842: raise msl_error;
5860: l_new_other_pay_amount := null;
5861: end if;
5862: l_new_total_salary := l_pay_calc_out_data.total_salary;
5863:
5864: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
5865: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
5866:
5867: -------------Call Pay cap Procedure
5868: begin
5861: end if;
5862: l_new_total_salary := l_pay_calc_out_data.total_salary;
5863:
5864: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
5865: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
5866:
5867: -------------Call Pay cap Procedure
5868: begin
5869: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
5869: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
5870: ,p_effective_date => l_effective_date);
5871: l_old_capped_other_pay := l_capped_other_pay;
5872: -- Sundar Added the following if statement to improve performance
5873: if hr_utility.debug_enabled = true then
5874: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
5875: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
5876: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
5877: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
5870: ,p_effective_date => l_effective_date);
5871: l_old_capped_other_pay := l_capped_other_pay;
5872: -- Sundar Added the following if statement to improve performance
5873: if hr_utility.debug_enabled = true then
5874: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
5875: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
5876: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
5877: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
5878: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
5871: l_old_capped_other_pay := l_capped_other_pay;
5872: -- Sundar Added the following if statement to improve performance
5873: if hr_utility.debug_enabled = true then
5874: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
5875: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
5876: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
5877: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
5878: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
5879: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
5872: -- Sundar Added the following if statement to improve performance
5873: if hr_utility.debug_enabled = true then
5874: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
5875: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
5876: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
5877: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
5878: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
5879: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
5880: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
5873: if hr_utility.debug_enabled = true then
5874: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
5875: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
5876: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
5877: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
5878: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
5879: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
5880: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
5881: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
5874: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
5875: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
5876: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
5877: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
5878: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
5879: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
5880: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
5881: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
5882: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
5875: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
5876: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
5877: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
5878: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
5879: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
5880: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
5881: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
5882: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
5883: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
5876: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
5877: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
5878: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
5879: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
5880: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
5881: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
5882: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
5883: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
5884: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
5877: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
5878: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
5879: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
5880: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
5881: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
5882: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
5883: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
5884: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
5885: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
5878: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
5879: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
5880: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
5881: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
5882: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
5883: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
5884: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
5885: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
5886: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
5879: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
5880: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
5881: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
5882: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
5883: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
5884: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
5885: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
5886: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
5887: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
5880: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
5881: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
5882: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
5883: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
5884: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
5885: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
5886: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
5887: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
5888: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
5881: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
5882: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
5883: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
5884: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
5885: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
5886: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
5887: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
5888: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
5889: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
5882: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
5883: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
5884: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
5885: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
5886: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
5887: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
5888: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
5889: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
5890: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
5883: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
5884: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
5885: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
5886: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
5887: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
5888: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
5889: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
5890: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
5891: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
5884: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
5885: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
5886: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
5887: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
5888: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
5889: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
5890: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
5891: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
5892: end if;
5885: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
5886: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
5887: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
5888: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
5889: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
5890: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
5891: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
5892: end if;
5893:
5886: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
5887: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
5888: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
5889: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
5890: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
5891: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
5892: end if;
5893:
5894: --Bug # 9309268
5887: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
5888: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
5889: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
5890: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
5891: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
5892: end if;
5893:
5894: --Bug # 9309268
5895: ghr_msl_pkg.g_msl_bp_paycap := NULL;
5925:
5926: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
5927:
5928: -- Sundar Added the following statement to improve performance
5929: if hr_utility.debug_enabled = true then
5930: hr_utility.set_location('After Pay Cap ' || l_proc,22);
5931: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
5932: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
5933: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
5926: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
5927:
5928: -- Sundar Added the following statement to improve performance
5929: if hr_utility.debug_enabled = true then
5930: hr_utility.set_location('After Pay Cap ' || l_proc,22);
5931: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
5932: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
5933: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
5934: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
5927:
5928: -- Sundar Added the following statement to improve performance
5929: if hr_utility.debug_enabled = true then
5930: hr_utility.set_location('After Pay Cap ' || l_proc,22);
5931: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
5932: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
5933: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
5934: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
5935: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
5928: -- Sundar Added the following statement to improve performance
5929: if hr_utility.debug_enabled = true then
5930: hr_utility.set_location('After Pay Cap ' || l_proc,22);
5931: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
5932: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
5933: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
5934: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
5935: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
5936: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
5929: if hr_utility.debug_enabled = true then
5930: hr_utility.set_location('After Pay Cap ' || l_proc,22);
5931: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
5932: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
5933: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
5934: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
5935: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
5936: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
5937: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
5930: hr_utility.set_location('After Pay Cap ' || l_proc,22);
5931: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
5932: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
5933: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
5934: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
5935: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
5936: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
5937: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
5938: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
5931: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
5932: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
5933: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
5934: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
5935: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
5936: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
5937: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
5938: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
5939: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
5932: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
5933: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
5934: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
5935: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
5936: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
5937: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
5938: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
5939: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
5940: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
5933: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
5934: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
5935: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
5936: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
5937: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
5938: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
5939: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
5940: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
5941: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
5934: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
5935: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
5936: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
5937: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
5938: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
5939: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
5940: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
5941: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
5942: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
5935: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
5936: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
5937: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
5938: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
5939: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
5940: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
5941: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
5942: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
5943: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
5936: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
5937: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
5938: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
5939: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
5940: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
5941: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
5942: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
5943: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
5944: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
5937: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
5938: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
5939: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
5940: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
5941: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
5942: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
5943: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
5944: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
5945: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
5938: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
5939: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
5940: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
5941: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
5942: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
5943: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
5944: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
5945: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
5946: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
5939: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
5940: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
5941: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
5942: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
5943: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
5944: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
5945: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
5946: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
5947: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
5940: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
5941: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
5942: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
5943: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
5944: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
5945: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
5946: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
5947: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
5948: end if;
5941: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
5942: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
5943: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
5944: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
5945: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
5946: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
5947: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
5948: end if;
5949:
5942: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
5943: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
5944: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
5945: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
5946: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
5947: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
5948: end if;
5949:
5950: IF l_pay_cap_message THEN
5943: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
5944: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
5945: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
5946: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
5947: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
5948: end if;
5949:
5950: IF l_pay_cap_message THEN
5951: IF nvl(l_temp_retention_allowance,0) > 0 THEN
5999: (p_person_id,l_effective_date, l_sel_flg, l_comment,p_mass_salary_id);
6000: l_comment := NULL;
6001: ELSE
6002: -- Bug # 9309268
6003: hr_utility.set_location('Error in ghr_pay_caps.do_pay_caps_main ' ||
6004: 'Err is '||sqlerrm(sqlcode),23);
6005: l_mslerrbuf := 'Error in do_pay_caps_main Sql Err is '|| sqlerrm(sqlcode);
6006: raise msl_error;
6007: END IF;
6086: l_grade_or_level, l_step_or_rate,
6087: l_pay_basis);
6088: EXCEPTION
6089: when msl_error then
6090: l_mslerrbuf := hr_utility.get_message;
6091: raise;
6092: END;
6093: assign_to_sf52_rec(
6094: p_person_id,
6216:
6217: COMMIT;
6218: ELSE
6219: pr('Error in create sf52',l_errbuf);
6220: hr_utility.set_location('Error in '||to_char(p_position_id),20);
6221: l_recs_failed := l_recs_failed + 1;
6222: -- Error raising is not required as the error is written to process
6223: -- log in the create_sf52_for_mass_changes procedure.
6224: --raise msl_error;
6242: END IF;
6243: END IF;
6244: EXCEPTION
6245: WHEN MSL_ERROR THEN
6246: HR_UTILITY.SET_LOCATION('Error occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),10);
6247: begin
6248: ------ BUG 3287299 -- Not to rollback for preview.
6249: if upper(p_action) <> 'SHOW' then
6250: ROLLBACK TO execute_msl_perc_SP;
6256: l_log_text := 'Error in '||l_proc||' '||
6257: ' For Mass Salary Name : '||p_mass_salary||
6258: 'Name: '|| p_full_name || ' Emp No: ' || p_employee_number ||' '||
6259: l_mslerrbuf;
6260: hr_utility.set_location('before creating entry in log file',10);
6261: l_recs_failed := l_recs_failed + 1;
6262: begin
6263: ghr_mto_int.log_message(
6264: p_procedure => g_proc,
6265: p_message => l_log_text);
6266:
6267: exception
6268: when others then
6269: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
6270: hr_utility.raise_error;
6271: end;
6272: when others then
6273: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
6266:
6267: exception
6268: when others then
6269: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
6270: hr_utility.raise_error;
6271: end;
6272: when others then
6273: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
6274: BEGIN
6269: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
6270: hr_utility.raise_error;
6271: end;
6272: when others then
6273: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
6274: BEGIN
6275: ROLLBACK TO execute_msl_perc_SP;
6276: EXCEPTION
6277: WHEN OTHERS THEN NULL;
6280: l_log_text := 'Error (others) in '||l_proc||
6281: ' For Mass Salary Name : '||p_mass_salary||
6282: 'Name: '|| p_full_name || ' Emp No: ' || p_employee_number ||
6283: ' Sql Err is '||sqlerrm(sqlcode);
6284: hr_utility.set_location('before creating entry in log file',20);
6285: l_recs_failed := l_recs_failed + 1;
6286: begin
6287: ghr_mto_int.log_message(
6288: p_procedure => g_proc,
6289: p_message => l_log_text);
6290:
6291: exception
6292: when others then
6293: hr_utility.set_message(8301, 'Create Error Log failed');
6294: hr_utility.raise_error;
6295: end;
6296:
6297:
6290:
6291: exception
6292: when others then
6293: hr_utility.set_message(8301, 'Create Error Log failed');
6294: hr_utility.raise_error;
6295: end;
6296:
6297:
6298: END msl_perc_process;
6299:
6300: BEGIN
6301:
6302: g_proc := 'execute_msl_perc';
6303: hr_utility.set_location('Entering ' || l_proc,5);
6304: p_retcode := 0;
6305:
6306: g_first_noa_code := null;
6307: BEGIN
6327: exit;
6328: END LOOP;
6329: EXCEPTION
6330: when REC_BUSY then
6331: hr_utility.set_location('Mass Salary is in use',1);
6332: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
6333: -- raise error;
6334: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
6335: hr_utility.raise_error;
6330: when REC_BUSY then
6331: hr_utility.set_location('Mass Salary is in use',1);
6332: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
6333: -- raise error;
6334: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
6335: hr_utility.raise_error;
6336: --
6337: when others then
6338: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
6331: hr_utility.set_location('Mass Salary is in use',1);
6332: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
6333: -- raise error;
6334: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
6335: hr_utility.raise_error;
6336: --
6337: when others then
6338: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
6339: -- raise_application_error(-20111,'Error while selecting from Ghr Mass Salaries');
6334: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
6335: hr_utility.raise_error;
6336: --
6337: when others then
6338: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
6339: -- raise_application_error(-20111,'Error while selecting from Ghr Mass Salaries');
6340: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
6341: raise msl_error;
6342: END;
6368:
6369: -- Commented out by Edward Nunez. It's not needed anymore with 894 rules
6370: -- IF upper(p_action) = 'CREATE' then
6371: -- if l_pa_request_id is null then
6372: -- hr_utility.set_message(8301, 'GHR_99999_SELECT_LAC_REMARKS');
6373: -- hr_utility.raise_error;
6374: -- END IF;
6375: -- END IF;
6376:
6369: -- Commented out by Edward Nunez. It's not needed anymore with 894 rules
6370: -- IF upper(p_action) = 'CREATE' then
6371: -- if l_pa_request_id is null then
6372: -- hr_utility.set_message(8301, 'GHR_99999_SELECT_LAC_REMARKS');
6373: -- hr_utility.raise_error;
6374: -- END IF;
6375: -- END IF;
6376:
6377: get_lac_dtls(l_pa_request_id,
6378: l_lac_sf52_rec);
6379:
6380: --purge_old_data(l_mass_salary_id);
6381:
6382: hr_utility.set_location('After fetch msl '||to_char(l_effective_date)
6383: ||' '||to_char(l_user_table_id),20);
6384:
6385: IF l_p_ORGANIZATION_ID is not null then
6386: FOR per IN cur_people_org (l_effective_date,l_p_ORGANIZATION_ID)
6632: set submit_flag = 'P'
6633: where rowid = l_rowid;
6634: EXCEPTION
6635: when others then
6636: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
6637: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
6638: hr_utility.raise_error;
6639: END;
6640: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
6633: where rowid = l_rowid;
6634: EXCEPTION
6635: when others then
6636: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
6637: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
6638: hr_utility.raise_error;
6639: END;
6640: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
6641: ----- So it is not required to do in global if you see the procedure upd_ext_info_to_null
6634: EXCEPTION
6635: when others then
6636: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
6637: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
6638: hr_utility.raise_error;
6639: END;
6640: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
6641: ----- So it is not required to do in global if you see the procedure upd_ext_info_to_null
6642: ----- Commenting the following line. Dated 14-OCT-2003.
6659:
6660: EXCEPTION
6661: when others then
6662: -- raise_application_error(-20121,'Error in execute_msl_perc Err is '||sqlerrm(sqlcode));
6663: HR_UTILITY.SET_LOCATION('Error (Others2) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),30);
6664: BEGIN
6665: ROLLBACK TO execute_msl_perc_SP;
6666: EXCEPTION
6667: WHEN OTHERS THEN NULL;
6669: l_log_text := 'Error in '||l_proc||
6670: ' For Mass Salary Name : '||p_mass_salary||
6671: ' Sql Err is '||sqlerrm(sqlcode);
6672: l_recs_failed := l_recs_failed + 1;
6673: hr_utility.set_location('before creating entry in log file',30);
6674:
6675: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
6676: p_retcode := 2;
6677: IF upper(p_action) = 'CREATE' THEN
6687: p_message => l_log_text);
6688:
6689: exception
6690: when others then
6691: hr_utility.set_message(8301, 'Create Error Log failed');
6692: hr_utility.raise_error;
6693: end;
6694:
6695: END execute_msl_perc;
6688:
6689: exception
6690: when others then
6691: hr_utility.set_message(8301, 'Create Error Log failed');
6692: hr_utility.raise_error;
6693: end;
6694:
6695: END execute_msl_perc;
6696: -- 3843306
6813:
6814: BEGIN
6815:
6816: g_proc := 'fetch_and_validate_emp_ses';
6817: hr_utility.set_location('Entering ' || l_proc,5);
6818:
6819: -- Bug#5623035 Moved the local variable assigning to here.
6820: l_assignment_id := p_assignment_id;
6821: l_position_id := p_position_id;
6831: p_msl_agency_code_subelement IS NOT NULL THEN
6832: -- get the values and verify whether the record meets the condition or not.
6833: -- If Yes, proceed further. Otherwise, skip the other checks for this record
6834:
6835: hr_utility.set_location('The location id is:'||l_location_id,12345);
6836: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
6837: hr_utility.set_location('Org ID:'||p_organization_id,22222);
6838: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
6839: hr_utility.set_location('Org ID PASS',10);
6832: -- get the values and verify whether the record meets the condition or not.
6833: -- If Yes, proceed further. Otherwise, skip the other checks for this record
6834:
6835: hr_utility.set_location('The location id is:'||l_location_id,12345);
6836: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
6837: hr_utility.set_location('Org ID:'||p_organization_id,22222);
6838: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
6839: hr_utility.set_location('Org ID PASS',10);
6840: IF p_msl_personnel_office_id IS NOT NULL THEN
6833: -- If Yes, proceed further. Otherwise, skip the other checks for this record
6834:
6835: hr_utility.set_location('The location id is:'||l_location_id,12345);
6836: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
6837: hr_utility.set_location('Org ID:'||p_organization_id,22222);
6838: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
6839: hr_utility.set_location('Org ID PASS',10);
6840: IF p_msl_personnel_office_id IS NOT NULL THEN
6841: hr_utility.set_location('POID CHECK',15);
6835: hr_utility.set_location('The location id is:'||l_location_id,12345);
6836: hr_utility.set_location('MSL Org ID:'||p_msl_organization_id,11111);
6837: hr_utility.set_location('Org ID:'||p_organization_id,22222);
6838: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
6839: hr_utility.set_location('Org ID PASS',10);
6840: IF p_msl_personnel_office_id IS NOT NULL THEN
6841: hr_utility.set_location('POID CHECK',15);
6842: get_pos_grp1_ddf(l_position_id,
6843: l_effective_date,
6837: hr_utility.set_location('Org ID:'||p_organization_id,22222);
6838: IF NVL(p_msl_organization_id,p_organization_id) = p_organization_id THEN
6839: hr_utility.set_location('Org ID PASS',10);
6840: IF p_msl_personnel_office_id IS NOT NULL THEN
6841: hr_utility.set_location('POID CHECK',15);
6842: get_pos_grp1_ddf(l_position_id,
6843: l_effective_date,
6844: l_pos_grp1_rec);
6845:
6849: END IF;
6850: IF (p_msl_personnel_office_id = l_personnel_office_id) OR
6851: NOT(l_fetch_poid_data) THEN
6852:
6853: hr_utility.set_location('POID PASS',20);
6854: IF p_msl_agency_code_subelement IS NOT NULL THEN
6855: hr_utility.set_location('Agency CHECK',25);
6856: get_sub_element_code_pos_title(l_position_id,
6857: p_person_id,
6851: NOT(l_fetch_poid_data) THEN
6852:
6853: hr_utility.set_location('POID PASS',20);
6854: IF p_msl_agency_code_subelement IS NOT NULL THEN
6855: hr_utility.set_location('Agency CHECK',25);
6856: get_sub_element_code_pos_title(l_position_id,
6857: p_person_id,
6858: l_business_group_id,
6859: l_assignment_id,
6869: NVL(SUBSTR(p_msl_agency_code_subelement,3,2),SUBSTR(l_sub_element_code,3,2))=
6870: SUBSTR(l_sub_element_code,3,2)
6871: ) OR
6872: NOT(l_fetch_agency_data) THEN
6873: hr_utility.set_location('Agency PASS',30);
6874: IF p_msl_duty_station_id IS NOT NULL THEN
6875: hr_utility.set_location('DS CHECK',35);
6876: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
6877: (p_location_id => l_location_id
6871: ) OR
6872: NOT(l_fetch_agency_data) THEN
6873: hr_utility.set_location('Agency PASS',30);
6874: IF p_msl_duty_station_id IS NOT NULL THEN
6875: hr_utility.set_location('DS CHECK',35);
6876: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
6877: (p_location_id => l_location_id
6878: ,p_duty_station_id => l_duty_station_id);
6879: l_fetch_ds_data := TRUE;
6879: l_fetch_ds_data := TRUE;
6880: END IF;
6881: IF (p_msl_duty_station_id = l_duty_station_id) OR
6882: NOT(l_fetch_ds_data)THEN
6883: hr_utility.set_location('DS PASS',40);
6884: init_elig_flag := TRUE;
6885: ELSE -- Duty Station not matching.
6886: hr_utility.set_location('DS FAIL',45);
6887: init_elig_flag := FALSE;
6882: NOT(l_fetch_ds_data)THEN
6883: hr_utility.set_location('DS PASS',40);
6884: init_elig_flag := TRUE;
6885: ELSE -- Duty Station not matching.
6886: hr_utility.set_location('DS FAIL',45);
6887: init_elig_flag := FALSE;
6888: END IF;
6889: ELSE -- Agency Code Subelement Not matching.
6890: hr_utility.set_location('Agency FAIL',55);
6886: hr_utility.set_location('DS FAIL',45);
6887: init_elig_flag := FALSE;
6888: END IF;
6889: ELSE -- Agency Code Subelement Not matching.
6890: hr_utility.set_location('Agency FAIL',55);
6891: init_elig_flag := FALSE;
6892: END IF;
6893: ELSE -- Personnel Office ID not matching
6894: hr_utility.set_location('POID FAIL',65);
6890: hr_utility.set_location('Agency FAIL',55);
6891: init_elig_flag := FALSE;
6892: END IF;
6893: ELSE -- Personnel Office ID not matching
6894: hr_utility.set_location('POID FAIL',65);
6895: init_elig_flag := FALSE;
6896: END IF;
6897: ELSE -- Organization_id is not matching.
6898: hr_utility.set_location('Org FAIL',75);
6894: hr_utility.set_location('POID FAIL',65);
6895: init_elig_flag := FALSE;
6896: END IF;
6897: ELSE -- Organization_id is not matching.
6898: hr_utility.set_location('Org FAIL',75);
6899: init_elig_flag := FALSE;
6900: END IF;
6901: ELSE -- If No value is entered for organization, Duty Station, Agency, POID of MSL Criteria.
6902: hr_utility.set_location('No INIT CRITERIA',85);
6898: hr_utility.set_location('Org FAIL',75);
6899: init_elig_flag := FALSE;
6900: END IF;
6901: ELSE -- If No value is entered for organization, Duty Station, Agency, POID of MSL Criteria.
6902: hr_utility.set_location('No INIT CRITERIA',85);
6903: init_elig_flag := TRUE;
6904: END IF;
6905:
6906: -- If the initial eligibility is passed then proceed further. Otherwise move to next record.
6904: END IF;
6905:
6906: -- If the initial eligibility is passed then proceed further. Otherwise move to next record.
6907: IF init_elig_flag THEN
6908: hr_utility.set_location('Init Criteria Pass',95);
6909: ghr_pa_requests_pkg.get_sf52_asg_ddf_details
6910: (l_assignment_id,
6911: l_effective_date,
6912: l_tenure,
6916: l_part_time_hour);
6917:
6918: FOR l_cnt in 1..p_rec_pp_prd.COUNT LOOP
6919: IF nvl(p_rec_pp_prd(l_cnt).prd,l_pay_rate_determinant) = l_pay_rate_determinant THEN
6920: hr_utility.set_location('PRD PASS',105);
6921: l_prd_matched := TRUE;
6922: exit;
6923: END IF;
6924: END LOOP;
6937: EXCEPTION
6938: WHEN OTHERS THEN
6939: -- Report the record in the process log if the pay table ID matches.
6940: BEGIN
6941: hr_utility.set_location('before calling expired_rg_det',10);
6942: l_retained_grade_rec := ghr_pc_basic_pay.get_expired_rg_details
6943: (p_person_id => p_person_id
6944: ,p_effective_date => l_effective_date);
6945: hr_utility.set_location('ret grd tableid:'||l_retained_grade_rec.user_table_id,99999);
6941: hr_utility.set_location('before calling expired_rg_det',10);
6942: l_retained_grade_rec := ghr_pc_basic_pay.get_expired_rg_details
6943: (p_person_id => p_person_id
6944: ,p_effective_date => l_effective_date);
6945: hr_utility.set_location('ret grd tableid:'||l_retained_grade_rec.user_table_id,99999);
6946: hr_utility.set_location('MSL tableid:'||p_msl_user_table_id,99999);
6947: IF l_retained_grade_rec.user_table_id = p_msl_user_table_id THEN
6948: hr_utility.set_location('Rg table matches with MSL table ID',10);
6949: --Bug # 9329643 Modified SSN to Emp No
6942: l_retained_grade_rec := ghr_pc_basic_pay.get_expired_rg_details
6943: (p_person_id => p_person_id
6944: ,p_effective_date => l_effective_date);
6945: hr_utility.set_location('ret grd tableid:'||l_retained_grade_rec.user_table_id,99999);
6946: hr_utility.set_location('MSL tableid:'||p_msl_user_table_id,99999);
6947: IF l_retained_grade_rec.user_table_id = p_msl_user_table_id THEN
6948: hr_utility.set_location('Rg table matches with MSL table ID',10);
6949: --Bug # 9329643 Modified SSN to Emp No
6950: l_log_text := 'Error in RG Record In Mass Salary Name: '||
6944: ,p_effective_date => l_effective_date);
6945: hr_utility.set_location('ret grd tableid:'||l_retained_grade_rec.user_table_id,99999);
6946: hr_utility.set_location('MSL tableid:'||p_msl_user_table_id,99999);
6947: IF l_retained_grade_rec.user_table_id = p_msl_user_table_id THEN
6948: hr_utility.set_location('Rg table matches with MSL table ID',10);
6949: --Bug # 9329643 Modified SSN to Emp No
6950: l_log_text := 'Error in RG Record In Mass Salary Name: '||
6951: p_mass_salary_name||'; Employee Name: '|| p_full_name ||
6952: '; Emp No: ' || p_employee_number || '; '||
6949: --Bug # 9329643 Modified SSN to Emp No
6950: l_log_text := 'Error in RG Record In Mass Salary Name: '||
6951: p_mass_salary_name||'; Employee Name: '|| p_full_name ||
6952: '; Emp No: ' || p_employee_number || '; '||
6953: hr_utility.get_message;
6954: BEGIN
6955: ghr_mto_int.log_message(
6956: p_procedure => 'check_grade_retention',
6957: p_message => l_log_text);
6964: l_prd_pp_matched := FALSE;
6965: END IF;
6966: EXCEPTION
6967: WHEN OTHERS THEN
6968: hr_utility.set_location('WHEN OTHERS of EXPIRED RG ',999999);
6969: l_prd_pp_matched := FALSE;
6970: END;
6971: --WHEN OTHERS THEN
6972: -- Skip this record from reporting.
6976:
6977: FOR l_cnt in 1..p_rec_pp_prd.COUNT LOOP
6978: IF nvl(p_rec_pp_prd(l_cnt).prd,l_pay_rate_determinant) = l_pay_rate_determinant AND
6979: nvl(p_rec_pp_prd(l_cnt).pay_plan,l_pay_plan) = l_pay_plan THEN
6980: hr_utility.set_location('PP/PRD PASS',115);
6981: l_prd_pp_matched := TRUE;
6982: exit;
6983: END IF;
6984: END LOOP;
7010: --5470182
7011:
7012: IF l_rat_matched THEN
7013: IF l_pay_table_id = p_msl_user_table_id THEN
7014: hr_utility.set_location('Table ID PASS',125);
7015: IF NOT (p_action = 'CREATE' AND
7016: person_in_pa_req_1noa
7017: (p_person_id => p_person_id,
7018: p_effective_date => l_effective_date,
7028: END IF;
7029: END LOOP;
7030:
7031: IF l_row_cnt <> 0 THEN
7032: hr_utility.set_location('ROW COUNT PASS',135);
7033: -- Get the required details if the related check has not been done above.
7034: IF NOT l_fetch_poid_data THEN
7035:
7036: get_pos_grp1_ddf(l_position_id,
7084: -- Raise Error
7085: NULL;
7086: END IF;
7087: ELSE -- Not (Create and RPA exists)
7088: hr_utility.set_location('ROW COUNT FAIL',145);
7089: p_elig_flag := FALSE;
7090: END IF;
7091: ELSE -- Pay table id is not matched
7092: hr_utility.set_location('Pay Table FAIL',155);
7088: hr_utility.set_location('ROW COUNT FAIL',145);
7089: p_elig_flag := FALSE;
7090: END IF;
7091: ELSE -- Pay table id is not matched
7092: hr_utility.set_location('Pay Table FAIL',155);
7093: p_elig_flag := FALSE;
7094: END IF;
7095: ELSE -- Pay Plan and PRD not matched
7096: hr_utility.set_location('PP/PRD FAIL',165);
7092: hr_utility.set_location('Pay Table FAIL',155);
7093: p_elig_flag := FALSE;
7094: END IF;
7095: ELSE -- Pay Plan and PRD not matched
7096: hr_utility.set_location('PP/PRD FAIL',165);
7097: p_elig_flag := FALSE;
7098: END IF;
7099: ELSE
7100: hr_utility.set_location('PP FAIL',175);
7096: hr_utility.set_location('PP/PRD FAIL',165);
7097: p_elig_flag := FALSE;
7098: END IF;
7099: ELSE
7100: hr_utility.set_location('PP FAIL',175);
7101: p_elig_flag := FALSE;
7102: END IF;
7103: EXCEPTION
7104: WHEN others THEN
7101: p_elig_flag := FALSE;
7102: END IF;
7103: EXCEPTION
7104: WHEN others THEN
7105: hr_utility.set_location('WHEN OTHERS',185);
7106: RAISE;
7107: END fetch_and_validate_emp_ses;
7108:
7109: PROCEDURE execute_msl_ses_range (p_errbuf out nocopy varchar2,
7487: l_grade_or_level := p_grade_or_level;
7488: l_to_grade_or_level := p_to_grade_or_level;
7489: l_step_or_rate := P_step_or_rate;
7490: l_pay_basis := p_pay_basis;
7491: hr_utility.set_location('The location id is:'||l_location_id,1);
7492: /*5470182 need to be commented
7493: --------GPPA Update 46 start
7494: ghr_msl_pkg.g_first_noa_code := NULL;
7495: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
7538: LOOP
7539: l_ds_end_date := rec_ds.end_Date;
7540: END LOOP;
7541: IF l_ds_end_date IS NULL THEN
7542: hr_utility.set_location('Under DS null check'||l_duty_station_id, 1);
7543: l_mslerrbuf := ' Error: Duty Station associated with the location is INVALID. '||
7544: 'Salary cannot be calculated correctly without valid duty station. ';
7545: RAISE msl_error;
7546: END IF;
7553: (p_location_id => l_location_id
7554: ,p_duty_station_id => l_duty_station_id);
7555: / *exception
7556: when others then
7557: hr_utility.set_location(
7558: 'Error in Ghr_pa_requests_pkg.get_sf52_loc_ddf_details'||
7559: 'Err is '||sqlerrm(sqlcode),20);
7560: l_mslerrbuf := 'Error in get_sf52_loc_ddf_details '||
7561: 'Sql Err is '|| sqlerrm(sqlcode);
7580: l_position_title,
7581: l_position_number,
7582: l_position_seq_no);
7583:
7584: hr_utility.set_location('The duty station id is:'||l_duty_station_id,12345);
7585:
7586: if check_init_eligibility(l_p_duty_station_id,
7587: l_p_PERSONNEL_OFFICE_ID,
7588: l_p_AGENCY_CODE_SUBELEMENT,
7589: l_duty_station_id,
7590: l_personnel_office_id,
7591: l_sub_element_code) then
7592:
7593: hr_utility.set_location('check_init_eligibility ' || l_proc,6);
7594: -- Bug 3457205 Filter the Pay plan table id condition also b4 checking any other thing
7595: -- Moving check_eligibility to here.
7596: -- Get PRD, work schedule etc form ASG EI
7597: begin
7604: l_work_schedule,
7605: l_part_time_hour);
7606: exception
7607: when others then
7608: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_sf52_asg_ddf_details'||
7609: 'Err is '||sqlerrm(sqlcode),20);
7610: l_mslerrbuf := 'Error in get_sf52_asgddf_details Sql Err is '|| sqlerrm(sqlcode);
7611: raise msl_error;
7612: end;
7628: l_grade_or_level, l_to_grade_or_level, l_step_or_rate,
7629: l_pay_basis);
7630: EXCEPTION
7631: when msl_error then
7632: l_mslerrbuf := hr_utility.get_message;
7633: raise;
7634: END;
7635:
7636: IF ( nvl(rec_pp_prd(l_cnt).pay_plan,l_pay_plan) = l_pay_plan
7643: l_pay_rate_determinant,
7644: p_person_id,
7645: l_effective_date,
7646: p_action) THEN
7647: hr_utility.set_location('check_eligibility ' || l_proc,8); */
7648: -- Bug#5063304 Moved this call outside check_init_eligibility condition to
7649: -- this location.
7650: -- BUG 3377958 Madhuri
7651: -- Pick the organization name
7660: ELSE
7661: if check_select_flg_ses(p_person_id,upper(p_action),
7662: l_effective_date,p_mass_salary_id,l_sel_flg,l_ses_basic_pay) then
7663:
7664: hr_utility.set_location('check_select_flg ' || l_proc,7);
7665: BEGIN
7666: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
7667: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
7668: ghr_pa_requests_pkg.get_duty_station_details
7662: l_effective_date,p_mass_salary_id,l_sel_flg,l_ses_basic_pay) then
7663:
7664: hr_utility.set_location('check_select_flg ' || l_proc,7);
7665: BEGIN
7666: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
7667: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
7668: ghr_pa_requests_pkg.get_duty_station_details
7669: (p_duty_station_id => l_duty_station_id
7670: ,p_effective_date => l_effective_date
7663:
7664: hr_utility.set_location('check_select_flg ' || l_proc,7);
7665: BEGIN
7666: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
7667: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
7668: ghr_pa_requests_pkg.get_duty_station_details
7669: (p_duty_station_id => l_duty_station_id
7670: ,p_effective_date => l_effective_date
7671: ,p_duty_station_code => l_duty_station_code
7671: ,p_duty_station_code => l_duty_station_code
7672: ,p_duty_station_desc => l_duty_station_desc);
7673: EXCEPTION
7674: WHEN others THEN
7675: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_duty_station_details'||
7676: 'Err is '||sqlerrm(sqlcode),20);
7677: l_mslerrbuf := 'Error in get_duty_station_details Sql Err is '|| sqlerrm(sqlcode);
7678: RAISE msl_error;
7679:
7741: ,l_message_set
7742: ,l_calculated);
7743:
7744: IF l_message_set THEN
7745: hr_utility.set_location( l_proc, 40);
7746: l_calculated := FALSE;
7747: l_mslerrbuf := hr_utility.get_message;
7748: -- raise msl_error;
7749: END IF;
7743:
7744: IF l_message_set THEN
7745: hr_utility.set_location( l_proc, 40);
7746: l_calculated := FALSE;
7747: l_mslerrbuf := hr_utility.get_message;
7748: -- raise msl_error;
7749: END IF;
7750: EXCEPTION
7751: when msl_error then
7830: ins_upd_per_ses_extra_info
7831: (p_person_id,l_effective_date, l_sel_flg, l_comment,p_mass_salary_id);
7832: l_comment := NULL;
7833: ------ BUG 3287299 End
7834: hr_utility.set_location('Error in Ghr_pay_calc.sql_main_pay_calc '||
7835: 'Err is '||sqlerrm(sqlcode),20);
7836: l_mslerrbuf := 'Error in ghr_pay_calc Sql Err is '|| sqlerrm(sqlcode);
7837: g_proc := 'ghr_pay_calc';
7838: raise msl_error;
7862: l_new_other_pay_amount := null;
7863: end if;
7864: l_new_total_salary := l_pay_calc_out_data.total_salary;
7865:
7866: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
7867: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
7868:
7869:
7870: -------------Call Pay cap Procedure
7863: end if;
7864: l_new_total_salary := l_pay_calc_out_data.total_salary;
7865:
7866: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
7867: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
7868:
7869:
7870: -------------Call Pay cap Procedure
7871: begin
7872: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
7873: ,p_effective_date => l_effective_date);
7874: l_old_capped_other_pay := l_capped_other_pay;
7875: -- Sundar Added the following if statement to improve performance
7876: if hr_utility.debug_enabled = true then
7877: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
7878: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
7879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
7880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
7873: ,p_effective_date => l_effective_date);
7874: l_old_capped_other_pay := l_capped_other_pay;
7875: -- Sundar Added the following if statement to improve performance
7876: if hr_utility.debug_enabled = true then
7877: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
7878: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
7879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
7880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
7881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
7874: l_old_capped_other_pay := l_capped_other_pay;
7875: -- Sundar Added the following if statement to improve performance
7876: if hr_utility.debug_enabled = true then
7877: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
7878: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
7879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
7880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
7881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
7882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
7875: -- Sundar Added the following if statement to improve performance
7876: if hr_utility.debug_enabled = true then
7877: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
7878: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
7879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
7880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
7881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
7882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
7883: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
7876: if hr_utility.debug_enabled = true then
7877: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
7878: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
7879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
7880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
7881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
7882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
7883: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
7884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
7877: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
7878: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
7879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
7880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
7881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
7882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
7883: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
7884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
7885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
7878: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
7879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
7880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
7881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
7882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
7883: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
7884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
7885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
7886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
7879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
7880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
7881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
7882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
7883: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
7884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
7885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
7886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
7887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
7880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
7881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
7882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
7883: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
7884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
7885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
7886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
7887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
7888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
7881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
7882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
7883: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
7884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
7885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
7886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
7887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
7888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
7889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
7882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
7883: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
7884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
7885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
7886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
7887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
7888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
7889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
7890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
7883: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
7884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
7885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
7886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
7887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
7888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
7889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
7890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
7891: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
7884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
7885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
7886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
7887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
7888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
7889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
7890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
7891: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
7892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
7885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
7886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
7887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
7888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
7889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
7890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
7891: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
7892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
7893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
7886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
7887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
7888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
7889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
7890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
7891: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
7892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
7893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
7894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
7887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
7888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
7889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
7890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
7891: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
7892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
7893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
7894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
7895:
7888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
7889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
7890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
7891: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
7892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
7893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
7894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
7895:
7896: end if;
7889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
7890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
7891: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
7892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
7893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
7894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
7895:
7896: end if;
7897:
7890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
7891: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
7892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
7893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
7894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
7895:
7896: end if;
7897:
7898:
7928:
7929: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
7930:
7931: -- Sundar Added the following statement to improve performance
7932: if hr_utility.debug_enabled = true then
7933: hr_utility.set_location('After Pay Cap ' || l_proc,22);
7934: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
7935: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
7936: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
7929: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
7930:
7931: -- Sundar Added the following statement to improve performance
7932: if hr_utility.debug_enabled = true then
7933: hr_utility.set_location('After Pay Cap ' || l_proc,22);
7934: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
7935: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
7936: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
7937: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
7930:
7931: -- Sundar Added the following statement to improve performance
7932: if hr_utility.debug_enabled = true then
7933: hr_utility.set_location('After Pay Cap ' || l_proc,22);
7934: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
7935: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
7936: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
7937: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
7938: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
7931: -- Sundar Added the following statement to improve performance
7932: if hr_utility.debug_enabled = true then
7933: hr_utility.set_location('After Pay Cap ' || l_proc,22);
7934: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
7935: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
7936: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
7937: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
7938: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
7939: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
7932: if hr_utility.debug_enabled = true then
7933: hr_utility.set_location('After Pay Cap ' || l_proc,22);
7934: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
7935: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
7936: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
7937: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
7938: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
7939: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
7940: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
7933: hr_utility.set_location('After Pay Cap ' || l_proc,22);
7934: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
7935: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
7936: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
7937: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
7938: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
7939: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
7940: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
7941: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
7934: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
7935: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
7936: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
7937: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
7938: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
7939: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
7940: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
7941: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
7942: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
7935: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
7936: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
7937: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
7938: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
7939: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
7940: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
7941: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
7942: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
7943: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
7936: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
7937: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
7938: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
7939: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
7940: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
7941: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
7942: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
7943: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
7944: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
7937: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
7938: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
7939: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
7940: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
7941: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
7942: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
7943: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
7944: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
7945: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
7938: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
7939: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
7940: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
7941: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
7942: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
7943: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
7944: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
7945: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
7946: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
7939: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
7940: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
7941: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
7942: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
7943: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
7944: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
7945: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
7946: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
7947: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
7940: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
7941: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
7942: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
7943: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
7944: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
7945: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
7946: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
7947: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
7948: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
7941: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
7942: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
7943: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
7944: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
7945: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
7946: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
7947: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
7948: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
7949: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
7942: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
7943: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
7944: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
7945: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
7946: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
7947: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
7948: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
7949: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
7950: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
7943: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
7944: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
7945: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
7946: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
7947: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
7948: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
7949: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
7950: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
7951: end if;
7944: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
7945: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
7946: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
7947: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
7948: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
7949: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
7950: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
7951: end if;
7952:
7945: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
7946: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
7947: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
7948: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
7949: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
7950: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
7951: end if;
7952:
7953: IF l_pay_cap_message THEN
7946: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
7947: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
7948: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
7949: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
7950: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
7951: end if;
7952:
7953: IF l_pay_cap_message THEN
7954: IF nvl(l_temp_retention_allowance,0) > 0 THEN
8000: ins_upd_per_extra_info
8001: (p_person_id,l_effective_date, l_sel_flg, l_comment,p_mass_salary_id);
8002: l_comment := NULL;
8003: ELSE
8004: hr_utility.set_location('Error in ghr_pay_caps.do_pay_caps_main ' ||
8005: 'Err is '||sqlerrm(sqlcode),23);
8006: l_mslerrbuf := 'Error in do_pay_caps_main Sql Err is '|| sqlerrm(sqlcode);
8007: raise msl_error;
8008: END IF;
8088: l_grade_or_level, l_to_grade_or_level, l_step_or_rate,
8089: l_pay_basis);
8090: EXCEPTION
8091: when msl_error then
8092: l_mslerrbuf := hr_utility.get_message;
8093: raise;
8094: END;
8095:
8096: assign_to_sf52_rec(
8148: (l_pay_calc_out_data,
8149: l_sf52_rec);
8150: EXCEPTION
8151: when others then
8152: hr_utility.set_location('Error in Ghr_mass_actions_pkg.pay_calc_rec_to_sf52_rec '||
8153: 'Err is '||sqlerrm(sqlcode),20);
8154: l_mslerrbuf := 'Error in ghr_mass_act_pkg.pay_calc_to_sf52 Sql Err is '|| sqlerrm(sqlcode);
8155: raise msl_error;
8156: END;
8259: END IF;
8260: END IF;
8261: EXCEPTION
8262: WHEN MSL_ERROR THEN
8263: HR_UTILITY.SET_LOCATION('Error occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),10);
8264: begin
8265: ------ BUG 3287299 -- Not to rollback for preview.
8266: if upper(p_action) <> 'SHOW' then
8267: ROLLBACK TO EXECUTE_MSL_SP;
8273: l_log_text := 'Error in '||l_proc||' '||
8274: ' For Mass Salary Name : '||p_mass_salary||
8275: 'Name: '|| p_full_name || ' Emp No: ' || p_employee_number ||
8276: l_mslerrbuf;
8277: hr_utility.set_location('before creating entry in log file',10);
8278: l_recs_failed := l_recs_failed + 1;
8279: begin
8280: ghr_mto_int.log_message(
8281: p_procedure => g_proc,
8281: p_procedure => g_proc,
8282: p_message => l_log_text);
8283: exception
8284: when others then
8285: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
8286: hr_utility.raise_error;
8287: end;
8288: when others then
8289: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
8282: p_message => l_log_text);
8283: exception
8284: when others then
8285: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
8286: hr_utility.raise_error;
8287: end;
8288: when others then
8289: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
8290: BEGIN
8285: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
8286: hr_utility.raise_error;
8287: end;
8288: when others then
8289: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
8290: BEGIN
8291: ROLLBACK TO EXECUTE_MSL_SP;
8292: EXCEPTION
8293: WHEN OTHERS THEN NULL;
8296: l_log_text := 'Error (others) in '||l_proc||
8297: ' For Mass Salary Name : '||p_mass_salary||
8298: 'Name: '|| p_full_name || ' Emp No: ' || p_employee_number ||
8299: ' Sql Err is '||sqlerrm(sqlcode);
8300: hr_utility.set_location('before creating entry in log file',20);
8301: l_recs_failed := l_recs_failed + 1;
8302: begin
8303: ghr_mto_int.log_message(
8304: p_procedure => g_proc,
8304: p_procedure => g_proc,
8305: p_message => l_log_text);
8306: exception
8307: when others then
8308: hr_utility.set_message(8301, 'Create Error Log failed');
8309: hr_utility.raise_error;
8310: end;
8311: END msl_ses_process;
8312:
8305: p_message => l_log_text);
8306: exception
8307: when others then
8308: hr_utility.set_message(8301, 'Create Error Log failed');
8309: hr_utility.raise_error;
8310: end;
8311: END msl_ses_process;
8312:
8313: BEGIN
8312:
8313: BEGIN
8314:
8315: g_proc := 'execute_msl_ses_range';
8316: hr_utility.set_location('Entering ' || l_proc,5);
8317: p_retcode := 0;
8318:
8319: g_first_noa_code := null;
8320: BEGIN
8343: exit;
8344: END LOOP;
8345: EXCEPTION
8346: when REC_BUSY then
8347: hr_utility.set_location('Mass Salary is in use',1);
8348: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
8349: -- raise error;
8350: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
8351: hr_utility.raise_error;
8346: when REC_BUSY then
8347: hr_utility.set_location('Mass Salary is in use',1);
8348: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
8349: -- raise error;
8350: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
8351: hr_utility.raise_error;
8352: --
8353: when others then
8354: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
8347: hr_utility.set_location('Mass Salary is in use',1);
8348: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
8349: -- raise error;
8350: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
8351: hr_utility.raise_error;
8352: --
8353: when others then
8354: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
8355: -- raise_application_error(-20111,'Error while selecting from Ghr Mass Salaries');
8350: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
8351: hr_utility.raise_error;
8352: --
8353: when others then
8354: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
8355: -- raise_application_error(-20111,'Error while selecting from Ghr Mass Salaries');
8356: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
8357: raise msl_error;
8358: END;
8393:
8394: -- Commented out by Edward Nunez. It's not needed anymore with 894 rules
8395: -- IF upper(p_action) = 'CREATE' then
8396: -- if l_pa_request_id is null then
8397: -- hr_utility.set_message(8301, 'GHR_99999_SELECT_LAC_REMARKS');
8398: -- hr_utility.raise_error;
8399: -- END IF;
8400: -- END IF;
8401:
8394: -- Commented out by Edward Nunez. It's not needed anymore with 894 rules
8395: -- IF upper(p_action) = 'CREATE' then
8396: -- if l_pa_request_id is null then
8397: -- hr_utility.set_message(8301, 'GHR_99999_SELECT_LAC_REMARKS');
8398: -- hr_utility.raise_error;
8399: -- END IF;
8400: -- END IF;
8401:
8402: get_lac_dtls(l_pa_request_id,
8403: l_lac_sf52_rec);
8404:
8405: --purge_old_data(l_mass_salary_id);
8406:
8407: hr_utility.set_location('After fetch msl '||to_char(l_effective_date)
8408: ||' '||to_char(l_user_table_id),20);
8409:
8410: IF l_p_ORGANIZATION_ID is not null then
8411: FOR per IN cur_people_org (l_effective_date,l_p_ORGANIZATION_ID)
8667: set submit_flag = 'P'
8668: where rowid = l_rowid;
8669: EXCEPTION
8670: when others then
8671: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
8672: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
8673: hr_utility.raise_error;
8674: END;
8675: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
8668: where rowid = l_rowid;
8669: EXCEPTION
8670: when others then
8671: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
8672: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
8673: hr_utility.raise_error;
8674: END;
8675: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
8676: ----- So it is not required to do in global if you see the procedure upd_ext_info_to_null
8669: EXCEPTION
8670: when others then
8671: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
8672: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
8673: hr_utility.raise_error;
8674: END;
8675: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
8676: ----- So it is not required to do in global if you see the procedure upd_ext_info_to_null
8677: ----- Commenting the following line. Dated 14-OCT-2003.
8694:
8695: EXCEPTION
8696: when others then
8697: -- raise_application_error(-20121,'Error in execute_msl_ses Err is '||sqlerrm(sqlcode));
8698: HR_UTILITY.SET_LOCATION('Error (Others2) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),30);
8699: BEGIN
8700: ROLLBACK TO execute_msl_ses_sp;
8701: EXCEPTION
8702: WHEN OTHERS THEN NULL;
8704: l_log_text := 'Error in '||l_proc||
8705: ' For Mass Salary Name : '||p_mass_salary||
8706: ' Sql Err is '||sqlerrm(sqlcode);
8707: l_recs_failed := l_recs_failed + 1;
8708: hr_utility.set_location('before creating entry in log file',30);
8709:
8710: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
8711: p_retcode := 2;
8712: IF upper(p_action) = 'CREATE' THEN
8722: p_message => l_log_text);
8723:
8724: exception
8725: when others then
8726: hr_utility.set_message(8301, 'Create Error Log failed');
8727: hr_utility.raise_error;
8728: end;
8729:
8730: END execute_msl_ses_range;
8723:
8724: exception
8725: when others then
8726: hr_utility.set_message(8301, 'Create Error Log failed');
8727: hr_utility.raise_error;
8728: end;
8729:
8730: END execute_msl_ses_range;
8731:
8752: l_eff_date date;
8753:
8754: begin
8755: g_proc := 'ins_upd_per_ses_extra_info';
8756: hr_utility.set_location('Entering ' || l_proc,5);
8757: if p_effective_date > sysdate then
8758: l_eff_date := sysdate;
8759: else
8760: l_eff_date := p_effective_date;
8806: ---Commented the following two lines to remove Validation functionality on Person.
8807: -- ghr_validate_perwsepi.validate_perwsepi(p_person_id);
8808: -- ghr_validate_perwsepi.update_person_user_type(p_person_id);
8809:
8810: hr_utility.set_location('Exiting ' || l_proc,10);
8811: exception
8812: when msl_error then raise;
8813: when others then
8814: pr('Error in '||l_proc);
8811: exception
8812: when msl_error then raise;
8813: when others then
8814: pr('Error in '||l_proc);
8815: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
8816: l_mslerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
8817: raise msl_error;
8818: end ins_upd_per_ses_extra_info;
8819:
8839:
8840: g_proc := 'check_select_flg_ses';
8841: l_temp_ses_basic_pay := p_ses_basic_pay;
8842:
8843: hr_utility.set_location('Entering ' || l_proc,5);
8844:
8845: get_extra_info_comments(p_person_id,p_effective_date,l_sel_flag,l_comments,p_mass_salary_id,l_increase_percent,l_ses_basic_pay); -- Added by Sundar 3843306
8846:
8847: -------- Initialize the comments
8887: exception
8888: when msl_error then raise;
8889: when others then
8890: p_ses_basic_pay := l_temp_ses_basic_pay ;
8891: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
8892: l_mslerrbuf := 'Error in '||l_proc||' @'||to_char(l_line)||' Sql Err is '|| sqlerrm(sqlcode);
8893: raise msl_error;
8894: end check_select_flg_ses;
8895: