SAP Reports / Programs

RFVIAR90 SAP ABAP Report - Real Estate Settlement Unit Archiving: Write Program







RFVIAR90 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 RFVIAR90 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 RFVIAR90. "Basic submit
SUBMIT RFVIAR90 AND RETURN. "Return to original report after report execution complete
SUBMIT RFVIAR90 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_SEMPS = Settlement unit
Selection Text: SO_SNKSL = Service charge key
Selection Text: SO_SWENR = Business entity
Selection Text: TESTRUN = Delete program as test run
Title: Real Estate Settlement Unit Archiving: Write Program
Text Symbol: 001 = RE objects
Text Symbol: 002 = Parameters for archiving
Text Symbol: 003 = Archiving settlement units: Write program
Text Symbol: 004 = Test objects
Text Symbol: 005 = Set deletion indicator
Text Symbol: 006 = Wait for residence time
Text Symbol: 007 = No settlement units fulfilled requirements
Text Symbol: 008 = No. of archived settlement units: &
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 RFVIAR90

INCLUDE RFVIAR90TOP.
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.

FVARC_STTLMNT_UNIT_KEY_OUTPUT CALL FUNCTION 'FVARC_STTLMNT_UNIT_KEY_OUTPUT' EXPORTING I_VIAK03 = VIAK03 IMPORTING E_KEY_FOR_OUTPUT = KEY_FOR_OUTPUT.

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_LOCK CALL FUNCTION 'FVARC_OBJECT_LOCK' EXPORTING I_OBART = FVIOT_CON_OBJTYP-ABRECHNUNGSEINHEIT I_BUKRS = VIAK03-BUKRS I_SWENR = VIAK03-SWENR I_SNKSL = VIAK03-SNKSL I_SEMPSL = VIAK03-SEMPSL * 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 = 'E' I_LEVEL = '3' I_NEWOBJ = ' ' I_MESSAGE_TEXT = TEXT-005 TABLES T_MESSAGES = APPL_ERROR.

FVARC_MESSAGE_APPEND CALL FUNCTION 'FVARC_MESSAGE_APPEND' EXPORTING I_SEVERITY = 'E' I_LEVEL = '3' I_NEWOBJ = ' ' I_MESSAGE_TEXT = TEXT-006 TABLES T_MESSAGES = APPL_ERROR.

FVARC_OBJECT_UNLOCK CALL FUNCTION 'FVARC_OBJECT_UNLOCK' EXPORTING I_OBART = FVIOT_CON_OBJTYP-ABRECHNUNGSEINHEIT I_BUKRS = VIAK03-BUKRS I_SWENR = VIAK03-SWENR I_SNKSL = VIAK03-SNKSL I_SEMPSL = VIAK03-SEMPSL 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-007 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_STLM_UN' 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 = 'VIAK03' RECORD_FLAGS = ' ' RECORD = VIAK03_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIAK05' RECORD = VIAK05_TAB.

ARCHIVE_PUT_RECORD





CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIAK23' RECORD = VIAK23_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIAK24' RECORD = VIAK24_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIAK04' RECORD = VIAK04_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIAK21' RECORD = VIAK21_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIAK07' RECORD = VIAK07_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIAK26' RECORD = VIAK26_TAB.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE RECORD_FLAGS = ' ' RECORD_STRUCTURE = 'VIAK25' RECORD = VIAK25_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.

STATUS_ARCHIVE_OBJECT CALL FUNCTION 'STATUS_ARCHIVE_OBJECT' EXPORTING ARCHIVE_HANDLE = ARCHIVE_HANDLE OBJECT_DELETE_FLAG = 'X' I_MANDT = VIAK25_TAB-MANDT I_OBJNR = VIAK25_TAB-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 = VIAK25_TAB-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 RFVIAR90 or its description.