226: WHERE user_table_id = p_user_table_id;
227:
228: BEGIN
229: g_proc := 'execute_mlc';
230: hr_utility.set_location('Entering ' || l_proc,5);
231:
232: ghr_msl_pkg.g_first_noa_code := null;
233:
234: p_retcode := 0;
256: exit;
257: END LOOP;
258: EXCEPTION
259: when REC_BUSY then
260: hr_utility.set_location('Mass Salary is in use',1);
261: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
262: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
263: hr_utility.raise_error;
264: when others then
258: EXCEPTION
259: when REC_BUSY then
260: hr_utility.set_location('Mass Salary is in use',1);
261: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
262: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
263: hr_utility.raise_error;
264: when others then
265: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
266: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
259: when REC_BUSY then
260: hr_utility.set_location('Mass Salary is in use',1);
261: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
262: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
263: hr_utility.raise_error;
264: when others then
265: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
266: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
267: raise mlc_error;
261: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
262: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
263: hr_utility.raise_error;
264: when others then
265: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
266: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
267: raise mlc_error;
268: END;
269:
284: --Begin Bug# 10387022, Removed LAC check from if condition
285: end if;
286:
287: --------GPPA Update 46 end
288: hr_utility.set_location('After fetch msl '||to_char(l_effective_date)
289: ||' '||to_char(l_user_table_id),20);
290:
291: FOR per IN cur_people (l_effective_date,l_p_ORGANIZATION_ID)
292: LOOP
311: p_first_noa_code => nvl(ghr_msl_pkg.g_first_noa_code,'895'),
312: p_action => p_action
313: ) then
314:
315: hr_utility.set_location('The location id is:'||l_location_id,12345);
316: begin
317: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
318: (p_location_id => l_location_id
319: ,p_duty_station_id => l_duty_station_id);
318: (p_location_id => l_location_id
319: ,p_duty_station_id => l_duty_station_id);
320: exception
321: when others then
322: hr_utility.set_location(
323: 'Error in Ghr_pa_requests_pkg.get_sf52_loc_ddf_details'||
324: 'Err is '||sqlerrm(sqlcode),20);
325: l_mlcerrbuf := 'Error in get_sf52_loc_ddf_details '||
326: 'Sql Err is '|| sqlerrm(sqlcode);
345: l_position_title,
346: l_position_number,
347: l_position_seq_no);
348:
349: hr_utility.set_location('The duty station id is:'||l_duty_station_id,12345);
350:
351: if check_init_eligibility(l_p_duty_station_id,
352: l_p_PERSONNEL_OFFICE_ID,
353: l_p_AGENCY_CODE_SUBELEMENT,
354: l_duty_station_id,
355: l_personnel_office_id,
356: l_sub_element_code) then
357:
358: hr_utility.set_location('check_init_eligibility ' || l_proc,6);
359:
360: begin
361: ghr_pa_requests_pkg.get_sf52_asg_ddf_details
362: (l_assignment_id,
367: l_work_schedule,
368: l_part_time_hour);
369: exception
370: when others then
371: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_sf52_asg_ddf_details'||
372: 'Err is '||sqlerrm(sqlcode),20);
373: l_mlcerrbuf := 'Error in get_sf52_asgddf_details Sql Err is '|| sqlerrm(sqlcode);
374: raise mlc_error;
375: end;
382: l_pay_table_id,l_grade_or_level, l_step_or_rate,
383: l_pay_basis);
384: EXCEPTION
385: when ghr_msl_pkg.msl_error then
386: l_mlcerrbuf := hr_utility.get_message;
387: raise mlc_error;
388: END;
389: IF get_user_table_name(l_pay_table_id) IN ('0000','0491') THEN --Bug# 10387022
390:
393: per.person_id,
394: l_effective_date,
395: p_action) THEN
396:
397: hr_utility.set_location('check_eligibility ' || l_proc,8);
398:
399: IF upper(p_action) = 'REPORT' AND l_submit_flag = 'P' THEN
400: -- BUG 3377958 Madhuri
401: --Bug # 9329643
407: l_effective_date,
408: p_mass_salary_id,
409: l_sel_flg) then
410:
411: hr_utility.set_location('check_select_flg ' || l_proc,7);
412: BEGIN
413: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
414: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
415: ghr_pa_requests_pkg.get_duty_station_details
409: l_sel_flg) then
410:
411: hr_utility.set_location('check_select_flg ' || l_proc,7);
412: BEGIN
413: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
414: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
415: ghr_pa_requests_pkg.get_duty_station_details
416: (p_duty_station_id => l_duty_station_id
417: ,p_effective_date => l_effective_date
410:
411: hr_utility.set_location('check_select_flg ' || l_proc,7);
412: BEGIN
413: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
414: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
415: ghr_pa_requests_pkg.get_duty_station_details
416: (p_duty_station_id => l_duty_station_id
417: ,p_effective_date => l_effective_date
418: ,p_duty_station_code => l_duty_station_code
418: ,p_duty_station_code => l_duty_station_code
419: ,p_duty_station_desc => l_duty_station_desc);
420: EXCEPTION
421: when others then
422: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_duty_station_details'||
423: 'Err is '||sqlerrm(sqlcode),20);
424: l_mlcerrbuf := 'Error in get_duty_station_details Sql Err is '|| sqlerrm(sqlcode);
425: raise mlc_error;
426:
502: ,l_message_set
503: ,l_calculated);
504:
505: IF l_message_set THEN
506: hr_utility.set_location( l_proc, 40);
507: l_calculated := FALSE;
508: l_mlcerrbuf := hr_utility.get_message;
509: END IF;
510: EXCEPTION
504:
505: IF l_message_set THEN
506: hr_utility.set_location( l_proc, 40);
507: l_calculated := FALSE;
508: l_mlcerrbuf := hr_utility.get_message;
509: END IF;
510: EXCEPTION
511: when mlc_error then
512: g_proc := 'ghr_pay_calc';
589: ins_upd_per_extra_info
590: (per.person_id,l_effective_date, l_sel_flg, l_comment,p_mass_salary_id);
591: l_comment := NULL;
592: ------ BUG 3287299 End
593: hr_utility.set_location('Error in Ghr_pay_calc.sql_main_pay_calc '||
594: 'Err is '||sqlerrm(sqlcode),20);
595: l_mlcerrbuf := 'Error in ghr_pay_calc Sql Err is '|| sqlerrm(sqlcode);
596: g_proc := 'ghr_pay_calc';
597: raise mlc_error;
613: l_new_other_pay_amount := null;
614: end if;
615: l_new_total_salary := l_pay_calc_out_data.total_salary;
616:
617: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
618: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
619:
620: -------------Call Pay cap Procedure
621: begin
614: end if;
615: l_new_total_salary := l_pay_calc_out_data.total_salary;
616:
617: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
618: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
619:
620: -------------Call Pay cap Procedure
621: begin
622: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
622: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
623: ,p_effective_date => l_effective_date);
624: l_old_capped_other_pay := l_capped_other_pay;
625: -- Sundar Added the following if statement to improve performance
626: if hr_utility.debug_enabled = true then
627: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
628: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
629: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
630: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
623: ,p_effective_date => l_effective_date);
624: l_old_capped_other_pay := l_capped_other_pay;
625: -- Sundar Added the following if statement to improve performance
626: if hr_utility.debug_enabled = true then
627: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
628: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
629: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
630: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
631: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
624: l_old_capped_other_pay := l_capped_other_pay;
625: -- Sundar Added the following if statement to improve performance
626: if hr_utility.debug_enabled = true then
627: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
628: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
629: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
630: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
631: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
632: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
625: -- Sundar Added the following if statement to improve performance
626: if hr_utility.debug_enabled = true then
627: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
628: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
629: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
630: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
631: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
632: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
633: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
626: if hr_utility.debug_enabled = true then
627: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
628: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
629: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
630: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
631: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
632: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
633: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
634: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
627: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
628: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
629: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
630: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
631: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
632: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
633: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
634: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
635: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
628: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
629: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
630: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
631: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
632: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
633: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
634: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
635: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
636: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
629: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
630: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
631: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
632: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
633: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
634: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
635: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
636: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
637: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
630: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
631: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
632: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
633: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
634: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
635: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
636: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
637: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
638: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
631: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
632: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
633: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
634: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
635: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
636: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
637: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
638: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
639: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
632: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
633: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
634: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
635: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
636: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
637: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
638: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
639: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
640: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
633: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
634: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
635: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
636: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
637: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
638: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
639: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
640: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
641: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
634: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
635: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
636: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
637: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
638: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
639: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
640: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
641: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
642: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
635: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
636: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
637: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
638: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
639: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
640: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
641: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
642: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
643: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
636: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
637: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
638: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
639: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
640: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
641: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
642: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
643: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
644: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
637: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
638: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
639: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
640: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
641: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
642: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
643: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
644: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
645: end if;
638: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
639: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
640: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
641: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
642: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
643: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
644: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
645: end if;
646:
639: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
640: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
641: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
642: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
643: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
644: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
645: end if;
646:
647: ghr_pay_caps.do_pay_caps_main
640: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
641: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
642: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
643: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
644: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
645: end if;
646:
647: ghr_pay_caps.do_pay_caps_main
648: (p_pa_request_id => null
676:
677: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
678:
679: -- Sundar Added the following statement to improve performance
680: if hr_utility.debug_enabled = true then
681: hr_utility.set_location('After Pay Cap ' || l_proc,22);
682: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
683: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
684: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
677: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
678:
679: -- Sundar Added the following statement to improve performance
680: if hr_utility.debug_enabled = true then
681: hr_utility.set_location('After Pay Cap ' || l_proc,22);
682: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
683: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
684: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
685: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
678:
679: -- Sundar Added the following statement to improve performance
680: if hr_utility.debug_enabled = true then
681: hr_utility.set_location('After Pay Cap ' || l_proc,22);
682: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
683: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
684: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
685: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
686: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
679: -- Sundar Added the following statement to improve performance
680: if hr_utility.debug_enabled = true then
681: hr_utility.set_location('After Pay Cap ' || l_proc,22);
682: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
683: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
684: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
685: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
686: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
687: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
680: if hr_utility.debug_enabled = true then
681: hr_utility.set_location('After Pay Cap ' || l_proc,22);
682: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
683: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
684: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
685: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
686: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
687: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
688: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
681: hr_utility.set_location('After Pay Cap ' || l_proc,22);
682: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
683: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
684: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
685: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
686: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
687: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
688: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
689: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
682: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
683: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
684: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
685: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
686: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
687: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
688: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
689: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
690: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
683: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
684: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
685: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
686: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
687: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
688: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
689: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
690: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
691: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
684: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
685: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
686: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
687: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
688: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
689: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
690: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
691: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
692: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
685: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
686: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
687: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
688: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
689: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
690: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
691: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
692: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
693: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
686: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
687: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
688: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
689: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
690: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
691: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
692: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
693: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
694: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
687: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
688: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
689: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
690: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
691: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
692: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
693: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
694: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
695: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
688: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
689: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
690: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
691: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
692: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
693: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
694: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
695: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
696: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
689: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
690: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
691: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
692: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
693: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
694: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
695: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
696: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
697: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
690: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
691: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
692: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
693: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
694: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
695: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
696: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
697: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
698: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
691: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
692: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
693: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
694: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
695: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
696: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
697: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
698: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
699: end if;
692: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
693: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
694: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
695: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
696: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
697: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
698: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
699: end if;
700:
693: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
694: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
695: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
696: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
697: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
698: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
699: end if;
700:
701: IF l_pay_cap_message THEN
694: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
695: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
696: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
697: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
698: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
699: end if;
700:
701: IF l_pay_cap_message THEN
702: IF nvl(l_temp_retention_allowance,0) > 0 THEN
739: exception
740: when mlc_error then
741: raise;
742: when others then
743: hr_utility.set_location('Error in ghr_pay_caps.do_pay_caps_main ' ||
744: 'Err is '||sqlerrm(sqlcode),23);
745: l_mlcerrbuf := 'Error in do_pay_caps_main Sql Err is '|| sqlerrm(sqlcode);
746: raise mlc_error;
747: end;
827: l_grade_or_level, l_step_or_rate,
828: l_pay_basis);
829: EXCEPTION
830: when ghr_msl_pkg.msl_error then
831: l_mlcerrbuf := hr_utility.get_message;
832: raise mlc_error;
833: END;
834:
835: assign_to_sf52_rec(
882: (l_pay_calc_out_data,
883: l_sf52_rec);
884: EXCEPTION
885: when others then
886: hr_utility.set_location('Error in Ghr_mass_actions_pkg.pay_calc_rec_to_sf52_rec '||
887: 'Err is '||sqlerrm(sqlcode),20);
888: l_mlcerrbuf := 'Error in ghr_mass_act_pkg.pay_calc_to_sf52 Sql Err is ' ||
889: sqlerrm(sqlcode);
890: raise mlc_error;
918:
919: ---------------------------------------
920: IF l_errbuf is null then
921: pr('No error in create sf52 ');
922: hr_utility.set_location('Before commiting',2);
923: --Bug # 9329643 Modified SSN to Emp No
924: ghr_mto_int.log_message(
925: p_procedure => 'Successful Completion',
926: p_message => 'Name: '||per.full_name ||
962:
963: commit;
964: else
965: pr('Error in create sf52',l_errbuf);
966: hr_utility.set_location('Error in '||to_char(per.position_id),20);
967: --l_recs_failed := l_recs_failed + 1;
968: raise mlc_error;
969: end if; -- if l_errbuf is null then
970: exception
993: end if;
994: end if;
995: EXCEPTION
996: WHEN mlc_ERROR THEN
997: HR_UTILITY.SET_LOCATION('Error occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),10);
998: begin
999: ------ BUG 3287299 -- Not to rollback for preview.
1000: if upper(p_action) <> 'SHOW' then
1001: ROLLBACK TO EXECUTE_MLC_SP;
1008: l_log_text := 'Error in '||l_proc||' '||
1009: ' For Mass Salary Name : '||p_mass_salary||
1010: 'Name: '|| per.full_name || ' Emp No: ' || per.employee_number ||' '||
1011: l_mlcerrbuf;
1012: hr_utility.set_location('before creating entry in log file',10);
1013: l_recs_failed := l_recs_failed + 1;
1014: begin
1015: ghr_mto_int.log_message(
1016: p_procedure => g_proc,
1017: p_message => l_log_text);
1018:
1019: exception
1020: when others then
1021: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
1022: hr_utility.raise_error;
1023: end;
1024: when others then
1025: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
1018:
1019: exception
1020: when others then
1021: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
1022: hr_utility.raise_error;
1023: end;
1024: when others then
1025: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
1026: BEGIN
1021: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
1022: hr_utility.raise_error;
1023: end;
1024: when others then
1025: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
1026: BEGIN
1027: ROLLBACK TO EXECUTE_MLC_SP;
1028: EXCEPTION
1029: WHEN OTHERS THEN NULL;
1033: l_log_text := 'Error (others) in '||l_proc||
1034: ' For Mass Salary Name : '||p_mass_salary||
1035: 'Name: '|| per.full_name || ' Emp No: ' || per.employee_number ||
1036: ' Sql Err is '||sqlerrm(sqlcode);
1037: hr_utility.set_location('before creating entry in log file',20);
1038: l_recs_failed := l_recs_failed + 1;
1039: begin
1040: ghr_mto_int.log_message(
1041: p_procedure => g_proc,
1041: p_procedure => g_proc,
1042: p_message => l_log_text);
1043: exception
1044: when others then
1045: hr_utility.set_message(8301, 'Create Error Log failed');
1046: hr_utility.raise_error;
1047: end;
1048: END;
1049: END LOOP;
1042: p_message => l_log_text);
1043: exception
1044: when others then
1045: hr_utility.set_message(8301, 'Create Error Log failed');
1046: hr_utility.raise_error;
1047: end;
1048: END;
1049: END LOOP;
1050:
1057: set submit_flag = 'P'
1058: where rowid = l_rowid;
1059: EXCEPTION
1060: when others then
1061: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
1062: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
1063: hr_utility.raise_error;
1064: END;
1065: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
1058: where rowid = l_rowid;
1059: EXCEPTION
1060: when others then
1061: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
1062: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
1063: hr_utility.raise_error;
1064: END;
1065: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
1066: ----- So it is not required to do in global if you see the procedure upd_ext_info_to_null
1059: EXCEPTION
1060: when others then
1061: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
1062: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
1063: hr_utility.raise_error;
1064: END;
1065: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
1066: ----- So it is not required to do in global if you see the procedure upd_ext_info_to_null
1067: ----- Commenting the following line. Dated 14-OCT-2003.
1084:
1085: EXCEPTION
1086: when others then
1087: -- raise_application_error(-20121,'Error in EXECUTE_MLC Err is '||sqlerrm(sqlcode));
1088: HR_UTILITY.SET_LOCATION('Error (Others2) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),30);
1089: BEGIN
1090: ROLLBACK TO EXECUTE_MLC_SP;
1091: EXCEPTION
1092: WHEN OTHERS THEN NULL;
1094: l_log_text := 'Error in '||l_proc||
1095: ' For Mass Salary Name : '||p_mass_salary||
1096: ' Sql Err is '||sqlerrm(sqlcode);
1097: l_recs_failed := l_recs_failed + 1;
1098: hr_utility.set_location('before creating entry in log file',30);
1099:
1100: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
1101: p_retcode := 2;
1102: IF upper(p_action) = 'CREATE' THEN
1111: p_procedure => g_proc,
1112: p_message => l_log_text);
1113: exception
1114: when others then
1115: hr_utility.set_message(8301, 'Create Error Log failed');
1116: hr_utility.raise_error;
1117: end;
1118: END EXECUTE_MLC;
1119:
1112: p_message => l_log_text);
1113: exception
1114: when others then
1115: hr_utility.set_message(8301, 'Create Error Log failed');
1116: hr_utility.raise_error;
1117: end;
1118: END EXECUTE_MLC;
1119:
1120: --
1525: l_grade_id := p_grade_id;
1526: l_business_group_id := p_business_group_iD;
1527: l_location_id := p_location_id;
1528:
1529: hr_utility.set_location('The location id is:'||l_location_id,12345);
1530: begin
1531: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
1532: (p_location_id => l_location_id
1533: ,p_duty_station_id => l_duty_station_id);
1532: (p_location_id => l_location_id
1533: ,p_duty_station_id => l_duty_station_id);
1534: exception
1535: when others then
1536: hr_utility.set_location(
1537: 'Error in Ghr_pa_requests_pkg.get_sf52_loc_ddf_details'||
1538: 'Err is '||sqlerrm(sqlcode),20);
1539: l_mtcerrbuf := 'Error in get_sf52_loc_ddf_details '||
1540: 'Sql Err is '|| sqlerrm(sqlcode);
1559: l_position_title,
1560: l_position_number,
1561: l_position_seq_no);
1562:
1563: hr_utility.set_location('The duty station id is:'||l_duty_station_id,12345);
1564: -- Check Locality Area Code
1565:
1566: l_locality_check := FALSE;
1567:
1583: l_duty_station_id,
1584: l_personnel_office_id,
1585: l_sub_element_code) then
1586:
1587: hr_utility.set_location('check_init_eligibility ' || l_proc,6);
1588: -- Get PRD, work schedule etc form ASG EI
1589:
1590: begin
1591: ghr_pa_requests_pkg.get_sf52_asg_ddf_details
1597: l_work_schedule,
1598: l_part_time_hour);
1599: exception
1600: when others then
1601: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_sf52_asg_ddf_details'||
1602: 'Err is '||sqlerrm(sqlcode),20);
1603: l_mtcerrbuf := 'Error in get_sf52_asgddf_details Sql Err is '|| sqlerrm(sqlcode);
1604: raise mtc_error;
1605: end;
1618: l_pay_table_id,l_grade_or_level, l_step_or_rate,
1619: l_pay_basis);
1620: EXCEPTION
1621: when mtc_error then
1622: l_mtcerrbuf := hr_utility.get_message;
1623: raise;
1624: END;
1625:
1626: --3 Pay plan and tableid check
1633: p_person_id,
1634: l_effective_date,
1635: p_action) THEN
1636:
1637: hr_utility.set_location('check_eligibility ' || l_proc,8);
1638:
1639: IF upper(p_action) = 'REPORT' AND l_submit_flag = 'P' THEN
1640: --Bug # 9329643
1641: pop_dtls_from_pa_req(p_person_id,l_effective_date,l_mass_salary_id,l_org_name,p_employee_number);
1646: ,p_mass_salary_id
1647: ,l_sel_flg
1648: ) then
1649:
1650: hr_utility.set_location('check_select_flg ' || l_proc,7);
1651: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
1652: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
1653:
1654: begin
1647: ,l_sel_flg
1648: ) then
1649:
1650: hr_utility.set_location('check_select_flg ' || l_proc,7);
1651: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
1652: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
1653:
1654: begin
1655: ghr_pa_requests_pkg.get_duty_station_details
1648: ) then
1649:
1650: hr_utility.set_location('check_select_flg ' || l_proc,7);
1651: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
1652: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
1653:
1654: begin
1655: ghr_pa_requests_pkg.get_duty_station_details
1656: (p_duty_station_id => l_duty_station_id
1658: ,p_duty_station_code => l_duty_station_code
1659: ,p_duty_station_desc => l_duty_station_desc);
1660: exception
1661: when others then
1662: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_duty_station_details'||
1663: 'Err is '||sqlerrm(sqlcode),20);
1664: l_mtcerrbuf := 'Error in get_duty_station_details Sql Err is '|| sqlerrm(sqlcode);
1665: raise mtc_error;
1666: end;
1732: ,l_message_set
1733: ,l_calculated);
1734:
1735: IF l_message_set THEN
1736: hr_utility.set_location( l_proc, 40);
1737: l_calculated := FALSE;
1738: l_mtcerrbuf := hr_utility.get_message;
1739: -- raise mtc_error;
1740: END IF;
1734:
1735: IF l_message_set THEN
1736: hr_utility.set_location( l_proc, 40);
1737: l_calculated := FALSE;
1738: l_mtcerrbuf := hr_utility.get_message;
1739: -- raise mtc_error;
1740: END IF;
1741: exception
1742: when mtc_error then
1815: ins_upd_per_extra_info
1816: (p_person_id,l_effective_date, l_sel_flg, l_comments,p_mass_salary_id);
1817: l_comment := NULL;
1818: ------ BUG 3287299 End
1819: hr_utility.set_location('Error in Ghr_pay_calc.sql_main_pay_calc '||
1820: 'Err is '||sqlerrm(sqlcode),20);
1821: l_mtcerrbuf := 'Error in ghr_pay_calc Sql Err is '|| sqlerrm(sqlcode);
1822: g_proc := 'ghr_pay_calc';
1823: raise mtc_error;
1839: l_new_other_pay_amount := null;
1840: end if;
1841: l_new_total_salary := l_pay_calc_out_data.total_salary;
1842:
1843: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
1844: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
1845:
1846:
1847: -------------Call Pay cap Procedure
1840: end if;
1841: l_new_total_salary := l_pay_calc_out_data.total_salary;
1842:
1843: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
1844: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
1845:
1846:
1847: -------------Call Pay cap Procedure
1848: begin
1849: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
1850: ,p_effective_date => l_effective_date);
1851: l_old_capped_other_pay := l_capped_other_pay;
1852: -- Sundar Added the following if statement to improve performance
1853: if hr_utility.debug_enabled = true then
1854: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1855: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1856: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1857: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1850: ,p_effective_date => l_effective_date);
1851: l_old_capped_other_pay := l_capped_other_pay;
1852: -- Sundar Added the following if statement to improve performance
1853: if hr_utility.debug_enabled = true then
1854: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1855: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1856: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1857: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1858: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1851: l_old_capped_other_pay := l_capped_other_pay;
1852: -- Sundar Added the following if statement to improve performance
1853: if hr_utility.debug_enabled = true then
1854: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1855: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1856: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1857: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1858: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1859: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1852: -- Sundar Added the following if statement to improve performance
1853: if hr_utility.debug_enabled = true then
1854: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1855: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1856: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1857: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1858: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1859: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1860: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1853: if hr_utility.debug_enabled = true then
1854: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1855: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1856: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1857: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1858: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1859: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1860: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1861: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1854: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1855: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1856: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1857: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1858: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1859: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1860: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1861: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1862: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1855: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1856: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1857: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1858: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1859: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1860: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1861: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1862: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1863: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1856: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1857: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1858: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1859: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1860: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1861: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1862: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1863: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1864: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1857: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1858: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1859: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1860: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1861: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1862: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1863: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1864: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1865: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1858: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1859: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1860: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1861: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1862: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1863: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1864: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1865: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1866: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1859: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1860: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1861: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1862: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1863: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1864: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1865: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1866: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1867: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1860: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1861: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1862: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1863: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1864: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1865: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1866: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1867: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1868: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1861: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1862: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1863: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1864: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1865: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1866: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1867: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1868: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1869: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1862: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1863: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1864: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1865: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1866: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1867: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1868: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1869: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1870: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1863: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1864: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1865: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1866: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1867: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1868: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1869: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1870: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1871: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1864: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1865: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1866: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1867: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1868: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1869: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1870: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1871: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1872: end if;
1865: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1866: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1867: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1868: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1869: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1870: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1871: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1872: end if;
1873:
1866: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1867: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1868: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1869: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1870: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1871: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1872: end if;
1873:
1874:
1867: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1868: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1869: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1870: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1871: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1872: end if;
1873:
1874:
1875: ghr_pay_caps.do_pay_caps_main
1904:
1905: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
1906:
1907: -- Sundar Added the following statement to improve performance
1908: if hr_utility.debug_enabled = true then
1909: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1910: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1911: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1912: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1905: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
1906:
1907: -- Sundar Added the following statement to improve performance
1908: if hr_utility.debug_enabled = true then
1909: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1910: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1911: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1912: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1913: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1906:
1907: -- Sundar Added the following statement to improve performance
1908: if hr_utility.debug_enabled = true then
1909: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1910: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1911: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1912: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1913: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1914: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1907: -- Sundar Added the following statement to improve performance
1908: if hr_utility.debug_enabled = true then
1909: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1910: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1911: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1912: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1913: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1914: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1915: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1908: if hr_utility.debug_enabled = true then
1909: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1910: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1911: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1912: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1913: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1914: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1915: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1916: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1909: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1910: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1911: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1912: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1913: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1914: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1915: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1916: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1917: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1910: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1911: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1912: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1913: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1914: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1915: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1916: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1917: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1918: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1911: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1912: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1913: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1914: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1915: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1916: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1917: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1918: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1919: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1912: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1913: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1914: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1915: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1916: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1917: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1918: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1919: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1920: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1913: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1914: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1915: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1916: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1917: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1918: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1919: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1920: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1921: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1914: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1915: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1916: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1917: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1918: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1919: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1920: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1921: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1922: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1915: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1916: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1917: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1918: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1919: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1920: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1921: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1922: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1923: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1916: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1917: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1918: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1919: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1920: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1921: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1922: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1923: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1924: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1917: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1918: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1919: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1920: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1921: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1922: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1923: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1924: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1925: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1918: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1919: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1920: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1921: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1922: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1923: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1924: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1925: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1926: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1919: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1920: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1921: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1922: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1923: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1924: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1925: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1926: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1927: end if;
1920: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1921: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1922: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1923: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1924: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1925: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1926: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1927: end if;
1928:
1921: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1922: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1923: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1924: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1925: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1926: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1927: end if;
1928:
1929: IF l_pay_cap_message THEN
1922: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1923: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1924: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1925: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1926: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1927: end if;
1928:
1929: IF l_pay_cap_message THEN
1930: IF nvl(l_temp_retention_allowance,0) > 0 THEN
1960: exception
1961: when mtc_error then
1962: raise;
1963: when others then
1964: hr_utility.set_location('Error in ghr_pay_caps.do_pay_caps_main ' ||
1965: 'Err is '||sqlerrm(sqlcode),23);
1966: l_mtcerrbuf := 'Error in do_pay_caps_main Sql Err is '|| sqlerrm(sqlcode);
1967: raise mtc_error;
1968: end;
2042: l_grade_or_level, l_step_or_rate,
2043: l_pay_basis);
2044: EXCEPTION
2045: when mtc_error then
2046: l_mtcerrbuf := hr_utility.get_message;
2047: raise;
2048: END;
2049: assign_to_sf52_rec(
2050: p_person_id,
2120:
2121: ---------------------------------------
2122: if l_errbuf is null then
2123: pr('No error in create sf52 ');
2124: hr_utility.set_location('Before commiting',2);
2125:
2126: --Bug # 9329643 Modified SSN to Emp No
2127: ghr_mto_int.log_message(
2128: p_procedure => 'Successful Completion',
2160:
2161: commit;
2162: else
2163: pr('Error in create sf52',l_errbuf);
2164: hr_utility.set_location('Error in '||to_char(p_position_id),20);
2165: --l_recs_failed := l_recs_failed + 1;
2166: raise mtc_error;
2167: end if; -- if l_errbuf is null then
2168: exception
2190: end if;
2191: end if;
2192: EXCEPTION
2193: WHEN MTC_ERROR THEN
2194: HR_UTILITY.SET_LOCATION('Error occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),10);
2195: begin
2196: ------ BUG 3287299 -- Not to rollback for preview.
2197: if upper(p_action) <> 'SHOW' then
2198: ROLLBACK TO execute_msl_pay_SP;
2204: l_log_text := 'Error in '||l_proc||' '||
2205: ' For Mass Salary Name : '||p_mass_salary||
2206: 'Name: '|| p_full_name || ' Emp No: ' || p_employee_number ||' '||
2207: l_mtcerrbuf;
2208: hr_utility.set_location('before creating entry in log file',10);
2209: l_recs_failed := l_recs_failed + 1;
2210: begin
2211: ghr_mto_int.log_message(
2212: p_procedure => g_proc,
2213: p_message => l_log_text);
2214:
2215: exception
2216: when others then
2217: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
2218: hr_utility.raise_error;
2219: end;
2220: when others then
2221: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
2214:
2215: exception
2216: when others then
2217: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
2218: hr_utility.raise_error;
2219: end;
2220: when others then
2221: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
2222: BEGIN
2217: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
2218: hr_utility.raise_error;
2219: end;
2220: when others then
2221: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
2222: BEGIN
2223: ROLLBACK TO execute_msl_pay_SP;
2224: EXCEPTION
2225: WHEN OTHERS THEN NULL;
2228: l_log_text := 'Error (others) in '||l_proc||
2229: ' For Mass Salary Name : '||p_mass_salary||
2230: 'Name: '|| p_full_name || ' Emp No: ' || p_employee_number ||
2231: ' Sql Err is '||sqlerrm(sqlcode);
2232: hr_utility.set_location('before creating entry in log file',20);
2233: l_recs_failed := l_recs_failed + 1;
2234: begin
2235: ghr_mto_int.log_message(
2236: p_procedure => g_proc,
2237: p_message => l_log_text);
2238:
2239: exception
2240: when others then
2241: hr_utility.set_message(8301, 'Create Error Log failed');
2242: hr_utility.raise_error;
2243: end;
2244:
2245:
2238:
2239: exception
2240: when others then
2241: hr_utility.set_message(8301, 'Create Error Log failed');
2242: hr_utility.raise_error;
2243: end;
2244:
2245:
2246: END msl_pay_process;
2247:
2248: BEGIN
2249:
2250: g_proc := 'execute_msl_pay';
2251: hr_utility.set_location('Entering ' || l_proc,5);
2252: p_retcode := 0;
2253: l_count := 0;
2254:
2255: ghr_msl_pkg.g_first_noa_code := null;
2279: exit;
2280: END LOOP;
2281: EXCEPTION
2282: when REC_BUSY then
2283: hr_utility.set_location('Mass Salary is in use',1);
2284: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2285: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
2286: hr_utility.raise_error;
2287: --
2281: EXCEPTION
2282: when REC_BUSY then
2283: hr_utility.set_location('Mass Salary is in use',1);
2284: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2285: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
2286: hr_utility.raise_error;
2287: --
2288: when others then
2289: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
2282: when REC_BUSY then
2283: hr_utility.set_location('Mass Salary is in use',1);
2284: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2285: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
2286: hr_utility.raise_error;
2287: --
2288: when others then
2289: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
2290: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2285: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
2286: hr_utility.raise_error;
2287: --
2288: when others then
2289: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
2290: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2291: raise mtc_error;
2292: END;
2293:
2318:
2319: get_lac_dtls(l_pa_request_id,
2320: l_lac_sf52_rec);
2321:
2322: hr_utility.set_location('After fetch msl '||to_char(l_effective_date)
2323: ||' '||to_char(l_user_table_id),20);
2324:
2325: IF l_p_ORGANIZATION_ID is not null then
2326: FOR per IN cur_people_org (l_effective_date,l_p_ORGANIZATION_ID)
2372: pr('After processing is over ',to_char(l_recs_failed));
2373:
2374: -- Vacant Positions Logic
2375:
2376: hr_utility.set_location('Entering Unassigned positions ' || l_proc,30);
2377:
2378: FOR c_pay_table_rec IN c_pay_table_id('0000') LOOP
2379: l_0000_id := c_pay_table_rec.user_table_id;
2380: exit;
2379: l_0000_id := c_pay_table_rec.user_table_id;
2380: exit;
2381: END LOOP;
2382:
2383: hr_utility.set_location('0000 tableid is ' || to_char(l_0000_id) || l_proc,35);
2384:
2385: FOR c_pay_table_rec IN c_pay_table_id('0491') LOOP
2386: l_0491_id := c_pay_table_rec.user_table_id;
2387: exit;
2386: l_0491_id := c_pay_table_rec.user_table_id;
2387: exit;
2388: END LOOP;
2389:
2390: hr_utility.set_location('0491 tableid is ' || to_char(l_0491_id) || l_proc,36);
2391:
2392: FOR un_per IN unassigned_pos (l_p_organization_id, l_effective_date)
2393: LOOP
2394:
2398: IF ( HR_GENERAL.DECODE_AVAILABILITY_STATUS(l_avail_status_id)
2399: = 'Active' ) THEN
2400: --------- not in ('Eliminated','Frozen','Deleted') ) THEN
2401:
2402: hr_utility.set_location('Available status ' || HR_GENERAL.DECODE_AVAILABILITY_STATUS(l_avail_status_id) || l_proc,37);
2403: l_position_id := un_per.position_id;
2404: hr_utility.set_location('position id is ' || to_char(l_position_id) || l_proc,40);
2405:
2406: ghr_history_fetch.fetch_positionei
2400: --------- not in ('Eliminated','Frozen','Deleted') ) THEN
2401:
2402: hr_utility.set_location('Available status ' || HR_GENERAL.DECODE_AVAILABILITY_STATUS(l_avail_status_id) || l_proc,37);
2403: l_position_id := un_per.position_id;
2404: hr_utility.set_location('position id is ' || to_char(l_position_id) || l_proc,40);
2405:
2406: ghr_history_fetch.fetch_positionei
2407: (p_position_id => l_position_id
2408: ,p_information_type => 'GHR_US_POS_VALID_GRADE'
2414: l_pay_table_id := l_pos_valid_grade_ei_data.poei_information5;
2415: l_business_group_id := un_per.business_group_iD;
2416: l_location_id := un_per.location_id;
2417:
2418: hr_utility.set_location('position valid grade table id is ' || to_char(l_pay_table_id) || l_proc,45);
2419: BEGIN
2420: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
2421: (p_location_id => l_location_id
2422: ,p_duty_station_id => l_duty_station_id);
2462: END LOOP;
2463: END IF;
2464:
2465: if l_locality_check then
2466: hr_utility.set_location('locality check is TRUE' || l_proc,50);
2467: else
2468: hr_utility.set_location('locality check is FALSE' || l_proc,50);
2469: end if;
2470:
2464:
2465: if l_locality_check then
2466: hr_utility.set_location('locality check is TRUE' || l_proc,50);
2467: else
2468: hr_utility.set_location('locality check is FALSE' || l_proc,50);
2469: end if;
2470:
2471:
2472: --2 Check Duty station code,POI,agnecy and subelement.
2479: l_duty_station_id,
2480: l_personnel_office_id,
2481: l_sub_element_code) then
2482:
2483: hr_utility.set_location('check_init_eligibility ' || l_proc,55);
2484:
2485: FOR c_grade_kff_rec IN c_grade_kff (l_grade_id)
2486: LOOP
2487: l_pay_plan := c_grade_kff_rec.segment1;
2488: l_grade_or_level := c_grade_kff_rec.segment2;
2489: exit;
2490: END loop;
2491:
2492: hr_utility.set_location('l_pay_plan ' || l_pay_plan || l_proc,56);
2493: hr_utility.set_location('l_grade_or_level ' || l_grade_or_level || l_proc,56);
2494:
2495: --3 (Internal Loop) Check pay plan,table id
2496: FOR l_cnt in 1..rec_pp_prd_per_gr.COUNT LOOP
2489: exit;
2490: END loop;
2491:
2492: hr_utility.set_location('l_pay_plan ' || l_pay_plan || l_proc,56);
2493: hr_utility.set_location('l_grade_or_level ' || l_grade_or_level || l_proc,56);
2494:
2495: --3 (Internal Loop) Check pay plan,table id
2496: FOR l_cnt in 1..rec_pp_prd_per_gr.COUNT LOOP
2497:
2494:
2495: --3 (Internal Loop) Check pay plan,table id
2496: FOR l_cnt in 1..rec_pp_prd_per_gr.COUNT LOOP
2497:
2498: hr_utility.set_location('For internal loop l_cnt ' || to_char(l_cnt) || l_proc,58);
2499: --4 Pay plan , table, grade check
2500: IF ( nvl(rec_pp_prd_per_gr(l_cnt).pay_plan,l_pay_plan) = l_pay_plan
2501: AND l_user_table_id = nvl(l_pay_table_id,hr_api.g_number)
2502: AND nvl(rec_pp_prd_per_gr(l_cnt).grade,l_grade_or_level)=l_grade_or_level ) THEN
2500: IF ( nvl(rec_pp_prd_per_gr(l_cnt).pay_plan,l_pay_plan) = l_pay_plan
2501: AND l_user_table_id = nvl(l_pay_table_id,hr_api.g_number)
2502: AND nvl(rec_pp_prd_per_gr(l_cnt).grade,l_grade_or_level)=l_grade_or_level ) THEN
2503:
2504: hr_utility.set_location('check l_pay_plan ' || l_pay_plan || l_proc,58);
2505: hr_utility.set_location('check l_grade_or_level ' || l_grade_or_level || l_proc,58);
2506: BEGIN
2507: ghr_pa_requests_pkg.get_duty_station_details
2508: (p_duty_station_id => l_duty_station_id
2501: AND l_user_table_id = nvl(l_pay_table_id,hr_api.g_number)
2502: AND nvl(rec_pp_prd_per_gr(l_cnt).grade,l_grade_or_level)=l_grade_or_level ) THEN
2503:
2504: hr_utility.set_location('check l_pay_plan ' || l_pay_plan || l_proc,58);
2505: hr_utility.set_location('check l_grade_or_level ' || l_grade_or_level || l_proc,58);
2506: BEGIN
2507: ghr_pa_requests_pkg.get_duty_station_details
2508: (p_duty_station_id => l_duty_station_id
2509: ,p_effective_DATE => l_effective_DATE
2515: ,l_effective_DATE
2516: ,p_mass_salary_id
2517: ,l_sel_flg);
2518:
2519: hr_utility.set_location('Entering Before get_special_table_pay_table_value ' || l_proc,60);
2520: ghr_pay_calc.get_special_pay_table_value
2521: (p_pay_plan => l_pay_plan
2522: ,p_grade_or_level => l_grade_or_level
2523: ,p_step_or_rate => null
2670: set submit_flag = 'P'
2671: where rowid = l_rowid;
2672: EXCEPTION
2673: when others then
2674: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
2675: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
2676: hr_utility.raise_error;
2677: END;
2678: end if;
2671: where rowid = l_rowid;
2672: EXCEPTION
2673: when others then
2674: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
2675: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
2676: hr_utility.raise_error;
2677: END;
2678: end if;
2679: ELSE
2672: EXCEPTION
2673: when others then
2674: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
2675: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
2676: hr_utility.raise_error;
2677: END;
2678: end if;
2679: ELSE
2680: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
2688: COMMIT;
2689:
2690: EXCEPTION
2691: when others then
2692: HR_UTILITY.SET_LOCATION('Error (Others2) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),30);
2693: BEGIN
2694: ROLLBACK TO execute_msl_pay_SP;
2695: EXCEPTION
2696: WHEN OTHERS THEN NULL;
2698: l_log_text := 'Error in '||l_proc||
2699: ' For Mass Salary Name : '||p_mass_salary||
2700: ' Sql Err is '||sqlerrm(sqlcode);
2701: l_recs_failed := l_recs_failed + 1;
2702: hr_utility.set_location('before creating entry in log file',30);
2703:
2704: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
2705: p_retcode := 2;
2706: IF upper(p_action) = 'CREATE' THEN
2716: p_message => l_log_text);
2717:
2718: exception
2719: when others then
2720: hr_utility.set_message(8301, 'Create Error Log failed');
2721: hr_utility.raise_error;
2722: end;
2723:
2724: END execute_msl_pay;
2717:
2718: exception
2719: when others then
2720: hr_utility.set_message(8301, 'Create Error Log failed');
2721: hr_utility.raise_error;
2722: end;
2723:
2724: END execute_msl_pay;
2725:
2846: l_proc varchar2(72) := g_package || '.pop_dtls_from_pa_req';
2847: begin
2848: g_proc := 'pop_dtls_from_pa_req';
2849:
2850: hr_utility.set_location('Entering ' || l_proc,5);
2851: for pa_req_rec in ghr_pa_req_cur
2852: loop
2853: create_mass_act_prev (
2854: p_effective_date => p_effective_date,
2914: -- FWFA Changes
2915: );
2916: exit;
2917: END LOOP;
2918: hr_utility.set_location('Exiting ' || l_proc,10);
2919: exception
2920: when mlc_error then raise;
2921: when others then
2922: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2918: hr_utility.set_location('Exiting ' || l_proc,10);
2919: exception
2920: when mlc_error then raise;
2921: when others then
2922: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2923: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2924: raise mlc_error;
2925: end pop_dtls_from_pa_req;
2926: --
2995: l_proc varchar2(72) := g_package || '.pop_dtls_from_pa_req_mtc';
2996: begin
2997: g_proc := 'pop_dtls_from_pa_req_mtc';
2998:
2999: hr_utility.set_location('Entering ' || l_proc,5);
3000: for pa_req_rec in ghr_pa_req_cur
3001: loop
3002: create_mass_act_prev_mtc (
3003: p_effective_date => p_effective_date,
3059: -- FWFA Changes
3060: );
3061: exit;
3062: END LOOP;
3063: hr_utility.set_location('Exiting ' || l_proc,10);
3064: exception
3065: when mlc_error then raise;
3066: when others then
3067: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3063: hr_utility.set_location('Exiting ' || l_proc,10);
3064: exception
3065: when mlc_error then raise;
3066: when others then
3067: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3068: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3069: raise mlc_error;
3070: end pop_dtls_from_pa_req_mtc;
3071:
3090:
3091: BEGIN
3092:
3093: g_proc := 'check_select_flg';
3094: hr_utility.set_location('Entering ' || l_proc,5);
3095:
3096: get_extra_info_comments(p_person_id,p_effective_date,l_sel_flag,l_comments,p_mass_salary_id);
3097:
3098: --------- Initialize the comments
3123: END IF;
3124: EXCEPTION
3125: when mlc_error then raise;
3126: when others then
3127: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3128: l_mlcerrbuf := 'Error in '||l_proc||' @'||to_char(l_line)||' Sql Err is '|| sqlerrm(sqlcode);
3129: raise mlc_error;
3130: END;
3131:
3137: l_proc varchar2(72) := g_package || '.purge_old_data';
3138: BEGIN
3139: g_proc := 'purge_old_data';
3140:
3141: hr_utility.set_location('Entering ' || l_proc,5);
3142: delete from ghr_mass_actions_preview
3143: where mass_action_type = 'SALARY'
3144: and session_id = p_mass_salary_id;
3145: commit;
3142: delete from ghr_mass_actions_preview
3143: where mass_action_type = 'SALARY'
3144: and session_id = p_mass_salary_id;
3145: commit;
3146: hr_utility.set_location('Exiting ' || l_proc,10);
3147: exception
3148: when mlc_error then raise;
3149: when others then
3150: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3146: hr_utility.set_location('Exiting ' || l_proc,10);
3147: exception
3148: when mlc_error then raise;
3149: when others then
3150: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3151: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3152: raise mlc_error;
3153: END;
3154:
3170: l_proc varchar2(72) := g_package || '.update_sel_flg';
3171: l_ind number := 1;
3172: begin
3173: g_proc := 'update_sel_flg';
3174: hr_utility.set_location('Entering ' || l_proc,5);
3175: pr('Inside '||l_proc,to_char(p_person_id));
3176: l_ind := 10;
3177: ghr_history_fetch.fetch_peopleei
3178: (p_person_id => p_person_id
3194: ,p_pei_INFORMATION5 => NULL
3195: ,P_PEI_INFORMATION_CATEGORY => 'GHR_US_PER_MASS_ACTIONS');
3196:
3197: l_ind := 30;
3198: hr_utility.set_location('Exiting ' || l_proc,10);
3199: -- There is a trigger on PER_PEOPLE_EXTRA_INFO to make the employee INVALID
3200: -- when there is a update done on the table.
3201: ---Commented the following three lines to remove Validation functionality on Person.
3202: --- ghr_validate_perwsepi.validate_perwsepi(p_person_id);
3208: pr('Exiting '||l_proc,to_char(p_person_id));
3209: exception
3210: when mlc_error then raise;
3211: when others then
3212: hr_utility.set_location('Error in '||l_proc||
3213: ' Err is '||sqlerrm(sqlcode),20);
3214: l_mlcerrbuf := 'Error in '||l_proc||' at '||to_char(l_ind)||
3215: ' Sql Err is '|| sqlerrm(sqlcode);
3216: raise mlc_error;
3285: group by information11);
3286:
3287: begin
3288: g_proc := 'get_extra_info_comments';
3289: hr_utility.set_location('Entering ' || l_proc,5);
3290: /*
3291: if p_effective_date > sysdate then
3292: l_eff_date := sysdate;
3293: else
3323:
3324: exception
3325: when mlc_error then raise;
3326: when others then
3327: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3328: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3329: raise mlc_error;
3330: end;
3331:
3351: l_eff_date date;
3352:
3353: begin
3354: g_proc := 'ins_upd_per_extra_info';
3355: hr_utility.set_location('Entering ' || l_proc,5);
3356: if p_effective_date > sysdate then
3357: l_eff_date := sysdate;
3358: else
3359: l_eff_date := p_effective_date;
3401: ---Commented the following two lines to remove Validation functionality on Person.
3402: -- ghr_validate_perwsepi.validate_perwsepi(p_person_id);
3403: -- ghr_validate_perwsepi.update_person_user_type(p_person_id);
3404:
3405: hr_utility.set_location('Exiting ' || l_proc,10);
3406: exception
3407: when mlc_error then raise;
3408: when others then
3409: pr('Error in '||l_proc);
3406: exception
3407: when mlc_error then raise;
3408: when others then
3409: pr('Error in '||l_proc);
3410: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3411: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3412: raise mlc_error;
3413: end ins_upd_per_extra_info;
3414:
3436: l_proc varchar2(72) := g_package || '.check_init_eligibility';
3437: BEGIN
3438:
3439: g_proc := 'check_init_eligibility';
3440: hr_utility.set_location('Entering ' || l_proc,5);
3441:
3442: if p_personnel_office_id is not null then
3443: if p_personnel_office_id <> nvl(p_l_personnel_office_id,'NULL!~') then
3444: return false;
3468: l_ds_end_date := rec_ds.end_Date;
3469: END LOOP;
3470:
3471: If l_ds_end_date IS NULL THEN
3472: hr_utility.set_location('Under DS null check'||p_l_duty_station_id,12345);
3473: raise mlc_error;
3474: return false;
3475: end if;
3476:
3477: pr('Eligible');
3478: return true;
3479: exception
3480: when mlc_error then --raise;
3481: hr_utility.set_location('Error NO DUTY STATION '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3482: l_mlcerrbuf :=
3483: 'Error - No valid Location found, salary cannot be correctly calculated without the employee''s duty location ';
3484: return false;
3485: raise mlc_error;
3483: 'Error - No valid Location found, salary cannot be correctly calculated without the employee''s duty location ';
3484: return false;
3485: raise mlc_error;
3486: when others then
3487: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3488: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3489: return false;
3490: raise mlc_error;
3491: END check_init_eligibility;
3507: AND pay_plan=p_pay_plan;
3508:
3509: BEGIN
3510: g_proc := 'check_eligibility';
3511: hr_utility.set_location('Entering ' || l_proc,5);
3512:
3513: --- MSL percentage changes Madhuri
3514: ---
3515:
3544: RETURN TRUE;
3545: exception
3546: when mlc_error then raise;
3547: when others then
3548: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3549: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3550: raise mlc_error;
3551: END check_eligibility;
3552:
3608: l_eq_pay_plan ghr_pay_plans.equivalent_pay_plan%type;
3609:
3610: begin
3611: g_proc := 'person_in_pa_req_1noa';
3612: hr_utility.set_location('Entering ' || l_proc,5);
3613: -- Bug 1631952 start
3614:
3615: for csr_eq_pay_plan_rec in csr_eq_pay_plan loop
3616: l_eq_pay_plan := csr_eq_pay_plan_rec.equivalent_pay_plan;
3683: AND pay_plan=p_pay_plan;
3684:
3685: BEGIN
3686: g_proc := 'check_eligibility';
3687: hr_utility.set_location('Entering ' || l_proc,5);
3688:
3689: --- MSL percentage changes Madhuri
3690: ---
3691:
3720: RETURN TRUE;
3721: exception
3722: when mlc_error then raise;
3723: when others then
3724: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3725: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3726: raise mlc_error;
3727: END check_eligibility_mtc;
3728:
3782: l_eq_pay_plan ghr_pay_plans.equivalent_pay_plan%type;
3783:
3784: begin
3785: g_proc := 'person_in_pa_req_1noa';
3786: hr_utility.set_location('Entering ' || l_proc,5);
3787: -- Bug 1631952 start
3788:
3789: for csr_eq_pay_plan_rec in csr_eq_pay_plan loop
3790: l_eq_pay_plan := csr_eq_pay_plan_rec.equivalent_pay_plan;
3851: l_proc varchar2(72) := g_package || '.check_grade_retention';
3852:
3853: begin
3854: g_proc := 'check_grade_retention';
3855: hr_utility.set_location('Entering ' || l_proc,5);
3856: if p_prd in ('A','B','E','F','U','V') then
3857: if p_prd in ('A','B','E','F') then
3858: BEGIN
3859: l_retained_grade_rec :=
3895: --l_pos_ei_data per_position_extra_info%type;
3896:
3897: begin
3898: g_proc := 'get_pos_grp1_ddf';
3899: hr_utility.set_location('Entering ' || l_proc,5);
3900: ghr_history_fetch.fetch_positionei
3901: (p_position_id => p_position_id
3902: ,p_information_type => 'GHR_US_POS_GRP1'
3903: ,p_date_effective => p_effective_date
3902: ,p_information_type => 'GHR_US_POS_GRP1'
3903: ,p_date_effective => p_effective_date
3904: ,p_pos_ei_data => p_pos_ei_data
3905: );
3906: hr_utility.set_location('Exiting ' || l_proc,10);
3907: exception
3908: when mlc_error then raise;
3909: when others then
3910: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3906: hr_utility.set_location('Exiting ' || l_proc,10);
3907: exception
3908: when mlc_error then raise;
3909: when others then
3910: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3911: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3912: raise mlc_error;
3913: END get_pos_grp1_ddf;
3914:
3952:
3953: BEGIN
3954:
3955: g_proc := 'get_from_sf52_data_elements';
3956: hr_utility.set_location('Entering ' || l_proc,5);
3957:
3958: -- Processing Total Pay and Adjusted Basic Pay
3959: -- NAME DATE BUG COMMENTS
3960: -- Ashley 17-JUL-03 Payroll Intg Modified the Input Value name
3968: ,p_effective_date => p_effective_date
3969: ,p_value => l_total_salary
3970: ,p_multiple_error_flag => l_multi_error_flag);
3971:
3972: hr_utility.set_location('Total Pay = ' || to_char(l_total_salary), 6);
3973:
3974: if l_multi_error_flag then
3975: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3976: hr_utility.raise_error;
3971:
3972: hr_utility.set_location('Total Pay = ' || to_char(l_total_salary), 6);
3973:
3974: if l_multi_error_flag then
3975: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3976: hr_utility.raise_error;
3977: end if;
3978:
3979: ghr_api.retrieve_element_entry_value
3972: hr_utility.set_location('Total Pay = ' || to_char(l_total_salary), 6);
3973:
3974: if l_multi_error_flag then
3975: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3976: hr_utility.raise_error;
3977: end if;
3978:
3979: ghr_api.retrieve_element_entry_value
3980: (p_element_name => 'Basic Salary Rate'
3983: ,p_effective_date => p_effective_date
3984: ,p_value => l_basic_pay
3985: ,p_multiple_error_flag => l_multi_error_flag);
3986:
3987: hr_utility.set_location('Basic Salary Rate = ' || to_char(l_basic_pay), 6);
3988:
3989: if l_multi_error_flag then
3990: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3991: hr_utility.raise_error;
3986:
3987: hr_utility.set_location('Basic Salary Rate = ' || to_char(l_basic_pay), 6);
3988:
3989: if l_multi_error_flag then
3990: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3991: hr_utility.raise_error;
3992: end if;
3993:
3994: ghr_api.retrieve_element_entry_value
3987: hr_utility.set_location('Basic Salary Rate = ' || to_char(l_basic_pay), 6);
3988:
3989: if l_multi_error_flag then
3990: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3991: hr_utility.raise_error;
3992: end if;
3993:
3994: ghr_api.retrieve_element_entry_value
3995: (p_element_name => 'Locality Pay or SR Supplement'
3999: ,p_effective_date => p_effective_date
4000: ,p_value => l_locality_adj
4001: ,p_multiple_error_flag => l_multi_error_flag);
4002:
4003: hr_utility.set_location('Locality Pay = ' || to_char(l_locality_adj), 6);
4004:
4005: if l_multi_error_flag then
4006: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4007: hr_utility.raise_error;
4002:
4003: hr_utility.set_location('Locality Pay = ' || to_char(l_locality_adj), 6);
4004:
4005: if l_multi_error_flag then
4006: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4007: hr_utility.raise_error;
4008: end if;
4009:
4010: ghr_api.retrieve_element_entry_value
4003: hr_utility.set_location('Locality Pay = ' || to_char(l_locality_adj), 6);
4004:
4005: if l_multi_error_flag then
4006: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4007: hr_utility.raise_error;
4008: end if;
4009:
4010: ghr_api.retrieve_element_entry_value
4011: (p_element_name => 'Adjusted Basic Pay'
4014: ,p_effective_date => p_effective_date
4015: ,p_value => l_adj_basic_pay
4016: ,p_multiple_error_flag => l_multi_error_flag);
4017:
4018: hr_utility.set_location('Adjusted Basic Pay = ' || to_char(l_adj_basic_pay), 6);
4019:
4020: if l_multi_error_flag then
4021: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4022: hr_utility.raise_error;
4017:
4018: hr_utility.set_location('Adjusted Basic Pay = ' || to_char(l_adj_basic_pay), 6);
4019:
4020: if l_multi_error_flag then
4021: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4022: hr_utility.raise_error;
4023: end if;
4024:
4025: ghr_api.retrieve_element_entry_value
4018: hr_utility.set_location('Adjusted Basic Pay = ' || to_char(l_adj_basic_pay), 6);
4019:
4020: if l_multi_error_flag then
4021: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4022: hr_utility.raise_error;
4023: end if;
4024:
4025: ghr_api.retrieve_element_entry_value
4026: (p_element_name => 'Other Pay'
4029: ,p_effective_date => p_effective_date
4030: ,p_value => l_other_pay
4031: ,p_multiple_error_flag => l_multi_error_flag);
4032:
4033: hr_utility.set_location('Other Pay = ' || to_char(l_other_pay), 6);
4034:
4035: if l_multi_error_flag then
4036: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4037: hr_utility.raise_error;
4032:
4033: hr_utility.set_location('Other Pay = ' || to_char(l_other_pay), 6);
4034:
4035: if l_multi_error_flag then
4036: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4037: hr_utility.raise_error;
4038: end if;
4039:
4040: ghr_api.retrieve_element_entry_value
4033: hr_utility.set_location('Other Pay = ' || to_char(l_other_pay), 6);
4034:
4035: if l_multi_error_flag then
4036: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4037: hr_utility.raise_error;
4038: end if;
4039:
4040: ghr_api.retrieve_element_entry_value
4041: (p_element_name => 'AUO'
4044: ,p_effective_date => p_effective_date
4045: ,p_value => l_au_overtime
4046: ,p_multiple_error_flag => l_multi_error_flag);
4047:
4048: hr_utility.set_location('AUO Amount = ' || to_char(l_au_overtime), 6);
4049:
4050: if l_multi_error_flag then
4051: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4052: hr_utility.raise_error;
4047:
4048: hr_utility.set_location('AUO Amount = ' || to_char(l_au_overtime), 6);
4049:
4050: if l_multi_error_flag then
4051: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4052: hr_utility.raise_error;
4053: end if;
4054:
4055: ghr_api.retrieve_element_entry_value
4048: hr_utility.set_location('AUO Amount = ' || to_char(l_au_overtime), 6);
4049:
4050: if l_multi_error_flag then
4051: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4052: hr_utility.raise_error;
4053: end if;
4054:
4055: ghr_api.retrieve_element_entry_value
4056: (p_element_name => 'AUO'
4060: ,p_value => l_auo_premium_pay_indicator
4061: ,p_multiple_error_flag => l_multi_error_flag);
4062:
4063: if l_multi_error_flag then
4064: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4065: hr_utility.raise_error;
4066: end if;
4067:
4068: ghr_api.retrieve_element_entry_value
4061: ,p_multiple_error_flag => l_multi_error_flag);
4062:
4063: if l_multi_error_flag then
4064: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4065: hr_utility.raise_error;
4066: end if;
4067:
4068: ghr_api.retrieve_element_entry_value
4069: (p_element_name => 'Availability Pay'
4072: ,p_effective_date => p_effective_date
4073: ,p_value => l_availability_pay
4074: ,p_multiple_error_flag => l_multi_error_flag);
4075:
4076: hr_utility.set_location('Availability Pay Amount = ' || to_char(l_availability_pay), 6);
4077:
4078: if l_multi_error_flag then
4079: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4080: hr_utility.raise_error;
4075:
4076: hr_utility.set_location('Availability Pay Amount = ' || to_char(l_availability_pay), 6);
4077:
4078: if l_multi_error_flag then
4079: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4080: hr_utility.raise_error;
4081: end if;
4082:
4083: ghr_api.retrieve_element_entry_value
4076: hr_utility.set_location('Availability Pay Amount = ' || to_char(l_availability_pay), 6);
4077:
4078: if l_multi_error_flag then
4079: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4080: hr_utility.raise_error;
4081: end if;
4082:
4083: ghr_api.retrieve_element_entry_value
4084: (p_element_name => 'Availability Pay'
4088: ,p_value => l_ap_premium_pay_indicator
4089: ,p_multiple_error_flag => l_multi_error_flag);
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: ,p_multiple_error_flag => l_multi_error_flag);
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 => 'Retention Allowance'
4100: ,p_effective_date => p_effective_date
4101: ,p_value => l_retention_allowance
4102: ,p_multiple_error_flag => l_multi_error_flag);
4103:
4104: hr_utility.set_location('Retention Allowance Amount = ' || to_char(l_retention_allowance), 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('Retention Allowance Amount = ' || to_char(l_retention_allowance), 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('Retention Allowance Amount = ' || to_char(l_retention_allowance), 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 => 'Retention Allowance'
4115: ,p_effective_date => p_effective_date
4116: ,p_value => l_retention_allow_perc
4117: ,p_multiple_error_flag => l_multi_error_flag);
4118:
4119: hr_utility.set_location('Retention Allowance Percent = ' || to_char(l_retention_allow_perc), 6);
4120:
4121: if l_multi_error_flag then
4122: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4123: hr_utility.raise_error;
4118:
4119: hr_utility.set_location('Retention Allowance Percent = ' || to_char(l_retention_allow_perc), 6);
4120:
4121: if l_multi_error_flag then
4122: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4123: hr_utility.raise_error;
4124: end if;
4125:
4126: ghr_api.retrieve_element_entry_value
4119: hr_utility.set_location('Retention Allowance Percent = ' || to_char(l_retention_allow_perc), 6);
4120:
4121: if l_multi_error_flag then
4122: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4123: hr_utility.raise_error;
4124: end if;
4125:
4126: ghr_api.retrieve_element_entry_value
4127: (p_element_name => 'Supervisory Differential'
4130: ,p_effective_date => p_effective_date
4131: ,p_value => l_supervisory_differential
4132: ,p_multiple_error_flag => l_multi_error_flag);
4133:
4134: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential), 6);
4135:
4136: if l_multi_error_flag then
4137: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4138: hr_utility.raise_error;
4133:
4134: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential), 6);
4135:
4136: if l_multi_error_flag then
4137: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4138: hr_utility.raise_error;
4139: end if;
4140:
4141: ghr_api.retrieve_element_entry_value
4134: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential), 6);
4135:
4136: if l_multi_error_flag then
4137: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4138: hr_utility.raise_error;
4139: end if;
4140:
4141: ghr_api.retrieve_element_entry_value
4142: (p_element_name => 'Supervisory Differential'
4145: ,p_effective_date => p_effective_date
4146: ,p_value => l_supervisory_diff_perc
4147: ,p_multiple_error_flag => l_multi_error_flag);
4148:
4149: hr_utility.set_location('Supervisory Diff Percent = ' || to_char(l_supervisory_diff_perc), 6);
4150:
4151: if l_multi_error_flag then
4152: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4153: hr_utility.raise_error;
4148:
4149: hr_utility.set_location('Supervisory Diff Percent = ' || to_char(l_supervisory_diff_perc), 6);
4150:
4151: if l_multi_error_flag then
4152: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4153: hr_utility.raise_error;
4154: end if;
4155:
4156: --
4149: hr_utility.set_location('Supervisory Diff Percent = ' || to_char(l_supervisory_diff_perc), 6);
4150:
4151: if l_multi_error_flag then
4152: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4153: hr_utility.raise_error;
4154: end if;
4155:
4156: --
4157: --
4162: ,p_effective_date => p_effective_date
4163: ,p_value => l_staffing_differential
4164: ,p_multiple_error_flag => l_multi_error_flag);
4165:
4166: hr_utility.set_location('Staffing Diff Amount = ' || to_char(l_staffing_differential), 6);
4167:
4168: if l_multi_error_flag then
4169: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4170: hr_utility.raise_error;
4165:
4166: hr_utility.set_location('Staffing Diff Amount = ' || to_char(l_staffing_differential), 6);
4167:
4168: if l_multi_error_flag then
4169: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4170: hr_utility.raise_error;
4171: end if;
4172:
4173: p_tot_old_sal := round(l_total_salary,2);
4166: hr_utility.set_location('Staffing Diff Amount = ' || to_char(l_staffing_differential), 6);
4167:
4168: if l_multi_error_flag then
4169: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4170: hr_utility.raise_error;
4171: end if;
4172:
4173: p_tot_old_sal := round(l_total_salary,2);
4174: p_OLD_BASIC_PAY := round(l_basic_pay,2);
4184: p_supervisory_differential := l_supervisory_differential;
4185: p_supervisory_diff_perc := l_supervisory_diff_perc;
4186: p_staffing_differential := l_staffing_differential;
4187:
4188: hr_utility.set_location('Exiting ' || l_proc,10);
4189:
4190: exception
4191: when mlc_error then raise;
4192: when others then
4189:
4190: exception
4191: when mlc_error then raise;
4192: when others then
4193: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4194: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4195: raise mlc_error;
4196: END GET_FROM_SF52_DATA_ELEMENTS;
4197:
4211: p_position_seq_no out nocopy varchar2) is
4212: l_proc varchar2(72) := g_package || '.get_sub_element_code_pos_title';
4213: begin
4214: g_proc := 'get_sub_element_code_pos_title';
4215: hr_utility.set_location('Entering ' || l_proc,5);
4216: p_sub_element_code := ghr_api.get_position_agency_code_pos
4217: (p_position_id,p_business_group_id,p_effective_date);
4218:
4219: p_position_title := ghr_api.get_position_title_pos
4234: ,p_effective_date => p_effective_date
4235: );
4236: -- end if;
4237:
4238: hr_utility.set_location('Exiting ' || l_proc,10);
4239: end get_sub_element_code_pos_title;
4240:
4241: --
4242: -- Get all details for the reporting...
4252: ) is
4253: l_proc varchar2(72) := g_package || '.get_other_dtls_for_rep';
4254: BEGIN
4255: g_proc := 'get_other_dtls_for_rep';
4256: hr_utility.set_location('Entering ' || l_proc,5);
4257: p_first_action_la_code1 := 'QWM';
4258: p_first_action_la_code2 := 'ZLM';
4259:
4260: /**
4276: p_first_action_la_code2 := 'ZLM';
4277: End if;
4278: */
4279:
4280: hr_utility.set_location('Exiting ' || l_proc,10);
4281:
4282: exception
4283: when mlc_error then raise;
4284: when others then
4281:
4282: exception
4283: when mlc_error then raise;
4284: when others then
4285: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4286: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4287: raise mlc_error;
4288: END get_other_dtls_for_rep;
4289:
4367: l_retained_grade_rec ghr_pay_calc.retained_grade_rec_type;
4368: l_check_grade_retention varchar2(30);
4369: begin
4370: g_proc := 'create_mass_act_prev';
4371: hr_utility.set_location('Entering ' || l_proc,5);
4372: if p_remark_code2 is not null then
4373: l_comb_rem := p_remark_code1||', '||p_remark_code2;
4374: else
4375: l_comb_rem := p_remark_code1;
4391: p_cust_rec => l_cust_rec);
4392:
4393: exception
4394: when others then
4395: hr_utility.set_location('Error in Mass Act Custom '||
4396: 'Err is '||sqlerrm(sqlcode),20);
4397: l_mlcerrbuf := 'Error in Mass Act Custom '||
4398: 'Err is '|| sqlerrm(sqlcode);
4399: raise mlc_error;
4423: raise mlc_error;
4424: end;
4425:
4426: ELSIF l_check_grade_retention ='MLC_ERROR' THEN
4427: hr_utility.set_message(8301,'GHR_38927_MISSING_MA_RET_DET');
4428: raise mlc_error;
4429: ELSIF l_check_grade_retention = 'OTHER_ERROR' THEN
4430: l_mlcerrbuf := 'Others error in check_grade_retention function while fetching retained grade record. Please
4431: verify the retained grade record';
4603: l_cust_rec.user_attribute19,
4604: l_cust_rec.user_attribute20
4605: );
4606:
4607: hr_utility.set_location('Exiting ' || l_proc,10);
4608: exception
4609: when mlc_error then raise;
4610: when others then
4611: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4607: hr_utility.set_location('Exiting ' || l_proc,10);
4608: exception
4609: when mlc_error then raise;
4610: when others then
4611: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4612: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4613: raise mlc_error;
4614: end create_mass_act_prev;
4615:
4688: l_retained_grade_rec ghr_pay_calc.retained_grade_rec_type;
4689: l_check_grade_retention varchar2(30);
4690: begin
4691: g_proc := 'create_mass_act_prev';
4692: hr_utility.set_location('Entering ' || l_proc,5);
4693: IF p_person_id is not null then
4694: if p_remark_code2 is not null then
4695: l_comb_rem := p_remark_code1||', '||p_remark_code2;
4696: else
4713: p_cust_rec => l_cust_rec);
4714:
4715: exception
4716: when others then
4717: hr_utility.set_location('Error in Mass Act Custom '||
4718: 'Err is '||sqlerrm(sqlcode),20);
4719: l_mlcerrbuf := 'Error in Mass Act Custom '||
4720: 'Err is '|| sqlerrm(sqlcode);
4721: raise mlc_error;
4745: raise mlc_error;
4746: end;
4747:
4748: ELSIF l_check_grade_retention ='MLC_ERROR' THEN
4749: hr_utility.set_message(8301,'GHR_38927_MISSING_MA_RET_DET');
4750: raise mlc_error;
4751: ELSIF l_check_grade_retention = 'OTHER_ERROR' THEN
4752: l_mlcerrbuf := 'Others error in check_grade_retention function while fetching retained grade record. Please
4753: verify the retained grade record';
4921: l_cust_rec.user_attribute19,
4922: l_cust_rec.user_attribute20
4923: );
4924:
4925: hr_utility.set_location('Exiting ' || l_proc,10);
4926: exception
4927: when mlc_error then raise;
4928: when others then
4929: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4925: hr_utility.set_location('Exiting ' || l_proc,10);
4926: exception
4927: when mlc_error then raise;
4928: when others then
4929: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4930: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4931: raise mlc_error;
4932: end create_mass_act_prev_mtc;
4933:
4945: where pa_request_id = p_pa_request_id;
4946:
4947: begin
4948: g_proc := 'get_lac_dtls';
4949: hr_utility.set_location('Entering ' || l_proc,5);
4950:
4951: pr('Entering '||l_proc||' Pa req id ',to_char(p_pa_request_id));
4952: if p_pa_request_id is null then
4953: pr('PA request id is null.................');
4959: exit;
4960: end loop;
4961: end if;
4962:
4963: hr_utility.set_location('Exiting ' || l_proc,10);
4964: exception
4965: when others then
4966: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4967: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4962:
4963: hr_utility.set_location('Exiting ' || l_proc,10);
4964: exception
4965: when others then
4966: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4967: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4968: raise mlc_error;
4969: end get_lac_dtls;
4970:
4985: l_remarks_rec ghr_pa_remarks%rowtype;
4986:
4987: begin
4988: g_proc := 'create_lac_remarks';
4989: hr_utility.set_location('Entering ' || l_proc,5);
4990:
4991: pr('Inside '||l_proc,to_char(p_pa_request_id),to_char(p_new_pa_request_id));
4992:
4993: FOR CUR_PA_REM_rec in cur_pa_rem_cur
5011: );
5012:
5013: end loop;
5014:
5015: hr_utility.set_location('Exiting ' || l_proc,10);
5016:
5017: exception
5018: when others then
5019: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5015: hr_utility.set_location('Exiting ' || l_proc,10);
5016:
5017: exception
5018: when others then
5019: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5020: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
5021: raise mlc_error;
5022: end create_lac_remarks;
5023:
5073: ,P_POEI_INFORMATION20 => null
5074: ,P_POEI_INFORMATION21 => null);
5075:
5076: EXCEPTION when others then
5077: hr_utility.set_location('UPDATE posei error 3' || l_proc,10);
5078: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5079: END;
5080:
5081: ----- Reset the global variable
5074: ,P_POEI_INFORMATION21 => null);
5075:
5076: EXCEPTION when others then
5077: hr_utility.set_location('UPDATE posei error 3' || l_proc,10);
5078: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5079: END;
5080:
5081: ----- Reset the global variable
5082: ghr_api.g_api_dml := FALSE;
5133: begin
5134:
5135: g_proc := 'assign_to_sf52_rec';
5136:
5137: hr_utility.set_location('Entering ' || l_proc,5);
5138: p_sf52_rec.person_id := p_person_id;
5139: p_sf52_rec.employee_first_name := p_first_name;
5140: p_sf52_rec.employee_last_name := p_last_name;
5141: p_sf52_rec.employee_middle_names := p_middle_names;
5196: p_sf52_rec.FIRST_ACTION_LA_CODE2 := p_lac_sf52_rec.FIRST_ACTION_LA_CODE2;
5197: p_sf52_rec.FIRST_ACTION_LA_DESC1 := p_lac_sf52_rec.FIRST_ACTION_LA_DESC1;
5198: p_sf52_rec.FIRST_ACTION_LA_DESC2 := p_lac_sf52_rec.FIRST_ACTION_LA_DESC2;
5199:
5200: hr_utility.set_location('Exiting ' || l_proc,10);
5201:
5202: exception
5203: when mlc_error then raise;
5204: when others then
5201:
5202: exception
5203: when mlc_error then raise;
5204: when others then
5205: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5206: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
5207: raise mlc_error;
5208: end assign_to_sf52_rec;
5209:
5231: l_proc VARCHAR2(72) := g_package || '.ins_upd_pos_extra_info';
5232: l_eff_DATE DATE;
5233:
5234: BEGIN
5235: hr_utility.set_location('Entering ' || l_proc,5);
5236: g_proc := 'ins_upd_pos_extra_info';
5237:
5238: if p_effective_DATE > sysDATE then
5239: l_eff_DATE := sysDATE;
5272: ,p_poei_INFORMATION20 => p_comment
5273: ,p_poei_INFORMATION21 => to_char(p_msl_id)
5274: ,P_POEI_INFORMATION_CATEGORY => 'GHR_US_POS_MASS_ACTIONS');
5275: EXCEPTION when others then
5276: hr_utility.set_location('UPDATE posei error 1' || l_proc,10);
5277: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5278: END;
5279: ----- Reset the global variable
5280: ghr_api.g_api_dml := FALSE;
5273: ,p_poei_INFORMATION21 => to_char(p_msl_id)
5274: ,P_POEI_INFORMATION_CATEGORY => 'GHR_US_POS_MASS_ACTIONS');
5275: EXCEPTION when others then
5276: hr_utility.set_location('UPDATE posei error 1' || l_proc,10);
5277: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5278: END;
5279: ----- Reset the global variable
5280: ghr_api.g_api_dml := FALSE;
5281:
5290: ,P_POEI_INFORMATION_CATEGORY => 'GHR_US_POS_MASS_ACTIONS'
5291: ,P_POSITION_EXTRA_INFO_ID => l_position_extra_info_id
5292: ,P_OBJECT_VERSION_NUMBER => l_object_version_NUMBER);
5293: END IF;
5294: hr_utility.set_location('Exiting ' || l_proc,30);
5295:
5296: EXCEPTION
5297: when mtc_error then raise;
5298: when others then
5296: EXCEPTION
5297: when mtc_error then raise;
5298: when others then
5299: pr('Error in '||l_proc);
5300: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5301: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
5302: raise mtc_error ;
5303: END ins_upd_pos_extra_info;
5304:
5319: l_char_msl_id VARCHAR2(30);
5320:
5321: BEGIN
5322: g_proc := 'get_extra_info_comments';
5323: hr_utility.set_location('Entering ' || l_proc,5);
5324: pr('In '||l_proc);
5325:
5326: -- Initialization for NOCOPY Changes
5327: l_sel_flag := p_sel_flag;
5366: p_comments := l_comments;
5367: p_msl_id := l_msl_id;
5368: --
5369: pr('Error in '||l_proc);
5370: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5371: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
5372: raise mtc_error;
5373: END get_extra_info_comments_pos;
5374:
5393: --Initilization for NOCOPY Changes
5394: --
5395: l_sel_flg := p_sel_flg;
5396: --
5397: hr_utility.set_location('Entering ' || l_proc,5);
5398: pr('in '||l_proc);
5399: --
5400: l_line := 5;
5401: get_extra_info_comments_pos(p_position_id,p_effective_DATE,l_sel_flg,l_comments,l_msl_id);
5425: -- Reset IN OUT params and Set OUT params to null
5426: p_sel_flg := l_sel_flg;
5427: --
5428: pr('Error in '||l_proc);
5429: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5430: l_mlcerrbuf := 'Error in '||l_proc||' @'||to_char(l_line)||' Sql Err is '|| sqlerrm(sqlcode);
5431:
5432: raise mtc_error;
5433: END check_select_flg_pos;
5493:
5494: ghr_mto_int.put_line(msg||'-'||par1||' -'||par2||'-');
5495: exception
5496: when others then
5497: hr_utility.set_location('Error in pr '||' Err is '||sqlerrm(sqlcode),20);
5498: l_mlcerrbuf := 'Error in pr Sql Err is '|| sqlerrm(sqlcode);
5499: raise mlc_error;
5500: end;
5501:
5536: l_sel_flg varchar2(2);
5537:
5538: begin
5539: g_proc := 'chk_pa_req_already_exists';
5540: hr_utility.set_location('Entering ' || l_proc,5);
5541:
5542: for v_action_taken in csr_action_taken loop
5543: l_pa_request_id := v_action_taken.pa_request_id;
5544: for v_name in csr_name
5561: END IF;
5562: return false;
5563: end if;
5564: end loop;
5565: hr_utility.set_location('Exiting ' || l_proc,30);
5566: return true;
5567: end chk_pa_req_already_exists;
5568: --Bug # 11924741
5569: