SAP Reports / Programs | Payroll | Payroll: General Parts | Tools(PY-XX-TL) SAP PY

MPPU1240 SAP ABAP INCLUDE - Form Routines for SAPMPU12







MPPU1240 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 MPPU1240 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 MPPU1240. "Basic submit
SUBMIT MPPU1240 AND RETURN. "Return to original report after report execution complete
SUBMIT MPPU1240 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Form Routines for SAPMPU12


INCLUDES used within this REPORT MPPU1240

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:

RSTS_OPEN_RLC CALL FUNCTION 'RSTS_OPEN_RLC' EXPORTING name = $unix_file prom = 'I' EXCEPTIONS OTHERS = 1.

RSTS_READ CALL FUNCTION 'RSTS_READ' EXPORTING maxix = '1' showlg = 'X' IMPORTING alldata = alldata TABLES datatab = record EXCEPTIONS OTHERS = 1.

GUI_DOWNLOAD CALL FUNCTION 'GUI_DOWNLOAD' EXPORTING bin_filesize = file_length filename = filename filetype = file_type trunc_trailing_blanks = ' ' trunc_trailing_blanks_eol = ' ' write_lf = ' ' TABLES data_tab = send_table_asc EXCEPTIONS OTHERS = 22.

GUI_DOWNLOAD CALL FUNCTION 'GUI_DOWNLOAD' EXPORTING BIN_FILESIZE = file_length FILENAME = filename filetype = file_type "XMS note 723708 trunc_trailing_blanks = 'X' trunc_trailing_blanks_eol = ' ' TABLES DATA_TAB = send_table EXCEPTIONS OTHERS = 22.

RSTS_CLOSE CALL FUNCTION 'RSTS_CLOSE'. "XMS note 544998

AUTHORITY_CHECK_DATASET CALL FUNCTION 'AUTHORITY_CHECK_DATASET' EXPORTING program = program_name "QNY activity = sabc_act_write filename = file_name EXCEPTIONS no_authority = 1.

FILE_VALIDATE_NAME CALL FUNCTION 'FILE_VALIDATE_NAME' "YMLN1895590 EXPORTING logical_filename = gc_logical_filename CHANGING physical_filename = $unix_file EXCEPTIONS logical_filename_not_found = 1 validation_failed = 2 OTHERS = 3. "YMLN1895590

RSTS_OPEN_RLC CALL FUNCTION 'RSTS_OPEN_RLC' EXPORTING name = $temse_file prom = 'I' EXCEPTIONS OTHERS = 1.

RSTS_READ CALL FUNCTION 'RSTS_READ' EXPORTING maxix = '1' showlg = 'X' TABLES datatab = record EXCEPTIONS OTHERS = 1.

RSTS_CLOSE CALL FUNCTION 'RSTS_CLOSE'.

WS_FILENAME_GET CALL FUNCTION 'WS_FILENAME_GET' EXPORTING def_filename = ' ' def_path = last_path mask = ',*.*,*.*.'

WS_QUERY CALL FUNCTION 'WS_QUERY' EXPORTING environment = ' ' filename = pc_file query = 'FE' winid = ' ' IMPORTING return = returncode EXCEPTIONS inv_query = 01 no_batch = 02.

RSTS_OPEN_RLC CALL FUNCTION 'RSTS_OPEN_RLC' EXPORTING name = dataset prom = 'I' EXCEPTIONS OTHERS = 1.

RSTS_CLOSE CALL FUNCTION 'RSTS_CLOSE'.

FILE_VALIDATE_NAME CALL FUNCTION 'FILE_VALIDATE_NAME' "YMLN1895590 EXPORTING logical_filename = gc_logical_filename CHANGING physical_filename = unix_file EXCEPTIONS logical_filename_not_found = 1 validation_failed = 2 OTHERS = 3. "YMLN1895590

POPUP_TO_CONFIRM_LOSS_OF_DATA CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA' EXPORTING textline1 = text-100 textline2 = format titel = text-102 start_column = 16 IMPORTING answer = answer.

ENQUEUE_E_HR_IF_01 CALL FUNCTION 'ENQUEUE_E_HR_IF_01' EXPORTING ifnam = ifnam iftyp = '02' EXCEPTIONS foreign_lock = 1 system_failure = 2.

RS_DELETE_PROGRAM CALL FUNCTION 'RS_DELETE_PROGRAM' EXPORTING program = lv_repid with_includes = 'X' EXCEPTIONS enqueue_lock = 1 object_not_found = 2 permission_failure = 3 reject_deletion = 4 OTHERS = 5.

DEQUEUE_E_HR_IF_01





CALL FUNCTION 'DEQUEUE_E_HR_IF_01' EXPORTING ifnam = ifnam iftyp = '02'.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = 0 text = text-t04.

LIST_FROM_MEMORY CALL FUNCTION 'LIST_FROM_MEMORY' TABLES listobject = errorlist EXCEPTIONS not_found = 1 OTHERS = 2.

DISPLAY_LIST CALL FUNCTION 'DISPLAY_LIST' EXPORTING fullscreen = 'X' TABLES listobject = errorlist EXCEPTIONS OTHERS = 0.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = 0 text = text-t04.

POPUP_TO_CONFIRM_LOSS_OF_DATA CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA' EXPORTING textline1 = text-113 textline2 = format titel = text-115 start_column = 18 IMPORTING answer = answer.

ENQUEUE_E_HR_IF_01 CALL FUNCTION 'ENQUEUE_E_HR_IF_01' EXPORTING ifnam = p_format iftyp = '01' EXCEPTIONS foreign_lock = 1 system_failure = 2.

DEQUEUE_E_HR_IF_01 CALL FUNCTION 'DEQUEUE_E_HR_IF_01' EXPORTING ifnam = p_format iftyp = '01'.

TR_OBJECT_CHECK CALL FUNCTION 'TR_OBJECT_CHECK' EXPORTING wi_ko200 = i_ko200 TABLES wt_e071k = w_e071k EXCEPTIONS cancel_edit_other_error = 2 show_only_other_error = 1 OTHERS = 3.

VIEW_GET_DEVCLASS_STATE CALL FUNCTION 'VIEW_GET_DEVCLASS_STATE' EXPORTING dev_class = tadir-devclass IMPORTING transport_possible = transport_possible EXCEPTIONS not_found = 1 OTHERS = 2.

TR_TADIR_INTERFACE CALL FUNCTION 'TR_TADIR_INTERFACE' EXPORTING wi_delete_tadir_entry = 'X' wi_test_modus = ' ' wi_tadir_pgmid = tadir-pgmid wi_tadir_object = tadir-object wi_tadir_obj_name = p_objname EXCEPTIONS OTHERS = 25.

TR_TADIR_POPUP_ENTRY_E071 CALL FUNCTION 'TR_TADIR_POPUP_ENTRY_E071' EXPORTING wi_e071_pgmid = w_e071-pgmid wi_e071_object = w_e071-object wi_e071_obj_name = w_e071-obj_name EXCEPTIONS EXIT = 1 OTHERS = 2.

VIEW_GET_DEVCLASS_STATE CALL FUNCTION 'VIEW_GET_DEVCLASS_STATE' EXPORTING dev_class = tadir-devclass IMPORTING transport_possible = transport_possible EXCEPTIONS not_found = 1 OTHERS = 2.

TR_OBJECT_INSERT CALL FUNCTION 'TR_OBJECT_INSERT' EXPORTING wi_ko200 = i_ko200 IMPORTING we_task = w_e071-trkorr TABLES wt_e071k = w_e071k EXCEPTIONS OTHERS = 1.

VRM_SET_VALUES CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = id values = values[].

DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = $report_name dynumb = $dynpro_nr translate_to_upper = $translate_to_upper request = 'A' TABLES dynpfields = dynpfields EXCEPTIONS OTHERS = 1.



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