MSERPF02 SAP ABAP INCLUDE - Subroutines: Tree Operations (Clipboard, Dialog Boxes for Corr.)

MSERPF02 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 MSERPF02 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.

Text pool values

INCLUDES used within this REPORT MSERPF02

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:

RS_TREE_CONSTRUCT
  CALL FUNCTION 'RS_TREE_CONSTRUCT'
       EXPORTING
            INSERT_ID          = P_TREETAB-ID
            RELATIONSHIP       = 'CHILD'      "or brother = 'NEXT'
       TABLES
            NODETAB            = L_NODETAB
       EXCEPTIONS
            TREE_FAILURE       = 01
            ID_NOT_FOUND       = 02
            WRONG_RELATIONSHIP = 03
            OTHERS             = 12.

POPUP_TO_CONFIRM_STEP
    CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'
         EXPORTING
              TEXTLINE1     = 'Tree changed'(023)
              TEXTLINE2     = 'Save previously?'(021)
              TITEL         = 'Back'(022)
         IMPORTING
              ANSWER        = L_ANSWER.

RS_TREE_GET_CURRENT_LAYOUT
*      CALL FUNCTION 'RS_TREE_GET_CURRENT_LAYOUT'
*           IMPORTING
*                CURSOR_COLUMN   = L_CURSOR_COLUMN
*                CURSOR_LINE     = L_CURSOR_LINE
*                FIRST_NODE      = L_FIRST_NODE
*                FIRST_NODE_TYPE = L_FIRST_NODE_TYPE
*                LIST_COLUMN     = L_LIST_COLUMN
*                LIST_LINE       = L_LIST_LINE
*           TABLES
*                LAYOUT          = L_LAYOUT.

TR_ORDER_CHOICE_CORRECTION
      CALL FUNCTION 'TR_ORDER_CHOICE_CORRECTION'
           IMPORTING
                EV_TASK = L_CORRNO
           EXCEPTIONS
                OTHERS  = 04.

TLOGO_OBJECT_APPEND
      CALL FUNCTION 'TLOGO_OBJECT_APPEND'
           EXPORTING
               KORRNR   =  L_CORRNO
               OBJTYPE  =  L_KO200-OBJECT
               OBJ_NAME =  L_KO200-OBJ_NAME
           EXCEPTIONS
               OTHERS = 08.

RS_TREE_SET_CURRENT_TREE
*      CALL FUNCTION 'RS_TREE_SET_CURRENT_TREE'
*           TABLES
*             NODELIST = SNODE.     "global table: nodes of current tree

RS_TREE_SET_CURRENT_LAYOUT
*      CALL FUNCTION 'RS_TREE_SET_CURRENT_LAYOUT'
*           EXPORTING
*                CURSOR_COLUMN       = L_CURSOR_COLUMN
*                CURSOR_LINE         = L_CURSOR_LINE
*                FIRST_NODE          = L_FIRST_NODE
*                FIRST_NODE_TYPE     = L_FIRST_NODE_TYPE
*                LIST_COLUMN         = L_LIST_COLUMN
*                LIST_LINE           = L_LIST_LINE
*           IMPORTING
*                INCONSISTENT_LAYOUT = L_INCONSISTENT_LAYOUT
*           TABLES
*                LAYOUT              = L_LAYOUT.

TR_SYS_PARAMS
  CALL FUNCTION 'TR_SYS_PARAMS'
       IMPORTING  SYSTEM_CLIENT_EDIT = L_SYSTEM_CLIENT_EDIT
       EXCEPTIONS OTHERS.

RS_TREE_GET_CURRENT_LAYOUT
    CALL FUNCTION 'RS_TREE_GET_CURRENT_LAYOUT'
      IMPORTING
        CURSOR_COLUMN   = L_CURSOR_COLUMN
        CURSOR_LINE     = L_CURSOR_LINE
        FIRST_NODE      = L_FIRST_NODE
        FIRST_NODE_TYPE = L_FIRST_NODE_TYPE
        LIST_COLUMN     = L_LIST_COLUMN
        LIST_LINE       = L_LIST_LINE
      TABLES
        LAYOUT          = L_LAYOUT.

TR_OBJECTS_INSERT
    CALL FUNCTION 'TR_OBJECTS_INSERT'
      TABLES
         WT_KO200 = L_KO200
         WT_E071K = L_E071K
      EXCEPTIONS
         OTHERS   = 04.

RS_TREE_SET_CURRENT_TREE
    CALL FUNCTION 'RS_TREE_SET_CURRENT_TREE'
      TABLES
        NODELIST = SNODE.     "global table: nodes of current tree

RS_TREE_SET_CURRENT_LAYOUT
    CALL FUNCTION 'RS_TREE_SET_CURRENT_LAYOUT'
      EXPORTING
        CURSOR_COLUMN       = L_CURSOR_COLUMN
        CURSOR_LINE         = L_CURSOR_LINE
        FIRST_NODE          = L_FIRST_NODE
        FIRST_NODE_TYPE     = L_FIRST_NODE_TYPE
        LIST_COLUMN         = L_LIST_COLUMN
        LIST_LINE           = L_LIST_LINE
      IMPORTING
        INCONSISTENT_LAYOUT = L_INCONSISTENT_LAYOUT
      TABLES
        LAYOUT              = L_LAYOUT.

TR_OBJECTS_CHECK
  CALL FUNCTION 'TR_OBJECTS_CHECK'
       EXPORTING
            IV_NO_SHOW_OPTION     = P_FLAG_NO_SHOW_OPTION
       IMPORTING
            WE_OBJECTS_APPENDABLE = P_FLAG_OBJECTS_APPENDABLE
       TABLES
            WT_KO200              = L_KO200
            WT_E071K              = L_E071K
       EXCEPTIONS
            SHOW_ONLY_OTHER_ERROR   = 1
            CANCEL_EDIT_OTHER_ERROR = 2.

TR_OBJECTS_CHECK
  CALL FUNCTION 'TR_OBJECTS_CHECK'
       IMPORTING
            WE_OBJECTS_APPENDABLE = P_FLAG_OBJECTS_APPENDABLE
       TABLES
            WT_KO200              = L_KO200
            WT_E071K              = L_E071K
       EXCEPTIONS
            SHOW_ONLY_OTHER_ERROR   = 1
            CANCEL_EDIT_OTHER_ERROR = 2.