CHANGEDOCU_REL SAP ABAP Report - Archive Change Documents: Reload Program

CHANGEDOCU_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 CHANGEDOCU_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.

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

Text pool values

INCLUDES used within this REPORT CHANGEDOCU_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_GET_CUSTOMIZING_DATA
  CALL FUNCTION 'ARCHIVE_GET_CUSTOMIZING_DATA'
    EXPORTING
      object                      = c_arch_object
    IMPORTING
      commit_count_for_delete_prg = gv_custcommit
    EXCEPTIONS
      object_not_found            = 1
      OTHERS                      = 2.

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
        object_offset           = lv_offset
        archive_name            = lv_archive_key
      EXCEPTIONS
        end_of_file             = 1
        file_io_error           = 2
        internal_error          = 3
        open_error              = 4
        wrong_access_to_archive = 5
        OTHERS                  = 6.

ARCHIVE_OPEN_FOR_MOVE
  CALL FUNCTION 'ARCHIVE_OPEN_FOR_MOVE'
    EXPORTING
      object               = c_arch_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
      object_number_in_run = ev_n_o_objects.

PROGRESS_INDICATOR
  CALL FUNCTION 'PROGRESS_INDICATOR'
    EXPORTING
      i_text               =
      '&1% (&2 von &3) der Datenobjekte verarbeitet'(006)   "#EC
      i_processed          = iv_cnt_pro
      i_total              = iv_cnt_tot
      i_output_immediately = 'X'
    IMPORTING
      e_progress_sent      = lv_sent.

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

ARCHIVE_GET_TABLE
    call function 'ARCHIVE_GET_TABLE'
      exporting
        archive_handle          = iv_read_handle
        record_structure        = &1
        all_records_of_object   = 'X'
      tables
        table                   = &2
      exceptions
        internal_error          = 1
        wrong_access_to_archive = 2
        others                  = 3.

ARCH_RELO_TABLE_INSERT_TEST
  call function 'ARCH_RELO_TABLE_INSERT_TEST'
    exporting
      i_structure                   = &1
    importing
      e_reload_property             = lv_table_reload_property
    tables
      t_data                        = &2
    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
    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                = c_cdhdr
      TABLES
        t_data                     = icdhdr.

ARCH_RELO_TABLE_INSERT
    CALL FUNCTION 'ARCH_RELO_TABLE_INSERT'
      EXPORTING
        i_structure                = c_cdpos
      TABLES
        t_data                     = icdpos.

ARCH_RELO_TABLE_INSERT
      CALL FUNCTION 'ARCH_RELO_TABLE_INSERT'
        EXPORTING
          i_structure                = c_cdpos_uid
        TABLES
          t_data                     = icdpos_uid.

ARCH_RELO_TABLE_INSERT
      CALL FUNCTION 'ARCH_RELO_TABLE_INSERT'
        EXPORTING
          i_structure                = c_cdpos_str
        TABLES
          t_data                     = icdpos_str.

ARCHIVE_GIVE_STATISTICS














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

ARCHIVE_PROTOCOL_COLLECT
  CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT'
    EXPORTING
      i_object  = l_objtext      "objectclas/objectid
      i_text    = l_msgtext
      i_msgtype = lv_msgtype.