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

MP50JF12 SAP ABAP INCLUDE - PM01: Modification Concept for IT, Generate ABAP Dictionary Structures







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


Text pool values


Title: PM01: Modification Concept for IT, Generate ABAP Dictionary Structures


INCLUDES used within this REPORT MP50JF12

FORM APPEND_CI_INCLUDE USING VALUE(P_INFTY) LIKE T582A-INFTY.
FORM COPY_INCLUDE USING VALUE(P_SOURCE_PGMNA) LIKE D020S-PROG


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:

RS_DD_ADD CALL FUNCTION 'RS_DD_ADD' EXPORTING objname = p_objname objtype = 'S' popup = ' '.

RS_DD_SHOW CALL FUNCTION 'RS_DD_SHOW' EXPORTING objname = p_objname objtype = 'S'. "Struktur

RS_DD_EDIT CALL FUNCTION 'RS_DD_EDIT' EXPORTING objname = l_objname objtype = 'S'. "Struktur

DDIF_NAMETAB_GET CALL FUNCTION 'DDIF_NAMETAB_GET' EXPORTING tabname = l_name uclen = '01' IMPORTING x030l_wa = nametab * TABLES * X031L_TAB = EXCEPTIONS not_found = 1 OTHERS = 2.

TR_SYS_PARAMS CALL FUNCTION 'TR_SYS_PARAMS' IMPORTING systemtype = l_systemtype.

TR_SYS_PARAMS CALL FUNCTION 'TR_SYS_PARAMS' IMPORTING systemtype = l_systemtype.

TR_OBJECT_CHECK CALL FUNCTION 'TR_OBJECT_CHECK' EXPORTING * wi_order = g_corrnum wi_ko200 = wi_ko200 IMPORTING we_order = g_corrnum TABLES wt_e071k = wt_e071k EXCEPTIONS OTHERS = 1.

TR_OBJECT_INSERT CALL FUNCTION 'TR_OBJECT_INSERT' EXPORTING wi_order = g_corrnum wi_ko200 = wi_ko200 TABLES wt_e071k = wt_e071k EXCEPTIONS OTHERS = 1.

TR_OBJECT_CHECK CALL FUNCTION 'TR_OBJECT_CHECK' EXPORTING * wi_order = g_corrnum wi_ko200 = wi_ko200 IMPORTING we_order = g_corrnum TABLES wt_e071k = wt_e071k EXCEPTIONS OTHERS = 1.

TR_OBJECT_INSERT CALL FUNCTION 'TR_OBJECT_INSERT' EXPORTING wi_order = g_corrnum wi_ko200 = wi_ko200 TABLES wt_e071k = wt_e071k EXCEPTIONS OTHERS = 1.

TR_OBJECT_CHECK CALL FUNCTION 'TR_OBJECT_CHECK' EXPORTING * wi_order = g_corrnum wi_ko200 = wi_ko200 IMPORTING we_order = g_corrnum TABLES wt_e071k = wt_e071k EXCEPTIONS OTHERS = 1.

TR_OBJECT_INSERT CALL FUNCTION 'TR_OBJECT_INSERT' EXPORTING wi_order = g_corrnum wi_ko200 = wi_ko200 TABLES wt_e071k = wt_e071k EXCEPTIONS OTHERS = 1.

DDIF_STATE_GET CALL FUNCTION 'DDIF_STATE_GET' EXPORTING type = 'TABL' name = p_ddic_obj_to * ID = * STATE = 'M' IMPORTING gotstate = l_gotstate.

DDIF_TABL_GET CALL FUNCTION 'DDIF_TABL_GET' EXPORTING name = p_ddic_obj_from * STATE = 'A' langu = sy-langu IMPORTING gotstate = l_gotstate dd02v_wa = l_header dd09l_wa = l_techsettings TABLES dd03p_tab = l_fields.

DDIF_TABL_GET CALL FUNCTION 'DDIF_TABL_GET' EXPORTING name = lv_ps_name IMPORTING gotstate = l_gotstate dd02v_wa = ls_ps_header EXCEPTIONS illegal_input = 1 OTHERS = 2.

DDIF_TABL_PUT CALL FUNCTION 'DDIF_TABL_PUT' EXPORTING name = p_ddic_obj_to dd02v_wa = l_header TABLES dd03p_tab = l_fields.

DDIF_TABL_PUT CALL FUNCTION 'DDIF_TABL_PUT' EXPORTING name = p_ddic_obj_to dd02v_wa = l_header dd09l_wa = l_techsettings TABLES dd03p_tab = l_fields.

DDIF_TABL_ACTIVATE CALL FUNCTION 'DDIF_TABL_ACTIVATE' EXPORTING name = p_ddic_obj_to auth_chk = ' '. "change!!!

TR_TADIR_INTERFACE





CALL FUNCTION 'TR_TADIR_INTERFACE' EXPORTING * WI_DELETE_TADIR_ENTRY = ' ' * WI_REMOVE_REPAIR_FLAG = ' ' * WI_SET_REPAIR_FLAG = ' ' wi_test_modus = space wi_tadir_pgmid = 'R3TR' wi_tadir_object = 'TABL' wi_tadir_obj_name = p_obj_name * WI_TADIR_KORRNUM = ' ' wi_tadir_srcsystem = tadir-srcsystem wi_tadir_author = tadir_author wi_tadir_devclass = l_devclass wi_tadir_masterlang = tadir-masterlang.

DDIF_TABL_GET CALL FUNCTION 'DDIF_TABL_GET' EXPORTING name = l_ddic_obj * STATE = 'A' langu = sy-langu IMPORTING dd02v_wa = l_header dd09l_wa = l_techsettings TABLES dd03p_tab = l_fields dd05m_tab = l_dd05m_tab dd08v_tab = l_dd08v_tab.

DDIF_TABL_PUT CALL FUNCTION 'DDIF_TABL_PUT' EXPORTING name = l_ddic_obj dd02v_wa = l_header * dd09l_wa = l_techsettings TABLES dd03p_tab = l_fields dd05m_tab = l_dd05m_tab dd08v_tab = l_dd08v_tab.

DDIF_TABL_ACTIVATE CALL FUNCTION 'DDIF_TABL_ACTIVATE' EXPORTING name = l_ddic_obj.

TR_SYS_PARAMS CALL FUNCTION 'TR_SYS_PARAMS' IMPORTING systemtype = l_systemtype.

TR_SYS_PARAMS CALL FUNCTION 'TR_SYS_PARAMS' IMPORTING systemtype = l_systemtype.

VIEW_MAINTENANCE_CALL CALL FUNCTION 'VIEW_MAINTENANCE_CALL' EXPORTING action = 'U' view_name = 'V_T582V'.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING titlebar = 'Dictionary-Objekt anlegen '(dic) * DIAGNOSE_OBJECT = ' ' text_question = l_text text_button_1 = 'Anlegen '(anl) icon_button_1 = 'ICON_CREATE' text_button_2 = 'Abbrechen'(can) icon_button_2 = 'ICON_CANCEL' * DEFAULT_BUTTON = '1' display_cancel_button = '' * USERDEFINED_F1_HELP = ' ' * START_COLUMN = 25 * START_ROW = 6 * POPUP_TYPE = IMPORTING answer = answer "1/2 = Ja/Nein * TABLES * PARAMETER = EXCEPTIONS text_not_found = 1 OTHERS = 2.

HR_DIALOG_ADD CALL FUNCTION 'HR_DIALOG_ADD' EXPORTING p_devclass = lc_devclass p_corrnum = g_corrnum p_dialog_name = l_dialog_name p_program_name = l_repid_name.

VIEW_MAINTENANCE_CALL CALL FUNCTION 'VIEW_MAINTENANCE_CALL' EXPORTING action = 'U' view_name = 'V_T582A'.

TR_SYS_PARAMS CALL FUNCTION 'TR_SYS_PARAMS' "RED#775435 IMPORTING systemtype = l_systemtype.

TR_TADIR_INTERFACE CALL FUNCTION 'TR_TADIR_INTERFACE' EXPORTING * WI_DELETE_TADIR_ENTRY = ' ' * WI_REMOVE_REPAIR_FLAG = ' ' * WI_SET_REPAIR_FLAG = ' ' wi_test_modus = ' ' wi_tadir_pgmid = 'R3TR' wi_tadir_object = 'PROG' wi_tadir_obj_name = l_prog * WI_TADIR_KORRNUM = ' ' wi_tadir_srcsystem = tadir-srcsystem * WI_TADIR_AUTHOR = ' ' wi_tadir_devclass = l_devclass * WI_TADIR_MASTERLANG = ' ' * WI_TADIR_CPROJECT = ' ' * WI_TADIR_VERSID = ' ' * WI_REMOVE_GENFLAG = ' ' wi_set_genflag = l_genflag "RED#775435 * WI_READ_ONLY = ' ' * IV_SET_EDTFLAG = ' ' * IMPORTING * NEW_GTADIR_ENTRY = * NEW_TADIR_ENTRY = EXCEPTIONS OTHERS = 99.

TR_ORDER_CHOICE_CORRECTION CALL FUNCTION 'TR_ORDER_CHOICE_CORRECTION' EXPORTING iv_category = 'SYST' iv_cli_dep = ' ' IMPORTING ev_task = task EXCEPTIONS invalid_category = 1 no_correction_selected = 2 OTHERS = 3.

TR_APPEND_TO_COMM CALL FUNCTION 'TR_APPEND_TO_COMM' EXPORTING pi_korrnum = task wi_e071 = l_e071 * WI_SIMULATION = ' ' * WI_SUPPRESS_KEY_CHECK = ' ' TABLES wt_e071k = l_tab_e071k EXCEPTIONS no_authorization = 1 no_systemname = 2 no_systemtype = 3 tr_check_keysyntax_error = 4 tr_check_obj_error = 5 tr_enqueue_failed = 6 tr_ill_korrnum = 7 tr_key_without_header = 8 tr_lockmod_failed = 9 tr_lock_enqueue_failed = 10 tr_modif_only_in_modif_order = 11 tr_not_owner = 12 tr_no_append_of_corr_entry = 13 tr_no_append_of_c_member = 14 tr_no_shared_repairs = 15 tr_order_not_exist = 16 tr_order_released = 17 tr_order_update_error = 18 tr_repair_only_in_repair_order = 19 tr_wrong_order_type = 20 wrong_client = 21 OTHERS = 22.

RH_CHECK_SYSTEM_TYPE CALL FUNCTION 'RH_CHECK_SYSTEM_TYPE' EXCEPTIONS sap_system = 1 OTHERS = 2.

RS_ACCESS_PERMISSION CALL FUNCTION 'RS_ACCESS_PERMISSION' EXPORTING object = lv_object object_class = 'ABAP' EXCEPTIONS canceled_in_corr = 1 enqueued_by_user = 2 enqueue_system_failure = 3 illegal_parameter_values = 4 locked_by_author = 5 no_modify_permission = 6 no_show_permission = 7 permission_failure = 8 request_language_denied = 9 OTHERS = 10.

DDIF_NAMETAB_GET CALL FUNCTION 'DDIF_NAMETAB_GET' EXPORTING tabname = lc_tabname TABLES dfies_tab = lt_dfies_tab EXCEPTIONS not_found = 1 OTHERS = 2.

DDIF_NAMETAB_GET CALL FUNCTION 'DDIF_NAMETAB_GET' EXPORTING tabname = lc_tabname TABLES dfies_tab = lt_dfies_tab EXCEPTIONS not_found = 1 OTHERS = 2.



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