DBA Data[Home] [Help]

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.21.12010000.3 2008/12/02 11:01:23 vmididho 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.21.12010000.3 2008/12/02 11:01:23 vmididho 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 453: ghr_msl_pkg.g_first_noa_code := NULL;

449: l_pay_basis := p_pay_basis;
450: hr_utility.set_location('The location id is:'||l_location_id,1);
451:
452: --------GPPA Update 46 start
453: ghr_msl_pkg.g_first_noa_code := NULL;
454: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
455: LOOP
456: l_eq_pay_plan := cur_eq_ppl_rec.EQUIVALENT_PAY_PLAN;
457: exit;

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

460: l_eq_pay_plan = 'GS' AND
461: l_lac_sf52_rec.first_action_la_code1 = 'QLP' AND
462: l_lac_sf52_rec.first_action_la_code2 = 'ZLM' THEN
463:
464: ghr_msl_pkg.g_first_noa_code := '890';
465:
466: end if;
467: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
468: l_eq_pay_plan = 'FW' AND

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

467: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
468: l_eq_pay_plan = 'FW' AND
469: l_lac_sf52_rec.first_action_la_code1 = 'RJR' THEN
470:
471: ghr_msl_pkg.g_first_noa_code := '890';
472:
473: end if;
474: --------GPPA Update 46 end
475:

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

684: l_pay_calc_in_data.current_adj_basic_pay := l_old_adj_basic_pay;
685: l_pay_calc_in_data.current_step_or_rate := l_step_or_rate;
686: l_pay_calc_in_data.pa_request_id := null;
687:
688: ghr_msl_pkg.g_ses_msl_process := 'N';
689:
690: IF l_pay_plan in ('ES','EP','IE','FE') and l_essl_table THEN
691: ghr_msl_pkg.g_ses_msl_process := 'Y';
692: l_step_or_rate := '00';

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

687:
688: ghr_msl_pkg.g_ses_msl_process := 'N';
689:
690: IF l_pay_plan in ('ES','EP','IE','FE') and l_essl_table THEN
691: ghr_msl_pkg.g_ses_msl_process := 'Y';
692: l_step_or_rate := '00';
693: END IF;
694:
695: BEGIN

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

792: g_proc := 'ghr_pay_calc';
793: raise msl_error;
794: END;
795:
796: ghr_msl_pkg.g_ses_msl_process := 'N';
797:
798: l_new_basic_pay := l_pay_calc_out_data.basic_pay;
799: l_new_locality_adj := l_pay_calc_out_data.locality_adj;
800: l_new_adj_basic_pay := l_pay_calc_out_data.adj_basic_pay;

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

1365: l_index := l_index +1;
1366: END LOOP;
1367:
1368: IF upper(p_action) = 'CREATE' then
1369: ghr_mto_int.set_log_program_name('GHR_MSL_PKG');
1370: ELSE
1371: ghr_mto_int.set_log_program_name('MSL_'||p_mass_salary);
1372: END IF;
1373:

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

5303: l_pay_basis := p_pay_basis;
5304:
5305: hr_utility.set_location('The location id is:'||l_location_id,12345);
5306:
5307: ghr_msl_pkg.g_first_noa_code := '894';
5308: --------GPPA Update 46 start
5309: -- ghr_msl_pkg.g_first_noa_code := NULL;
5310: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
5311: LOOP

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

5305: hr_utility.set_location('The location id is:'||l_location_id,12345);
5306:
5307: ghr_msl_pkg.g_first_noa_code := '894';
5308: --------GPPA Update 46 start
5309: -- ghr_msl_pkg.g_first_noa_code := NULL;
5310: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
5311: LOOP
5312: l_eq_pay_plan := cur_eq_ppl_rec.EQUIVALENT_PAY_PLAN;
5313: exit;

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

5316: l_eq_pay_plan = 'GS' AND
5317: l_lac_sf52_rec.first_action_la_code1 = 'QLP' AND
5318: l_lac_sf52_rec.first_action_la_code2 = 'ZLM' THEN
5319:
5320: ghr_msl_pkg.g_first_noa_code := '890';
5321:
5322: end if;
5323: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
5324: l_eq_pay_plan = 'FW' AND

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

5323: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
5324: l_eq_pay_plan = 'FW' AND
5325: l_lac_sf52_rec.first_action_la_code1 = 'RJR' THEN
5326:
5327: ghr_msl_pkg.g_first_noa_code := '890';
5328:
5329: end if;
5330: --------GPPA Update 46 end
5331:

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

5333: ---- Start of Bug #7577249
5334: IF l_essl_table and (l_eq_pay_plan = 'ES' OR l_pay_plan = 'FE') then
5335: If l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5336: l_lac_sf52_rec.first_action_la_code1 = 'Q3A' then
5337: ghr_msl_pkg.g_first_noa_code := '891';
5338: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5339: l_lac_sf52_rec.first_action_la_code1 = 'Q3B' then
5340: ghr_msl_pkg.g_first_noa_code := '892';
5341: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and

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

5336: l_lac_sf52_rec.first_action_la_code1 = 'Q3A' then
5337: ghr_msl_pkg.g_first_noa_code := '891';
5338: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5339: l_lac_sf52_rec.first_action_la_code1 = 'Q3B' then
5340: ghr_msl_pkg.g_first_noa_code := '892';
5341: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5342: l_lac_sf52_rec.first_action_la_code1 = 'Q3D' then
5343: ghr_msl_pkg.g_first_noa_code := '890';
5344: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and

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

5339: l_lac_sf52_rec.first_action_la_code1 = 'Q3B' then
5340: ghr_msl_pkg.g_first_noa_code := '892';
5341: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5342: l_lac_sf52_rec.first_action_la_code1 = 'Q3D' then
5343: ghr_msl_pkg.g_first_noa_code := '890';
5344: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5345: l_lac_sf52_rec.first_action_la_code1 = 'Q3E' then
5346: ghr_msl_pkg.g_first_noa_code := '890';
5347: end if;

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

5342: l_lac_sf52_rec.first_action_la_code1 = 'Q3D' then
5343: ghr_msl_pkg.g_first_noa_code := '890';
5344: elsif l_pay_plan in ('ES', 'FE', 'IE', 'EP') and
5345: l_lac_sf52_rec.first_action_la_code1 = 'Q3E' then
5346: ghr_msl_pkg.g_first_noa_code := '890';
5347: end if;
5348: END IF;
5349:
5350: --------end of Bug #7577249

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

5567: l_pay_calc_in_data.current_adj_basic_pay := l_old_adj_basic_pay;
5568: l_pay_calc_in_data.current_step_or_rate := l_step_or_rate;
5569: l_pay_calc_in_data.pa_request_id := null;
5570:
5571: ghr_msl_pkg.g_ses_msl_process := 'N';
5572:
5573: if l_pay_plan in ('ES','EP','IE','FE') and l_essl_table then
5574: ghr_msl_pkg.g_ses_msl_process := 'Y';
5575: l_step_or_rate := '00';

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

5570:
5571: ghr_msl_pkg.g_ses_msl_process := 'N';
5572:
5573: if l_pay_plan in ('ES','EP','IE','FE') and l_essl_table then
5574: ghr_msl_pkg.g_ses_msl_process := 'Y';
5575: l_step_or_rate := '00';
5576: end if;
5577:
5578: ---3843306

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

5728: g_proc := 'ghr_pay_calc';
5729: raise msl_error;
5730: end;
5731:
5732: ghr_msl_pkg.g_ses_msl_process := 'N';
5733:
5734: l_new_basic_pay := l_pay_calc_out_data.basic_pay;
5735: l_new_locality_adj := l_pay_calc_out_data.locality_adj;
5736: l_new_adj_basic_pay := l_pay_calc_out_data.adj_basic_pay;

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

6228:
6229: END LOOP;
6230:
6231: IF upper(p_action) = 'CREATE' then
6232: ghr_mto_int.set_log_program_name('GHR_MSL_PKG');
6233: ELSE
6234: ghr_mto_int.set_log_program_name('MSL_'||p_mass_salary);
6235: END IF;
6236:

Line 6563: ghr_msl_pkg.g_ses_msl_process := ses_flag;

6559: --
6560: PROCEDURE set_ses_msl_process(ses_flag varchar2)
6561: IS
6562: BEGIN
6563: ghr_msl_pkg.g_ses_msl_process := ses_flag;
6564: END set_ses_msl_process;
6565:
6566: -- Bug#5063304 Created this new procedure
6567:

Line 7346: ghr_msl_pkg.g_first_noa_code := NULL;

7342: l_pay_basis := p_pay_basis;
7343: hr_utility.set_location('The location id is:'||l_location_id,1);
7344: /*5470182 need to be commented
7345: --------GPPA Update 46 start
7346: ghr_msl_pkg.g_first_noa_code := NULL;
7347: FOR cur_eq_ppl_rec IN cur_eq_ppl(l_pay_plan)
7348: LOOP
7349: l_eq_pay_plan := cur_eq_ppl_rec.EQUIVALENT_PAY_PLAN;
7350: exit;

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

7353: l_eq_pay_plan = 'GS' AND
7354: l_lac_sf52_rec.first_action_la_code1 = 'QLP' AND
7355: l_lac_sf52_rec.first_action_la_code2 = 'ZLM' THEN
7356:
7357: ghr_msl_pkg.g_first_noa_code := '890';
7358:
7359: end if;
7360: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
7361: l_eq_pay_plan = 'FW' AND

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

7360: if l_effective_date >= to_date('2007/01/07','YYYY/MM/DD') AND
7361: l_eq_pay_plan = 'FW' AND
7362: l_lac_sf52_rec.first_action_la_code1 = 'RJR' THEN
7363:
7364: ghr_msl_pkg.g_first_noa_code := '890';
7365:
7366: end if;
7367: --------GPPA Update 46 end */
7368:

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

7366: end if;
7367: --------GPPA Update 46 end */
7368:
7369: --5470182
7370: ghr_msl_pkg.g_first_noa_code := '890';
7371: l_lac_sf52_rec.first_action_la_code1 := 'Q3C';
7372: -- l_lac_sf52_rec.first_action_la_desc1 := 'Reg. 534.404(h)';
7373: l_lac_sf52_rec.first_action_la_desc1 := ghr_pa_requests_pkg.get_lookup_description(800,'GHR_US_LEGAL_AUTHORITY','Q3C');
7374:

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

7579: l_pay_calc_in_data.pa_request_id := null;
7580:
7581: l_pay_calc_in_data.open_range_out_basic_pay := l_ses_basic_pay;
7582:
7583: ghr_msl_pkg.g_ses_msl_process := 'N';
7584:
7585: IF l_pay_plan in ('ES','EP','IE','FE') and l_essl_table THEN
7586: ghr_msl_pkg.g_ses_msl_process := 'Y';
7587: l_step_or_rate := '00';

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

7582:
7583: ghr_msl_pkg.g_ses_msl_process := 'N';
7584:
7585: IF l_pay_plan in ('ES','EP','IE','FE') and l_essl_table THEN
7586: ghr_msl_pkg.g_ses_msl_process := 'Y';
7587: l_step_or_rate := '00';
7588: END IF;
7589:
7590: BEGIN

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

7687: g_proc := 'ghr_pay_calc';
7688: raise msl_error;
7689: END;
7690:
7691: ghr_msl_pkg.g_ses_msl_process := 'N';
7692:
7693: l_new_basic_pay := l_pay_calc_out_data.basic_pay;
7694: l_new_locality_adj := l_pay_calc_out_data.locality_adj;
7695: l_new_adj_basic_pay := l_pay_calc_out_data.adj_basic_pay;

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

7842: exception
7843: when msl_error then
7844: raise;
7845: when others then
7846: IF ghr_msl_pkg.g_ses_bp_capped = TRUE and upper(p_action) IN ('SHOW') THEN
7847: l_comment := 'MSL: Exceeded Basic Pay Cap EX III';
7848: l_sel_flg := 'N';
7849: ins_upd_per_extra_info
7850: (p_person_id,l_effective_date, l_sel_flg, l_comment,p_mass_salary_id);

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

8229:
8230: END LOOP;*/
8231:
8232: IF upper(p_action) = 'CREATE' then
8233: ghr_mto_int.set_log_program_name('GHR_MSL_PKG');
8234: ELSE
8235: ghr_mto_int.set_log_program_name('MSL_'||p_mass_salary);
8236: END IF;
8237:

Line 8733: END GHR_MSL_PKG;

8729: raise msl_error;
8730: end check_select_flg_ses;
8731:
8732:
8733: END GHR_MSL_PKG;