RM07IADE is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Program RM07IADE deletes from the database those physical inventory documents of Inventory Management that have been archived using program RM07IARC (object
If you would like to execute this report or see the full code listing simply enter RM07IADE into the relevant SAP transactions such as SE38 or SE80
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.
Selection Text: TESTRUN = Test run
Title: Archive Material Documents (Inventory Management) - Deletion Program
Text Symbol: 001 = To be deleted:
Text Symbol: 002 = Data read:
Text Symbol: 004 = Error when deleting phys. inv. doc.:
Text Symbol: 005 = Number of deleted phys. inv. docs:
Text Symbol: 006 = Number of read phys. inv. docs:
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
ARCHIVE_OPEN_FOR_DELETE CALL FUNCTION 'ARCHIVE_OPEN_FOR_DELETE' EXPORTING * ARCHIVE_NAME = ' ' OBJECT = OBJECT TEST_MODE = TESTRUN IMPORTING ARCHIVE_HANDLE = HANDLE EXCEPTIONS FILE_ALREADY_OPEN = 01 FILE_IO_ERROR = 02 INTERNAL_ERROR = 03 NO_FILES_AVAILABLE = 04 OBJECT_NOT_FOUND = 05 OPEN_ERROR = 06.
ARCHIVE_GET_NEXT_OBJECT CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT' EXPORTING ARCHIVE_HANDLE = HANDLE EXCEPTIONS END_OF_FILE = 01 FILE_IO_ERROR = 02 INTERNAL_ERROR = 03 OPEN_ERROR = 04 WRONG_ACCESS_TO_ARCHIVE = 05.
ARCHIVE_GET_NEXT_RECORD CALL FUNCTION 'ARCHIVE_GET_NEXT_RECORD' EXPORTING ARCHIVE_HANDLE = HANDLE IMPORTING RECORD_REF = I_DREF_BUFFER RECORD_FLAGS = BUFFER-FLAGS RECORD_STRUCTURE = BUFFER-RNAME EXCEPTIONS END_OF_OBJECT = 01 INTERNAL_ERROR = 02 WRONG_ACCESS_TO_ARCHIVE = 03.
ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING ARCHIVE_HANDLE = HANDLE EXCEPTIONS INTERNAL_ERROR = 01 WRONG_ACCESS_TO_ARCHIVE = 02.
ARCHIVE_GET_CUSTOMIZING_DATA CALL FUNCTION 'ARCHIVE_GET_CUSTOMIZING_DATA' EXPORTING OBJECT = OBJECT IMPORTING COMMIT_COUNT_FOR_DELETE_PRG = CUST_COMMIT_COUNT EXCEPTIONS OBJECT_NOT_FOUND = 01.
CHANGEDOCU_DELETE_ARCHIVE_OBJ CALL FUNCTION 'CHANGEDOCU_DELETE_ARCHIVE_OBJ' EXPORTING ARCHIVE_HANDLE = HANDLE EXCEPTIONS NO_AUTHORITY = 1 WRONG_ACCESS_TO_ARCHIVE = 2.
ARCHIVE_GIVE_STATISTICS CALL FUNCTION 'ARCHIVE_GIVE_STATISTICS' EXPORTING ARCHIVE_HANDlE = HANDLE TABLES TABLE = ARCH_STAT.
ARCHIVE_WRITE_STATISTICS CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS' EXPORTING ARCHIVE_HANDLE = HANDLE EXCEPTIONS INTERNAL_ERROR = 01.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
RM07IADE - Archive Material Documents (Inventory Management) - Deletion Program RM07IADE - Archive Material Documents (Inventory Management) - Deletion Program RM07IAAU_TOI - Include RM07IAAU_TOI RM07IAAU - Report for Phys. Inv. Doc. Archiving RM07IAAU - Report for Phys. Inv. Doc. Archiving RM07HISTS - documentation and ABAP source code