eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.GHR_MSL_PKG dependencies on GHR_MSL_PKG

Line 1: PACKAGE BODY GHR_MSL_PKG AS

1: PACKAGE BODY GHR_MSL_PKG AS
2: /* $Header: ghmslexe.pkb 120.27 2011/12/02 08:55:27 utokachi ship $ */
3:
4: g_no number := 0;
5: g_package varchar2(32) := 'GHR_MSL_PKG';

Line 5: g_package varchar2(32) := 'GHR_MSL_PKG';

1: PACKAGE BODY GHR_MSL_PKG AS
2: /* $Header: ghmslexe.pkb 120.27 2011/12/02 08:55:27 utokachi ship $ */
3:
4: g_no number := 0;
5: g_package varchar2(32) := 'GHR_MSL_PKG';
6: g_proc varchar2(72) := null;
7: g_effective_date date;
8: g_rg_recs_failed NUMBER := 0;
9:

Line 459: ghr_msl_pkg.g_first_noa_code := NULL;

455: l_pay_basis := p_pay_basis;
456: hr_utility.set_location('The location id is:'||l_location_id,1);
457:
458: --------GPPA Update 46 start
459: ghr_msl_pkg.g_first_noa_code := NULL;
460: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
461: LOOP
462: l_eq_pay_plan := cur_eq_ppl_rec.EQUIVALENT_PAY_PLAN;
463: exit;

Line 470: ghr_msl_pkg.g_first_noa_code := '890';

466: l_eq_pay_plan = 'GS' AND
467: l_lac_sf52_rec.first_action_la_code1 = 'QLP' AND
468: l_lac_sf52_rec.first_action_la_code2 = 'ZLM' THEN
469:
470: ghr_msl_pkg.g_first_noa_code := '890';
471:
472: end if;
473: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
474: l_eq_pay_plan = 'FW' AND

Line 477: ghr_msl_pkg.g_first_noa_code := '890';

473: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
474: l_eq_pay_plan = 'FW' AND
475: l_lac_sf52_rec.first_action_la_code1 = 'RJR' THEN
476:
477: ghr_msl_pkg.g_first_noa_code := '890';
478:
479: end if;
480: --------GPPA Update 46 end
481:

Line 695: ghr_msl_pkg.g_ses_msl_process := 'N';

691: l_pay_calc_in_data.current_adj_basic_pay := l_old_adj_basic_pay;
692: l_pay_calc_in_data.current_step_or_rate := l_step_or_rate;
693: l_pay_calc_in_data.pa_request_id := null;
694:
695: ghr_msl_pkg.g_ses_msl_process := 'N';
696:
697: IF l_pay_plan in ('ES','EP','IE','FE') and l_essl_table THEN
698: ghr_msl_pkg.g_ses_msl_process := 'Y';
699: l_step_or_rate := '00';

Line 698: ghr_msl_pkg.g_ses_msl_process := 'Y';

694:
695: ghr_msl_pkg.g_ses_msl_process := 'N';
696:
697: IF l_pay_plan in ('ES','EP','IE','FE') and l_essl_table THEN
698: ghr_msl_pkg.g_ses_msl_process := 'Y';
699: l_step_or_rate := '00';
700: END IF;
701:
702: BEGIN

Line 806: ghr_msl_pkg.g_ses_msl_process := 'N';

802: g_proc := 'ghr_pay_calc';
803: raise msl_error;
804: END;
805:
806: ghr_msl_pkg.g_ses_msl_process := 'N';
807:
808: l_new_basic_pay := l_pay_calc_out_data.basic_pay;
809: l_new_locality_adj := l_pay_calc_out_data.locality_adj;
810: l_new_adj_basic_pay := l_pay_calc_out_data.adj_basic_pay;

Line 1385: ghr_mto_int.set_log_program_name('GHR_MSL_PKG');

1381: l_index := l_index +1;
1382: END LOOP;
1383:
1384: IF upper(p_action) = 'CREATE' then
1385: ghr_mto_int.set_log_program_name('GHR_MSL_PKG');
1386: ELSE
1387: ghr_mto_int.set_log_program_name('MSL_'||p_mass_salary);
1388: END IF;
1389:

Line 2018: IF not ghr_msl_pkg.g_sl_payband_conv then

2014: IF l_increase_percent IS NOT NULL THEN
2015: p_increase_percent := l_increase_percent;
2016: END IF;
2017: -- 8320557 added to not check percentage is 0 for pay band conversion
2018: IF not ghr_msl_pkg.g_sl_payband_conv then
2019: IF p_increase_percent = 0 THEN
2020: l_sel_flag := 'N';
2021: END IF;
2022: END IF;

Line 5377: ghr_msl_pkg.g_first_noa_code := '894';

5373: l_pay_basis := p_pay_basis;
5374:
5375: hr_utility.set_location('The location id is:'||l_location_id,12345);
5376:
5377: ghr_msl_pkg.g_first_noa_code := '894';
5378: --------GPPA Update 46 start
5379: -- ghr_msl_pkg.g_first_noa_code := NULL;
5380: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
5381: LOOP

Line 5379: -- ghr_msl_pkg.g_first_noa_code := NULL;

5375: hr_utility.set_location('The location id is:'||l_location_id,12345);
5376:
5377: ghr_msl_pkg.g_first_noa_code := '894';
5378: --------GPPA Update 46 start
5379: -- ghr_msl_pkg.g_first_noa_code := NULL;
5380: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
5381: LOOP
5382: l_eq_pay_plan := cur_eq_ppl_rec.EQUIVALENT_PAY_PLAN;
5383: exit;

Line 5390: ghr_msl_pkg.g_first_noa_code := '890';

5386: l_eq_pay_plan = 'GS' AND
5387: l_lac_sf52_rec.first_action_la_code1 = 'QLP' AND
5388: l_lac_sf52_rec.first_action_la_code2 = 'ZLM' THEN
5389:
5390: ghr_msl_pkg.g_first_noa_code := '890';
5391:
5392: end if;
5393: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
5394: l_eq_pay_plan = 'FW' AND

Line 5397: ghr_msl_pkg.g_first_noa_code := '890';

5393: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
5394: l_eq_pay_plan = 'FW' AND
5395: l_lac_sf52_rec.first_action_la_code1 = 'RJR' THEN
5396:
5397: ghr_msl_pkg.g_first_noa_code := '890';
5398:
5399: end if;
5400: --------GPPA Update 46 end
5401:

Line 5407: ghr_msl_pkg.g_first_noa_code := '891';

5403: ---- Start of Bug #7577249
5404: IF l_essl_table and (l_eq_pay_plan = 'ES' OR l_pay_plan = 'FE') then
5405: If l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5406: l_lac_sf52_rec.first_action_la_code1 = 'Q3A' then
5407: ghr_msl_pkg.g_first_noa_code := '891';
5408: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5409: l_lac_sf52_rec.first_action_la_code1 = 'Q3B' then
5410: ghr_msl_pkg.g_first_noa_code := '892';
5411: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and

Line 5410: ghr_msl_pkg.g_first_noa_code := '892';

5406: l_lac_sf52_rec.first_action_la_code1 = 'Q3A' then
5407: ghr_msl_pkg.g_first_noa_code := '891';
5408: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5409: l_lac_sf52_rec.first_action_la_code1 = 'Q3B' then
5410: ghr_msl_pkg.g_first_noa_code := '892';
5411: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5412: l_lac_sf52_rec.first_action_la_code1 = 'Q3D' then
5413: ghr_msl_pkg.g_first_noa_code := '890';
5414: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and

Line 5413: ghr_msl_pkg.g_first_noa_code := '890';

5409: l_lac_sf52_rec.first_action_la_code1 = 'Q3B' then
5410: ghr_msl_pkg.g_first_noa_code := '892';
5411: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5412: l_lac_sf52_rec.first_action_la_code1 = 'Q3D' then
5413: ghr_msl_pkg.g_first_noa_code := '890';
5414: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5415: l_lac_sf52_rec.first_action_la_code1 = 'Q3E' then
5416: ghr_msl_pkg.g_first_noa_code := '890';
5417: end if;

Line 5416: ghr_msl_pkg.g_first_noa_code := '890';

5412: l_lac_sf52_rec.first_action_la_code1 = 'Q3D' then
5413: ghr_msl_pkg.g_first_noa_code := '890';
5414: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5415: l_lac_sf52_rec.first_action_la_code1 = 'Q3E' then
5416: ghr_msl_pkg.g_first_noa_code := '890';
5417: end if;
5418: END IF;
5419:
5420: --------end of Bug #7577249

Line 5423: ghr_msl_pkg.g_sl_payband_conv := FALSE;

5419:
5420: --------end of Bug #7577249
5421:
5422: -- Bug 8320557 SL Equivalent Pay band conv
5423: ghr_msl_pkg.g_sl_payband_conv := FALSE;
5424: ---Changes related to SL/ST/IP conversion
5425: If l_essl_table and l_eq_pay_plan = 'SL' then
5426: -- If l_pay_plan in ('SL', 'ST', 'IP') then
5427: If l_effective_date = to_date('2009/04/12','YYYY/MM/DD') then

Line 5444: ghr_msl_pkg.g_sl_payband_conv := TRUE;

5440: hr_utility.raise_error;
5441: end if;
5442:
5443: If NVL(l_locality_adj,0) > 0 then
5444: ghr_msl_pkg.g_sl_payband_conv := TRUE;
5445: ghr_msl_pkg.g_first_noa_code := '890';
5446: l_lac_sf52_rec.first_action_la_code1 := 'ZLM';
5447: l_lac_sf52_rec.first_action_la_desc1 := 'P.L. 110-372';
5448: end if;

Line 5445: ghr_msl_pkg.g_first_noa_code := '890';

5441: end if;
5442:
5443: If NVL(l_locality_adj,0) > 0 then
5444: ghr_msl_pkg.g_sl_payband_conv := TRUE;
5445: ghr_msl_pkg.g_first_noa_code := '890';
5446: l_lac_sf52_rec.first_action_la_code1 := 'ZLM';
5447: l_lac_sf52_rec.first_action_la_desc1 := 'P.L. 110-372';
5448: end if;
5449: end if;

Line 5677: ghr_msl_pkg.g_ses_msl_process := 'N';

5673: l_pay_calc_in_data.current_adj_basic_pay := l_old_adj_basic_pay;
5674: l_pay_calc_in_data.current_step_or_rate := l_step_or_rate;
5675: l_pay_calc_in_data.pa_request_id := null;
5676:
5677: ghr_msl_pkg.g_ses_msl_process := 'N';
5678:
5679: if l_pay_plan in ('ES','EP','IE','FE') and l_essl_table then
5680: ghr_msl_pkg.g_ses_msl_process := 'Y';
5681: l_step_or_rate := '00';

Line 5680: ghr_msl_pkg.g_ses_msl_process := 'Y';

5676:
5677: ghr_msl_pkg.g_ses_msl_process := 'N';
5678:
5679: if l_pay_plan in ('ES','EP','IE','FE') and l_essl_table then
5680: ghr_msl_pkg.g_ses_msl_process := 'Y';
5681: l_step_or_rate := '00';
5682: end if;
5683:
5684: -- Bug # 8320557 to add basic pay with locality

Line 5685: if ghr_msl_pkg.g_sl_payband_conv then

5681: l_step_or_rate := '00';
5682: end if;
5683:
5684: -- Bug # 8320557 to add basic pay with locality
5685: if ghr_msl_pkg.g_sl_payband_conv then
5686: l_pay_calc_in_data.open_range_out_basic_pay := l_old_basic_pay+l_old_loc_diff;
5687: else
5688:
5689: ---3843306

Line 5845: ghr_msl_pkg.g_ses_msl_process := 'N';

5841: g_proc := 'ghr_pay_calc';
5842: raise msl_error;
5843: end;
5844:
5845: ghr_msl_pkg.g_ses_msl_process := 'N';
5846:
5847: l_new_basic_pay := l_pay_calc_out_data.basic_pay;
5848: l_new_locality_adj := l_pay_calc_out_data.locality_adj;
5849: l_new_adj_basic_pay := l_pay_calc_out_data.adj_basic_pay;

Line 5895: ghr_msl_pkg.g_msl_bp_paycap := NULL;

5891: hr_utility.set_location('l_new_availability_pay ' || to_char(l_new_availability_pay),21);
5892: end if;
5893:
5894: --Bug # 9309268
5895: ghr_msl_pkg.g_msl_bp_paycap := NULL;
5896: ghr_pay_caps.do_pay_caps_main
5897: (p_pa_request_id => null
5898: ,p_effective_date => l_effective_date
5899: ,p_duty_station_id => l_duty_station_id --bug# 13414643,13403289

Line 5992: IF ghr_msl_pkg.g_ses_bp_capped = TRUE and NVL(l_new_locality_adj,0) = 0 THEN

5988: when msl_error then
5989: raise;
5990: when others then
5991: -- Bug # 9309268 Handled to insert a comment and set basic pay to pay cap when basic pay is exceeding the pay cap
5992: IF ghr_msl_pkg.g_ses_bp_capped = TRUE and NVL(l_new_locality_adj,0) = 0 THEN
5993: l_bp_diff := l_new_basic_pay - ghr_msl_pkg.g_msl_bp_paycap;
5994: l_new_basic_pay := ghr_msl_pkg.g_msl_bp_paycap;
5995: l_new_adj_basic_pay := l_new_basic_pay;
5996: l_new_total_salary := l_new_total_salary - l_bp_diff;

Line 5993: l_bp_diff := l_new_basic_pay - ghr_msl_pkg.g_msl_bp_paycap;

5989: raise;
5990: when others then
5991: -- Bug # 9309268 Handled to insert a comment and set basic pay to pay cap when basic pay is exceeding the pay cap
5992: IF ghr_msl_pkg.g_ses_bp_capped = TRUE and NVL(l_new_locality_adj,0) = 0 THEN
5993: l_bp_diff := l_new_basic_pay - ghr_msl_pkg.g_msl_bp_paycap;
5994: l_new_basic_pay := ghr_msl_pkg.g_msl_bp_paycap;
5995: l_new_adj_basic_pay := l_new_basic_pay;
5996: l_new_total_salary := l_new_total_salary - l_bp_diff;
5997: l_comment := 'MSL: New Basic Pay has been set to Maximum Pay Cap ';

Line 5994: l_new_basic_pay := ghr_msl_pkg.g_msl_bp_paycap;

5990: when others then
5991: -- Bug # 9309268 Handled to insert a comment and set basic pay to pay cap when basic pay is exceeding the pay cap
5992: IF ghr_msl_pkg.g_ses_bp_capped = TRUE and NVL(l_new_locality_adj,0) = 0 THEN
5993: l_bp_diff := l_new_basic_pay - ghr_msl_pkg.g_msl_bp_paycap;
5994: l_new_basic_pay := ghr_msl_pkg.g_msl_bp_paycap;
5995: l_new_adj_basic_pay := l_new_basic_pay;
5996: l_new_total_salary := l_new_total_salary - l_bp_diff;
5997: l_comment := 'MSL: New Basic Pay has been set to Maximum Pay Cap ';
5998: ins_upd_per_extra_info

Line 6008: ghr_msl_pkg.g_msl_bp_paycap := NULL;

6004: 'Err is '||sqlerrm(sqlcode),23);
6005: l_mslerrbuf := 'Error in do_pay_caps_main Sql Err is '|| sqlerrm(sqlcode);
6006: raise msl_error;
6007: END IF;
6008: ghr_msl_pkg.g_msl_bp_paycap := NULL;
6009: end;
6010:
6011: IF upper(p_action) IN ('SHOW','REPORT') THEN
6012: -- Bug#2383392

Line 6364: ghr_mto_int.set_log_program_name('GHR_MSL_PKG');

6360:
6361: END LOOP;
6362:
6363: IF upper(p_action) = 'CREATE' then
6364: ghr_mto_int.set_log_program_name('GHR_MSL_PKG');
6365: ELSE
6366: ghr_mto_int.set_log_program_name('MSL_'||p_mass_salary);
6367: END IF;
6368:

Line 6703: ghr_msl_pkg.g_ses_msl_process := ses_flag;

6699: --
6700: PROCEDURE set_ses_msl_process(ses_flag varchar2)
6701: IS
6702: BEGIN
6703: ghr_msl_pkg.g_ses_msl_process := ses_flag;
6704: END set_ses_msl_process;
6705:
6706: -- Bug#5063304 Created this new procedure
6707:

Line 7494: ghr_msl_pkg.g_first_noa_code := NULL;

7490: l_pay_basis := p_pay_basis;
7491: hr_utility.set_location('The location id is:'||l_location_id,1);
7492: /*5470182 need to be commented
7493: --------GPPA Update 46 start
7494: ghr_msl_pkg.g_first_noa_code := NULL;
7495: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
7496: LOOP
7497: l_eq_pay_plan := cur_eq_ppl_rec.EQUIVALENT_PAY_PLAN;
7498: exit;

Line 7505: ghr_msl_pkg.g_first_noa_code := '890';

7501: l_eq_pay_plan = 'GS' AND
7502: l_lac_sf52_rec.first_action_la_code1 = 'QLP' AND
7503: l_lac_sf52_rec.first_action_la_code2 = 'ZLM' THEN
7504:
7505: ghr_msl_pkg.g_first_noa_code := '890';
7506:
7507: end if;
7508: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
7509: l_eq_pay_plan = 'FW' AND

Line 7512: ghr_msl_pkg.g_first_noa_code := '890';

7508: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
7509: l_eq_pay_plan = 'FW' AND
7510: l_lac_sf52_rec.first_action_la_code1 = 'RJR' THEN
7511:
7512: ghr_msl_pkg.g_first_noa_code := '890';
7513:
7514: end if;
7515: --------GPPA Update 46 end */
7516:

Line 7518: ghr_msl_pkg.g_first_noa_code := '890';

7514: end if;
7515: --------GPPA Update 46 end */
7516:
7517: --5470182
7518: ghr_msl_pkg.g_first_noa_code := '890';
7519: l_lac_sf52_rec.first_action_la_code1 := 'Q3C';
7520: -- l_lac_sf52_rec.first_action_la_desc1 := 'Reg. 534.404(h)';
7521: l_lac_sf52_rec.first_action_la_desc1 := ghr_pa_requests_pkg.get_lookup_description(800,'GHR_US_LEGAL_AUTHORITY','Q3C');
7522:

Line 7731: ghr_msl_pkg.g_ses_msl_process := 'N';

7727: l_pay_calc_in_data.pa_request_id := null;
7728:
7729: l_pay_calc_in_data.open_range_out_basic_pay := l_ses_basic_pay;
7730:
7731: ghr_msl_pkg.g_ses_msl_process := 'N';
7732:
7733: IF l_pay_plan in ('ES','EP','IE','FE') and l_essl_table THEN
7734: ghr_msl_pkg.g_ses_msl_process := 'Y';
7735: l_step_or_rate := '00';

Line 7734: ghr_msl_pkg.g_ses_msl_process := 'Y';

7730:
7731: ghr_msl_pkg.g_ses_msl_process := 'N';
7732:
7733: IF l_pay_plan in ('ES','EP','IE','FE') and l_essl_table THEN
7734: ghr_msl_pkg.g_ses_msl_process := 'Y';
7735: l_step_or_rate := '00';
7736: END IF;
7737:
7738: BEGIN

Line 7841: ghr_msl_pkg.g_ses_msl_process := 'N';

7837: g_proc := 'ghr_pay_calc';
7838: raise msl_error;
7839: END;
7840:
7841: ghr_msl_pkg.g_ses_msl_process := 'N';
7842:
7843: l_new_basic_pay := l_pay_calc_out_data.basic_pay;
7844: l_new_locality_adj := l_pay_calc_out_data.locality_adj;
7845: l_new_adj_basic_pay := l_pay_calc_out_data.adj_basic_pay;

Line 7997: IF ghr_msl_pkg.g_ses_bp_capped = TRUE and upper(p_action) IN ('SHOW') THEN

7993: exception
7994: when msl_error then
7995: raise;
7996: when others then
7997: IF ghr_msl_pkg.g_ses_bp_capped = TRUE and upper(p_action) IN ('SHOW') THEN
7998: l_comment := 'MSL: Exceeded Basic Pay Cap EX III';
7999: l_sel_flg := 'N';
8000: ins_upd_per_extra_info
8001: (p_person_id,l_effective_date, l_sel_flg, l_comment,p_mass_salary_id);

Line 8389: ghr_mto_int.set_log_program_name('GHR_MSL_PKG');

8385:
8386: END LOOP;*/
8387:
8388: IF upper(p_action) = 'CREATE' then
8389: ghr_mto_int.set_log_program_name('GHR_MSL_PKG');
8390: ELSE
8391: ghr_mto_int.set_log_program_name('MSL_'||p_mass_salary);
8392: END IF;
8393:

Line 8897: END GHR_MSL_PKG;

8893: raise msl_error;
8894: end check_select_flg_ses;
8895:
8896:
8897: END GHR_MSL_PKG;