SBOOKRI_DB_AR_MULTIPLE SAP ABAP Report - Demo Program for Index-Based Reporting via DB or Archive

SBOOKRI_DB_AR_MULTIPLE is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Using the archiving object BC_SBOOK, this read program shows how a user can specify specific objects (in this example flight bookings) to be accessed...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 SBOOKRI_DB_AR_MULTIPLE 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 SBOOKRI_DB_AR_MULTIPLE

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:

AS_DATASOURCE_INIT
  CALL FUNCTION 'AS_DATASOURCE_INIT'
    EXPORTING
      i_report       = sy-repid
      i_reporttype   = space
    IMPORTING
      e_use_database = fp_readdb
      e_use_archive  = fp_readar
      e_use_infosys  = fp_readas
      et_arch_sel    = fs_files[].

AS_DATASOURCE_SELECT
    CALL FUNCTION 'AS_DATASOURCE_SELECT'
      EXPORTING
        i_report       = sy-repid
        i_reporttype   = space
        it_objects     = lt_arch_obj[]
      CHANGING
        c_use_database = fp_readdb
        c_use_archive  = fp_readar
        c_use_infosys  = fp_readas
        ct_arch_sel    = fs_files[].

AS_API_INFOSTRUC_FIND
  CALL FUNCTION 'AS_API_INFOSTRUC_FIND'
    EXPORTING
      i_fieldcat         = 'SAP_BC_SBOOK01'
      i_fields           = lt_fields_filled[]
    IMPORTING
      e_infostruc        = lv_info_struct_name
      e_matching_fields  = lt_matching_fields[]
    EXCEPTIONS
      no_infostruc_found = 1.

ARCHIVE_OPEN_FOR_READ
    CALL FUNCTION 'ARCHIVE_OPEN_FOR_READ'
      EXPORTING
        object             = 'BC_SBOOK'
      IMPORTING
        archive_handle     = lv_handle
      TABLES
        archive_files      = lr_files_read_sequential[]
      EXCEPTIONS
        no_files_available = 1.

ARCHIVE_GET_NEXT_OBJECT
        CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT'
          EXPORTING
            archive_handle = lv_handle
          IMPORTING
            object_offset  = lv_obj_offset
            archive_name   = lv_archive_name
          EXCEPTIONS
            end_of_file    = 1.

ARCHIVE_CLOSE_FILE
      CALL FUNCTION 'ARCHIVE_CLOSE_FILE'
        EXPORTING
          archive_handle = lv_handle.

ARCHIVE_READ_OBJECT
    CALL FUNCTION 'ARCHIVE_READ_OBJECT'
      EXPORTING
        object         = 'BC_SBOOK'
        archivkey      = -archivekey
        offset         = -archiveofs
      IMPORTING
        archive_handle = lv_handle.

ARCHIVE_CLOSE_FILE
    CALL FUNCTION 'ARCHIVE_CLOSE_FILE'
      EXPORTING
        archive_handle = lv_handle.

AS_API_READ
    CALL FUNCTION 'AS_API_READ'         "1)
      EXPORTING
        i_fieldcat    = 'SAP_BC_SBOOK01'
        i_selections  = ft_selections[]
      IMPORTING
        e_result      = ft_files_and_offset_as[]
      EXCEPTIONS
        no_infostruc_found  = 2.

ARCHIVE_FILES_ACCESS_KIND_GET
    CALL FUNCTION 'ARCHIVE_FILES_ACCESS_KIND_GET'
      TABLES
        it_files_and_pos  = ft_files_and_offset_as
        et_files_seq_read = lt_files_read_sequential
        et_files_obj_read = ft_files_read_by_object.

ARCHIVE_GET_TABLE
  CALL FUNCTION 'ARCHIVE_GET_TABLE'
    EXPORTING
      archive_handle        = fv_handle
      record_structure      = 'SBOOK'
      all_records_of_object = 'X'
    TABLES
      table                 = lt_sbook_tmp.

REUSE_ALV_GRID_DISPLAY
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
      EXPORTING
        i_structure_name = 'SBOOK'
      TABLES
        t_outtab         = ft_sbook.