RSCATPRD SAP ABAP Report - CATT - log/procedure archiving (delete archived DB data)

RSCATPRD is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This program deletes log data from the database...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 RSCATPRD 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 RSCATPRD

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_OPEN_FOR_DELETE
CALL FUNCTION 'ARCHIVE_OPEN_FOR_DELETE'
     EXPORTING
          object             = 'CATPROARCH'
          test_mode          = testrun
     IMPORTING
          archive_handle     = handle
     EXCEPTIONS
          file_already_open  = 01
          file_io_error      = 02
          no_files_available = 04
          object_not_found   = 05
          open_error         = 06.

ARCHIVE_GET_CUSTOMIZING_DATA
CALL FUNCTION 'ARCHIVE_GET_CUSTOMIZING_DATA'
     EXPORTING
          object                      = 'CATPROARCH'
     IMPORTING
          commit_count_for_delete_prg = commcnt
          maintain_index              = index
     EXCEPTIONS
          object_not_found            = 01.

ARCHIVE_GET_NEXT_OBJECT
  CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT'
       EXPORTING
            archive_handle          = handle
       IMPORTING
            object_id               = object_id
            object_offset           = offset
            archive_name            = arkey
       EXCEPTIONS
            end_of_file             = 01
            open_error              = 03
            wrong_access_to_archive = 04.

ARCHIVE_ADMIN_SAVE_INDEX
    CALL FUNCTION 'ARCHIVE_ADMIN_SAVE_INDEX'
         EXPORTING
              object        = 'CATPROARCH'
              object_id     = object_id
              archivekey    = arkey
              object_offset = offset.

ARCHIVE_GET_NEXT_RECORD
    CALL FUNCTION 'ARCHIVE_GET_NEXT_RECORD'    "builds up index
         EXPORTING
              archive_handle          = handle
         IMPORTING
              record                  = arc_buffer-segment
              record_structure        = arc_buffer-rname
         EXCEPTIONS
              end_of_object           = 01.

ARCHIVE_GIVE_STATISTICS
        CALL FUNCTION 'ARCHIVE_GIVE_STATISTICS'
          EXPORTING
            archive_handle       = handle
          TABLES
            table                = arch_stat
*           EXCEPTIONS
*             INTERNAL_ERROR       = 1
*             OTHERS               = 2
                  .

ARCHIVE_CLOSE_FILE
CALL FUNCTION 'ARCHIVE_CLOSE_FILE'
     EXPORTING
          archive_handle = handle.