MP50AI01 SAP ABAP INCLUDE - documentation and ABAP source code
MP50AI01 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 MP50AI01 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 MP50AI01. "Basic submit
SUBMIT MP50AI01 AND RETURN. "Return to original report after report execution complete
SUBMIT MP50AI01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
INCLUDES used within this REPORT MP50AI01
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:
RH_CHECK_PERSON_ORIG_IN_DIALOG CALL FUNCTION 'RH_CHECK_PERSON_ORIG_IN_DIALOG' EXPORTING otype = 'P' pernr = rp50g-pernr IMPORTING ok_for_editing = check_okay.
HR_CHECK_AUTHORITY_INFTY CALL FUNCTION 'HR_CHECK_AUTHORITY_INFTY' "XREN506221 EXPORTING "XREN506221 tclas = 'A' "XREN506221 pernr = rp50g-pernr "XREN506221 infty = '0000' "XREN506221 subty = subty_massn "XREN506221 begda = sel-begst "XREN506221 endda = '99991231' "XREN506221 level = 'W' "XREN506221 * TABLES "XREN506221 * I0001 = "XREN506221 EXCEPTIONS "XREN506221 no_authorization = 1 "XREN506221 internal_error = 2 "XREN506221 OTHERS = 3. "XREN506221
HR_COUNTRY_MOVE_ENTER_ACTIONS CALL FUNCTION 'HR_COUNTRY_MOVE_ENTER_ACTIONS' EXPORTING date_in = sel-begst persnr = rp50g-pernr massn = t529a-massn IMPORTING date_out = sel-begst hire_pernr = hire_pernr hire_action = hire_action hire_reason = hire_reason fire_pernr = fire_pernr fire_action = fire_action fire_reason = fire_reason no_fire_action = ldw_no_fire "XFYAHRK060974 EXCEPTIONS cancelled = 1 OTHERS = 2.
HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' "XYVL9CK008359 EXPORTING "XYVL9CK008359 bzpnr = rp50g-pernr "XYVL9CK008359 massn = hire_action "XYVL9CK008359 massg = hire_reason "XYVL9CK008359 EXCEPTIONS "XYVL9CK008359 OTHERS = 0. "XYVL9CK008359
HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' "XYVL9CK008359 EXPORTING "XYVL9CK008359 bzpnr = init_pernr "XYVL9CK008359 massn = space "XYVL9CK008359 massg = space "XYVL9CK008359 EXCEPTIONS "XYVL9CK008359 OTHERS = 0. "XYVL9CK008359
HR_CHECK_AUTHORITY_INFTY CALL FUNCTION 'HR_CHECK_AUTHORITY_INFTY' EXPORTING tclas = 'A' pernr = rp50g-pernr infty = '0000' subty = subty_massn begda = sel-begst endda = '99991231' level = 'W' * TABLES * I0001 = EXCEPTIONS no_authorization = 1 internal_error = 2 OTHERS = 3.
HRCCE_CHANGE_LEGEAL_PER_ACTION CALL FUNCTION 'HRCCE_CHANGE_LEGEAL_PER_ACTION' EXPORTING date_in = sel-begst persnr = rp50g-pernr massn = t529a-massn IMPORTING date_out = sel-begst hire_pernr = hire_pernr hire_action = hire_action hire_reason = hire_reason fire_pernr = fire_pernr fire_action = fire_action fire_reason = fire_reason EXCEPTIONS cancelled = 1 OTHERS = 2.
HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' EXPORTING bzpnr = init_pernr massn = space massg = hire_reason EXCEPTIONS OTHERS = 0.
HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' "XYVL9CK008359 EXPORTING "XYVL9CK008359 bzpnr = init_pernr "XYVL9CK008359 massn = space "XYVL9CK008359 massg = space "XYVL9CK008359 EXCEPTIONS "XYVL9CK008359 OTHERS = 0. "XYVL9CK008359
HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' "XYVL9CK008359 EXPORTING "XYVL9CK008359 bzpnr = init_pernr "XYVL9CK008359 massn = space "XYVL9CK008359 massg = space "XYVL9CK008359 EXCEPTIONS "XYVL9CK008359 OTHERS = 0. "XYVL9CK008359
HR_HANDLE_PERSONAL_RELATIONS CALL FUNCTION 'HR_HANDLE_PERSONAL_RELATIONS' EXPORTING * OTYPE = 'P' old_pernr = fire_pernr new_pernr = hire_pernr * begda = sel-begst "XFYAHRK053282 begda = pspar-begda "XFYAHRK053282 massn = t529a-massn leave_flg = ' ' "QICPH9K007375 EXCEPTIONS new_pernr_missing = 1 no_active_plvar = 2 no_authorization = 3 error_during_processing = 4 corr_exit = 5 OTHERS = 6.
HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' "XYVL9CK008359 EXPORTING "XYVL9CK008359 bzpnr = orig_pernr_for_rfpnr "XYVL9CK008359 massn = fire_action "XYVL9CK008359 massg = fire_reason "XYVL9CK008359 EXCEPTIONS "XYVL9CK008359 OTHERS = 0. "XYVL9CK008359
DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'.
HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' "XYVL9CK008359 EXPORTING "XYVL9CK008359 bzpnr = init_pernr "XYVL9CK008359 massn = space "XYVL9CK008359 massg = space "XYVL9CK008359 EXCEPTIONS "XYVL9CK008359 OTHERS = 0. "XYVL9CK008359
HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' EXPORTING bzpnr = init_pernr massn = space massg = space EXCEPTIONS OTHERS = 0.
HRCCE_CHGLP_COPY_INFTY_POP_UP CALL FUNCTION 'HRCCE_CHGLP_COPY_INFTY_POP_UP' EXPORTING pernr = orig_pernr_for_rfpnr begda = pspar-begda * ENDDA = '99991231' * molga = '' IMPORTING infty_tab = copy_termi_infty[] EXCEPTIONS invalid_pernr = 1 OTHERS = 2 .
HRPAD00_SET_BZPNR CALL FUNCTION 'HRPAD00_SET_BZPNR' EXPORTING bzpnr = orig_pernr_for_rfpnr massn = fire_action massg = fire_reason EXCEPTIONS OTHERS = 0.
DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'.
CALL FUNCTION 'HRPAD00_SET_BZPNR' EXPORTING bzpnr = init_pernr massn = space massg = space EXCEPTIONS OTHERS = 0.
CHECK_EXIST_PROG CALL FUNCTION 'CHECK_EXIST_PROG' EXPORTING name = ce_ben_wb * MTYPE = ' ' IMPORTING exist = exist_prog EXCEPTIONS tr_invalid_type = 1 OTHERS = 2 .
DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'.
DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'. "QNUK81109
DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'. "MELN1675567
DEQUEUE_ALL * CALL FUNCTION 'DEQUEUE_ALL'. "
RH_CHECK_PERSON_ORIG_IN_DIALOG CALL FUNCTION 'RH_CHECK_PERSON_ORIG_IN_DIALOG' EXPORTING otype = 'AP' pernr = rpapp-aplno IMPORTING ok_for_editing = check_okay.
DEQUEUE_ALL * call function 'DEQUEUE_ALL'. "XDPK073068
DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'.
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 MP50AI01 or its description.