SAP Reports / Programs

comments icon Comments

RFVIAR71 SAP ABAP Report - Real Esate Property Archiving: Deletion Program







RFVIAR71 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 RFVIAR71 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 RFVIAR71. "Basic submit
SUBMIT RFVIAR71 AND RETURN. "Return to original report after report execution complete
SUBMIT RFVIAR71 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Selection Text: TESTRUN = Test run
Title: Real Esate Property Archiving: Deletion Program
Text Symbol: 001 = To be deleted:
Text Symbol: 002 = Data read:


INCLUDES used within this REPORT RFVIAR71

INCLUDE RFVIAR70TOP.
INCLUDE RFVIAR00.
INCLUDE RFVIAR01.


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             = 'RE_PROPRTY'
      test_mode          = testrun
    IMPORTING
      archive_handle     = archive_handle
    TABLES                                                       "45A
      selected_files     = sel_files_itab                         "45A
    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                      = 'RE_PROPRTY'
       IMPORTING
            commit_count_for_delete_prg = commcnt
*           maintain_index              = index                     "45A
            maintain_index              = index_flag                "45A
       EXCEPTIONS
            object_not_found            = 01.

ARCHIVE_GET_NEXT_OBJECT
    CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT'
      EXPORTING
        archive_handle          = archive_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'                      "45A
*          EXPORTING                                                "45A
*               object        = 'RE_REQUEST'                        "45A
*               object_id     = object_id                           "45A
*               archivekey    = arkey                               "45A
*               object_offset = offset.                             "45A

ARCHIVE_GET_NEXT_RECORD
      CALL FUNCTION 'ARCHIVE_GET_NEXT_RECORD'    "builds up index
           EXPORTING
                archive_handle          = archive_handle
           IMPORTING
*                RECORD                  = ARC_BUFFER-SEGMENT
                record_ref              = buffer_ref
                record_structure        = buffer_name
           EXCEPTIONS
                end_of_object           = 01.

ARCHIVE_DELETE_OBJECT_DATA
    CALL FUNCTION 'ARCHIVE_DELETE_OBJECT_DATA'
      EXPORTING
        archive_handle = archive_handle.

ARCHIVE_ROLLBACK_WORK
      CALL FUNCTION 'ARCHIVE_ROLLBACK_WORK'.

ARCHIVE_ROLLBACK_WORK
    CALL FUNCTION 'ARCHIVE_ROLLBACK_WORK'.

ARCHIVE_CLOSE_FILE
  CALL FUNCTION 'ARCHIVE_CLOSE_FILE'
    EXPORTING
      archive_handle = archive_handle.

ARCHIVE_ADMIN_SET_STATUS
    CALL FUNCTION 'ARCHIVE_ADMIN_SET_STATUS'                        "45A
         EXPORTING                                                  "45A
              files_are_converted = ' '                             "45A
              index_created       = 'X'                             "45A
         TABLES                                                     "45A
              archive_files       = sel_files_itab.                 "45A

OBJECT_NUMBER_DELETE_IG
  CALL FUNCTION 'OBJECT_NUMBER_DELETE_IG'
    TABLES
      t_objnr     = it_onr00
    EXCEPTIONS
      wrong_obart = 1
      OTHERS      = 2.


Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.







The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name RFVIAR71 or its description.


   
 

RFVIAR71 - Real Esate Property Archiving: Deletion Program
RFVIAR71 - Real Esate Property Archiving: Deletion Program
RFVIAR70TOP - documentation and ABAP source code
RFVIAR70 - Real Estate Property Archiving: Write Program
RFVIAR70 - Real Estate Property Archiving: Write Program
RFVIAR63 - Real Estate Building Archiving: Set Deletion Indicator