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

MP000030 SAP ABAP INCLUDE - Module Pool for Infotype P0000: PAI Modules







MP000030 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 MP000030 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 MP000030. "Basic submit
SUBMIT MP000030 AND RETURN. "Return to original report after report execution complete
SUBMIT MP000030 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 P0000: PAI Modules


INCLUDES used within this REPORT MP000030

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:

SET_ASYNCHRON_FLAG CALL FUNCTION 'SET_ASYNCHRON_FLAG'. "SRON1045291

CD_GET_INFO CALL FUNCTION 'CD_GET_INFO' EXPORTING persnr = pspar-pernr no_authority_check = 'X' IMPORTING payroll_until = lv_payroll_until * highest_paydt = EXCEPTIONS no_record_found = 1 OTHERS = 2.

RH_CHECK_POSITION_FOR_UPDATE CALL FUNCTION 'RH_CHECK_POSITION_FOR_UPDATE' EXPORTING checkposition = pspar-plans checkbegda = p0000-begda checkendda = p0000-begda "XFYAHRK054245 * checkendda = p0000-endda "XFYAHRK054245 checkperson = p0000-pernr * CHECKPROZENT = 0 * CHECKIT0001 = checkcode = 'INS' authy = 'X' consistency = 'X' enqueue = ' ' * obsolet = 'X' "XWSN409980 obsolet = obsolete_check "XWSN409980 * COSTCENTER = * POS_TAB_CC_CHECK = * POS_UPD_CHECK = prozent = ' ' IMPORTING checksubrc = ch_subrc TABLES subrc_message_tab = ch_mess_tab.

RH_GET_POSITION_TAB CALL FUNCTION 'RH_GET_POSITION_TAB' EXPORTING getperson = p0000-pernr getbegda = p0000-begda getendda = p0000-endda bypass_buffer = 'X' "N1832575 TABLES position_tab = position_tab EXCEPTIONS nothing_found = 1 OTHERS = 2.

RH_CHECK_POSITION_FOR_UPDATE CALL FUNCTION 'RH_CHECK_POSITION_FOR_UPDATE' EXPORTING * CHECKPOSITION = pspar-plans "XREN527877 checkposition = position_tab-objid "XREN527877 checkbegda = p0000-begda checkendda = p0000-begda checkperson = p0000-pernr * CHECKPROZENT = 0 * CHECKIT0001 = checkcode = 'INS' authy = 'X' IMPORTING checksubrc = ch_subrc TABLES subrc_message_tab = ch_mess_tab.

RH_INTEGRATION_PERSON * call function 'RH_INTEGRATION_PERSON'"XFYK051004 "XFYP30K074671 * exporting "XFYK051004 "XFYP30K074671 * it0001 = p0001 "XFYK051004 "XFYP30K074671 * ri_molga = p_molga "XFYK051004 "XFYP30K074671 * importing "XFYK051004 "XFYP30K074671 * person_integrated = prs_int "XFYK051004 "XFYP30K074671 * exceptions "XFYK051004 "XFYP30K074671 * parameters_missing = 1 "XFYK051004 "XFYP30K074671 * others = 2. "XFYK051004 "XFYP30K074671

POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING titel = text-ttl "Eingabe des Austritts abbrechen diagnosetext1 = text-001 "Wenn Sie keine Austrittsmaßnahme diagnosetext2 = text-002 "eingeben, wird der Eintritt bis diagnosetext3 = text-003 "zum 31.12.9999 verlängert.

RP_MODIFY_INFOGROUP CALL FUNCTION 'RP_MODIFY_INFOGROUP' "QNUK84230 TABLES infogroup = infogr. "QNUK84230

HRPAD00_GET_DYNMEAS_DEPTH CALL FUNCTION 'HRPAD00_GET_DYNMEAS_DEPTH' IMPORTING depth = depth.

HRPAD00_FREE_LAST_DMSNR CALL FUNCTION 'HRPAD00_FREE_LAST_DMSNR'.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING titlebar = text-014 text_question = text-013 text_button_1 = 'Weiter '(011) icon_button_1 = 'ICON_OKAY' text_button_2 = 'Zurück '(012) icon_button_2 = 'ICON_SYSTEM_CANCEL' display_cancel_button = ' ' IMPORTING answer = popup_answer EXCEPTIONS text_not_found = 1 OTHERS = 2.

BDC_RUNNING * call function 'BDC_RUNNING' "XDPK001340 "XDPK001339 * importing "XDPK001340 "XDPK001339 * bi_info = bi_info "XDPK001340 "XDPK001339 * exceptions "XDPK001340 "XDPK001339 * bi_invalid_data = 1 "XDPK001340 "XDPK001339 * bi_notaktiv = 2 "XDPK001340 "XDPK001339 * others = 3. "XDPK001340 "XDPK001339

DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = dynpname dynumb = dynpnumb TABLES dynpfields = dynpvaluetab EXCEPTIONS * others = 01 "QNOK073077 OTHERS = 01. "QNOK073077

DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' "QNOK029749 EXPORTING "QNOK029749 dyname = dynpname "QNOK029749 dynumb = dynpnumb "QNOK029749 TABLES "QNOK029749 dynpfields = dynpvaluetab "QNOK029749 EXCEPTIONS "QNOK029749 * invalid_abapworkarea = 01 "QNOK029749"QNOK073077 * invalid_dynprofield = 02 "QNOK029749"QNOK073077 * invalid_dynproname = 03 "QNOK029749"QNOK073077 * invalid_dynpronummer = 04 "QNOK029749"QNOK073077 * invalid_request = 05. "QNOK029749"QNOK073077

HELP_VALUES_GET_WITH_TABLE CALL FUNCTION 'HELP_VALUES_GET_WITH_TABLE' EXPORTING display = l_display "XFYK051004 * fieldname = 'T503' "QNOK029749 * tabname = 'PERSK' "QNOK029749 fieldname = 'PERSK' "QNOK029749 tabname = 'T503' "QNOK029749 show_all_values_at_first_time = 'X' "QNOK029749 title_in_values_list = l_title "QNOK073077 IMPORTING select_value = pspar-persk TABLES fields = ihelp_fields valuetab = helptab. "QNOK073077

RH_OBJID_REQUEST CALL FUNCTION 'RH_OBJID_REQUEST' EXPORTING plvar = planvar otype = 'S' seark_begda = p0000-begda seark_endda = p0000-endda dynpro_repid = or_repid dynpro_dynnr = or_dynnr dynpro_searkfield = 'PSPAR-PLANS' * no_seark_popup = ' ' "XMKAL0K093206 IMPORTING sel_object = or_objec EXCEPTIONS cancelled = 1 wrong_condition = 2 nothing_found = 3 * illegal_mode = 4 "XMKAL0K093206 internal_error = 5 OTHERS = 6.

RH_OBJID_REQUEST CALL FUNCTION 'RH_OBJID_REQUEST' EXPORTING plvar = planvar otype = 'S' seark_begda = p0000-begda seark_endda = p0000-endda dynpro_repid = or_repid dynpro_dynnr = or_dynnr dynpro_searkfield = 'PSPAR-PLANS' * no_seark_popup = ' ' "XMKAL0K093206 IMPORTING sel_object = or_objec EXCEPTIONS cancelled = 1 wrong_condition = 2 nothing_found = 3 * illegal_mode = 4 "XMKAL0K093206 internal_error = 5 OTHERS = 6.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING * TITLEBAR = ' ' * DIAGNOSE_OBJECT = ' ' text_question = text-nmv text_button_1 = text-011 icon_button_1 = 'ICON_OKAY' text_button_2 = text-012 icon_button_2 = 'ICON_CANCEL' default_button = '2' display_cancel_button = ' ' * USERDEFINED_F1_HELP = ' ' start_column = 25 start_row = 8 * POPUP_TYPE = IMPORTING answer = p_answer EXCEPTIONS text_not_found = 1 OTHERS = 2.

POPUP_TO_CONFIRM





CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING * TITLEBAR = ' ' * DIAGNOSE_OBJECT = ' ' text_question = text-nmk text_button_1 = text-011 icon_button_1 = 'ICON_OKAY' text_button_2 = text-012 icon_button_2 = 'ICON_CANCEL' default_button = '2' display_cancel_button = ' ' * USERDEFINED_F1_HELP = ' ' start_column = 25 start_row = 8 IMPORTING answer = p_answer EXCEPTIONS text_not_found = 1 OTHERS = 2.

HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' EXPORTING bzpnr = init_pernr massn = space massg = p0000-massg.

HRCCE_GET_GPVALUE_STATUS_CHGLP CALL FUNCTION 'HRCCE_GET_GPVALUE_STATUS_CHGLP' EXPORTING im_pernr = p0000-pernr im_werks = pspar-werks im_begda = p0000-begda im_endda = p0000-endda im_infty = '0000' IMPORTING es_message = lv_msg.



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 MP000030 or its description.