PFO_ARCHIVE_DELETE SAP ABAP Report - PFO Archiving: Deletion Program for BusObjs, AssignObjs and Segments

PFO_ARCHIVE_DELETE is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Deletion program for deleting portfolio assignment objects after they have been successfully archived...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 PFO_ARCHIVE_DELETE 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 PFO_ARCHIVE_DELETE

INCLUDE ARCH_DELETE_PRG_STANDARD1. "<<< FLOW CONTROL

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_DELETE
  CALL FUNCTION 'ARCHIVE_OPEN_FOR_DELETE'
    EXPORTING
      object         = gd_arch_obj
      test_mode      = p_deltst
    IMPORTING
      archive_handle = gd_handle.

ARCHIVE_GET_CUSTOMIZING_DATA
  CALL FUNCTION 'ARCHIVE_GET_CUSTOMIZING_DATA'
    EXPORTING
      object                      = gd_arch_obj
    IMPORTING
      commit_count_for_delete_prg = gd_commit_cnt.

ARCHIVE_GET_INFORMATION
  CALL FUNCTION 'ARCHIVE_GET_INFORMATION'
    EXPORTING
      archive_handle   = gd_handle
    IMPORTING
      archive_document = gd_document
      archive_name     = gd_archive_key.

ARCHIVE_GET_NEXT_OBJECT
    CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT'
      EXPORTING
        archive_handle = gd_handle
      EXCEPTIONS
        end_of_file    = 01.

ARCHIVE_GET_TABLE
    CALL FUNCTION 'ARCHIVE_GET_TABLE'
      EXPORTING
        archive_handle        = gd_handle
        record_structure      = gs_objectdata-ddic_tab
        all_records_of_object = 'X'
      TABLES
        table                 = .

ARCHIVE_GET_TABLE
    CALL FUNCTION 'ARCHIVE_GET_TABLE'
      EXPORTING
        archive_handle        = gd_handle
        record_structure      = gd_xzo_tab
        all_records_of_object = 'X'
      TABLES
        table                 = .

PROGRESS_INDICATOR
    CALL FUNCTION 'PROGRESS_INDICATOR'
      EXPORTING
        i_text      = '&1 (&2 von &3) der XOs bearbeitet'(003)
        i_processed = gd_delcnt
        i_total     = gd_objects_to_delete.

PROGRESS_INDICATOR
    CALL FUNCTION 'PROGRESS_INDICATOR'
      EXPORTING
        i_text               = '&1 (&2 von &3) der XOs bearbeitet'(003)
        i_processed          = gd_delcnt
        i_total              = gd_objects_to_delete
        i_output_immediately = 'X'.

ARCHIVE_WRITE_STATISTICS
  CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS'
    EXPORTING
      archive_handle           = gd_handle
      statistics_only_per_file = 'X'.

ARCHIVE_CLOSE_FILE
  CALL FUNCTION 'ARCHIVE_CLOSE_FILE'
    EXPORTING
      archive_handle = gd_handle.

ARCHIVE_GIVE_STATISTICS
  CALL FUNCTION 'ARCHIVE_GIVE_STATISTICS'
    EXPORTING
      archive_handle = p_handle
    TABLES
      table          = lt_stat_itab.