GRFNMW_ARCHIVE_READ SAP ABAP Report - Program GRFNMW_ARCHIVE_READ

GRFNMW_ARCHIVE_READ 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 GRFNMW_ARCHIVE_READ 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 GRFNMW_ARCHIVE_READ

INCLUDE GRFNMW_ARCHIVE_COMMON.

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:

ARCHIVE_OPEN_FOR_READ
    CALL FUNCTION 'ARCHIVE_OPEN_FOR_READ'
      EXPORTING
        object             = grfnw_msmp_c_archiving-object
      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_READ_OBJECT_BY_HANDLE
        CALL FUNCTION 'ARCHIVE_READ_OBJECT_BY_HANDLE'
          EXPORTING
            iv_handle          = lv_handle
            iv_read_class_data = 'NO'  "we don´t want to read archvie clas data."If you want, do provide 'YES' or 'CONTEXT'

ARCHIVE_CLOSE_FILE
      CALL FUNCTION 'ARCHIVE_CLOSE_FILE'
        EXPORTING
          archive_handle = lv_handle.

ARCHIVE_READ_OBJECT_BY_OFFSET
    CALL FUNCTION 'ARCHIVE_READ_OBJECT_BY_OFFSET'
      EXPORTING
        iv_archivekey      = -archivekey
        iv_offset          = -archiveofs
        iv_read_class_data = 'NO'  "we don´t want to read archvie clas data."If you want, do provide 'YES' or 'CONTEXT'

AS_API_READ
    CALL FUNCTION 'AS_API_READ'         "1)
      EXPORTING
        i_fieldcat    = 'SAPGRFNARCH'
        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.

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    = ftr_files[].

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

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    = ftr_files[].

REUSE_ALV_GRID_DISPLAY
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
      EXPORTING
        i_grid_title             = 'Flüge'(010)
        i_callback_program       = sy-repid
        i_callback_user_command  = 'CALLBACK_USER_COMMAND'
        i_callback_pf_status_set = 'CALLBACK_SET_PF_STATUS'
        it_events                = lt_event
        i_structure_name         = 'GRFNMWRTINST'
      TABLES
        t_outtab                 = ft_table_inst.

REUSE_ALV_GRID_DISPLAY
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
      EXPORTING
        i_grid_title             = 'Flüge'(010)
        i_callback_program       = sy-repid
        i_callback_user_command  = 'CALLBACK_USER_COMMAND'
        i_callback_pf_status_set = 'CALLBACK_SET_PF_STATUS'
        it_events                = lt_event
        i_structure_name         = 'GRFNMWRTINSTAPPL'
      TABLES
        t_outtab                 = ft_table_appl.