REA_VBS_READ_ARCHIVE is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for You can use this report to access and read an archive directly after the archiving report has run...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 REA_VBS_READ_ARCHIVE 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.
Premises Selected for Archiving
Title: Report REA_VBS_READ_ARCHIVE
Text Symbol: L01 = Premise
Text Symbol: L02 = Connection Object
Text Symbol: L03 = Street
Text Symbol: L04 = House no.
Text Symbol: L05 = PremType
Text Symbol: L06 = Object Number
REA_VBS_ARCHIVE_TOP,
REA_VBS_ARCHIVE_F01.
No SAP DATABASE tables are accessed within this REPORT code!
ARCHIVE_OPEN_FOR_READ CALL FUNCTION 'ARCHIVE_OPEN_FOR_READ' EXPORTING object = co_evbs_arch_obj IMPORTING archive_handle = wa_archive_handle EXCEPTIONS file_already_open = 1 no_files_available = 4 not_authorized = 7 OTHERS = 8.
ARCHIVE_GET_NEXT_OBJECT CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT' EXPORTING archive_handle = wa_archive_handle EXCEPTIONS end_of_file = 1 OTHERS = 6.
ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING archive_handle = wa_archive_handle EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 OTHERS = 3.
REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_background_id = 'ALV_BACKGROUND' i_buffer_active = 'X' i_callback_program = g_repid i_callback_pf_status_set = g_status_set i_callback_user_command = g_user_command i_structure_name = 'ISU_CS_REA_VBS_READ_ARCHIVE' is_layout = gs_layout i_save = g_save is_variant = gs_variant it_events = gt_events[] TABLES t_outtab = imt_display_data EXCEPTIONS program_error = 1 OTHERS = 2.
REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' EXPORTING i_logo = 'ENJOYSAP_LOGO' it_list_commentary = gt_list_top_of_page.
ISU_S_PREMISE_DISPLAY CALL FUNCTION 'ISU_S_PREMISE_DISPLAY' EXPORTING x_vstelle = ls_outtab-vstelle * X_UPD_ONLINE = x_no_change = 'X' x_no_other = 'X' IMPORTING * Y_DB_UPDATE = ' ' y_exit_type = y_exit_type * Y_NEW_EVBS = EXCEPTIONS not_found = 1 OTHERS = 99.
REUSE_ALV_EVENTS_GET CALL FUNCTION 'REUSE_ALV_EVENTS_GET' EXPORTING i_list_type = 0 IMPORTING et_events = rt_events.
ARCHIVE_OPEN_FOR_READ * CALL FUNCTION 'ARCHIVE_OPEN_FOR_READ' * EXPORTING * object = co_evbs_arch_obj * IMPORTING * archive_handle = wa_archive_handle * EXCEPTIONS * file_already_open = 1 * no_files_available = 4 * not_authorized = 7 * OTHERS = 8.
ARCHIVE_GET_NEXT_OBJECT * CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT' * EXPORTING * archive_handle = wa_archive_handle * EXCEPTIONS * end_of_file = 1 * OTHERS = 6.
ARCHIVE_CLOSE_FILE * CALL FUNCTION 'ARCHIVE_CLOSE_FILE' * EXPORTING * archive_handle = wa_archive_handle * EXCEPTIONS * internal_error = 1 * wrong_access_to_archive = 2 * OTHERS = 3.
ISU_S_PREMISE_DISPLAY * CALL FUNCTION 'ISU_S_PREMISE_DISPLAY' * EXPORTING * x_vstelle = vstelle ** X_UPD_ONLINE = * x_no_change = 'X' * x_no_other = 'X' * IMPORTING ** Y_DB_UPDATE = ' ' * y_exit_type = y_exit_type ** Y_NEW_EVBS = * EXCEPTIONS * not_found = 1 * OTHERS = 99.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.