RPCMBAH0 SAP ABAP Report - Transfer payments in other relationship

RPCMBAH0 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for The program prepares the payments entered in the infotype Contracts with other legal relationships (3261) for accounting...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 RPCMBAH0 into the relevant SAP transactions such as SE38 or SE80

Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

PC00_M21_RPCMBAH0 - Trasfer of payments other entitlem.

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 RPCMBAH0

INCLUDE: RPCMBAH0_TOP.

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:

ENQUEUE_EP21_PROG_RUN
    CALL FUNCTION 'ENQUEUE_EP21_PROG_RUN'
      EXPORTING
        mode_progdir   = 'E'
        name           = sy-cprog
      EXCEPTIONS
        foreign_lock   = 1
        system_failure = 2
        OTHERS         = 3.

BDC_OPEN_GROUP
      CALL FUNCTION 'BDC_OPEN_GROUP'
       EXPORTING
         group                     = bi_name
         holddate                  = bi_hold
         keep                      = bi_keep
         user                      = bi_user
*       RECORD                    = FILLER1
*       PROG                      = SY-CPROG
*       DCPFM                     = '%'
*       DATFM                     = '%'
*     IMPORTING
*       QID                       =
       EXCEPTIONS
         client_invalid            = 1
         destination_invalid       = 2
         group_invalid             = 3
         group_is_locked           = 4
         holddate_invalid          = 5
         internal_error            = 6
         queue_error               = 7
         running                   = 8
         system_lock_error         = 9
         user_invalid              = 10
         OTHERS                    = 11.

ENQUEUE_EP21_STRNR_BUKRS
      CALL FUNCTION 'ENQUEUE_EP21_STRNR_BUKRS'
        EXPORTING
          mode_p21_ps_havibontas_key_str = 'E'
          bukrs                          = gs_unibukrs-bukrs
          strnr                          = current_strnr-strnr
        EXCEPTIONS
          foreign_lock                   = 1
          system_failure                 = 2
          OTHERS                         = 3.

BAPI_EMPLOYEE_ENQUEUE
              CALL FUNCTION 'BAPI_EMPLOYEE_ENQUEUE'
                EXPORTING
                  number = pernum-pernr
                IMPORTING
                  return = ls_bapireturn.

DEQUEUE_EP21_STRNR_BUKRS
      CALL FUNCTION 'DEQUEUE_EP21_STRNR_BUKRS'
        EXPORTING
          mode_p21_ps_havibontas_key_str = 'E'
          bukrs                          = gs_unibukrs-bukrs
          strnr                          = current_strnr-strnr.

BAPI_EMPLOYEE_DEQUEUE
          CALL FUNCTION 'BAPI_EMPLOYEE_DEQUEUE'
            EXPORTING
              number = pernum-pernr
            IMPORTING
              return = ls_bapireturn.

BDC_CLOSE_GROUP
      CALL FUNCTION 'BDC_CLOSE_GROUP'
        EXCEPTIONS
          not_open    = 1
          queue_error = 2
          OTHERS      = 3.

HR_PAL_LOG_DISPLAY
  CALL FUNCTION 'HR_PAL_LOG_DISPLAY'
    EXPORTING
      i_s_display_profile       = gs_dp
*     I_S_FLAT_PROFILE          =
    EXCEPTIONS
      program_error             = 1
      no_logs                   = 2
      OTHERS                    = 3.

RP_GET_CURRENCY
  CALL FUNCTION 'RP_GET_CURRENCY'
    EXPORTING
      molga                         = c_molga
    IMPORTING
      waers                         = base_waers
    EXCEPTIONS
      molga_not_in_t001p            = 1
      no_entry_found_in_table_t001  = 2
      no_entry_found_in_table_t500p = 3
      no_entry_found_in_table_t500c = 4
      OTHERS                        = 5.

BAPI_CURRENCY_CONV_TO_INTERNAL
  CALL FUNCTION 'BAPI_CURRENCY_CONV_TO_INTERNAL'
       EXPORTING
            currency             = base_waers
            amount_external      = ld_1000
            max_number_of_digits = 15
       IMPORTING
            amount_internal      = ld_sap_1000
*           RETURN               =
            .

HR_PAL_NODE_ADD
  CALL FUNCTION 'HR_PAL_NODE_ADD'
    EXPORTING
      i_relatkey = 'ROOT'
      i_node_txt = lv_txt
      i_expand   = true
    IMPORTING
      e_node_key = gv_root_node.

HR_PAL_NODE_ADD
*  CALL FUNCTION 'HR_PAL_NODE_ADD'
*    EXPORTING
*      i_relatkey = gv_root_node
*      i_node_txt = text-a01
*      i_expand   = false
*    IMPORTING
*      e_node_key = gv_strnr_node.

HR_PAL_CREATE_NODE_CATEG
  CALL FUNCTION 'HR_PAL_CREATE_NODE_CATEG'
    EXPORTING
      i_categ_id        = c_cat_a02
      i_structure_name  = 'BAL_HR_EXT'
      i_with_msg_fields = true.

HR_PAL_NODE_ADD
*  CALL FUNCTION 'HR_PAL_NODE_ADD'
*    EXPORTING
*      i_relatkey = gv_root_node
*      i_node_txt = text-a02
*      i_expand   = false
*      i_categ_id = c_cat_a02
*    IMPORTING
*      e_node_key = gv_log_node.

HR_PAL_NODE_ADD
  CALL FUNCTION 'HR_PAL_NODE_ADD'
    EXPORTING
      i_relatkey = gv_root_node
      i_node_txt = lv_str
      i_expand   = false
    IMPORTING
      e_node_key = ls_bukrs_node-node.

HR_PAL_NODE_ADD
  CALL FUNCTION 'HR_PAL_NODE_ADD'
    EXPORTING
      i_relatkey = gv_strnr_node
      i_node_txt = lv_str
      i_categ_id = c_cat_a02
    IMPORTING
      e_node_key = ls_bukrs_node-msg_node.