RBDIDOCR is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This report reduces SAP basic types for IDocs so that they can be adjusted to different applications...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.
If you would like to execute this report or see the full code listing simply enter RBDIDOCR into the relevant SAP transactions such as SE38 or SE80
Below is a list of transaction codes which are relevant to this SAP report
BD53 - Reduction of Message Types
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.
Title: IDoc Reduction
Text Symbol: 400 = No fields selected
Text Symbol: 303 = Field always selected
Text Symbol: 302 = Status
Text Symbol: 301 = Active
Text Symbol: 300 = Segment &: Fields
Text Symbol: 206 = IDoc Type
Text Symbol: 204 = Mandatory Segm.
Text Symbol: 202 = Not selected
Text Symbol: 200 = Selected
Text Symbol: 111 = Enter description of the reduced message type
Text Symbol: 110 = Select message type as reference for the reduction
Text Symbol: 105 = Color & / (&): Normal segment/field not selected
Text Symbol: 104 = Color & / (&): Normal segment/field selected
Text Symbol: 103 = Color & / (&): Core segment/field not selected
Text Symbol: 102 = Color & / (&): Core segment/field selected
Text Symbol: 101 = Color & / (&): Always selected
Text Symbol: 012 = End reduction
Text Symbol: 011 = Do you want to save first?
Text Symbol: 010 = Data changed!
Text Symbol: 002 = Short text does not exist.
Text Symbol: 001 = Text
Text Symbol: 000 = Field
INCLUDE MBDCONST.
INCLUDE RBDAUTHI.
INCLUDE MBDSUBPS.
No SAP DATABASE tables are accessed within this REPORT code!
CHECK_CUSTOMER_NAMES CALL FUNCTION 'CHECK_CUSTOMER_NAMES' EXPORTING OBJECTTYPE = 'TABU' TABLEKEY = TABLEKEY TABLENAME = 'EDMSG' IMPORTING KEY_ALLOWED = KEY_ALLOWED SYSTEM_SAP = SYSTEM_SAP TABLE_NOT_FOUND = TABLE_NOT_FOUND EXCEPTIONS OBJECTTYPE_NOT_FILLED = 01 TABLENAME_NOT_FILLED = 02.
CHECK_REDUCED_MESSAGE_TYPE CALL FUNCTION 'CHECK_REDUCED_MESSAGE_TYPE' EXPORTING MESSAGE_TYP = BDI_MESTYP NEWFLAG = 'X' IMPORTING REFMESSAGE_TYP = BDI_REFMESTYP IDOCTYP = IDOCTYP CIMTYP = CIMTYP EXCEPTIONS OTHERS = 1.
ENQUEUE_BDREDUCT CALL FUNCTION 'ENQUEUE_BDREDUCT' EXPORTING MSGTYP = BDI_MESTYP EXCEPTIONS FOREIGN_LOCK = 01 SYSTEM_FAILURE = 02.
CHECK_REDUCED_MESSAGE_TYPE CALL FUNCTION 'CHECK_REDUCED_MESSAGE_TYPE' EXPORTING MESSAGE_TYP = BDI_MESTYP NEWFLAG = ' ' IMPORTING REFMESSAGE_TYP = BDI_REFMESTYP IDOCTYP = IDOCTYP CIMTYP = CIMTYP EXCEPTIONS OTHERS = 1.
ENQUEUE_BDREDUCT CALL FUNCTION 'ENQUEUE_BDREDUCT' EXPORTING MSGTYP = BDI_MESTYP EXCEPTIONS FOREIGN_LOCK = 01 SYSTEM_FAILURE = 02.
CHECK_REDUCED_MESSAGE_TYPE CALL FUNCTION 'CHECK_REDUCED_MESSAGE_TYPE' EXPORTING MESSAGE_TYP = BDI_MESTYP NEWFLAG = ' ' IMPORTING REFMESSAGE_TYP = BDI_REFMESTYP IDOCTYP = IDOCTYP CIMTYP = CIMTYP EXCEPTIONS OTHERS = 1.
CHECK_REDUCED_MESSAGE_TYPE CALL FUNCTION 'CHECK_REDUCED_MESSAGE_TYPE' EXPORTING MESSAGE_TYP = BDI_MESTYP NEWFLAG = ' ' IMPORTING REFMESSAGE_TYP = BDI_REFMESTYP IDOCTYP = IDOCTYP CIMTYP = CIMTYP EXCEPTIONS OTHERS = 1.
CHECK_REDUCED_MESSAGE_TYPE CALL FUNCTION 'CHECK_REDUCED_MESSAGE_TYPE' EXPORTING MESSAGE_TYP = BDI_MESTYP NEWFLAG = ' ' IMPORTING REFMESSAGE_TYP = BDI_REFMESTYP IDOCTYP = IDOCTYP CIMTYP = CIMTYP EXCEPTIONS OTHERS = 1.
CHECK_REDUCED_MESSAGE_TYPE CALL FUNCTION 'CHECK_REDUCED_MESSAGE_TYPE' EXPORTING MESSAGE_TYP = BDI_MESTYP NEWFLAG = ' ' IMPORTING REFMESSAGE_TYP = BDI_REFMESTYP IDOCTYP = IDOCTYP CIMTYP = CIMTYP EXCEPTIONS OTHERS = 1.
TR_OBJECT_CHECK CALL FUNCTION 'TR_OBJECT_CHECK' EXPORTING WI_KO200 = WI_KO200 IMPORTING WE_ORDER = WE_ORDER WE_TASK = WE_TASK WE_KO200 = WE_KO200 TABLES WT_E071K = WT_E071K EXCEPTIONS ERROR_MESSAGE = 01.
IDOCTYPE_EXISTENCE_CHECK CALL FUNCTION 'IDOCTYPE_EXISTENCE_CHECK' EXPORTING pi_idoctyp = IDOC_TYPE PI_READ_DEVC = ' ' IMPORTING PE_ATTRIBUTES = IDOC_ATTR EXCEPTIONS OBJECT_NOT_FOUND = 1 DB_ERROR = 2 OTHERS = 3 .
EDI_IDOC_SYNTAX_GET CALL FUNCTION 'EDI_IDOC_SYNTAX_GET' EXPORTING PI_IDOCTYP = IDOC_TYPE PI_CIMTYP = CIM_TYPE TABLES PT_SYNTAX_TABLE = T_IDOCSYN EXCEPTIONS SYNTAX_NOT_FOUND = 1.
DDIF_TABL_GET CALL FUNCTION 'DDIF_TABL_GET' EXPORTING NAME = SEGNAME LANGU = SY-LANGU IMPORTING DD02V_WA = HEADER EXCEPTIONS ILLEGAL_INPUT = 1 OTHERS = 2.
IDOC_SEGMENT_STRUCTURE_READ CALL FUNCTION 'IDOC_SEGMENT_STRUCTURE_READ' EXPORTING RELEASE = '' SEGTYP = SEGMENT TABLES SEGMENT_STRUCT = TT_NAMETAB_P EXCEPTIONS SEGMENT_UNKNOWN = 1 SEGMENT_STRUCTURE_UNKNOWN = 2 SEGMENT_NOT_IN_RELEASE = 3 OTHERS = 4.
VIEW_MARK_WRITE CALL FUNCTION 'VIEW_MARK_WRITE' EXPORTING OBJNAME = 'BD53' BEGIN = 'X'.
MESSAGE_TYPE_CREATE_AS_COPY CALL FUNCTION 'MESSAGE_TYPE_CREATE_AS_COPY' EXPORTING MESTYP_REF = BDI_REFMESTYP MESTYP_COPY = BDI_MESTYP FORCED_MODE = 'X' TABLES FIELD_MAPPING = T_EDIMAP EXCEPTIONS MESTYP_COPY_ALREADY_EXISTS = 01 MESTYP_REF_DOES_NOT_EXIST = 02.
VIEW_MARK_WRITE * call function 'VIEW_MARK_WRITE' " deletion BCEK007851 * exporting " deletion BCEK007851 * objname = 'BD53' " deletion BCEK007851 * begin = space. " deletion BCEK007851
VIEW_MARK_WRITE CALL FUNCTION 'VIEW_MARK_WRITE' EXPORTING OBJNAME = 'BD53' BEGIN = SPACE.
CALL FUNCTION 'MESSAGE_TYPE_DELETE' EXPORTING MESSAGE_TYPE = MESTYP.
VIEW_MARK_WRITE CALL FUNCTION 'VIEW_MARK_WRITE' EXPORTING OBJNAME = 'BD53' BEGIN = 'X'.
VIEW_MARK_WRITE CALL FUNCTION 'VIEW_MARK_WRITE' EXPORTING OBJNAME = 'BD53' BEGIN = SPACE.
VIEW_MARK_WRITE CALL FUNCTION 'VIEW_MARK_WRITE' EXPORTING OBJNAME = 'BD53' BEGIN = 'X'.
VIEW_MARK_WRITE CALL FUNCTION 'VIEW_MARK_WRITE' EXPORTING OBJNAME = 'BD53' BEGIN = SPACE.
RS_TREE_CONSTRUCT CALL FUNCTION 'RS_TREE_CONSTRUCT' TABLES NODETAB = T_NODETAB_DISP EXCEPTIONS TREE_FAILURE = 01.
RS_TREE_CONSTRUCT CALL FUNCTION 'RS_TREE_CONSTRUCT' TABLES NODETAB = T_NODETAB EXCEPTIONS TREE_FAILURE = 01.
RS_TREE_LIST_DISPLAY CALL FUNCTION 'RS_TREE_LIST_DISPLAY' EXPORTING CALLBACK_PROGRAM = 'RBDIDOCR' CALLBACK_USER_COMMAND = 'HANDLE_USER_COMMAND' CALLBACK_TEXT_DISPLAY = ' ' CALLBACK_COLOR_DISPLAY = ' ' CHECK_DUPLICATE_NAME = '1' COLOR_OF_LINK = '1' COLOR_OF_NODE = '1' LOWER_CASE_SENSITIVE = ' ' MODIFICATION_LOG = ' ' NODE_LENGTH = 30 TEXT_LENGTH = 0 TEXT_LENGTH1 = 0 TEXT_LENGTH2 = 0 SCREEN_START_COLUMN = 0 SCREEN_START_LINE = 0 SCREEN_END_COLUMN = 0 SCREEN_END_LINE = 0 SUPPRESS_NODE_OUTPUT = ' '.
RS_TREE_MODIFY_NODE CALL FUNCTION 'RS_TREE_MODIFY_NODE' "#EC FB_OLDED EXPORTING NODE_ID = T_TREENODES-ID NAME = T_TREENODES-NAME TYPE = T_TREENODES-TYPE LINK = T_TREENODES-LINK COLOR = T_TREENODES-COLOR TEXT = T_TREENODES-TEXT TEXT1 = T_TREENODES-TEXT1.
RS_TREE_MODIFY_NODE CALL FUNCTION 'RS_TREE_MODIFY_NODE' "#EC FB_OLDED EXPORTING NODE_ID = T_TREENODES-ID NAME = T_TREENODES-NAME TYPE = T_TREENODES-TYPE LINK = T_TREENODES-LINK COLOR = T_TREENODES-COLOR TEXT = T_TREENODES-TEXT TEXT1 = T_TREENODES-TEXT1.
DEQUEUE_BDREDUCT CALL FUNCTION 'DEQUEUE_BDREDUCT' EXPORTING MSGTYP = BDI_MESTYP.
DEQUEUE_BDREDUCT CALL FUNCTION 'DEQUEUE_BDREDUCT' EXPORTING MSGTYP = BDI_MESTYP.
DEQUEUE_BDREDUCT CALL FUNCTION 'DEQUEUE_BDREDUCT' EXPORTING MSGTYP = BDI_MESTYP.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' "#EC FB_OLDED EXPORTING DEFAULTOPTION = 'Y' TEXTLINE1 = 'Die Daten wurden verändert!'(010) TEXTLINE2 = 'Wollen Sie vorher sichern?'(011) TITEL = 'Reduzierung beenden'(012) IMPORTING ANSWER = ANSWER.
REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_callback_program = sy-repid i_callback_pf_status_set = gi_status_set i_callback_user_command = gi_user_command i_grid_title = header is_layout = wa_layout it_fieldcat = gti_fieldcat[] i_screen_start_column = 5 i_screen_start_line = 3 i_screen_end_column = 90 i_screen_end_line = 30 TABLES t_outtab = out_list EXCEPTIONS OTHERS = 0.
TR_TASK_OVERVIEW CALL FUNCTION 'TR_TASK_OVERVIEW' EXPORTING IV_USERNAME = SY-UNAME IV_CATEGORY = 'SYST' IV_CLIENT = SY-MANDT EXCEPTIONS INVALID_USERNAME = 01 INVALID_CATEGORY = 02 INVALID_CLIENT = 03 INTERNAL_ERROR = 04.
TR_OBJECTS_CHECK CALL FUNCTION 'TR_OBJECTS_CHECK' IMPORTING WE_ORDER = WE_ORDER WE_TASK = WE_TASK * WE_OBJECTS_APPENDABLE = TABLES WT_KO200 = WT_KO200 WT_E071K = WT_E071K * TT_TADIR = EXCEPTIONS ERROR_MESSAGE = 01.
TR_OBJECTS_INSERT CALL FUNCTION 'TR_OBJECTS_INSERT' EXPORTING WI_ORDER = WE_ORDER IMPORTING WE_ORDER = WE_ORDER WE_TASK = WE_TASK TABLES WT_KO200 = WT_KO200 WT_E071K = WT_E071K * TT_TADIR = EXCEPTIONS ERROR_MESSAGE = 01.
ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'ICON_INCLUDE_IN_SELECTION' info = text-200 IMPORTING RESULT = icon_select EXCEPTIONS OTHERS = 0.
ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'ICON_REMOVE_FROM_SELECTION' info = text-202 IMPORTING RESULT = icon_nonselect EXCEPTIONS OTHERS = 0.
ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'ICON_LED_GREEN' info = text-303 IMPORTING RESULT = icon_mfield EXCEPTIONS OTHERS = 0.
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 RBDIDOCR or its description.