SAP Reports / Programs

RFVIAR100 SAP ABAP Report - Real Estate Management Contract Archiving Program: Write Program







RFVIAR100 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 RFVIAR100 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 RFVIAR100. "Basic submit
SUBMIT RFVIAR100 AND RETURN. "Return to original report after report execution complete
SUBMIT RFVIAR100 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: CREATE = Generate archive file
Selection Text: SO_BUKRS = Company code
Selection Text: SO_SVWNR = Management contract
Selection Text: TESTRUN = Deletion Program as Test Run
Title: Real Estate Management Contract Archiving Program: Write Program
Text Symbol: 001 = RE objects
Text Symbol: 002 = Parameters for archiving
Text Symbol: 003 = Archiving management contracts: write program
Text Symbol: 004 = Test objects
Text Symbol: 005 = No management contracts fulfilled requirements
Text Symbol: 006 = No. of management contracts archived: &
Text Symbol: 019 = Delete-program as test run: No
Text Symbol: 020 = Delete-program as test run: Yes
Text Symbol: 021 = Started on &1 at &2 by &3
Text Symbol: 022 = Create archive data: No
Text Symbol: 023 = Create archive data: Yes


INCLUDES used within this REPORT RFVIAR100

INCLUDE RFVIAR100TOP.
INCLUDE RFVIAR00.
INCLUDE RFVIAR01.
INCLUDE RFVICNSV.


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:

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = ' ' I_LEVEL = '1' I_MESSAGE_TEXT = SY-MSGV1 TABLES T_MESSAGES = APPL_ERROR.

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = ' ' I_LEVEL = '1' I_MESSAGE_TEXT = TEXT-019 TABLES T_MESSAGES = APPL_ERROR.

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = ' ' I_LEVEL = '1' I_MESSAGE_TEXT = TEXT-020 TABLES T_MESSAGES = APPL_ERROR.

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = ' ' I_LEVEL = '1' I_MESSAGE_TEXT = TEXT-022 TABLES T_MESSAGES = APPL_ERROR.

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = ' ' I_LEVEL = '1' I_MESSAGE_TEXT = TEXT-023 TABLES T_MESSAGES = APPL_ERROR.

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = ' ' I_LEVEL = '1' I_MESSAGE_TEXT = TEXT-004 TABLES T_MESSAGES = APPL_ERROR.

OBJECT_IDENTIFICATION_GET CALL FUNCTION 'OBJECT_IDENTIFICATION_GET' EXPORTING OBJNR = VIVW01-J_OBJNR IMPORTING IDENTIFICATION = SY-MSGV1.

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = ' ' I_LEVEL = '2' I_MESSAGE_TEXT = KEY_FOR_OUTPUT TABLES T_MESSAGES = APPL_ERROR.

FVARC_OBJECT_STATUS_LOKZ_CHECK CALL FUNCTION 'FVARC_OBJECT_STATUS_LOKZ_CHECK' EXPORTING I_OBJNR = VIVW01-J_OBJNR I_KEY_FOR_OUTPUT = KEY_FOR_OUTPUT I_FLAG_STATUS_ACTIVE = 'X' IMPORTING E_SUBRC = E_SUBRC TABLES T_MESSAGES = APPL_ERROR.

FVARC_RESIDENCE_TIME_CHECK CALL FUNCTION 'FVARC_RESIDENCE_TIME_CHECK' EXPORTING I_AROBJ = CON_AROBJ_VW I_1_OR_2 = '2' I_OBJECT_DATE = VIVW01-DBEAR * i_key_for_output = key_for_output IMPORTING E_SUBRC = E_SUBRC TABLES T_MESSAGES = APPL_ERROR.

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = 'I' I_LEVEL = '1' I_MESSAGE_TEXT = TEXT-005 TABLES T_MESSAGES = APPL_ERROR.

K_TOTAL_INIT CALL FUNCTION 'K_TOTAL_INIT'.

ARCHIVE_OPEN_FOR_WRITE CALL FUNCTION 'ARCHIVE_OPEN_FOR_WRITE' EXPORTING CALL_DELETE_JOB_IN_TEST_MODE = TESTRUN CREATE_ARCHIVE_FILE = CREATE OBJECT = 'RE_MGT_CNT' IMPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE.

ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE OBJECT_ID = OBJECT_ID.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_STRUCTURE = 'VIVW01' RECORD_FLAGS = ' ' RECORD = VIVW01_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIVW02' RECORD = VIVW02_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIVW06' RECORD = VIVW06_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIVW03' RECORD = VIVW03_TAB.

ARCHIVE_PUT_RECORD





CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIVW05' RECORD = VIVW05_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIVW07' RECORD = VIVW07_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIVW04' RECORD = VIVW04_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIVW08' RECORD = VIVW08_TAB.

CHANGEDOCU_ARCHIVE_OBJECT CALL FUNCTION 'CHANGEDOCU_ARCHIVE_OBJECT' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE CLIENT = VIVW08_TAB-MANDT OBJECTCLASS = CD_OBJECTCLAS OBJECTID = CD_OBJECTID OBJECT_DELETE_FLAG = 'X' EXCEPTIONS WRONG_ACCESS_TO_ARCHIVE = 1 OTHERS = 2.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIVW09' RECORD = VIVW09_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIVW10' RECORD = VIVW10_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VZGPO' RECORD = VZGPO_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIBEPP' RECORD = VIBEPP_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIZNRN' RECORD = VIZNRN_TAB.

TEXT_ARCHIVE_OBJECT CALL FUNCTION 'TEXT_ARCHIVE_OBJECT' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE CLIENT = SY-MANDT ID = 'NOTZ' LANGUAGE = '*' " alle Sprachen! NAME = TEXT_TDNAME OBJECT = 'R3VV' OBJECT_DELETE_FLAG = 'X' EXCEPTIONS WRONG_ACCESS_TO_ARCHIVE = 1 OTHERS = 2.

CHANGEDOCU_ARCHIVE_OBJECT CALL FUNCTION 'CHANGEDOCU_ARCHIVE_OBJECT' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE CLIENT = VIVW01_TAB-MANDT OBJECTCLASS = CD_OBJECTCLAS OBJECTID = CD_OBJECTID OBJECT_DELETE_FLAG = 'X' EXCEPTIONS WRONG_ACCESS_TO_ARCHIVE = 1 OTHERS = 2.

STATUS_ARCHIVE_OBJECT CALL FUNCTION 'STATUS_ARCHIVE_OBJECT' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE OBJECT_DELETE_FLAG = 'X' I_MANDT = VIVW01_TAB-MANDT I_OBJNR = VIVW01_TAB-J_OBJNR EXCEPTIONS WRONG_ACCESS_TO_ARCHIVE = 1 OTHERS = 2.

K_TOTAL_ARCHIVE_OBJECT CALL FUNCTION 'K_TOTAL_ARCHIVE_OBJECT' EXPORTING I_ARCHIVE_HANDLE = ARCHIVE_HANDLE I_OBJNR = VIVW01_TAB-J_OBJNR EXCEPTIONS OTHERS = 1.

ARCHIVE_SAVE_OBJECT CALL FUNCTION 'ARCHIVE_SAVE_OBJECT' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE.

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = 'I' I_LEVEL = '1' I_NEWOBJ = 'X' I_MESSAGE_TEXT = MESSAGE_TEXT TABLES T_MESSAGES = APPL_ERROR.

ARCHIVE_WRITE_STATISTICS CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE.

ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE.



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 RFVIAR100 or its description.