[Home] [Help]
224: WHERE user_table_id = p_user_table_id;
225:
226: BEGIN
227: g_proc := 'execute_mlc';
228: hr_utility.set_location('Entering ' || l_proc,5);
229:
230: ghr_msl_pkg.g_first_noa_code := null;
231:
232: p_retcode := 0;
254: exit;
255: END LOOP;
256: EXCEPTION
257: when REC_BUSY then
258: hr_utility.set_location('Mass Salary is in use',1);
259: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
260: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
261: hr_utility.raise_error;
262: when others then
256: EXCEPTION
257: when REC_BUSY then
258: hr_utility.set_location('Mass Salary is in use',1);
259: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
260: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
261: hr_utility.raise_error;
262: when others then
263: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
264: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
257: when REC_BUSY then
258: hr_utility.set_location('Mass Salary is in use',1);
259: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
260: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
261: hr_utility.raise_error;
262: when others then
263: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
264: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
265: raise mlc_error;
259: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
260: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
261: hr_utility.raise_error;
262: when others then
263: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
264: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
265: raise mlc_error;
266: END;
267:
285:
286: end if;
287:
288: --------GPPA Update 46 end
289: hr_utility.set_location('After fetch msl '||to_char(l_effective_date)
290: ||' '||to_char(l_user_table_id),20);
291:
292: FOR per IN cur_people (l_effective_date,l_p_ORGANIZATION_ID)
293: LOOP
304: l_grade_id := per.grade_id;
305: l_business_group_id := per.business_group_iD;
306: l_location_id := per.location_id;
307:
308: hr_utility.set_location('The location id is:'||l_location_id,12345);
309: begin
310: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
311: (p_location_id => l_location_id
312: ,p_duty_station_id => l_duty_station_id);
311: (p_location_id => l_location_id
312: ,p_duty_station_id => l_duty_station_id);
313: exception
314: when others then
315: hr_utility.set_location(
316: 'Error in Ghr_pa_requests_pkg.get_sf52_loc_ddf_details'||
317: 'Err is '||sqlerrm(sqlcode),20);
318: l_mlcerrbuf := 'Error in get_sf52_loc_ddf_details '||
319: 'Sql Err is '|| sqlerrm(sqlcode);
338: l_position_title,
339: l_position_number,
340: l_position_seq_no);
341:
342: hr_utility.set_location('The duty station id is:'||l_duty_station_id,12345);
343:
344: if check_init_eligibility(l_p_duty_station_id,
345: l_p_PERSONNEL_OFFICE_ID,
346: l_p_AGENCY_CODE_SUBELEMENT,
347: l_duty_station_id,
348: l_personnel_office_id,
349: l_sub_element_code) then
350:
351: hr_utility.set_location('check_init_eligibility ' || l_proc,6);
352:
353: begin
354: ghr_pa_requests_pkg.get_sf52_asg_ddf_details
355: (l_assignment_id,
360: l_work_schedule,
361: l_part_time_hour);
362: exception
363: when others then
364: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_sf52_asg_ddf_details'||
365: 'Err is '||sqlerrm(sqlcode),20);
366: l_mlcerrbuf := 'Error in get_sf52_asgddf_details Sql Err is '|| sqlerrm(sqlcode);
367: raise mlc_error;
368: end;
375: l_pay_table_id,l_grade_or_level, l_step_or_rate,
376: l_pay_basis);
377: EXCEPTION
378: when ghr_msl_pkg.msl_error then
379: l_mlcerrbuf := hr_utility.get_message;
380: raise mlc_error;
381: END;
382:
383: IF check_eligibility(
385: per.person_id,
386: l_effective_date,
387: p_action) THEN
388:
389: hr_utility.set_location('check_eligibility ' || l_proc,8);
390:
391: IF upper(p_action) = 'REPORT' AND l_submit_flag = 'P' THEN
392: -- BUG 3377958 Madhuri
393: pop_dtls_from_pa_req(per.person_id,l_effective_date,l_mass_salary_id,l_org_name);
398: l_effective_date,
399: p_mass_salary_id,
400: l_sel_flg) then
401:
402: hr_utility.set_location('check_select_flg ' || l_proc,7);
403: BEGIN
404: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
405: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
406: ghr_pa_requests_pkg.get_duty_station_details
400: l_sel_flg) then
401:
402: hr_utility.set_location('check_select_flg ' || l_proc,7);
403: BEGIN
404: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
405: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
406: ghr_pa_requests_pkg.get_duty_station_details
407: (p_duty_station_id => l_duty_station_id
408: ,p_effective_date => l_effective_date
401:
402: hr_utility.set_location('check_select_flg ' || l_proc,7);
403: BEGIN
404: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
405: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
406: ghr_pa_requests_pkg.get_duty_station_details
407: (p_duty_station_id => l_duty_station_id
408: ,p_effective_date => l_effective_date
409: ,p_duty_station_code => l_duty_station_code
409: ,p_duty_station_code => l_duty_station_code
410: ,p_duty_station_desc => l_duty_station_desc);
411: EXCEPTION
412: when others then
413: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_duty_station_details'||
414: 'Err is '||sqlerrm(sqlcode),20);
415: l_mlcerrbuf := 'Error in get_duty_station_details Sql Err is '|| sqlerrm(sqlcode);
416: raise mlc_error;
417:
493: ,l_message_set
494: ,l_calculated);
495:
496: IF l_message_set THEN
497: hr_utility.set_location( l_proc, 40);
498: l_calculated := FALSE;
499: l_mlcerrbuf := hr_utility.get_message;
500: END IF;
501: EXCEPTION
495:
496: IF l_message_set THEN
497: hr_utility.set_location( l_proc, 40);
498: l_calculated := FALSE;
499: l_mlcerrbuf := hr_utility.get_message;
500: END IF;
501: EXCEPTION
502: when mlc_error then
503: g_proc := 'ghr_pay_calc';
578: ins_upd_per_extra_info
579: (per.person_id,l_effective_date, l_sel_flg, l_comment,p_mass_salary_id);
580: l_comment := NULL;
581: ------ BUG 3287299 End
582: hr_utility.set_location('Error in Ghr_pay_calc.sql_main_pay_calc '||
583: 'Err is '||sqlerrm(sqlcode),20);
584: l_mlcerrbuf := 'Error in ghr_pay_calc Sql Err is '|| sqlerrm(sqlcode);
585: g_proc := 'ghr_pay_calc';
586: raise mlc_error;
602: l_new_other_pay_amount := null;
603: end if;
604: l_new_total_salary := l_pay_calc_out_data.total_salary;
605:
606: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
607: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
608:
609: -------------Call Pay cap Procedure
610: begin
603: end if;
604: l_new_total_salary := l_pay_calc_out_data.total_salary;
605:
606: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
607: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
608:
609: -------------Call Pay cap Procedure
610: begin
611: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
611: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
612: ,p_effective_date => l_effective_date);
613: l_old_capped_other_pay := l_capped_other_pay;
614: -- Sundar Added the following if statement to improve performance
615: if hr_utility.debug_enabled = true then
616: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
617: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
618: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
619: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
612: ,p_effective_date => l_effective_date);
613: l_old_capped_other_pay := l_capped_other_pay;
614: -- Sundar Added the following if statement to improve performance
615: if hr_utility.debug_enabled = true then
616: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
617: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
618: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
619: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
620: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
613: l_old_capped_other_pay := l_capped_other_pay;
614: -- Sundar Added the following if statement to improve performance
615: if hr_utility.debug_enabled = true then
616: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
617: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
618: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
619: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
620: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
621: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
614: -- Sundar Added the following if statement to improve performance
615: if hr_utility.debug_enabled = true then
616: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
617: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
618: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
619: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
620: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
621: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
622: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
615: if hr_utility.debug_enabled = true then
616: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
617: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
618: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
619: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
620: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
621: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
622: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
623: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
616: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
617: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
618: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
619: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
620: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
621: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
622: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
623: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
624: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
617: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
618: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
619: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
620: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
621: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
622: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
623: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
624: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
625: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
618: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
619: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
620: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
621: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
622: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
623: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
624: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
625: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
626: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
619: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
620: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
621: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
622: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
623: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
624: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
625: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
626: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
627: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
620: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
621: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
622: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
623: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
624: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
625: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
626: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
627: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
628: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
621: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
622: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
623: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
624: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
625: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
626: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
627: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
628: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
629: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
622: hr_utility.set_location('person_id ' || to_char(per.person_id),21);
623: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
624: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
625: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
626: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
627: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
628: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
629: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
630: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
623: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
624: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
625: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
626: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
627: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
628: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
629: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
630: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
631: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
624: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
625: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
626: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
627: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
628: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
629: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
630: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
631: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
632: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
625: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
626: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
627: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
628: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
629: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
630: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
631: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
632: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
633: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
626: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
627: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
628: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
629: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
630: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
631: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
632: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
633: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
634: end if;
627: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
628: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
629: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
630: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
631: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
632: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
633: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
634: end if;
635:
628: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
629: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
630: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
631: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
632: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
633: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
634: end if;
635:
636: ghr_pay_caps.do_pay_caps_main
629: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
630: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),21);
631: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
632: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
633: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
634: end if;
635:
636: ghr_pay_caps.do_pay_caps_main
637: (p_pa_request_id => null
664:
665: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
666:
667: -- Sundar Added the following statement to improve performance
668: if hr_utility.debug_enabled = true then
669: hr_utility.set_location('After Pay Cap ' || l_proc,22);
670: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
671: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
672: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
665: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
666:
667: -- Sundar Added the following statement to improve performance
668: if hr_utility.debug_enabled = true then
669: hr_utility.set_location('After Pay Cap ' || l_proc,22);
670: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
671: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
672: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
673: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
666:
667: -- Sundar Added the following statement to improve performance
668: if hr_utility.debug_enabled = true then
669: hr_utility.set_location('After Pay Cap ' || l_proc,22);
670: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
671: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
672: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
673: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
674: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
667: -- Sundar Added the following statement to improve performance
668: if hr_utility.debug_enabled = true then
669: hr_utility.set_location('After Pay Cap ' || l_proc,22);
670: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
671: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
672: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
673: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
674: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
675: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
668: if hr_utility.debug_enabled = true then
669: hr_utility.set_location('After Pay Cap ' || l_proc,22);
670: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
671: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
672: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
673: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
674: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
675: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
676: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
669: hr_utility.set_location('After Pay Cap ' || l_proc,22);
670: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
671: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
672: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
673: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
674: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
675: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
676: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
677: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
670: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
671: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
672: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
673: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
674: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
675: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
676: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
677: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
678: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
671: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
672: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
673: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
674: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
675: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
676: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
677: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
678: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
679: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
672: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
673: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
674: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
675: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
676: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
677: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
678: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
679: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
680: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
673: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
674: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
675: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
676: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
677: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
678: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
679: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
680: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
681: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
674: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
675: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
676: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
677: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
678: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
679: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
680: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
681: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
682: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
675: hr_utility.set_location('person_id ' || to_char(per.person_id),22);
676: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
677: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
678: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
679: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
680: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
681: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
682: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
683: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
676: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
677: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
678: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
679: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
680: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
681: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
682: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
683: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
684: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
677: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
678: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
679: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
680: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
681: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
682: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
683: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
684: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
685: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
678: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
679: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
680: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
681: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
682: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
683: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
684: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
685: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
686: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
679: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
680: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
681: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
682: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
683: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
684: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
685: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
686: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
687: end if;
680: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
681: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
682: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
683: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
684: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
685: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
686: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
687: end if;
688:
681: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
682: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
683: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
684: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
685: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
686: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
687: end if;
688:
689: IF l_pay_cap_message THEN
682: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
683: hr_utility.set_location('l_new_supervisory_differential ' || to_char(l_new_supervisory_differential),22);
684: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
685: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
686: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
687: end if;
688:
689: IF l_pay_cap_message THEN
690: IF nvl(l_temp_retention_allowance,0) > 0 THEN
727: exception
728: when mlc_error then
729: raise;
730: when others then
731: hr_utility.set_location('Error in ghr_pay_caps.do_pay_caps_main ' ||
732: 'Err is '||sqlerrm(sqlcode),23);
733: l_mlcerrbuf := 'Error in do_pay_caps_main Sql Err is '|| sqlerrm(sqlcode);
734: raise mlc_error;
735: end;
813: l_grade_or_level, l_step_or_rate,
814: l_pay_basis);
815: EXCEPTION
816: when ghr_msl_pkg.msl_error then
817: l_mlcerrbuf := hr_utility.get_message;
818: raise mlc_error;
819: END;
820:
821: assign_to_sf52_rec(
868: (l_pay_calc_out_data,
869: l_sf52_rec);
870: EXCEPTION
871: when others then
872: hr_utility.set_location('Error in Ghr_mass_actions_pkg.pay_calc_rec_to_sf52_rec '||
873: 'Err is '||sqlerrm(sqlcode),20);
874: l_mlcerrbuf := 'Error in ghr_mass_act_pkg.pay_calc_to_sf52 Sql Err is ' ||
875: sqlerrm(sqlcode);
876: raise mlc_error;
904:
905: ---------------------------------------
906: IF l_errbuf is null then
907: pr('No error in create sf52 ');
908: hr_utility.set_location('Before commiting',2);
909:
910: ghr_mto_int.log_message(
911: p_procedure => 'Successful Completion',
912: p_message => 'Name: '||per.full_name ||
948:
949: commit;
950: else
951: pr('Error in create sf52',l_errbuf);
952: hr_utility.set_location('Error in '||to_char(per.position_id),20);
953: --l_recs_failed := l_recs_failed + 1;
954: raise mlc_error;
955: end if; -- if l_errbuf is null then
956: exception
977: end if;
978: end if;
979: EXCEPTION
980: WHEN mlc_ERROR THEN
981: HR_UTILITY.SET_LOCATION('Error occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),10);
982: begin
983: ------ BUG 3287299 -- Not to rollback for preview.
984: if upper(p_action) <> 'SHOW' then
985: ROLLBACK TO EXECUTE_MLC_SP;
990: l_log_text := 'Error in '||l_proc||' '||
991: ' For Mass Salary Name : '||p_mass_salary||
992: 'Name: '|| per.full_name || ' SSN: ' || per.national_identifier ||' '||
993: l_mlcerrbuf;
994: hr_utility.set_location('before creating entry in log file',10);
995: l_recs_failed := l_recs_failed + 1;
996: begin
997: ghr_mto_int.log_message(
998: p_procedure => g_proc,
999: p_message => l_log_text);
1000:
1001: exception
1002: when others then
1003: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
1004: hr_utility.raise_error;
1005: end;
1006: when others then
1007: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
1000:
1001: exception
1002: when others then
1003: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
1004: hr_utility.raise_error;
1005: end;
1006: when others then
1007: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
1008: BEGIN
1003: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
1004: hr_utility.raise_error;
1005: end;
1006: when others then
1007: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
1008: BEGIN
1009: ROLLBACK TO EXECUTE_MLC_SP;
1010: EXCEPTION
1011: WHEN OTHERS THEN NULL;
1013: l_log_text := 'Error (others) in '||l_proc||
1014: ' For Mass Salary Name : '||p_mass_salary||
1015: 'Name: '|| per.full_name || ' SSN: ' || per.national_identifier ||
1016: ' Sql Err is '||sqlerrm(sqlcode);
1017: hr_utility.set_location('before creating entry in log file',20);
1018: l_recs_failed := l_recs_failed + 1;
1019: begin
1020: ghr_mto_int.log_message(
1021: p_procedure => g_proc,
1021: p_procedure => g_proc,
1022: p_message => l_log_text);
1023: exception
1024: when others then
1025: hr_utility.set_message(8301, 'Create Error Log failed');
1026: hr_utility.raise_error;
1027: end;
1028: END;
1029: END LOOP;
1022: p_message => l_log_text);
1023: exception
1024: when others then
1025: hr_utility.set_message(8301, 'Create Error Log failed');
1026: hr_utility.raise_error;
1027: end;
1028: END;
1029: END LOOP;
1030:
1037: set submit_flag = 'P'
1038: where rowid = l_rowid;
1039: EXCEPTION
1040: when others then
1041: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
1042: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
1043: hr_utility.raise_error;
1044: END;
1045: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
1038: where rowid = l_rowid;
1039: EXCEPTION
1040: when others then
1041: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
1042: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
1043: hr_utility.raise_error;
1044: END;
1045: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
1046: ----- So it is not required to do in global if you see the procedure upd_ext_info_to_null
1039: EXCEPTION
1040: when others then
1041: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
1042: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
1043: hr_utility.raise_error;
1044: END;
1045: -----Bug 2849262. Updating extra info to null is already done by Update_sel_flg in the main loop.
1046: ----- So it is not required to do in global if you see the procedure upd_ext_info_to_null
1047: ----- Commenting the following line. Dated 14-OCT-2003.
1064:
1065: EXCEPTION
1066: when others then
1067: -- raise_application_error(-20121,'Error in EXECUTE_MLC Err is '||sqlerrm(sqlcode));
1068: HR_UTILITY.SET_LOCATION('Error (Others2) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),30);
1069: BEGIN
1070: ROLLBACK TO EXECUTE_MLC_SP;
1071: EXCEPTION
1072: WHEN OTHERS THEN NULL;
1074: l_log_text := 'Error in '||l_proc||
1075: ' For Mass Salary Name : '||p_mass_salary||
1076: ' Sql Err is '||sqlerrm(sqlcode);
1077: l_recs_failed := l_recs_failed + 1;
1078: hr_utility.set_location('before creating entry in log file',30);
1079:
1080: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
1081: p_retcode := 2;
1082: IF upper(p_action) = 'CREATE' THEN
1091: p_procedure => g_proc,
1092: p_message => l_log_text);
1093: exception
1094: when others then
1095: hr_utility.set_message(8301, 'Create Error Log failed');
1096: hr_utility.raise_error;
1097: end;
1098: END EXECUTE_MLC;
1099:
1092: p_message => l_log_text);
1093: exception
1094: when others then
1095: hr_utility.set_message(8301, 'Create Error Log failed');
1096: hr_utility.raise_error;
1097: end;
1098: END EXECUTE_MLC;
1099:
1100: --
1497: l_grade_id := p_grade_id;
1498: l_business_group_id := p_business_group_iD;
1499: l_location_id := p_location_id;
1500:
1501: hr_utility.set_location('The location id is:'||l_location_id,12345);
1502: begin
1503: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
1504: (p_location_id => l_location_id
1505: ,p_duty_station_id => l_duty_station_id);
1504: (p_location_id => l_location_id
1505: ,p_duty_station_id => l_duty_station_id);
1506: exception
1507: when others then
1508: hr_utility.set_location(
1509: 'Error in Ghr_pa_requests_pkg.get_sf52_loc_ddf_details'||
1510: 'Err is '||sqlerrm(sqlcode),20);
1511: l_mtcerrbuf := 'Error in get_sf52_loc_ddf_details '||
1512: 'Sql Err is '|| sqlerrm(sqlcode);
1531: l_position_title,
1532: l_position_number,
1533: l_position_seq_no);
1534:
1535: hr_utility.set_location('The duty station id is:'||l_duty_station_id,12345);
1536: -- Check Locality Area Code
1537:
1538: l_locality_check := FALSE;
1539:
1555: l_duty_station_id,
1556: l_personnel_office_id,
1557: l_sub_element_code) then
1558:
1559: hr_utility.set_location('check_init_eligibility ' || l_proc,6);
1560: -- Get PRD, work schedule etc form ASG EI
1561:
1562: begin
1563: ghr_pa_requests_pkg.get_sf52_asg_ddf_details
1569: l_work_schedule,
1570: l_part_time_hour);
1571: exception
1572: when others then
1573: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_sf52_asg_ddf_details'||
1574: 'Err is '||sqlerrm(sqlcode),20);
1575: l_mtcerrbuf := 'Error in get_sf52_asgddf_details Sql Err is '|| sqlerrm(sqlcode);
1576: raise mtc_error;
1577: end;
1590: l_pay_table_id,l_grade_or_level, l_step_or_rate,
1591: l_pay_basis);
1592: EXCEPTION
1593: when mtc_error then
1594: l_mtcerrbuf := hr_utility.get_message;
1595: raise;
1596: END;
1597:
1598: --3 Pay plan and tableid check
1605: p_person_id,
1606: l_effective_date,
1607: p_action) THEN
1608:
1609: hr_utility.set_location('check_eligibility ' || l_proc,8);
1610:
1611: IF upper(p_action) = 'REPORT' AND l_submit_flag = 'P' THEN
1612: pop_dtls_from_pa_req(p_person_id,l_effective_date,l_mass_salary_id,l_org_name);
1613: ELSE
1617: ,p_mass_salary_id
1618: ,l_sel_flg
1619: ) then
1620:
1621: hr_utility.set_location('check_select_flg ' || l_proc,7);
1622: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
1623: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
1624:
1625: begin
1618: ,l_sel_flg
1619: ) then
1620:
1621: hr_utility.set_location('check_select_flg ' || l_proc,7);
1622: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
1623: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
1624:
1625: begin
1626: ghr_pa_requests_pkg.get_duty_station_details
1619: ) then
1620:
1621: hr_utility.set_location('check_select_flg ' || l_proc,7);
1622: hr_utility.set_location('The duty station name is:'||l_duty_station_code,12345);
1623: hr_utility.set_location('The duty station desc is:'||l_duty_station_desc,12345);
1624:
1625: begin
1626: ghr_pa_requests_pkg.get_duty_station_details
1627: (p_duty_station_id => l_duty_station_id
1629: ,p_duty_station_code => l_duty_station_code
1630: ,p_duty_station_desc => l_duty_station_desc);
1631: exception
1632: when others then
1633: hr_utility.set_location('Error in Ghr_pa_requests_pkg.get_duty_station_details'||
1634: 'Err is '||sqlerrm(sqlcode),20);
1635: l_mtcerrbuf := 'Error in get_duty_station_details Sql Err is '|| sqlerrm(sqlcode);
1636: raise mtc_error;
1637: end;
1703: ,l_message_set
1704: ,l_calculated);
1705:
1706: IF l_message_set THEN
1707: hr_utility.set_location( l_proc, 40);
1708: l_calculated := FALSE;
1709: l_mtcerrbuf := hr_utility.get_message;
1710: -- raise mtc_error;
1711: END IF;
1705:
1706: IF l_message_set THEN
1707: hr_utility.set_location( l_proc, 40);
1708: l_calculated := FALSE;
1709: l_mtcerrbuf := hr_utility.get_message;
1710: -- raise mtc_error;
1711: END IF;
1712: exception
1713: when mtc_error then
1784: ins_upd_per_extra_info
1785: (p_person_id,l_effective_date, l_sel_flg, l_comments,p_mass_salary_id);
1786: l_comment := NULL;
1787: ------ BUG 3287299 End
1788: hr_utility.set_location('Error in Ghr_pay_calc.sql_main_pay_calc '||
1789: 'Err is '||sqlerrm(sqlcode),20);
1790: l_mtcerrbuf := 'Error in ghr_pay_calc Sql Err is '|| sqlerrm(sqlcode);
1791: g_proc := 'ghr_pay_calc';
1792: raise mtc_error;
1808: l_new_other_pay_amount := null;
1809: end if;
1810: l_new_total_salary := l_pay_calc_out_data.total_salary;
1811:
1812: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
1813: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
1814:
1815:
1816: -------------Call Pay cap Procedure
1809: end if;
1810: l_new_total_salary := l_pay_calc_out_data.total_salary;
1811:
1812: hr_utility.set_location('retention_allowance = ' || to_char(l_retention_allowance),10);
1813: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential),10);
1814:
1815:
1816: -------------Call Pay cap Procedure
1817: begin
1818: l_capped_other_pay := ghr_pa_requests_pkg2.get_cop( p_assignment_id => l_assignment_id
1819: ,p_effective_date => l_effective_date);
1820: l_old_capped_other_pay := l_capped_other_pay;
1821: -- Sundar Added the following if statement to improve performance
1822: if hr_utility.debug_enabled = true then
1823: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1824: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1825: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1826: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1819: ,p_effective_date => l_effective_date);
1820: l_old_capped_other_pay := l_capped_other_pay;
1821: -- Sundar Added the following if statement to improve performance
1822: if hr_utility.debug_enabled = true then
1823: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1824: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1825: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1826: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1827: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1820: l_old_capped_other_pay := l_capped_other_pay;
1821: -- Sundar Added the following if statement to improve performance
1822: if hr_utility.debug_enabled = true then
1823: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1824: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1825: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1826: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1827: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1828: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1821: -- Sundar Added the following if statement to improve performance
1822: if hr_utility.debug_enabled = true then
1823: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1824: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1825: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1826: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1827: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1828: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1829: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1822: if hr_utility.debug_enabled = true then
1823: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1824: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1825: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1826: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1827: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1828: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1829: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1830: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1823: hr_utility.set_location('Before Pay Cap ' || l_proc,21);
1824: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1825: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1826: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1827: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1828: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1829: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1830: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1831: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1824: hr_utility.set_location('l_effective_date ' || l_effective_date,21);
1825: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1826: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1827: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1828: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1829: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1830: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1831: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1832: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1825: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,21);
1826: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1827: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1828: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1829: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1830: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1831: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1832: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1833: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1826: hr_utility.set_location('l_pay_plan ' || l_pay_plan,21);
1827: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1828: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1829: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1830: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1831: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1832: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1833: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1834: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1827: hr_utility.set_location('l_position_id ' || to_char(l_position_id),21);
1828: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1829: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1830: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1831: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1832: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1833: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1834: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1835: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1828: hr_utility.set_location('l_pay_basis ' || l_pay_basis,21);
1829: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1830: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1831: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1832: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1833: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1834: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1835: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1836: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1829: hr_utility.set_location('person_id ' || to_char(p_person_id),21);
1830: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1831: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1832: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1833: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1834: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1835: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1836: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1837: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1830: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),21);
1831: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1832: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1833: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1834: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1835: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1836: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1837: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1838: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1831: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),21);
1832: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1833: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1834: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1835: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1836: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1837: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1838: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1839: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1832: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),21);
1833: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1834: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1835: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1836: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1837: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1838: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1839: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1840: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1833: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),21);
1834: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1835: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1836: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1837: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1838: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1839: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1840: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1841: end if;
1834: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),21);
1835: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1836: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1837: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1838: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1839: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1840: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1841: end if;
1842:
1835: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),21);
1836: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1837: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1838: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1839: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1840: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1841: end if;
1842:
1843:
1836: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),21);
1837: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),21);
1838: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),21);
1839: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),21);
1840: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
1841: end if;
1842:
1843:
1844: ghr_pay_caps.do_pay_caps_main
1872:
1873: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
1874:
1875: -- Sundar Added the following statement to improve performance
1876: if hr_utility.debug_enabled = true then
1877: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1878: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1873: l_new_other_pay_amount := nvl(l_capped_other_pay,l_entitled_other_pay);
1874:
1875: -- Sundar Added the following statement to improve performance
1876: if hr_utility.debug_enabled = true then
1877: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1878: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1874:
1875: -- Sundar Added the following statement to improve performance
1876: if hr_utility.debug_enabled = true then
1877: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1878: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1875: -- Sundar Added the following statement to improve performance
1876: if hr_utility.debug_enabled = true then
1877: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1878: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1883: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1876: if hr_utility.debug_enabled = true then
1877: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1878: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1883: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1877: hr_utility.set_location('After Pay Cap ' || l_proc,22);
1878: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1883: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1878: hr_utility.set_location('l_effective_date ' || l_effective_date,22);
1879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1883: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1879: hr_utility.set_location('l_out_pay_rate_determinant ' || l_out_pay_rate_determinant,22);
1880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1883: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1880: hr_utility.set_location('l_pay_plan ' || l_pay_plan,22);
1881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1883: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1881: hr_utility.set_location('l_position_id ' || to_char(l_position_id),22);
1882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1883: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1882: hr_utility.set_location('l_pay_basis ' || l_pay_basis,22);
1883: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1883: hr_utility.set_location('person_id ' || to_char(p_person_id),22);
1884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1891: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1884: hr_utility.set_location('l_new_basic_pay ' || to_char(l_new_basic_pay),22);
1885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1891: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1885: hr_utility.set_location('l_new_locality_adj ' || to_char(l_new_locality_adj),22);
1886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1891: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1886: hr_utility.set_location('l_new_adj_basic_pay ' || to_char(l_new_adj_basic_pay),22);
1887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1891: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1887: hr_utility.set_location('l_new_total_salary ' || to_char(l_new_total_salary),22);
1888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1891: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1895: end if;
1888: hr_utility.set_location('l_entitled_other_pay ' || to_char(l_entitled_other_pay),22);
1889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1891: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1895: end if;
1896:
1889: hr_utility.set_location('l_capped_other_pay ' || to_char(l_capped_other_pay),22);
1890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1891: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1895: end if;
1896:
1897: IF l_pay_cap_message THEN
1890: hr_utility.set_location('l_new_retention_allowance ' || to_char(l_new_retention_allowance),22);
1891: hr_utility.set_location('l_new_supervisory_diff ' || to_char(l_new_supervisory_differential),22);
1892: hr_utility.set_location('l_staffing_differential ' || to_char(l_staffing_differential),22);
1893: hr_utility.set_location('l_new_au_overtime ' || to_char(l_new_au_overtime),22);
1894: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),22);
1895: end if;
1896:
1897: IF l_pay_cap_message THEN
1898: IF nvl(l_temp_retention_allowance,0) > 0 THEN
1928: exception
1929: when mtc_error then
1930: raise;
1931: when others then
1932: hr_utility.set_location('Error in ghr_pay_caps.do_pay_caps_main ' ||
1933: 'Err is '||sqlerrm(sqlcode),23);
1934: l_mtcerrbuf := 'Error in do_pay_caps_main Sql Err is '|| sqlerrm(sqlcode);
1935: raise mtc_error;
1936: end;
2008: l_grade_or_level, l_step_or_rate,
2009: l_pay_basis);
2010: EXCEPTION
2011: when mtc_error then
2012: l_mtcerrbuf := hr_utility.get_message;
2013: raise;
2014: END;
2015: assign_to_sf52_rec(
2016: p_person_id,
2086:
2087: ---------------------------------------
2088: if l_errbuf is null then
2089: pr('No error in create sf52 ');
2090: hr_utility.set_location('Before commiting',2);
2091:
2092: ghr_mto_int.log_message(
2093: p_procedure => 'Successful Completion',
2094: p_message => 'Name: '||p_full_name ||
2125:
2126: commit;
2127: else
2128: pr('Error in create sf52',l_errbuf);
2129: hr_utility.set_location('Error in '||to_char(p_position_id),20);
2130: --l_recs_failed := l_recs_failed + 1;
2131: raise mtc_error;
2132: end if; -- if l_errbuf is null then
2133: exception
2155: end if;
2156: end if;
2157: EXCEPTION
2158: WHEN MTC_ERROR THEN
2159: HR_UTILITY.SET_LOCATION('Error occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),10);
2160: begin
2161: ------ BUG 3287299 -- Not to rollback for preview.
2162: if upper(p_action) <> 'SHOW' then
2163: ROLLBACK TO execute_msl_pay_SP;
2168: l_log_text := 'Error in '||l_proc||' '||
2169: ' For Mass Salary Name : '||p_mass_salary||
2170: 'Name: '|| p_full_name || ' SSN: ' || p_national_identifier ||' '||
2171: l_mtcerrbuf;
2172: hr_utility.set_location('before creating entry in log file',10);
2173: l_recs_failed := l_recs_failed + 1;
2174: begin
2175: ghr_mto_int.log_message(
2176: p_procedure => g_proc,
2177: p_message => l_log_text);
2178:
2179: exception
2180: when others then
2181: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
2182: hr_utility.raise_error;
2183: end;
2184: when others then
2185: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
2178:
2179: exception
2180: when others then
2181: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
2182: hr_utility.raise_error;
2183: end;
2184: when others then
2185: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
2186: BEGIN
2181: hr_utility.set_message(8301, 'GHR_38475_ERROR_LOG_FAILURE');
2182: hr_utility.raise_error;
2183: end;
2184: when others then
2185: HR_UTILITY.SET_LOCATION('Error (Others) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),20);
2186: BEGIN
2187: ROLLBACK TO execute_msl_pay_SP;
2188: EXCEPTION
2189: WHEN OTHERS THEN NULL;
2191: l_log_text := 'Error (others) in '||l_proc||
2192: ' For Mass Salary Name : '||p_mass_salary||
2193: 'Name: '|| p_full_name || ' SSN: ' || p_national_identifier ||
2194: ' Sql Err is '||sqlerrm(sqlcode);
2195: hr_utility.set_location('before creating entry in log file',20);
2196: l_recs_failed := l_recs_failed + 1;
2197: begin
2198: ghr_mto_int.log_message(
2199: p_procedure => g_proc,
2200: p_message => l_log_text);
2201:
2202: exception
2203: when others then
2204: hr_utility.set_message(8301, 'Create Error Log failed');
2205: hr_utility.raise_error;
2206: end;
2207:
2208:
2201:
2202: exception
2203: when others then
2204: hr_utility.set_message(8301, 'Create Error Log failed');
2205: hr_utility.raise_error;
2206: end;
2207:
2208:
2209: END msl_pay_process;
2210:
2211: BEGIN
2212:
2213: g_proc := 'execute_msl_pay';
2214: hr_utility.set_location('Entering ' || l_proc,5);
2215: p_retcode := 0;
2216: l_count := 0;
2217:
2218: ghr_msl_pkg.g_first_noa_code := null;
2242: exit;
2243: END LOOP;
2244: EXCEPTION
2245: when REC_BUSY then
2246: hr_utility.set_location('Mass Salary is in use',1);
2247: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2248: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
2249: hr_utility.raise_error;
2250: --
2244: EXCEPTION
2245: when REC_BUSY then
2246: hr_utility.set_location('Mass Salary is in use',1);
2247: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2248: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
2249: hr_utility.raise_error;
2250: --
2251: when others then
2252: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
2245: when REC_BUSY then
2246: hr_utility.set_location('Mass Salary is in use',1);
2247: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2248: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
2249: hr_utility.raise_error;
2250: --
2251: when others then
2252: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
2253: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2248: hr_utility.set_message(8301, 'GHR_38477_LOCK_ON_MSL');
2249: hr_utility.raise_error;
2250: --
2251: when others then
2252: hr_utility.set_location('Error in '||l_proc||' Sql err is '||sqlerrm(sqlcode),1);
2253: l_mtcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2254: raise mtc_error;
2255: END;
2256:
2281:
2282: get_lac_dtls(l_pa_request_id,
2283: l_lac_sf52_rec);
2284:
2285: hr_utility.set_location('After fetch msl '||to_char(l_effective_date)
2286: ||' '||to_char(l_user_table_id),20);
2287:
2288: IF l_p_ORGANIZATION_ID is not null then
2289: FOR per IN cur_people_org (l_effective_date,l_p_ORGANIZATION_ID)
2332: pr('After processing is over ',to_char(l_recs_failed));
2333:
2334: -- Vacant Positions Logic
2335:
2336: hr_utility.set_location('Entering Unassigned positions ' || l_proc,30);
2337:
2338: FOR c_pay_table_rec IN c_pay_table_id('0000') LOOP
2339: l_0000_id := c_pay_table_rec.user_table_id;
2340: exit;
2339: l_0000_id := c_pay_table_rec.user_table_id;
2340: exit;
2341: END LOOP;
2342:
2343: hr_utility.set_location('0000 tableid is ' || to_char(l_0000_id) || l_proc,35);
2344:
2345: FOR c_pay_table_rec IN c_pay_table_id('0491') LOOP
2346: l_0491_id := c_pay_table_rec.user_table_id;
2347: exit;
2346: l_0491_id := c_pay_table_rec.user_table_id;
2347: exit;
2348: END LOOP;
2349:
2350: hr_utility.set_location('0491 tableid is ' || to_char(l_0491_id) || l_proc,36);
2351:
2352: FOR un_per IN unassigned_pos (l_p_organization_id, l_effective_date)
2353: LOOP
2354:
2358: IF ( HR_GENERAL.DECODE_AVAILABILITY_STATUS(l_avail_status_id)
2359: = 'Active' ) THEN
2360: --------- not in ('Eliminated','Frozen','Deleted') ) THEN
2361:
2362: hr_utility.set_location('Available status ' || HR_GENERAL.DECODE_AVAILABILITY_STATUS(l_avail_status_id) || l_proc,37);
2363: l_position_id := un_per.position_id;
2364: hr_utility.set_location('position id is ' || to_char(l_position_id) || l_proc,40);
2365:
2366: ghr_history_fetch.fetch_positionei
2360: --------- not in ('Eliminated','Frozen','Deleted') ) THEN
2361:
2362: hr_utility.set_location('Available status ' || HR_GENERAL.DECODE_AVAILABILITY_STATUS(l_avail_status_id) || l_proc,37);
2363: l_position_id := un_per.position_id;
2364: hr_utility.set_location('position id is ' || to_char(l_position_id) || l_proc,40);
2365:
2366: ghr_history_fetch.fetch_positionei
2367: (p_position_id => l_position_id
2368: ,p_information_type => 'GHR_US_POS_VALID_GRADE'
2374: l_pay_table_id := l_pos_valid_grade_ei_data.poei_information5;
2375: l_business_group_id := un_per.business_group_iD;
2376: l_location_id := un_per.location_id;
2377:
2378: hr_utility.set_location('position valid grade table id is ' || to_char(l_pay_table_id) || l_proc,45);
2379: BEGIN
2380: ghr_pa_requests_pkg.get_SF52_loc_ddf_details
2381: (p_location_id => l_location_id
2382: ,p_duty_station_id => l_duty_station_id);
2422: END LOOP;
2423: END IF;
2424:
2425: if l_locality_check then
2426: hr_utility.set_location('locality check is TRUE' || l_proc,50);
2427: else
2428: hr_utility.set_location('locality check is FALSE' || l_proc,50);
2429: end if;
2430:
2424:
2425: if l_locality_check then
2426: hr_utility.set_location('locality check is TRUE' || l_proc,50);
2427: else
2428: hr_utility.set_location('locality check is FALSE' || l_proc,50);
2429: end if;
2430:
2431:
2432: --2 Check Duty station code,POI,agnecy and subelement.
2439: l_duty_station_id,
2440: l_personnel_office_id,
2441: l_sub_element_code) then
2442:
2443: hr_utility.set_location('check_init_eligibility ' || l_proc,55);
2444:
2445: FOR c_grade_kff_rec IN c_grade_kff (l_grade_id)
2446: LOOP
2447: l_pay_plan := c_grade_kff_rec.segment1;
2448: l_grade_or_level := c_grade_kff_rec.segment2;
2449: exit;
2450: END loop;
2451:
2452: hr_utility.set_location('l_pay_plan ' || l_pay_plan || l_proc,56);
2453: hr_utility.set_location('l_grade_or_level ' || l_grade_or_level || l_proc,56);
2454:
2455: --3 (Internal Loop) Check pay plan,table id
2456: FOR l_cnt in 1..rec_pp_prd_per_gr.COUNT LOOP
2449: exit;
2450: END loop;
2451:
2452: hr_utility.set_location('l_pay_plan ' || l_pay_plan || l_proc,56);
2453: hr_utility.set_location('l_grade_or_level ' || l_grade_or_level || l_proc,56);
2454:
2455: --3 (Internal Loop) Check pay plan,table id
2456: FOR l_cnt in 1..rec_pp_prd_per_gr.COUNT LOOP
2457:
2454:
2455: --3 (Internal Loop) Check pay plan,table id
2456: FOR l_cnt in 1..rec_pp_prd_per_gr.COUNT LOOP
2457:
2458: hr_utility.set_location('For internal loop l_cnt ' || to_char(l_cnt) || l_proc,58);
2459: --4 Pay plan , table, grade check
2460: IF ( nvl(rec_pp_prd_per_gr(l_cnt).pay_plan,l_pay_plan) = l_pay_plan
2461: AND l_user_table_id = nvl(l_pay_table_id,hr_api.g_number)
2462: AND nvl(rec_pp_prd_per_gr(l_cnt).grade,l_grade_or_level)=l_grade_or_level ) THEN
2460: IF ( nvl(rec_pp_prd_per_gr(l_cnt).pay_plan,l_pay_plan) = l_pay_plan
2461: AND l_user_table_id = nvl(l_pay_table_id,hr_api.g_number)
2462: AND nvl(rec_pp_prd_per_gr(l_cnt).grade,l_grade_or_level)=l_grade_or_level ) THEN
2463:
2464: hr_utility.set_location('check l_pay_plan ' || l_pay_plan || l_proc,58);
2465: hr_utility.set_location('check l_grade_or_level ' || l_grade_or_level || l_proc,58);
2466: BEGIN
2467: ghr_pa_requests_pkg.get_duty_station_details
2468: (p_duty_station_id => l_duty_station_id
2461: AND l_user_table_id = nvl(l_pay_table_id,hr_api.g_number)
2462: AND nvl(rec_pp_prd_per_gr(l_cnt).grade,l_grade_or_level)=l_grade_or_level ) THEN
2463:
2464: hr_utility.set_location('check l_pay_plan ' || l_pay_plan || l_proc,58);
2465: hr_utility.set_location('check l_grade_or_level ' || l_grade_or_level || l_proc,58);
2466: BEGIN
2467: ghr_pa_requests_pkg.get_duty_station_details
2468: (p_duty_station_id => l_duty_station_id
2469: ,p_effective_DATE => l_effective_DATE
2475: ,l_effective_DATE
2476: ,p_mass_salary_id
2477: ,l_sel_flg);
2478:
2479: hr_utility.set_location('Entering Before get_special_table_pay_table_value ' || l_proc,60);
2480: ghr_pay_calc.get_special_pay_table_value
2481: (p_pay_plan => l_pay_plan
2482: ,p_grade_or_level => l_grade_or_level
2483: ,p_step_or_rate => null
2628: set submit_flag = 'P'
2629: where rowid = l_rowid;
2630: EXCEPTION
2631: when others then
2632: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
2633: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
2634: hr_utility.raise_error;
2635: END;
2636: end if;
2629: where rowid = l_rowid;
2630: EXCEPTION
2631: when others then
2632: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
2633: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
2634: hr_utility.raise_error;
2635: END;
2636: end if;
2637: ELSE
2630: EXCEPTION
2631: when others then
2632: HR_UTILITY.SET_LOCATION('Error in Update ghr_msl Sql error '||sqlerrm(sqlcode),30);
2633: hr_utility.set_message(8301, 'GHR_38476_UPD_GHR_MSL_FAILURE');
2634: hr_utility.raise_error;
2635: END;
2636: end if;
2637: ELSE
2638: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
2646: COMMIT;
2647:
2648: EXCEPTION
2649: when others then
2650: HR_UTILITY.SET_LOCATION('Error (Others2) occurred in '||l_proc||' Sql error '||sqlerrm(sqlcode),30);
2651: BEGIN
2652: ROLLBACK TO execute_msl_pay_SP;
2653: EXCEPTION
2654: WHEN OTHERS THEN NULL;
2656: l_log_text := 'Error in '||l_proc||
2657: ' For Mass Salary Name : '||p_mass_salary||
2658: ' Sql Err is '||sqlerrm(sqlcode);
2659: l_recs_failed := l_recs_failed + 1;
2660: hr_utility.set_location('before creating entry in log file',30);
2661:
2662: p_errbuf := 'Error in '||l_proc || ' Details in GHR_PROCESS_LOG';
2663: p_retcode := 2;
2664: IF upper(p_action) = 'CREATE' THEN
2674: p_message => l_log_text);
2675:
2676: exception
2677: when others then
2678: hr_utility.set_message(8301, 'Create Error Log failed');
2679: hr_utility.raise_error;
2680: end;
2681:
2682: END execute_msl_pay;
2675:
2676: exception
2677: when others then
2678: hr_utility.set_message(8301, 'Create Error Log failed');
2679: hr_utility.raise_error;
2680: end;
2681:
2682: END execute_msl_pay;
2683:
2804: l_proc varchar2(72) := g_package || '.pop_dtls_from_pa_req';
2805: begin
2806: g_proc := 'pop_dtls_from_pa_req';
2807:
2808: hr_utility.set_location('Entering ' || l_proc,5);
2809: for pa_req_rec in ghr_pa_req_cur
2810: loop
2811: create_mass_act_prev (
2812: p_effective_date => p_effective_date,
2870: -- FWFA Changes
2871: );
2872: exit;
2873: END LOOP;
2874: hr_utility.set_location('Exiting ' || l_proc,10);
2875: exception
2876: when mlc_error then raise;
2877: when others then
2878: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2874: hr_utility.set_location('Exiting ' || l_proc,10);
2875: exception
2876: when mlc_error then raise;
2877: when others then
2878: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
2879: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
2880: raise mlc_error;
2881: end pop_dtls_from_pa_req;
2882: --
2951: l_proc varchar2(72) := g_package || '.pop_dtls_from_pa_req_mtc';
2952: begin
2953: g_proc := 'pop_dtls_from_pa_req_mtc';
2954:
2955: hr_utility.set_location('Entering ' || l_proc,5);
2956: for pa_req_rec in ghr_pa_req_cur
2957: loop
2958: create_mass_act_prev_mtc (
2959: p_effective_date => p_effective_date,
3013: -- FWFA Changes
3014: );
3015: exit;
3016: END LOOP;
3017: hr_utility.set_location('Exiting ' || l_proc,10);
3018: exception
3019: when mlc_error then raise;
3020: when others then
3021: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3017: hr_utility.set_location('Exiting ' || l_proc,10);
3018: exception
3019: when mlc_error then raise;
3020: when others then
3021: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3022: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3023: raise mlc_error;
3024: end pop_dtls_from_pa_req_mtc;
3025:
3044:
3045: BEGIN
3046:
3047: g_proc := 'check_select_flg';
3048: hr_utility.set_location('Entering ' || l_proc,5);
3049:
3050: get_extra_info_comments(p_person_id,p_effective_date,l_sel_flag,l_comments,p_mass_salary_id);
3051:
3052: --------- Initialize the comments
3077: END IF;
3078: EXCEPTION
3079: when mlc_error then raise;
3080: when others then
3081: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3082: l_mlcerrbuf := 'Error in '||l_proc||' @'||to_char(l_line)||' Sql Err is '|| sqlerrm(sqlcode);
3083: raise mlc_error;
3084: END;
3085:
3091: l_proc varchar2(72) := g_package || '.purge_old_data';
3092: BEGIN
3093: g_proc := 'purge_old_data';
3094:
3095: hr_utility.set_location('Entering ' || l_proc,5);
3096: delete from ghr_mass_actions_preview
3097: where mass_action_type = 'SALARY'
3098: and session_id = p_mass_salary_id;
3099: commit;
3096: delete from ghr_mass_actions_preview
3097: where mass_action_type = 'SALARY'
3098: and session_id = p_mass_salary_id;
3099: commit;
3100: hr_utility.set_location('Exiting ' || l_proc,10);
3101: exception
3102: when mlc_error then raise;
3103: when others then
3104: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3100: hr_utility.set_location('Exiting ' || l_proc,10);
3101: exception
3102: when mlc_error then raise;
3103: when others then
3104: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3105: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3106: raise mlc_error;
3107: END;
3108:
3124: l_proc varchar2(72) := g_package || '.update_sel_flg';
3125: l_ind number := 1;
3126: begin
3127: g_proc := 'update_sel_flg';
3128: hr_utility.set_location('Entering ' || l_proc,5);
3129: pr('Inside '||l_proc,to_char(p_person_id));
3130: l_ind := 10;
3131: ghr_history_fetch.fetch_peopleei
3132: (p_person_id => p_person_id
3148: ,p_pei_INFORMATION5 => NULL
3149: ,P_PEI_INFORMATION_CATEGORY => 'GHR_US_PER_MASS_ACTIONS');
3150:
3151: l_ind := 30;
3152: hr_utility.set_location('Exiting ' || l_proc,10);
3153: -- There is a trigger on PER_PEOPLE_EXTRA_INFO to make the employee INVALID
3154: -- when there is a update done on the table.
3155: ---Commented the following three lines to remove Validation functionality on Person.
3156: --- ghr_validate_perwsepi.validate_perwsepi(p_person_id);
3162: pr('Exiting '||l_proc,to_char(p_person_id));
3163: exception
3164: when mlc_error then raise;
3165: when others then
3166: hr_utility.set_location('Error in '||l_proc||
3167: ' Err is '||sqlerrm(sqlcode),20);
3168: l_mlcerrbuf := 'Error in '||l_proc||' at '||to_char(l_ind)||
3169: ' Sql Err is '|| sqlerrm(sqlcode);
3170: raise mlc_error;
3239: group by information11);
3240:
3241: begin
3242: g_proc := 'get_extra_info_comments';
3243: hr_utility.set_location('Entering ' || l_proc,5);
3244: /*
3245: if p_effective_date > sysdate then
3246: l_eff_date := sysdate;
3247: else
3277:
3278: exception
3279: when mlc_error then raise;
3280: when others then
3281: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3282: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3283: raise mlc_error;
3284: end;
3285:
3305: l_eff_date date;
3306:
3307: begin
3308: g_proc := 'ins_upd_per_extra_info';
3309: hr_utility.set_location('Entering ' || l_proc,5);
3310: if p_effective_date > sysdate then
3311: l_eff_date := sysdate;
3312: else
3313: l_eff_date := p_effective_date;
3355: ---Commented the following two lines to remove Validation functionality on Person.
3356: -- ghr_validate_perwsepi.validate_perwsepi(p_person_id);
3357: -- ghr_validate_perwsepi.update_person_user_type(p_person_id);
3358:
3359: hr_utility.set_location('Exiting ' || l_proc,10);
3360: exception
3361: when mlc_error then raise;
3362: when others then
3363: pr('Error in '||l_proc);
3360: exception
3361: when mlc_error then raise;
3362: when others then
3363: pr('Error in '||l_proc);
3364: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3365: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3366: raise mlc_error;
3367: end ins_upd_per_extra_info;
3368:
3390: l_proc varchar2(72) := g_package || '.check_init_eligibility';
3391: BEGIN
3392:
3393: g_proc := 'check_init_eligibility';
3394: hr_utility.set_location('Entering ' || l_proc,5);
3395:
3396: if p_personnel_office_id is not null then
3397: if p_personnel_office_id <> nvl(p_l_personnel_office_id,'NULL!~') then
3398: return false;
3422: l_ds_end_date := rec_ds.end_Date;
3423: END LOOP;
3424:
3425: If l_ds_end_date IS NULL THEN
3426: hr_utility.set_location('Under DS null check'||p_l_duty_station_id,12345);
3427: raise mlc_error;
3428: return false;
3429: end if;
3430:
3431: pr('Eligible');
3432: return true;
3433: exception
3434: when mlc_error then --raise;
3435: hr_utility.set_location('Error NO DUTY STATION '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3436: l_mlcerrbuf :=
3437: 'Error - No valid Location found, salary cannot be correctly calculated without the employee''s duty location ';
3438: return false;
3439: raise mlc_error;
3437: 'Error - No valid Location found, salary cannot be correctly calculated without the employee''s duty location ';
3438: return false;
3439: raise mlc_error;
3440: when others then
3441: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3442: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3443: return false;
3444: raise mlc_error;
3445: END check_init_eligibility;
3461: AND pay_plan=p_pay_plan;
3462:
3463: BEGIN
3464: g_proc := 'check_eligibility';
3465: hr_utility.set_location('Entering ' || l_proc,5);
3466:
3467: --- MSL percentage changes Madhuri
3468: ---
3469:
3498: RETURN TRUE;
3499: exception
3500: when mlc_error then raise;
3501: when others then
3502: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3503: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3504: raise mlc_error;
3505: END check_eligibility;
3506:
3562: l_eq_pay_plan ghr_pay_plans.equivalent_pay_plan%type;
3563:
3564: begin
3565: g_proc := 'person_in_pa_req_1noa';
3566: hr_utility.set_location('Entering ' || l_proc,5);
3567: -- Bug 1631952 start
3568:
3569: for csr_eq_pay_plan_rec in csr_eq_pay_plan loop
3570: l_eq_pay_plan := csr_eq_pay_plan_rec.equivalent_pay_plan;
3637: AND pay_plan=p_pay_plan;
3638:
3639: BEGIN
3640: g_proc := 'check_eligibility';
3641: hr_utility.set_location('Entering ' || l_proc,5);
3642:
3643: --- MSL percentage changes Madhuri
3644: ---
3645:
3674: RETURN TRUE;
3675: exception
3676: when mlc_error then raise;
3677: when others then
3678: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3679: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3680: raise mlc_error;
3681: END check_eligibility_mtc;
3682:
3736: l_eq_pay_plan ghr_pay_plans.equivalent_pay_plan%type;
3737:
3738: begin
3739: g_proc := 'person_in_pa_req_1noa';
3740: hr_utility.set_location('Entering ' || l_proc,5);
3741: -- Bug 1631952 start
3742:
3743: for csr_eq_pay_plan_rec in csr_eq_pay_plan loop
3744: l_eq_pay_plan := csr_eq_pay_plan_rec.equivalent_pay_plan;
3805: l_proc varchar2(72) := g_package || '.check_grade_retention';
3806:
3807: begin
3808: g_proc := 'check_grade_retention';
3809: hr_utility.set_location('Entering ' || l_proc,5);
3810: if p_prd in ('A','B','E','F','U','V') then
3811: if p_prd in ('A','B','E','F') then
3812: BEGIN
3813: l_retained_grade_rec :=
3849: --l_pos_ei_data per_position_extra_info%type;
3850:
3851: begin
3852: g_proc := 'get_pos_grp1_ddf';
3853: hr_utility.set_location('Entering ' || l_proc,5);
3854: ghr_history_fetch.fetch_positionei
3855: (p_position_id => p_position_id
3856: ,p_information_type => 'GHR_US_POS_GRP1'
3857: ,p_date_effective => p_effective_date
3856: ,p_information_type => 'GHR_US_POS_GRP1'
3857: ,p_date_effective => p_effective_date
3858: ,p_pos_ei_data => p_pos_ei_data
3859: );
3860: hr_utility.set_location('Exiting ' || l_proc,10);
3861: exception
3862: when mlc_error then raise;
3863: when others then
3864: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3860: hr_utility.set_location('Exiting ' || l_proc,10);
3861: exception
3862: when mlc_error then raise;
3863: when others then
3864: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
3865: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
3866: raise mlc_error;
3867: END get_pos_grp1_ddf;
3868:
3906:
3907: BEGIN
3908:
3909: g_proc := 'get_from_sf52_data_elements';
3910: hr_utility.set_location('Entering ' || l_proc,5);
3911:
3912: -- Processing Total Pay and Adjusted Basic Pay
3913: -- NAME DATE BUG COMMENTS
3914: -- Ashley 17-JUL-03 Payroll Intg Modified the Input Value name
3922: ,p_effective_date => p_effective_date
3923: ,p_value => l_total_salary
3924: ,p_multiple_error_flag => l_multi_error_flag);
3925:
3926: hr_utility.set_location('Total Pay = ' || to_char(l_total_salary), 6);
3927:
3928: if l_multi_error_flag then
3929: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3930: hr_utility.raise_error;
3925:
3926: hr_utility.set_location('Total Pay = ' || to_char(l_total_salary), 6);
3927:
3928: if l_multi_error_flag then
3929: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3930: hr_utility.raise_error;
3931: end if;
3932:
3933: ghr_api.retrieve_element_entry_value
3926: hr_utility.set_location('Total Pay = ' || to_char(l_total_salary), 6);
3927:
3928: if l_multi_error_flag then
3929: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3930: hr_utility.raise_error;
3931: end if;
3932:
3933: ghr_api.retrieve_element_entry_value
3934: (p_element_name => 'Basic Salary Rate'
3937: ,p_effective_date => p_effective_date
3938: ,p_value => l_basic_pay
3939: ,p_multiple_error_flag => l_multi_error_flag);
3940:
3941: hr_utility.set_location('Basic Salary Rate = ' || to_char(l_basic_pay), 6);
3942:
3943: if l_multi_error_flag then
3944: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3945: hr_utility.raise_error;
3940:
3941: hr_utility.set_location('Basic Salary Rate = ' || to_char(l_basic_pay), 6);
3942:
3943: if l_multi_error_flag then
3944: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3945: hr_utility.raise_error;
3946: end if;
3947:
3948: ghr_api.retrieve_element_entry_value
3941: hr_utility.set_location('Basic Salary Rate = ' || to_char(l_basic_pay), 6);
3942:
3943: if l_multi_error_flag then
3944: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3945: hr_utility.raise_error;
3946: end if;
3947:
3948: ghr_api.retrieve_element_entry_value
3949: (p_element_name => 'Locality Pay or SR Supplement'
3953: ,p_effective_date => p_effective_date
3954: ,p_value => l_locality_adj
3955: ,p_multiple_error_flag => l_multi_error_flag);
3956:
3957: hr_utility.set_location('Locality Pay = ' || to_char(l_locality_adj), 6);
3958:
3959: if l_multi_error_flag then
3960: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3961: hr_utility.raise_error;
3956:
3957: hr_utility.set_location('Locality Pay = ' || to_char(l_locality_adj), 6);
3958:
3959: if l_multi_error_flag then
3960: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3961: hr_utility.raise_error;
3962: end if;
3963:
3964: ghr_api.retrieve_element_entry_value
3957: hr_utility.set_location('Locality Pay = ' || to_char(l_locality_adj), 6);
3958:
3959: if l_multi_error_flag then
3960: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
3961: hr_utility.raise_error;
3962: end if;
3963:
3964: ghr_api.retrieve_element_entry_value
3965: (p_element_name => 'Adjusted Basic Pay'
3968: ,p_effective_date => p_effective_date
3969: ,p_value => l_adj_basic_pay
3970: ,p_multiple_error_flag => l_multi_error_flag);
3971:
3972: hr_utility.set_location('Adjusted Basic Pay = ' || to_char(l_adj_basic_pay), 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('Adjusted Basic Pay = ' || to_char(l_adj_basic_pay), 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('Adjusted Basic Pay = ' || to_char(l_adj_basic_pay), 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 => 'Other Pay'
3983: ,p_effective_date => p_effective_date
3984: ,p_value => l_other_pay
3985: ,p_multiple_error_flag => l_multi_error_flag);
3986:
3987: hr_utility.set_location('Other Pay = ' || to_char(l_other_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('Other Pay = ' || to_char(l_other_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('Other Pay = ' || to_char(l_other_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 => 'AUO'
3998: ,p_effective_date => p_effective_date
3999: ,p_value => l_au_overtime
4000: ,p_multiple_error_flag => l_multi_error_flag);
4001:
4002: hr_utility.set_location('AUO Amount = ' || to_char(l_au_overtime), 6);
4003:
4004: if l_multi_error_flag then
4005: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4006: hr_utility.raise_error;
4001:
4002: hr_utility.set_location('AUO Amount = ' || to_char(l_au_overtime), 6);
4003:
4004: if l_multi_error_flag then
4005: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4006: hr_utility.raise_error;
4007: end if;
4008:
4009: ghr_api.retrieve_element_entry_value
4002: hr_utility.set_location('AUO Amount = ' || to_char(l_au_overtime), 6);
4003:
4004: if l_multi_error_flag then
4005: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4006: hr_utility.raise_error;
4007: end if;
4008:
4009: ghr_api.retrieve_element_entry_value
4010: (p_element_name => 'AUO'
4014: ,p_value => l_auo_premium_pay_indicator
4015: ,p_multiple_error_flag => l_multi_error_flag);
4016:
4017: if l_multi_error_flag then
4018: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4019: hr_utility.raise_error;
4020: end if;
4021:
4022: ghr_api.retrieve_element_entry_value
4015: ,p_multiple_error_flag => l_multi_error_flag);
4016:
4017: if l_multi_error_flag then
4018: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4019: hr_utility.raise_error;
4020: end if;
4021:
4022: ghr_api.retrieve_element_entry_value
4023: (p_element_name => 'Availability Pay'
4026: ,p_effective_date => p_effective_date
4027: ,p_value => l_availability_pay
4028: ,p_multiple_error_flag => l_multi_error_flag);
4029:
4030: hr_utility.set_location('Availability Pay Amount = ' || to_char(l_availability_pay), 6);
4031:
4032: if l_multi_error_flag then
4033: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4034: hr_utility.raise_error;
4029:
4030: hr_utility.set_location('Availability Pay Amount = ' || to_char(l_availability_pay), 6);
4031:
4032: if l_multi_error_flag then
4033: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4034: hr_utility.raise_error;
4035: end if;
4036:
4037: ghr_api.retrieve_element_entry_value
4030: hr_utility.set_location('Availability Pay Amount = ' || to_char(l_availability_pay), 6);
4031:
4032: if l_multi_error_flag then
4033: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4034: hr_utility.raise_error;
4035: end if;
4036:
4037: ghr_api.retrieve_element_entry_value
4038: (p_element_name => 'Availability Pay'
4042: ,p_value => l_ap_premium_pay_indicator
4043: ,p_multiple_error_flag => l_multi_error_flag);
4044:
4045: if l_multi_error_flag then
4046: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4047: hr_utility.raise_error;
4048: end if;
4049: --
4050: ghr_api.retrieve_element_entry_value
4043: ,p_multiple_error_flag => l_multi_error_flag);
4044:
4045: if l_multi_error_flag then
4046: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4047: hr_utility.raise_error;
4048: end if;
4049: --
4050: ghr_api.retrieve_element_entry_value
4051: (p_element_name => 'Retention Allowance'
4054: ,p_effective_date => p_effective_date
4055: ,p_value => l_retention_allowance
4056: ,p_multiple_error_flag => l_multi_error_flag);
4057:
4058: hr_utility.set_location('Retention Allowance Amount = ' || to_char(l_retention_allowance), 6);
4059:
4060: if l_multi_error_flag then
4061: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4062: hr_utility.raise_error;
4057:
4058: hr_utility.set_location('Retention Allowance Amount = ' || to_char(l_retention_allowance), 6);
4059:
4060: if l_multi_error_flag then
4061: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4062: hr_utility.raise_error;
4063: end if;
4064:
4065: ghr_api.retrieve_element_entry_value
4058: hr_utility.set_location('Retention Allowance Amount = ' || to_char(l_retention_allowance), 6);
4059:
4060: if l_multi_error_flag then
4061: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4062: hr_utility.raise_error;
4063: end if;
4064:
4065: ghr_api.retrieve_element_entry_value
4066: (p_element_name => 'Retention Allowance'
4069: ,p_effective_date => p_effective_date
4070: ,p_value => l_retention_allow_perc
4071: ,p_multiple_error_flag => l_multi_error_flag);
4072:
4073: hr_utility.set_location('Retention Allowance Percent = ' || to_char(l_retention_allow_perc), 6);
4074:
4075: if l_multi_error_flag then
4076: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4077: hr_utility.raise_error;
4072:
4073: hr_utility.set_location('Retention Allowance Percent = ' || to_char(l_retention_allow_perc), 6);
4074:
4075: if l_multi_error_flag then
4076: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4077: hr_utility.raise_error;
4078: end if;
4079:
4080: ghr_api.retrieve_element_entry_value
4073: hr_utility.set_location('Retention Allowance Percent = ' || to_char(l_retention_allow_perc), 6);
4074:
4075: if l_multi_error_flag then
4076: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4077: hr_utility.raise_error;
4078: end if;
4079:
4080: ghr_api.retrieve_element_entry_value
4081: (p_element_name => 'Supervisory Differential'
4084: ,p_effective_date => p_effective_date
4085: ,p_value => l_supervisory_differential
4086: ,p_multiple_error_flag => l_multi_error_flag);
4087:
4088: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential), 6);
4089:
4090: if l_multi_error_flag then
4091: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4092: hr_utility.raise_error;
4087:
4088: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential), 6);
4089:
4090: if l_multi_error_flag then
4091: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4092: hr_utility.raise_error;
4093: end if;
4094:
4095: ghr_api.retrieve_element_entry_value
4088: hr_utility.set_location('Supervisory Diff Amount = ' || to_char(l_supervisory_differential), 6);
4089:
4090: if l_multi_error_flag then
4091: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4092: hr_utility.raise_error;
4093: end if;
4094:
4095: ghr_api.retrieve_element_entry_value
4096: (p_element_name => 'Supervisory Differential'
4099: ,p_effective_date => p_effective_date
4100: ,p_value => l_supervisory_diff_perc
4101: ,p_multiple_error_flag => l_multi_error_flag);
4102:
4103: hr_utility.set_location('Supervisory Diff Percent = ' || to_char(l_supervisory_diff_perc), 6);
4104:
4105: if l_multi_error_flag then
4106: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4107: hr_utility.raise_error;
4102:
4103: hr_utility.set_location('Supervisory Diff Percent = ' || to_char(l_supervisory_diff_perc), 6);
4104:
4105: if l_multi_error_flag then
4106: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4107: hr_utility.raise_error;
4108: end if;
4109:
4110: --
4103: hr_utility.set_location('Supervisory Diff Percent = ' || to_char(l_supervisory_diff_perc), 6);
4104:
4105: if l_multi_error_flag then
4106: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4107: hr_utility.raise_error;
4108: end if;
4109:
4110: --
4111: --
4116: ,p_effective_date => p_effective_date
4117: ,p_value => l_staffing_differential
4118: ,p_multiple_error_flag => l_multi_error_flag);
4119:
4120: hr_utility.set_location('Staffing Diff Amount = ' || to_char(l_staffing_differential), 6);
4121:
4122: if l_multi_error_flag then
4123: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4124: hr_utility.raise_error;
4119:
4120: hr_utility.set_location('Staffing Diff Amount = ' || to_char(l_staffing_differential), 6);
4121:
4122: if l_multi_error_flag then
4123: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4124: hr_utility.raise_error;
4125: end if;
4126:
4127: p_tot_old_sal := round(l_total_salary,2);
4120: hr_utility.set_location('Staffing Diff Amount = ' || to_char(l_staffing_differential), 6);
4121:
4122: if l_multi_error_flag then
4123: hr_utility.set_message(8301, 'GHR_38014_API_MULTI_ELE_ENTR');
4124: hr_utility.raise_error;
4125: end if;
4126:
4127: p_tot_old_sal := round(l_total_salary,2);
4128: p_OLD_BASIC_PAY := round(l_basic_pay,2);
4138: p_supervisory_differential := l_supervisory_differential;
4139: p_supervisory_diff_perc := l_supervisory_diff_perc;
4140: p_staffing_differential := l_staffing_differential;
4141:
4142: hr_utility.set_location('Exiting ' || l_proc,10);
4143:
4144: exception
4145: when mlc_error then raise;
4146: when others then
4143:
4144: exception
4145: when mlc_error then raise;
4146: when others then
4147: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4148: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4149: raise mlc_error;
4150: END GET_FROM_SF52_DATA_ELEMENTS;
4151:
4165: p_position_seq_no out nocopy varchar2) is
4166: l_proc varchar2(72) := g_package || '.get_sub_element_code_pos_title';
4167: begin
4168: g_proc := 'get_sub_element_code_pos_title';
4169: hr_utility.set_location('Entering ' || l_proc,5);
4170: p_sub_element_code := ghr_api.get_position_agency_code_pos
4171: (p_position_id,p_business_group_id,p_effective_date);
4172:
4173: p_position_title := ghr_api.get_position_title_pos
4188: ,p_effective_date => p_effective_date
4189: );
4190: -- end if;
4191:
4192: hr_utility.set_location('Exiting ' || l_proc,10);
4193: end get_sub_element_code_pos_title;
4194:
4195: --
4196: -- Get all details for the reporting...
4206: ) is
4207: l_proc varchar2(72) := g_package || '.get_other_dtls_for_rep';
4208: BEGIN
4209: g_proc := 'get_other_dtls_for_rep';
4210: hr_utility.set_location('Entering ' || l_proc,5);
4211: p_first_action_la_code1 := 'QWM';
4212: p_first_action_la_code2 := 'ZLM';
4213:
4214: /**
4230: p_first_action_la_code2 := 'ZLM';
4231: End if;
4232: */
4233:
4234: hr_utility.set_location('Exiting ' || l_proc,10);
4235:
4236: exception
4237: when mlc_error then raise;
4238: when others then
4235:
4236: exception
4237: when mlc_error then raise;
4238: when others then
4239: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4240: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4241: raise mlc_error;
4242: END get_other_dtls_for_rep;
4243:
4319: l_retained_grade_rec ghr_pay_calc.retained_grade_rec_type;
4320: l_check_grade_retention varchar2(30);
4321: begin
4322: g_proc := 'create_mass_act_prev';
4323: hr_utility.set_location('Entering ' || l_proc,5);
4324: if p_remark_code2 is not null then
4325: l_comb_rem := p_remark_code1||', '||p_remark_code2;
4326: else
4327: l_comb_rem := p_remark_code1;
4343: p_cust_rec => l_cust_rec);
4344:
4345: exception
4346: when others then
4347: hr_utility.set_location('Error in Mass Act Custom '||
4348: 'Err is '||sqlerrm(sqlcode),20);
4349: l_mlcerrbuf := 'Error in Mass Act Custom '||
4350: 'Err is '|| sqlerrm(sqlcode);
4351: raise mlc_error;
4375: raise mlc_error;
4376: end;
4377:
4378: ELSIF l_check_grade_retention ='MLC_ERROR' THEN
4379: hr_utility.set_message(8301,'GHR_38927_MISSING_MA_RET_DET');
4380: raise mlc_error;
4381: ELSIF l_check_grade_retention = 'OTHER_ERROR' THEN
4382: l_mlcerrbuf := 'Others error in check_grade_retention function while fetching retained grade record. Please
4383: verify the retained grade record';
4551: l_cust_rec.user_attribute19,
4552: l_cust_rec.user_attribute20
4553: );
4554:
4555: hr_utility.set_location('Exiting ' || l_proc,10);
4556: exception
4557: when mlc_error then raise;
4558: when others then
4559: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4555: hr_utility.set_location('Exiting ' || l_proc,10);
4556: exception
4557: when mlc_error then raise;
4558: when others then
4559: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4560: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4561: raise mlc_error;
4562: end create_mass_act_prev;
4563:
4634: l_retained_grade_rec ghr_pay_calc.retained_grade_rec_type;
4635: l_check_grade_retention varchar2(30);
4636: begin
4637: g_proc := 'create_mass_act_prev';
4638: hr_utility.set_location('Entering ' || l_proc,5);
4639: IF p_person_id is not null then
4640: if p_remark_code2 is not null then
4641: l_comb_rem := p_remark_code1||', '||p_remark_code2;
4642: else
4659: p_cust_rec => l_cust_rec);
4660:
4661: exception
4662: when others then
4663: hr_utility.set_location('Error in Mass Act Custom '||
4664: 'Err is '||sqlerrm(sqlcode),20);
4665: l_mlcerrbuf := 'Error in Mass Act Custom '||
4666: 'Err is '|| sqlerrm(sqlcode);
4667: raise mlc_error;
4691: raise mlc_error;
4692: end;
4693:
4694: ELSIF l_check_grade_retention ='MLC_ERROR' THEN
4695: hr_utility.set_message(8301,'GHR_38927_MISSING_MA_RET_DET');
4696: raise mlc_error;
4697: ELSIF l_check_grade_retention = 'OTHER_ERROR' THEN
4698: l_mlcerrbuf := 'Others error in check_grade_retention function while fetching retained grade record. Please
4699: verify the retained grade record';
4863: l_cust_rec.user_attribute19,
4864: l_cust_rec.user_attribute20
4865: );
4866:
4867: hr_utility.set_location('Exiting ' || l_proc,10);
4868: exception
4869: when mlc_error then raise;
4870: when others then
4871: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4867: hr_utility.set_location('Exiting ' || l_proc,10);
4868: exception
4869: when mlc_error then raise;
4870: when others then
4871: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4872: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4873: raise mlc_error;
4874: end create_mass_act_prev_mtc;
4875:
4887: where pa_request_id = p_pa_request_id;
4888:
4889: begin
4890: g_proc := 'get_lac_dtls';
4891: hr_utility.set_location('Entering ' || l_proc,5);
4892:
4893: pr('Entering '||l_proc||' Pa req id ',to_char(p_pa_request_id));
4894: if p_pa_request_id is null then
4895: pr('PA request id is null.................');
4901: exit;
4902: end loop;
4903: end if;
4904:
4905: hr_utility.set_location('Exiting ' || l_proc,10);
4906: exception
4907: when others then
4908: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4909: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4904:
4905: hr_utility.set_location('Exiting ' || l_proc,10);
4906: exception
4907: when others then
4908: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4909: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4910: raise mlc_error;
4911: end get_lac_dtls;
4912:
4927: l_remarks_rec ghr_pa_remarks%rowtype;
4928:
4929: begin
4930: g_proc := 'create_lac_remarks';
4931: hr_utility.set_location('Entering ' || l_proc,5);
4932:
4933: pr('Inside '||l_proc,to_char(p_pa_request_id),to_char(p_new_pa_request_id));
4934:
4935: FOR CUR_PA_REM_rec in cur_pa_rem_cur
4953: );
4954:
4955: end loop;
4956:
4957: hr_utility.set_location('Exiting ' || l_proc,10);
4958:
4959: exception
4960: when others then
4961: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4957: hr_utility.set_location('Exiting ' || l_proc,10);
4958:
4959: exception
4960: when others then
4961: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
4962: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
4963: raise mlc_error;
4964: end create_lac_remarks;
4965:
5015: ,P_POEI_INFORMATION20 => null
5016: ,P_POEI_INFORMATION21 => null);
5017:
5018: EXCEPTION when others then
5019: hr_utility.set_location('UPDATE posei error 3' || l_proc,10);
5020: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5021: END;
5022:
5023: ----- Reset the global variable
5016: ,P_POEI_INFORMATION21 => null);
5017:
5018: EXCEPTION when others then
5019: hr_utility.set_location('UPDATE posei error 3' || l_proc,10);
5020: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5021: END;
5022:
5023: ----- Reset the global variable
5024: ghr_api.g_api_dml := FALSE;
5075: begin
5076:
5077: g_proc := 'assign_to_sf52_rec';
5078:
5079: hr_utility.set_location('Entering ' || l_proc,5);
5080: p_sf52_rec.person_id := p_person_id;
5081: p_sf52_rec.employee_first_name := p_first_name;
5082: p_sf52_rec.employee_last_name := p_last_name;
5083: p_sf52_rec.employee_middle_names := p_middle_names;
5138: p_sf52_rec.FIRST_ACTION_LA_CODE2 := p_lac_sf52_rec.FIRST_ACTION_LA_CODE2;
5139: p_sf52_rec.FIRST_ACTION_LA_DESC1 := p_lac_sf52_rec.FIRST_ACTION_LA_DESC1;
5140: p_sf52_rec.FIRST_ACTION_LA_DESC2 := p_lac_sf52_rec.FIRST_ACTION_LA_DESC2;
5141:
5142: hr_utility.set_location('Exiting ' || l_proc,10);
5143:
5144: exception
5145: when mlc_error then raise;
5146: when others then
5143:
5144: exception
5145: when mlc_error then raise;
5146: when others then
5147: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5148: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
5149: raise mlc_error;
5150: end assign_to_sf52_rec;
5151:
5173: l_proc VARCHAR2(72) := g_package || '.ins_upd_pos_extra_info';
5174: l_eff_DATE DATE;
5175:
5176: BEGIN
5177: hr_utility.set_location('Entering ' || l_proc,5);
5178: g_proc := 'ins_upd_pos_extra_info';
5179:
5180: if p_effective_DATE > sysDATE then
5181: l_eff_DATE := sysDATE;
5214: ,p_poei_INFORMATION20 => p_comment
5215: ,p_poei_INFORMATION21 => to_char(p_msl_id)
5216: ,P_POEI_INFORMATION_CATEGORY => 'GHR_US_POS_MASS_ACTIONS');
5217: EXCEPTION when others then
5218: hr_utility.set_location('UPDATE posei error 1' || l_proc,10);
5219: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5220: END;
5221: ----- Reset the global variable
5222: ghr_api.g_api_dml := FALSE;
5215: ,p_poei_INFORMATION21 => to_char(p_msl_id)
5216: ,P_POEI_INFORMATION_CATEGORY => 'GHR_US_POS_MASS_ACTIONS');
5217: EXCEPTION when others then
5218: hr_utility.set_location('UPDATE posei error 1' || l_proc,10);
5219: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5220: END;
5221: ----- Reset the global variable
5222: ghr_api.g_api_dml := FALSE;
5223:
5232: ,P_POEI_INFORMATION_CATEGORY => 'GHR_US_POS_MASS_ACTIONS'
5233: ,P_POSITION_EXTRA_INFO_ID => l_position_extra_info_id
5234: ,P_OBJECT_VERSION_NUMBER => l_object_version_NUMBER);
5235: END IF;
5236: hr_utility.set_location('Exiting ' || l_proc,30);
5237:
5238: EXCEPTION
5239: when mtc_error then raise;
5240: when others then
5238: EXCEPTION
5239: when mtc_error then raise;
5240: when others then
5241: pr('Error in '||l_proc);
5242: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5243: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
5244: raise mtc_error ;
5245: END ins_upd_pos_extra_info;
5246:
5261: l_char_msl_id VARCHAR2(30);
5262:
5263: BEGIN
5264: g_proc := 'get_extra_info_comments';
5265: hr_utility.set_location('Entering ' || l_proc,5);
5266: pr('In '||l_proc);
5267:
5268: -- Initialization for NOCOPY Changes
5269: l_sel_flag := p_sel_flag;
5308: p_comments := l_comments;
5309: p_msl_id := l_msl_id;
5310: --
5311: pr('Error in '||l_proc);
5312: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5313: l_mlcerrbuf := 'Error in '||l_proc||' Sql Err is '|| sqlerrm(sqlcode);
5314: raise mtc_error;
5315: END get_extra_info_comments_pos;
5316:
5335: --Initilization for NOCOPY Changes
5336: --
5337: l_sel_flg := p_sel_flg;
5338: --
5339: hr_utility.set_location('Entering ' || l_proc,5);
5340: pr('in '||l_proc);
5341: --
5342: l_line := 5;
5343: get_extra_info_comments_pos(p_position_id,p_effective_DATE,l_sel_flg,l_comments,l_msl_id);
5367: -- Reset IN OUT params and Set OUT params to null
5368: p_sel_flg := l_sel_flg;
5369: --
5370: pr('Error in '||l_proc);
5371: hr_utility.set_location('Error in '||l_proc||' Err is '||sqlerrm(sqlcode),20);
5372: l_mlcerrbuf := 'Error in '||l_proc||' @'||to_char(l_line)||' Sql Err is '|| sqlerrm(sqlcode);
5373:
5374: raise mtc_error;
5375: END check_select_flg_pos;
5435:
5436: ghr_mto_int.put_line(msg||'-'||par1||' -'||par2||'-');
5437: exception
5438: when others then
5439: hr_utility.set_location('Error in pr '||' Err is '||sqlerrm(sqlcode),20);
5440: l_mlcerrbuf := 'Error in pr Sql Err is '|| sqlerrm(sqlcode);
5441: raise mlc_error;
5442: end;
5443: