1: PACKAGE BODY GHR_MRE_PKG AS
2: /* $Header: ghmreexe.pkb 120.8.12010000.2 2008/08/05 15:07:22 ubhat ship $ */
3:
4: --
5: -- Global Declaration
5: -- Global Declaration
6: --
7:
8: g_no NUMBER := 0;
9: g_package VARCHAR2(32) := 'GHR_MRE_PKG';
10: g_proc VARCHAR2(32) := null;
11: g_business_group_id NUMBER := null;
12: l_log_text VARCHAR2(2000) := null;
13: l_mslerrbuf VARCHAR2(2000) := null;
516: raise mass_error;
517: END;
518:
519: IF UPPER(p_action) = 'CREATE' then
520: ghr_mto_int.set_log_program_name('GHR_MRE_PKG');
521: ELSE
522: ghr_mto_int.set_log_program_name('MRE_'||p_mass_realignment_name);
523: END IF;
524:
970: EXCEPTION
971: WHEN OTHERS THEN
972: l_mslerrbuf := 'Preview - Others error in Get retained grade '||
973: 'Error is '||' Sql Err is '|| sqlerrm(sqlcode);
974: ghr_mre_pkg.pr('Person ID '||to_char(per.person_id),'ERROR 2',l_mslerrbuf);
975: RAISE mass_error;
976: END;
977: END IF;
978:
3142: EXCEPTION
3143: when others then
3144: l_mslerrbuf := 'Preview - Others error in Get retained grade '||
3145: 'Error is '||' Sql Err is '|| sqlerrm(sqlcode);
3146: ghr_mre_pkg.pr('Person ID '||to_char(p_person_id),'ERROR 2',l_mslerrbuf);
3147: raise mass_error;
3148: END;
3149: END IF;
3150:
3927:
3928: END;
3929:
3930:
3931: END GHR_MRE_PKG;