BC_SFLIGHT_REL SAP ABAP Report - Archiving Flights: Reload Program (Example ADK Archiving)

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

INCLUDE ARCH_RELOAD_PRG_STANDARD2. "PROCESSING OPTIONS

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_PROTOCOL_INIT
  CALL FUNCTION 'ARCHIVE_PROTOCOL_INIT'
    EXPORTING
      i_detailprotocol  = iv_detail_prot
      i_protocol_output = iv_prot_output.

ARCHIVE_WRITE_STATISTICS
  CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS'
    EXPORTING
      archive_handle = lv_archive_read_handle.

ARCHIVE_PROTOCOL_WRITE
  CALL FUNCTION 'ARCHIVE_PROTOCOL_WRITE'.

ARCHIVE_CLOSE_FILE
  CALL FUNCTION 'ARCHIVE_CLOSE_FILE'
    EXPORTING
      archive_handle = lv_archive_read_handle.

ARCHIVE_GET_NEXT_OBJECT
    CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT'
      EXPORTING
        archive_handle = iv_read_handle
      IMPORTING
        archive_name   = lv_archive_key
        object_offset  = lv_offset
      EXCEPTIONS
        end_of_file    = 1.

ARCHIVE_READ_OBJECT_BY_HANDLE
  CALL FUNCTION 'ARCHIVE_READ_OBJECT_BY_HANDLE'
    EXPORTING
      iv_handle   = iv_read_handle
    CHANGING
      ct_obj_data = lt_obj_data_tmp.

ARCH_RELO_TABLE_INSERT_TEST
    CALL FUNCTION 'ARCH_RELO_TABLE_INSERT_TEST'
      EXPORTING
        i_structure                   = -tabname
        i_accepting_duplicate_records = iv_accepting_duplicate_records
        it_ignore_fields              = lt_ignore_fields
      IMPORTING
        e_reload_property             = lv_table_reload_property
      TABLES
        t_data                        = 
        t_could_be_inserted           = 
      EXCEPTIONS
        table_not_active              = 1.

ARCH_RELO_PROPERTY_DECIDE
    CALL FUNCTION 'ARCH_RELO_PROPERTY_DECIDE'
      EXPORTING
        i_table_reload_property       = lv_table_reload_property
        i_archiv_key                  = iv_archive_key
        i_offset                      = iv_offset
        i_accepting_duplicate_records = iv_accepting_duplicate_records
      IMPORTING
        e_object_reload_property      = ev_object_reload_property.

ARCHIVE_SAVE_OBJECT
      CALL FUNCTION 'ARCHIVE_SAVE_OBJECT'
        EXPORTING
          archive_handle = iv_write_handle.

ARCH_RELO_TABLE_INSERT
      CALL FUNCTION 'ARCH_RELO_TABLE_INSERT'
        EXPORTING
          i_structure = lw_obj_data-tabname
        TABLES
          t_data      = .

ARCHIVE_RELOAD_OBJECT_DATA
  CALL FUNCTION 'ARCHIVE_RELOAD_OBJECT_DATA'
    EXPORTING
      archive_handle = iv_read_handle.

ARCHIVE_GIVE_STATISTICS
  CALL FUNCTION 'ARCHIVE_GIVE_STATISTICS'
    EXPORTING
      archive_handle = iv_read_handle
    TABLES
      table          = lt_statistic.

ARCHIVE_OPEN_FOR_MOVE
  CALL FUNCTION 'ARCHIVE_OPEN_FOR_MOVE'
    EXPORTING
      object               = gc_object
      test_mode            = iv_reltst
    IMPORTING
      archive_read_handle  = ev_read_handle
      archive_write_handle = ev_write_handle.

ARCHIVE_GET_INFORMATION
  CALL FUNCTION 'ARCHIVE_GET_INFORMATION'
    EXPORTING
      archive_handle   = ev_read_handle
    IMPORTING
      archive_document = lv_document.

PROGRESS_INDICATOR
  CALL FUNCTION 'PROGRESS_INDICATOR'
    EXPORTING
      i_text               = '&1% (&2 of &3) of the data objects processed'(006)"#EC * "text shall be understandable for EN-speaking coleagues
      i_processed          = iv_cnt_pro
      i_total              = iv_cnt_tot
      i_output_immediately = iv_immediate
    IMPORTING
      e_progress_sent      = lv_sent.

DB_COMMIT
    CALL FUNCTION 'DB_COMMIT'.    "force immediate output of message

ARCHIVE_PROTOCOL_COLLECT
      CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT'
        EXPORTING
          i_object  = lv_objtext
          i_msgtype = 2
          i_msgid   = 'BA'
          i_msgno   = '703'.

ARCHIVE_PROTOCOL_COLLECT
    CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT'
      EXPORTING
        i_object  = lv_objtext
        i_msgtype = lv_msgtype
        i_text    = lv_message.