RCOPCA45 SAP ABAP Report - Derive Partner Profit Center in Sales: Callbacks

RCOPCA45 is a standard Executable ABAP Report 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 RCOPCA45 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 RCOPCA45

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:

FI_CUSTOMER_CHECK
    CALL FUNCTION 'FI_CUSTOMER_CHECK'
         EXPORTING
*             I_BUKRS  = ' '
              I_KUNNR  = KUNNR
         EXCEPTIONS
              CUSTOMER = 1
              OTHERS   = 2.

MESSAGES_INITIALIZE
    CALL FUNCTION 'MESSAGES_INITIALIZE'
         IMPORTING
              E_IDENTIFICATION = MESSAGE_IDENTIFICATION.

G_READ_VALUE
    CALL FUNCTION 'G_READ_VALUE'
         EXPORTING
              CHECK_TYP  = '1'         " Ist
              FIELD      = I_NAME-FIELDNAME
*             RECORD_KEY = RECORD_KEY                     "unicode
              RECORD_KEY = INT_GLPCT                      "unicode
              TABLE      = 'GLPCT'
              VALUE      = VALUE
         TABLES
              PERIOD     = T_PERIODS
         EXCEPTIONS
              NOT_FOUND  = 1
              OTHERS     = 2.

MESSAGES_GIVE
        CALL FUNCTION 'MESSAGES_GIVE'
             TABLES
                  T_MESG = T_MESG.

G_READ_TEXT
  CALL FUNCTION 'G_READ_TEXT'
       EXPORTING
*           DATE_VALID  = SY-DATUM
            FIELD       = I_NAME-FIELDNAME
*           LANGU       = SY-LANGU
*           RECORD_KEY  = RECORD_KEY            "unicode
            RECORD_KEY  = INT_GLPCT             "unicode
*           T800D_TABLE = ' '
            TABLE       = 'GLPCT'
            VALUE       = VALUE
       IMPORTING
*           LTEXT       =
            STEXT       =  E_TEXT
       EXCEPTIONS
            NOT_FOUND   = 1
            OTHERS      = 2.

F4IF_FIELD_VALUE_REQUEST
  CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
       EXPORTING
            TABNAME           = I_NAME-TABNAME
            FIELDNAME         = I_NAME-FIELDNAME
*           SEARCHHELP        = ' '
*           SHLPPARAM         = ' '
*           DYNPPROG          = ' '
*           DYNPNR            = ' '
*           DYNPROFIELD       = ' '
*           STEPL             = 0
*           VALUE             = ' '
*           MULTIPLE_CHOICE   = ' '
*           DISPLAY           = ' '
*           CALLBACK_PROGRAM  = ' '
*           CALLBACK_FORM     = ' '
       TABLES
            RETURN_TAB        = RETURN_TAB
       EXCEPTIONS
            FIELD_NOT_FOUND   = 1
            NO_HELP_FOR_FIELD = 2
            INCONSISTENT_HELP = 3
            NO_VALUES_FOUND   = 4
            OTHERS            = 5.

COPCA_PARTNER_PC_SD_EXIT_CALL
  CALL FUNCTION 'COPCA_PARTNER_PC_SD_EXIT_CALL'
       EXPORTING
            I_KOKRS           = kokrs
            I_DATE            = i_date
            I_STEP_ID         = i_id
            I_PCA_PARTNER_DEB = PCA_PARTNER_DEB
       IMPORTING
            E_PCA_PARTNER_DEB = PCA_PARTNER_DEB
            E_EXIT_IS_ACTIVE  = e_step_is_active
            E_FAILED          = failed.

F4IF_DETERMINE_SEARCHHELP
  CALL FUNCTION 'F4IF_DETERMINE_SEARCHHELP'
       EXPORTING
            TABNAME   = P_TABNAME
            FIELDNAME = P_FIELDNAME
       IMPORTING
            SHLP      = L_SHLP_DESCR
       EXCEPTIONS
            OTHERS    = 0.

F4IF_START_VALUE_REQUEST
  CALL FUNCTION 'F4IF_START_VALUE_REQUEST'
       EXPORTING
            SHLP          = L_SHLP_DESCR
       IMPORTING
            RC            = L_RC
       TABLES
            RETURN_VALUES = LT_SHLP_RETRIEVAL
       EXCEPTIONS
            OTHERS        = 0.

K_KOKRS_SET
  CALL FUNCTION 'K_KOKRS_SET'
       EXPORTING
            DISPLAY   = ' '
            I_KOKRS   = ' '
            POPUP     = ' '
       IMPORTING
            E_KOKRS   = L_CONTROLLING_AREA
            E_ACTION  = L_OK_CODE
       EXCEPTIONS
            NOT_FOUND = 1
            OTHERS    = 2.