SAP Reports / Programs | Personnel Management | Personnel Administration(PA-PA) SAP PA

MP003140 SAP ABAP INCLUDE - Module Pool for Infotype P0031 Form Routines for Common Part







MP003140 is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.

If you would like to execute this report or see the full code listing simply enter MP003140 into the relevant SAP transactions such as SE38 or SE80


ABAP code to call this SAP report using the submit statement

This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.






SUBMIT MP003140. "Basic submit
SUBMIT MP003140 AND RETURN. "Return to original report after report execution complete
SUBMIT MP003140 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Module Pool for Infotype P0031 Form Routines for Common Part


INCLUDES used within this REPORT MP003140

No INCLUDES are used within this REPORT code!


TABLES used within REPORT and the associated SELECT statement:





No SAP DATABASE tables are accessed within this REPORT code!


Function Modules used within report and the associated call statement:

HR_CHECK_AUTHORITY_INFTY CALL FUNCTION 'HR_CHECK_AUTHORITY_INFTY' "QICP30K132949 EXPORTING "QICP30K132949 PERNR = MRF_PERNR "QICP30K132949 INFTY = '0031' "QICP30K132949 SUBTY = SPACE "QICP30K132949 LEVEL = 'W'. "QICP30K132949

HR_PERSONEE_GETPERSON CALL FUNCTION 'HR_PERSONEE_GETPERSON' EXPORTING iv_employee_id = old_ref-pernr IV_WITH_AUTHORITY = space "Keine Berechtigungsprüfung IMPORTING ES_HRPERSONEE = ls_hrpersonee.

HR_EE_CREATE_CENTRALERSON CALL FUNCTION 'HR_EE_CREATE_CENTRALERSON' EXPORTING iv_employee_id = p0031-pernr IV_NAME = p0001-ename * IV_BEGINDATE = SY-DATUM "XDP305199 IV_BEGINDATE = p0001-begda "XDP305199 IV_NO_UPDATE = 'X' IV_WITH_AUTHORITY = space "Keine Berechtigungsprüfung IMPORTING EV_PERSON_ID = leading_cp.

RH_GET_PLOG_TAB CALL FUNCTION 'RH_GET_PLOG_TAB' TABLES plog_tab_tab = lt_plog_tab.

HR_ENQUEUE_OBJECT CALL FUNCTION 'HR_ENQUEUE_OBJECT' EXPORTING plvar = u_ppenq-plvar otype = u_ppenq-otype objid = u_ppenq-objid ENQUEUE_ONCE = ' ' * IMPORTING "CHKMAN * LOCK_USER = sy-uname "CHKMAN EXCEPTIONS ENQUEUE_FAILED = 0 OBJID_IS_INITIAL = 0 ILLEGAL_OTYPE = 0 INTERNAL_ERROR = 0 OTHERS = 0.

RH_GET_ACTIVE_WF_PLVAR CALL FUNCTION 'RH_GET_ACTIVE_WF_PLVAR' EXPORTING set_default_plvar = 'X' IMPORTING act_plvar = l_plvar EXCEPTIONS no_active_plvar = 0 OTHERS = 0.

HR_PERSONEE_GETPERSON CALL FUNCTION 'HR_PERSONEE_GETPERSON' EXPORTING iv_employee_id = p_pernr IV_WITH_AUTHORITY = space "Keine Berechtigungsprüfung IMPORTING ES_HRPERSONEE = ls_hrpersonee.

RH_READ_INFTY_1001_EXT CALL FUNCTION 'RH_READ_INFTY_1001_EXT' EXPORTING AUTHORITY = space WITH_STRU_AUTH = space ISTAT = '1' WITH_EV_FOR_INT = 'X' WITH_EV_FOR_EXT = 'X' TABLES i1001 = lt_relation objects = lt_object EXCEPTIONS NOTHING_FOUND = 0 WRONG_CONDITION = 0 OTHERS = 0.

HR_PERSONEE_INSERT CALL FUNCTION 'HR_PERSONEE_INSERT' EXPORTING is_hrpersonee = ls_hrpersonee iv_begindate = p_begda IV_WITH_AUTHORITY = space "Keine Prüfung IV_NO_UPDATE = 'X' "Nur im Puffer EXCEPTIONS no_authorization = 0 invalid_data = 2 OTHERS = 3.

HR_PERSONEE_GETPERSON CALL FUNCTION 'HR_PERSONEE_GETPERSON' EXPORTING iv_employee_id = p_pernr IV_WITH_AUTHORITY = space "Keine Berechtigungsprüfung IMPORTING ES_HRPERSONEE = ls_hrpersonee.

HR_CENTRALPERSON_GET CALL FUNCTION 'HR_CENTRALPERSON_GET' EXPORTING iv_person_id = ls_hrpersonee-personid IMPORTING EV_BEGINDATE = lv_begda.

HR_EE_CREATE_CENTRALERSON CALL FUNCTION 'HR_EE_CREATE_CENTRALERSON' EXPORTING iv_employee_id = p_pernr IV_NAME = i0001-ename IV_BEGINDATE = lv_begda IV_NO_UPDATE = 'X' "Update über PLOG_TAB in SAPUP50R IV_WITH_AUTHORITY = space "Keine Berechtigungsprüfung IMPORTING EV_PERSON_ID = lv_cp_id.



Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.







The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name MP003140 or its description.