RPLBGAC1_CE SAP ABAP Report - HR-CH: BFS - Swiss Survey of Structure and Level of Wages (CE Version)

RPLBGAC1_CE is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This report is obsolete...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 RPLBGAC1_CE 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_M02_LBGA1_CE - BFS Wage Level and Structure CE

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 RPLBGAC1_CE

INCLUDE RPUPNPC0_CE.

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:

HR_CH_DISPLAY_MESSAGE_LIST
  CALL FUNCTION 'HR_CH_DISPLAY_MESSAGE_LIST'
    EXPORTING
      root_title = 'Fehlermeldungen'(p07)
      root_descr = sy-title
    TABLES
      errorlist  = _messages.

HR_READ_INFOTYPE
  CALL FUNCTION 'HR_READ_INFOTYPE'
    EXPORTING
      pernr     = pernr-pernr
      infty     = '0022'
      endda     = pn-endda
    TABLES
      infty_tab = p0022
    EXCEPTIONS
      OTHERS    = 0.

HR_CH_READ_ADRESS_ABREINH
  CALL FUNCTION 'HR_CH_READ_ADRESS_ABREINH'
    EXPORTING
      p02_abreinheit = p_abreh
      p02_anwschlch  = 'BFS'
      p02_stichtag   = sy-datum
      p02_kontakt    = 'Y'
    TABLES
      p02_adrabreh   = li_adr.

REUSE_ALV_FIELDCATALOG_MERGE
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_structure_name = 'HRPAYCH_BGAC1_OUTPUT'
    CHANGING
      ct_fieldcat      = fieldcat
    EXCEPTIONS
      OTHERS           = 1.

REUSE_ALV_LIST_DISPLAY
  CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      i_callback_program = repid
      i_structure_name   = 'HRPAYCH_BGAC1_OUTPUT'
      is_layout          = layout
      it_fieldcat        = fieldcat
      i_default          = 'X'
      i_save             = 'X'
      is_variant         = variant
      it_events          = events
    TABLES
      t_outtab           = output_tab
    EXCEPTIONS
      OTHERS             = 1.

REUSE_ALV_FIELDCATALOG_MERGE
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_structure_name = 'HRPAYCH_BGAC1_PROTOCOL'
    CHANGING
      ct_fieldcat      = fieldcat
    EXCEPTIONS
      OTHERS           = 1.

REUSE_ALV_LIST_DISPLAY
  CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      i_callback_program = repid
      i_structure_name   = 'HRPAYCH_BGAC1_PROTOCOL'
      is_layout          = layout
      it_fieldcat        = fieldcat
      it_sort            = sort_tab
      i_default          = 'X'
      i_save             = 'X'
      is_variant         = variant
      it_events          = events
    TABLES
      t_outtab           = protocol_tab
    EXCEPTIONS
      OTHERS             = 1.

REUSE_ALV_COMMENTARY_WRITE
  CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = output_tab.

FILE_VALIDATE_NAME
  CALL FUNCTION 'FILE_VALIDATE_NAME'
    EXPORTING
      LOGICAL_FILENAME                 = lfn
    CHANGING
      PHYSICAL_FILENAME                = dtaset
    EXCEPTIONS
      LOGICAL_FILENAME_NOT_FOUND       = 1
      VALIDATION_FAILED                = 2
      OTHERS                           = 3.

RP_HIRE_FIRE
        CALL FUNCTION 'RP_HIRE_FIRE'
        EXPORTING
          beg       = cd_table-fpbeg
          end       = cd_table-fpend
        IMPORTING
          hire_date = lv_hiredate
        TABLES
          pp0000    = p0000        "input
          pp0001    = p0001        "input
          pphifi    = phifi.

HR_CH_READ_ABREINHEIT
  CALL FUNCTION 'HR_CH_READ_ABREINHEIT'
    EXPORTING
      p02_stichtag         = pn-endda
      p02_anwschlch        = 'BFS'
    TABLES
      p02_p0001            = li_p0001
      p02_t_abreinheit     = li_abreh
    EXCEPTIONS
      table_access_error   = 1
      abreinheit_not_found = 2
      OTHERS               = 3.

HELP_VALUES_GET_WITH_TABLE
  CALL FUNCTION 'HELP_VALUES_GET_WITH_TABLE'
    EXPORTING
      fieldname                 = 'ABREINH'
      tabname                   = 'T5CSG'
    IMPORTING
      select_value              = p_abreh
    TABLES
      fields                    = ihelp_fields
      valuetab                  = helptab
    EXCEPTIONS
      field_not_in_ddic         = 1
      more_then_one_selectfield = 2
      no_selectfield            = 3
      OTHERS                    = 4.

RP_HIRE_FIRE
    CALL FUNCTION 'RP_HIRE_FIRE'
      EXPORTING
        beg       = pn-begda
        end       = pn-endda
      IMPORTING
        hire_date = hiredate
      TABLES
        pp0000    = p0000        "input
        pp0001    = p0001        "input
        pphifi    = phifi.