MKCBRDUM SAP ABAP INCLUDE - Reference Program for SAP-EIS/CO-PA Info Systems

MKCBRDUM 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 MKCBRDUM 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 MKCBRDUM

INCLUDE MKCBRC10.
INCLUDE MKCBGC20.
N INCLUDE MKCBRCNL.
2 INCLUDE RKDBATDA.
2 202 INCLUDE RKDBATSE.
2 201 INCLUDE RKDBATSEKE.
2 202 INCLUDE RKDBATSE1.
2 201 INCLUDE RKDBATSE1.
2 960 INCLUDE RKDPRESENTATIONTYPE.
2 INCLUDE RKDBATFO1.
2 INCLUDE RKDBATFO.

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:

RKD_BATCH_TEXT_GET
 U  001   CALL FUNCTION 'RKD_BATCH_TEXT_GET'
 U  001        IMPORTING E_TEXT_REPEAT = SA_REP.

RKD_BATCH_TEXT_GET
 U  040   CALL FUNCTION 'RKD_BATCH_TEXT_GET'
 U  040        IMPORTING E_TEXT_VARIANT = SA_VAR.

RKD_BATCH_TEXT_GET
 U        CALL FUNCTION 'RKD_BATCH_TEXT_GET'
 U             IMPORTING E_TEXT_BLOCKE = SA_E01.

RKD_REPORT_START_EIS_1
 U        CALL FUNCTION 'RKD_REPORT_START_EIS_1'
 U             EXPORTING APPLCLASS = RKB1D-APPLCLASS
 U  001                  NEUAUF    = RKB1D-NEUAUF
 U                       REPID     = RKB1D-REPID
 U                       SUBCLASS  = RKB1D-SUBCLASS
 U  040                  VARIANTE  = VARIANTE
 U                       TABNAME   = RKB1D-TABNAME
 U              CHANGING C_TS_VRANGE = G_TS_VRANGE.

ENQUEUE_EKCCOIXCOPA
    002     CALL FUNCTION 'ENQUEUE_EKCCOIXCOPA'
    002        EXPORTING
    002               RELID            = 'KC'
    002               SRTFD            = L_COPA_ENQUEUE-ID
    002        EXCEPTIONS
    002               FOREIGN_LOCK     = 1
    002               SYSTEM_FAILURE   = 2.

DEQUEUE_EKCCOIXCOPA
    002         CALL FUNCTION 'DEQUEUE_EKCCOIXCOPA'
    002            EXPORTING
    002               RELID            = 'KC'
    002               SRTFD            = L_COPA_ENQUEUE-ID.

RKD_ERROR_HANDLING
    002         CALL FUNCTION 'RKD_ERROR_HANDLING'
    002             EXPORTING
    002                  I_APPLCLASS = RKB1D-APPLCLASS
    002                  I_SMODUS    = RKB1D-SMODUS
    002                  I_ID        = 'KH'
    002                  I_TYPE      = L_MSGTY             "H1332433
    002                  I_NUMBER    = '896'
    002                  I_MSGV1     = L_MSG.               "H899403

%FNAM
    410   CALL FUNCTION '%FNAM'
               EXPORTING
                      RKB1X           = RKB1X
    016               SMODUS          = RKB1D-SMODUS
    003               DBPARAM         = G_S_DBPARAM
                      S_FORM_NAME     = 'GET_DATA_TAB'
                      S_PROGRAM_NAME  = RKB1D-RNAME
    003               I_SMODE         = RKB1D-SMODE               "EPOS
    007               I_RKB1R         = L_RKB1R
 7                    RKB2A           = G_RKB2A                   "EPOS
    004         IMPORTING
    004               SEL_DATE        = RKB1D-SELDA
    004               SEL_TIME        = RKB1D-SELTI
    004E              SUMMARIZATION_INFO = I_S_SUMMLEV
                TABLES
                      SELECTION_TABLE = L_T_SEL           "H1654802
                      SELECTED_FIELDS = L_T_SF
                      SELECTED_HIERAS = I_T_SH
    420               ADD_SEL_TAB     = I_T_ASEL
    007F              SELECTED_NODES  = L_T_SN            "H1654802
                EXCEPTIONS
    003               FOREIGN_LOCK    = 8
    003               USER_CANCELLED  = 12
                      NO_RECORD_FOUND = 0.

DEQUEUE_EKCCOIXCOPA
    002       CALL FUNCTION 'DEQUEUE_EKCCOIXCOPA'
    002          EXPORTING
    002               RELID            = 'KC'
    002               SRTFD            = L_COPA_ENQUEUE-ID.

RKD_COIX_ADMIN_FILL
              CALL FUNCTION 'RKD_COIX_ADMIN_FILL'
                   CHANGING C_S_COIX_DATA40 = COIX_DATA40.

RKD_COIX_ADMIN_FILL
 1          CALL FUNCTION 'RKD_COIX_ADMIN_FILL'
 1               CHANGING C_S_COIX = COIX.