SAP Reports / Programs

comments icon Comments

RHREPL10 SAP ABAP Report - Replace User with Person in Holder Relationships







RHREPL10 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for In the existing holder relationships of a plan version, users are replaced with persons, but only in the period where a person-user relationship exists...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 RHREPL10 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.






SUBMIT RHREPL10. "Basic submit
SUBMIT RHREPL10 AND RETURN. "Return to original report after report execution complete
SUBMIT RHREPL10 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Selection Text: TEST = Test
Selection Text: REPL = Replace w/individual selection
Title: Replace User with Person in Holder Relationships
Text Symbol: TES = T E S T R U N
Text Symbol: T02 = Personnel number
Text Symbol: S02 = Personnel number off
Text Symbol: S01 = Personnel number on
Text Symbol: REP = replace
Text Symbol: PLV = Plan version:
Text Symbol: NEU = Data records were created:
Text Symbol: MOD = Mode
Text Symbol: DEL = Data record was deleted
Text Symbol: DAT = Validity (from - to)
Text Symbol: CRE = Data record was created new
Text Symbol: AUS = Evaluation path:
Text Symbol: ALT = Data records were deleted:
Text Symbol: 011 = Replace User with Person in Holder Relationships
Text Symbol: 010 = Selection
Text Symbol: 006 = Valid to
Text Symbol: 005 = Valid from
Text Symbol: 004 = Holder
Text Symbol: 003 = Key
Text Symbol: 002 = Object
Text Symbol: 001 = Operation


INCLUDES used within this REPORT RHREPL10

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:

RH_GET_ACTIVE_WF_PLVAR
    CALL FUNCTION 'RH_GET_ACTIVE_WF_PLVAR'
      IMPORTING
        act_plvar       = pchplvar
      EXCEPTIONS
        no_active_plvar = 1
        OTHERS          = 2.

RH_APPLICATION_SYSTEM_CHECK
  CALL FUNCTION 'RH_APPLICATION_SYSTEM_CHECK'
    EXCEPTIONS
      system_type_unknown = 1
      basis_system        = 2
      OTHERS              = 3.

RH_REPLACE_USER_BY_PERSON
      CALL FUNCTION 'RH_REPLACE_USER_BY_PERSON'
        EXPORTING
          split                 = 'X'
        TABLES
          infty_tab             = infty_tab
          infty_add             = infty_add
        EXCEPTIONS
          no_active_integration = 1
          no_user_replaced      = 2
          OTHERS                = 3.

RH_USER_VIEW_PARAMETER
        CALL FUNCTION 'RH_USER_VIEW_PARAMETER'
          IMPORTING
            object_key_ftext    = object_key_ftext
            short_ftext         = short_ftext
            relation_date_ftext = relation_date_ftext
          EXCEPTIONS
            OTHERS              = 1.

RH_TEXT_BUFFER_FILL_EXTERNAL
        CALL FUNCTION 'RH_TEXT_BUFFER_FILL_EXTERNAL'
          TABLES
            OBJECTS = user_tab
          EXCEPTIONS
            OTHERS  = 1.

RH_TEXT_BUFFER_FILL
        CALL FUNCTION 'RH_TEXT_BUFFER_FILL'
          TABLES
            OBJECTS = pernr_tab
          EXCEPTIONS
            OTHERS  = 1.

RH_USER_VIEW_PARAMETER
*      CALL FUNCTION 'RH_USER_VIEW_PARAMETER'
*        EXPORTING
*          change_object_key = $cross
*        IMPORTING
*          object_key        = object_key_flag
*          object_key_ftext  = object_key_ftext
*          object_key_title  = object_key_title
*        EXCEPTIONS
*          OTHERS            = 1.

RH_USER_VIEW_PARAMETER
*      CALL FUNCTION 'RH_USER_VIEW_PARAMETER'
*        EXPORTING
*          change_short = $cross
*        IMPORTING
*          short        = short_flag
*          short_ftext  = short_ftext
*          short_title  = short_title
*        EXCEPTIONS
*          OTHERS       = 1.

RH_USER_VIEW_PARAMETER
**     call function 'RH_USER_VIEW_PARAMETER'
**          exporting
**               change_relation_date = $cross
**          importing
**               relation_date        = relation_date_flag
**               relation_date_ftext  = relation_date_ftext
**               relation_date_title  = relation_date_title
**          exceptions
**               others               = 1.

RH_OBJECT_SHOW
*        CALL FUNCTION 'RH_OBJECT_SHOW'
*          EXPORTING
*            act_plvar       = object_tab-plvar
*            act_otype       = object_tab-otype
*            act_objid       = object_tab-objid
*          EXCEPTIONS
*            no_active_plvar = 1
*            OTHERS          = 2.

RH_OBJECT_SHOW
*        CALL FUNCTION 'RH_OBJECT_SHOW'
*          EXPORTING
*            act_plvar       = pernr_tab-plvar
*            act_otype       = pernr_tab-otype
*            act_objid       = pernr_tab-objid
*          EXCEPTIONS
*            no_active_plvar = 1
*            OTHERS          = 2.

RH_USER_VIEW_PARAMETER
  CALL FUNCTION 'RH_USER_VIEW_PARAMETER'
    IMPORTING
      object_key          = object_key_flag
      short               = short_flag
      relation_date       = relation_date_flag
      object_key_title    = object_key_title
      short_title         = short_title
      relation_date_title = relation_date_title
    EXCEPTIONS
      OTHERS              = 1.

RH_READ_OBJECT
  CALL FUNCTION 'RH_READ_OBJECT'
    EXPORTING
      plvar     = act_infty_tab-plvar
      otype     = act_infty_tab-sclas
      realo     = act_infty_tab-sobid
      begda     = low_date
      endda     = high_date
      store     = 'X'
    IMPORTING
      short     = uname
    EXCEPTIONS
      not_found = 1
      OTHERS    = 2.

RH_READ_OBJECT
  CALL FUNCTION 'RH_READ_OBJECT'
       EXPORTING
            plvar           = pernr_tab-plvar
            otype           = pernr_tab-otype
            objid           = pernr_tab-objid
            begda           = low_date
            endda           = high_date
*         STORE           = 'X'
       IMPORTING
            short           = short
            stext           = stext
       EXCEPTIONS
            not_found       = 1
            OTHERS          = 2.

RH_READ_INFTY_1001
  CALL FUNCTION 'RH_READ_INFTY_1001'
    EXPORTING
      authority       = 'INSE'
      with_stru_auth  = 'X'
      istat           = '1'
      extend          = 'X'
      subty           = subty_a008
      begda           = low_date
      endda           = high_date
    TABLES
      i1001           = infty_tab
      OBJECTS         = object_tab
    EXCEPTIONS
      nothing_found   = 1
      wrong_condition = 2
      OTHERS          = 3.

RH_VACANCIES_OFF
    CALL FUNCTION 'RH_VACANCIES_OFF'
      EXCEPTIONS
        OTHERS = 1.

RH_DELETE_INFTY
    CALL FUNCTION 'RH_DELETE_INFTY'
      EXPORTING
        vtask               = 'B'
      TABLES
        innnn               = del_tab
      EXCEPTIONS
        error_during_delete = 1
        no_authorization    = 2
        delete_first_record = 3
        corr_exit           = 4
        OTHERS              = 5.

RH_INSERT_INFTY
      CALL FUNCTION 'RH_INSERT_INFTY'
        EXPORTING
          fcode               = 'INSE'
          vtask               = 'B'
        TABLES
          innnn               = ins_tab
        EXCEPTIONS
          no_authorization    = 1
          error_during_insert = 2
          repid_form_initial  = 3
          corr_exit           = 4
          begda_greater_endda = 5
          OTHERS              = 6.

RH_UPDATE_DATABASE
















        CALL FUNCTION 'RH_UPDATE_DATABASE'
          EXPORTING
            vtask     = 'D'
          EXCEPTIONS
            corr_exit = 1
            OTHERS    = 2.

RH_VACANCIES_RESET
      CALL FUNCTION 'RH_VACANCIES_RESET'
        EXCEPTIONS
          OTHERS = 1.

RH_READ_OBJECT
  CALL FUNCTION 'RH_READ_OBJECT'
    EXPORTING
      plvar     = infty_tab-plvar
      otype     = infty_tab-otype
      objid     = infty_tab-objid
      begda     = low_date
      endda     = high_date
      store     = 'X'
    IMPORTING
      short     = object-short
      stext     = object-stext
    EXCEPTIONS
      not_found = 1
      OTHERS    = 2.

RH_READ_OBJECT
  CALL FUNCTION 'RH_READ_OBJECT'
    EXPORTING
      plvar     = infty_tab-plvar
      otype     = infty_tab-sclas
      realo     = infty_tab-sobid
      begda     = low_date
      endda     = high_date
      store     = 'X'
    IMPORTING
      short     = holder_short
      stext     = holder_stext
    EXCEPTIONS
      not_found = 1
      OTHERS    = 2.

REUSE_ALV_COMMENTARY_WRITE
  CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
       EXPORTING
            IT_LIST_COMMENTARY = gt_header_alv.

RH_USER_VIEW_PARAMETER
      CALL FUNCTION 'RH_USER_VIEW_PARAMETER'
        EXPORTING
          change_object_key = $cross
        IMPORTING
          object_key        = object_key_flag
          object_key_ftext  = object_key_ftext
          object_key_title  = object_key_title
        EXCEPTIONS
          OTHERS            = 1.

RH_USER_VIEW_PARAMETER
      CALL FUNCTION 'RH_USER_VIEW_PARAMETER'
        EXPORTING
          change_short = $cross
        IMPORTING
          short        = short_flag
          short_ftext  = short_ftext
          short_title  = short_title
        EXCEPTIONS
          OTHERS       = 1.

RH_OBJECT_SHOW
          CALL FUNCTION 'RH_OBJECT_SHOW'
            EXPORTING
              act_plvar       = object_tab-plvar
              act_otype       = object_tab-otype
              act_objid       = object_tab-objid
            EXCEPTIONS
              no_active_plvar = 1
              OTHERS          = 2.

RH_OBJECT_SHOW
          CALL FUNCTION 'RH_OBJECT_SHOW'
            EXPORTING
              act_plvar       = pernr_tab-plvar
              act_otype       = pernr_tab-otype
              act_objid       = pernr_tab-objid
            EXCEPTIONS
              no_active_plvar = 1
              OTHERS          = 2.

REUSE_ALV_GRID_DISPLAY
    call function 'REUSE_ALV_GRID_DISPLAY'
      EXPORTING
*"     REFERENCE(I_INTERFACE_CHECK) DEFAULT SPACE
*"     VALUE(I_BYPASSING_BUFFER) TYPE  CHAR01 DEFAULT SPACE
*"     VALUE(I_BUFFER_ACTIVE) DEFAULT SPACE
          I_CALLBACK_PROGRAM        = gv_repid
          I_CALLBACK_PF_STATUS_SET  = 'SET_PF_STATUS_ALV'
          I_CALLBACK_USER_COMMAND   = 'USER_COMMAND_ALV'
          I_CALLBACK_TOP_OF_PAGE    = 'TOP_OF_PAGE_ALV'
*"     REFERENCE(I_CALLBACK_HTML_TOP_OF_PAGE) TYPE  SLIS_FORMNAME
*"       DEFAULT SPACE
*"     REFERENCE(I_CALLBACK_HTML_END_OF_LIST) TYPE  SLIS_FORMNAME
*"       DEFAULT SPACE
*"     REFERENCE(I_STRUCTURE_NAME) LIKE  DD02L-TABNAME OPTIONAL
*"     I_BACKGROUND_ID           = 'ALV_BACKGROUND'
*"     REFERENCE(I_GRID_TITLE) TYPE  LVC_TITLE OPTIONAL
*"     REFERENCE(I_GRID_SETTINGS) TYPE  LVC_S_GLAY OPTIONAL
          IS_LAYOUT                 = gs_layout
          IT_FIELDCAT               = gt_fieldcat
*"     REFERENCE(IT_EXCLUDING) TYPE  SLIS_T_EXTAB OPTIONAL
*"     REFERENCE(IT_SPECIAL_GROUPS) TYPE  SLIS_T_SP_GROUP_ALV OPTIONAL
*"     REFERENCE(IT_SORT) TYPE  SLIS_T_SORTINFO_ALV OPTIONAL
*"     REFERENCE(IT_FILTER) TYPE  SLIS_T_FILTER_ALV OPTIONAL
*"     REFERENCE(IS_SEL_HIDE) TYPE  SLIS_SEL_HIDE_ALV OPTIONAL
*"     REFERENCE(I_DEFAULT) DEFAULT 'X'
*"     REFERENCE(I_SAVE) DEFAULT SPACE
*"     REFERENCE(IS_VARIANT) LIKE  DISVARIANT STRUCTURE  DISVARIANT
*"       OPTIONAL
*"     REFERENCE(IT_EVENTS) TYPE  SLIS_T_EVENT OPTIONAL
*"     REFERENCE(IT_EVENT_EXIT) TYPE  SLIS_T_EVENT_EXIT OPTIONAL
*"     REFERENCE(IS_PRINT) TYPE  SLIS_PRINT_ALV OPTIONAL
*"     REFERENCE(IS_REPREP_ID) TYPE  SLIS_REPREP_ID OPTIONAL
*"     REFERENCE(I_SCREEN_START_COLUMN) DEFAULT 0
*"     REFERENCE(I_SCREEN_START_LINE) DEFAULT 0
*"     REFERENCE(I_SCREEN_END_COLUMN) DEFAULT 0
*"     REFERENCE(I_SCREEN_END_LINE) DEFAULT 0
*"     REFERENCE(I_HTML_HEIGHT_TOP) TYPE  I DEFAULT 0
*"     REFERENCE(I_HTML_HEIGHT_END) TYPE  I DEFAULT 0
*"     REFERENCE(IT_ALV_GRAPHICS) TYPE  DTC_T_TC OPTIONAL
*"     REFERENCE(IT_HYPERLINK) TYPE  LVC_T_HYPE OPTIONAL
*"     REFERENCE(IT_ADD_FIELDCAT) TYPE  SLIS_T_ADD_FIELDCAT OPTIONAL
*"     REFERENCE(IT_EXCEPT_QINFO) TYPE  SLIS_T_QINFO_ALV OPTIONAL
*"     REFERENCE(IR_SALV_FULLSCREEN_ADAPTER) TYPE REF TO
*"        CL_SALV_FULLSCREEN_ADAPTER OPTIONAL
*"  IMPORTING
*"     REFERENCE(E_EXIT_CAUSED_BY_CALLER)
*"     REFERENCE(ES_EXIT_CAUSED_BY_USER) TYPE  SLIS_EXIT_BY_USER
      TABLES
          T_OUTTAB                  = gt_single_selection_tab
      EXCEPTIONS
          PROGRAM_ERROR             = 1
          others                    = 2.

REUSE_ALV_GRID_DISPLAY
    call function 'REUSE_ALV_GRID_DISPLAY'
      EXPORTING
*"     REFERENCE(I_INTERFACE_CHECK) DEFAULT SPACE
*"     VALUE(I_BYPASSING_BUFFER) TYPE  CHAR01 DEFAULT SPACE
*"     VALUE(I_BUFFER_ACTIVE) DEFAULT SPACE
          I_CALLBACK_PROGRAM        = gv_repid
          I_CALLBACK_PF_STATUS_SET  = 'SET_PF_STATUS_ALV'
          I_CALLBACK_USER_COMMAND   = 'USER_COMMAND_ALV'
          I_CALLBACK_TOP_OF_PAGE    = 'TOP_OF_PAGE_ALV'
*"     REFERENCE(I_CALLBACK_HTML_TOP_OF_PAGE) TYPE  SLIS_FORMNAME
*"       DEFAULT SPACE
*"     REFERENCE(I_CALLBACK_HTML_END_OF_LIST) TYPE  SLIS_FORMNAME
*"       DEFAULT SPACE
*"     REFERENCE(I_STRUCTURE_NAME) LIKE  DD02L-TABNAME OPTIONAL
*        I_BACKGROUND_ID           = 'ALV_BACKGROUND'
*"     REFERENCE(I_GRID_TITLE) TYPE  LVC_TITLE OPTIONAL
*"     REFERENCE(I_GRID_SETTINGS) TYPE  LVC_S_GLAY OPTIONAL
          IS_LAYOUT                 = gs_layout
          IT_FIELDCAT               = gt_fieldcat
*"     REFERENCE(IT_EXCLUDING) TYPE  SLIS_T_EXTAB OPTIONAL
*"     REFERENCE(IT_SPECIAL_GROUPS) TYPE  SLIS_T_SP_GROUP_ALV OPTIONAL
*"     REFERENCE(IT_SORT) TYPE  SLIS_T_SORTINFO_ALV OPTIONAL
*"     REFERENCE(IT_FILTER) TYPE  SLIS_T_FILTER_ALV OPTIONAL
*"     REFERENCE(IS_SEL_HIDE) TYPE  SLIS_SEL_HIDE_ALV OPTIONAL
*"     REFERENCE(I_DEFAULT) DEFAULT 'X'
*"     REFERENCE(I_SAVE) DEFAULT SPACE
*"     REFERENCE(IS_VARIANT) LIKE  DISVARIANT STRUCTURE  DISVARIANT
*"       OPTIONAL
*"     REFERENCE(IT_EVENTS) TYPE  SLIS_T_EVENT OPTIONAL
*"     REFERENCE(IT_EVENT_EXIT) TYPE  SLIS_T_EVENT_EXIT OPTIONAL
*"     REFERENCE(IS_PRINT) TYPE  SLIS_PRINT_ALV OPTIONAL
*"     REFERENCE(IS_REPREP_ID) TYPE  SLIS_REPREP_ID OPTIONAL
*"     REFERENCE(I_SCREEN_START_COLUMN) DEFAULT 0
*"     REFERENCE(I_SCREEN_START_LINE) DEFAULT 0
*"     REFERENCE(I_SCREEN_END_COLUMN) DEFAULT 0
*"     REFERENCE(I_SCREEN_END_LINE) DEFAULT 0
*"     REFERENCE(I_HTML_HEIGHT_TOP) TYPE  I DEFAULT 0
*"     REFERENCE(I_HTML_HEIGHT_END) TYPE  I DEFAULT 0
*"     REFERENCE(IT_ALV_GRAPHICS) TYPE  DTC_T_TC OPTIONAL
*"     REFERENCE(IT_HYPERLINK) TYPE  LVC_T_HYPE OPTIONAL
*"     REFERENCE(IT_ADD_FIELDCAT) TYPE  SLIS_T_ADD_FIELDCAT OPTIONAL
*"     REFERENCE(IT_EXCEPT_QINFO) TYPE  SLIS_T_QINFO_ALV OPTIONAL
*"     REFERENCE(IR_SALV_FULLSCREEN_ADAPTER) TYPE REF TO
*"        CL_SALV_FULLSCREEN_ADAPTER OPTIONAL
*"  IMPORTING
*"     REFERENCE(E_EXIT_CAUSED_BY_CALLER)
*"     REFERENCE(ES_EXIT_CAUSED_BY_USER) TYPE  SLIS_EXIT_BY_USER
      TABLES
          T_OUTTAB                  = gt_selection_tab
      EXCEPTIONS
          PROGRAM_ERROR             = 1
          others                    = 2.

REUSE_ALV_GRID_LAYOUT_INFO_GET
  CALL FUNCTION 'REUSE_ALV_GRID_LAYOUT_INFO_GET'
    IMPORTING
      et_fieldcat   = lt_fieldcat[]
    EXCEPTIONS
      no_infos      = 1
      program_error = 2
      OTHERS        = 3.

REUSE_ALV_GRID_LAYOUT_INFO_SET
  CALL FUNCTION 'REUSE_ALV_GRID_LAYOUT_INFO_SET'
    EXPORTING
      it_fieldcat   = lt_fieldcat[]
    EXCEPTIONS
      OTHERS        = 1.


Contribute (Add Comments)

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 RHREPL10 or its description.


   
 

RHREPL10 - Replace User with Person in Holder Relationships
RHREPL10 - Replace User with Person in Holder Relationships
RHREPL00 - Replace Persons with Users in PD Data Records -> Sequential File
RHREPL00 - Replace Persons with Users in PD Data Records -> Sequential File
RHRELSQL - Native SQL Access for Index Creation
RHRELSQL - Native SQL Access for Index Creation