RFMEUFAROPWR SAP ABAP Report - Archiving FMEUF Operations: Write Program

RFMEUFAROPWR is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This program writes the selected operations and their dependent data to the data archive...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 RFMEUFAROPWR 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 RFMEUFAROPWR

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:

ARCHIVE_PROTOCOL_INIT
  call function 'ARCHIVE_PROTOCOL_INIT'
    exporting
      i_detailprotocol  = u_detail_prot
      i_protocol_output = u_detail_prot_o.

ARCHIVE_OPEN_FOR_WRITE
  call function 'ARCHIVE_OPEN_FOR_WRITE'
    exporting
      call_delete_job_in_test_mode = l_delete_in_test
      create_archive_file          = l_create_file
      object                       = u_object
      comments                     = u_admi_rem
    importing
      archive_handle               = c_archive_handle.

ARCHIVE_GET_OBJECT
  call function 'ARCHIVE_GET_OBJECT'
    exporting
      object           = con_this_archobj
    tables
      object_structure = gt_arch_struc
    exceptions
      object_not_found = 1
      others           = 2.

FMEUF_AUTHORITY_FINSRC
    CALL FUNCTION 'FMEUF_AUTHORITY_FINSRC'
      EXPORTING
        I_FINTYP           = lsf_mem-fintyp
        I_ACTVT            = IF_FMEUF_TRANSACTION=>c_delete
      EXCEPTIONS
        NO_AUTHORITY       = 1
        OTHERS             = 2.

FMEUF_AW_KEY_TO_ITEMKEY
    CALL FUNCTION 'FMEUF_AW_KEY_TO_ITEMKEY'
      EXPORTING
        I_AWITEMKEY       = lf_awitemkey
      IMPORTING
        E_ITEMKEY         = lf_itemkey.              .

ARCHIVE_NEW_OBJECT
  call function 'ARCHIVE_NEW_OBJECT'
    exporting
      archive_handle = u_archive_handle.

CHANGEDOCU_ARCHIVE_OBJECT
  CALL FUNCTION 'CHANGEDOCU_ARCHIVE_OBJECT'
    EXPORTING
      archive_handle          = u_archive_handle
      client                  = sy-mandt
      objectclass             = 'FMEUFOPERA'
      objectid                = l_objectid
      object_delete_flag      = 'X'
    EXCEPTIONS
      wrong_access_to_archive = 1
      OTHERS                  = 2.

ARCHIVE_SAVE_OBJECT
  call function 'ARCHIVE_SAVE_OBJECT'
    exporting
      archive_handle        = u_archive_handle
    exceptions
      termination_requested = 1.

ARCHIVE_PUT_TABLE
  call function 'ARCHIVE_PUT_TABLE'
    exporting
      archive_handle   = u_archive_handle
      record_structure = 'FMEUFOPH'
    tables
      table            = lt_fmeufoph.

DDIF_FIELDINFO_GET
  call function 'DDIF_FIELDINFO_GET'
      exporting
        tabname        = u_table
      tables
        dfies_tab      = lt_dfies
      exceptions
        not_found      = 1
        internal_error = 2
        others         = 3.

ARCHIVE_PUT_TABLE
  call function 'ARCHIVE_PUT_TABLE'
    exporting
      archive_handle   = u_archive_handle
      record_structure = u_table
    tables
      table            = .

ARCHIVE_WRITE_STATISTICS
  call function 'ARCHIVE_WRITE_STATISTICS'
    exporting
      archive_handle = u_archive_handle.

ARCHIVE_PROTOCOL_WRITE
  call function 'ARCHIVE_PROTOCOL_WRITE'.

ARCHIVE_CLOSE_FILE
  call function 'ARCHIVE_CLOSE_FILE'
    exporting
      archive_handle = u_archive_handle.

ARCHIVE_PROTOCOL_COLLECT_APPL
  call function 'ARCHIVE_PROTOCOL_COLLECT_APPL'
    exporting
      i_object  = l_objtext
      i_msgtype = l_msgtype
      i_msgid   = lf_msg-id
      i_msgno   = lf_msg-number
      i_msgv1   = lf_msg-message_v1
      i_msgv2   = lf_msg-message_v2
      i_msgv3   = lf_msg-message_v3
      i_msgv4   = lf_msg-message_v4.

PROGRESS_INDICATOR_APPL
    call function 'PROGRESS_INDICATOR_APPL'
      exporting
        i_msgid              = 'FMEUF'
        i_msgno              = '251'
        i_processed          = gf_process_info-counter-processed
        i_total              = gf_process_info-counter-total
        i_output_immediately = l_immidiate.

PROGRESS_INDICATOR_APPL
    call function 'PROGRESS_INDICATOR_APPL'
      exporting
        i_msgid              = 'FMEUF'
        i_msgno              = '251'
        i_processed          = gf_process_info-counter-processed
        i_total              = gf_process_info-counter-total
        i_output_immediately = l_immidiate
      importing
        e_progress_sent      = l_progress_sent.

DB_COMMIT
      call function 'DB_COMMIT'. "otherwise messag will not appear in the job-log