SAP Reports / Programs

RFTRARCHIVE_WRITE SAP ABAP Report - Financial Transaction: Archiving (Generate Archive Files)







RFTRARCHIVE_WRITE is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for You use this program to archive financial transactions from the Money Market, Foreign Exchange and Derivatives components of the Transaction Manager...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 RFTRARCHIVE_WRITE 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 RFTRARCHIVE_WRITE. "Basic submit
SUBMIT RFTRARCHIVE_WRITE AND RETURN. "Return to original report after report execution complete
SUBMIT RFTRARCHIVE_WRITE 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: P_AR_ILM = D .
Selection Text: P_CHECK = Key date of min. retent.period
Selection Text: P_COMENT = Note for Archiving Session
Selection Text: P_DELTST = Delete with Test Variant
Selection Text: P_DEST = D .
Selection Text: P_LOGERR = Data Records with Errors
Selection Text: P_LOGOK = Correct data records
Selection Text: P_ORDERC = Deactivate order check
Selection Text: P_PROT = Detail log
Selection Text: P_PROT_O = Log Output
Selection Text: P_SNAP = D .
Selection Text: P_TEST = Test Run
Selection Text: P_TI = D .
Selection Text: P_TM = D .
Selection Text: P_TS = D .
Selection Text: P_TX = D .
Selection Text: P_WRIPRD = Production Mode
Selection Text: P_WRITST = Test Mode
Selection Text: S_BUKRS = D .
Selection Text: S_COMVAL = D .
Selection Text: S_DATE = Date
Selection Text: S_FACNR = D .
Selection Text: S_KONTRH = D .
Selection Text: S_NORD = D .
Selection Text: S_RFHA = D .
Selection Text: S_RMAID = D .
Selection Text: S_RPORTB = D .
Selection Text: S_SAKTIV = D .
Selection Text: S_SANLF = D .
Selection Text: S_SFHAAR = D .
Selection Text: S_SGSART = D .
Selection Text: S_USER = User
Selection Text: S_WGSCHF = Currency
Selection Text: S_ZUONR = D .
Title: Financial Transaction: Archiving (Generate Archive Files)
Text Symbol: UPD = Entered/Last Changed by
Text Symbol: 005 = &1% of Objects Processed (&2 out of &3)
Text Symbol: 006 = &2% of Objects Found





Text Symbol: 100 = Fin. Transact.
Text Symbol: 110 = Control
Text Symbol: 120 = Log output
Text Symbol: 201 = CoCd:
Text Symbol: 202 = Trans.:
Text Symbol: 203 = ConType:
Text Symbol: 204 = ProdTyp:
Text Symbol: 205 = TranType:
Text Symbol: 206 = ActType:
Text Symbol: 207 = Class:
Text Symbol: 208 = Enter.by:
Text Symbol: 209 = Ent. on:
Text Symbol: 221 = St.
Text Symbol: 222 = Status text
Text Symbol: 231 = Selected financial transact.:
Text Symbol: 232 = Successfully archived:
Text Symbol: 233 = Not archived:
Text Symbol: 234 = Statistics for transactions selected
Text Symbol: 235 = Archiving session statistics
Text Symbol: 236 = Archiving in test run
Text Symbol: 301 = Customizing missing for minimum retention period of transactions
Text Symbol: 302 = Transaction was successfully archived
Text Symbol: 303 = Minimum retention period of transactions not achieved
Text Symbol: 304 = Transaction contains inconsistent data
Text Symbol: 305 = Transaction contains flows not posted
Text Symbol: 306 = Transaction has insufficient confirmation status
Text Symbol: 307 = Transaction has insufficient settlement status
Text Symbol: 308 = Transaction is assigned to an active facility
Text Symbol: 309 = Transactions with this product category cannot be archived
Text Symbol: B01 = Application
Text Symbol: COM = General Selections


INCLUDES used within this REPORT RFTRARCHIVE_WRITE

INCLUDE IFTRFORM_TECH_ARCHIVE.


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_PROTOCOL_INIT CALL FUNCTION 'ARCHIVE_PROTOCOL_INIT' EXPORTING i_detailprotocol = p_prot.

ARCHIVE_OPEN_FOR_WRITE CALL FUNCTION 'ARCHIVE_OPEN_FOR_WRITE' EXPORTING call_delete_job_in_test_mode = p_deltst create_archive_file = g_var_create_file object = g_con_arch_object comments = p_coment do_not_delete_data = ' ' output_sel_screen_when_dialog = space IMPORTING archive_handle = g_handle_archive EXCEPTIONS internal_error = 1 object_not_found = 2 open_error = 3 not_authorized = 4 OTHERS = 5.

FTR_CHECK_SINGLE_TRANSACTION





CALL FUNCTION 'FTR_CHECK_SINGLE_TRANSACTION' EXPORTING i_vtbfha = g_tab_vtbfha i_key_date = p_check i_noorderchk = p_orderc IMPORTING e_archive_status = g_var_archive_status e_archive_status_text = lv_archive_status_text EXCEPTIONS OTHERS = 2.

ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING archive_handle = g_handle_archive object_id = g_var_objid EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 OTHERS = 3.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBFHA' record_flags = ' ' record = g_tab_vtbfha.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBZV' record_flags = ' ' record = g_wa_vtbzv.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBPA' record_flags = ' ' record = g_wa_vtbpa.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VWFL3' record_flags = ' ' record = g_wa_vwfl3.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBRATING' record_flags = ' ' record = g_wa_vtbrating.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'FTR_AVG_RATE' record_flags = ' ' record = g_wa_ftr_avg_rate.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'FTR_AVG_SCHEDULE' record_flags = ' ' record = g_wa_ftr_avg_schedule.

FTR_IRADJ_TRIA_BEARERID_BUILD CALL FUNCTION 'FTR_IRADJ_TRIA_BEARERID_BUILD' EXPORTING pi_bukrs = g_tab_vtbfha-bukrs pi_rfha = g_tab_vtbfha-rfha IMPORTING pe_bearerid = l_bearerid.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'TRIAT' record_flags = ' ' record = g_wa_triat.

FTR_IRADJ_TRIA_BEARERID_BUILD CALL FUNCTION 'FTR_IRADJ_TRIA_BEARERID_BUILD' EXPORTING pi_bukrs = vtbfha-bukrs pi_rfha = vtbfha-rfha IMPORTING pe_bearerid = l_bearerid_cp.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'TRCPAT' record_flags = ' ' record = TRCPAT.

FTR_IRADJ_TRIA_BEARERID_BUILD CALL FUNCTION 'FTR_IRADJ_TRIA_BEARERID_BUILD' EXPORTING pi_bukrs = vtbfha-bukrs pi_rfha = vtbfha-rfha IMPORTING pe_bearerid = l_bearerid_cp.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'TRCPAT2' record_flags = ' ' record = g_wa_trcpat2.

FTR_IRADJ_TRIA_BEARERID_BUILD CALL FUNCTION 'FTR_IRADJ_TRIA_BEARERID_BUILD' EXPORTING pi_bukrs = vtbfha-bukrs pi_rfha = vtbfha-rfha IMPORTING pe_bearerid = l_bearerid_sp.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'TRSPAT' record_flags = ' ' record = trspat.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTB_ASGN_RELAT' record_flags = ' ' record = vtb_asgn_relat.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTB_ASGN_LIMIT' record_flags = ' ' record = g_wa_asgn_limit.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTB_ASGN_POSOBJ' record_flags = ' ' record = g_wa_asgn_posobj.




ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTB_ASGN_POS' record_flags = ' ' record = g_wa_asgn_pos.

CHANGEDOCU_ARCHIVE_OBJECT CALL FUNCTION 'CHANGEDOCU_ARCHIVE_OBJECT' EXPORTING archive_handle = g_handle_archive client = sy-mandt objectclass = 'VTBFHA' objectid = g_var_objid object_delete_flag = 'X' EXCEPTIONS wrong_access_to_archive = 1 OTHERS = 2.

TEXT_ARCHIVE_OBJECT CALL FUNCTION 'TEXT_ARCHIVE_OBJECT' EXPORTING archive_handle = g_handle_archive client = sy-mandt id = '*' language = '*' name = g_var_tdname object = 'TB_FHA' * OBJECT_DELETE_FLAG = 'X' EXCEPTIONS wrong_access_to_archive = 1 OTHERS = 2.

STATUS_ARCHIVE_OBJECT CALL FUNCTION 'STATUS_ARCHIVE_OBJECT' EXPORTING archive_handle = g_handle_archive * OBJECT_DELETE_FLAG = 'X' i_mandt = sy-mandt i_objnr = g_tab_vtbfha-objnr * TABLES * T_OBJNR = EXCEPTIONS wrong_access_to_archive = 1 OTHERS = 2 .

TB_REF_OBJECT_SET_ARCHIVED CALL FUNCTION 'TB_REF_OBJECT_SET_ARCHIVED' EXPORTING imp_objnr = g_tab_vtbfha-objnr TABLES t_refon = g_tab_refon EXCEPTIONS no_references_found = 1 OTHERS = 2.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'REFON' record_flags = ' ' record = g_tab_refon.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBFHAZU' record_flags = ' ' record = g_tab_vtbfhazu.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBKORES' record_flags = ' ' record = g_tab_vtbkores.

TCOR_GET_CO_DATA_BY_DEAL CALL FUNCTION 'TCOR_GET_CO_DATA_BY_DEAL' EXPORTING iv_company_code = g_tab_vtbfhazu-bukrs iv_dealnumber = g_tab_vtbfhazu-rfha iv_activity_cat = g_tab_vtbfhazu-sfgzustt iv_activity = g_tab_vtbfhazu-rfhazu IMPORTING et_conotes_data = lt_conotes_data TABLES et_co_data = lt_co_data et_cosa_data = lt_cosa_data et_cosafl_data = lt_cosafl_data et_cosapo_data = lt_cosapo_data et_cosi_data = lt_cosi_data ** et_sat_actvt_data = lt_sat_actvt_data ** et_si_derive_data = lt_si_derive_data et_codmd_data = lt_codmd_data et_codco_data = lt_codco_data et_codcofo_data = lt_codcofo_data et_coddp_data = lt_coddp_data et_codfl_data = lt_codfl_data et_codia_data = lt_codia_data et_codoc_data = lt_codoc_data et_codpi_data = lt_codpi_data et_codrp_data = lt_codrp_data et_codul_data = lt_codul_data et_codul2_data = lt_codul2_data et_codul2fl_data = lt_codul2fl_data et_codulco_data = lt_codulco_data et_codulcofo_data = lt_codulcofo_data et_codulfl_data = lt_codulfl_data EXCEPTIONS no_co_data = 1.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record = lwa_co_data record_flags = ' ' record_structure = 'TCORT_CO' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record = lwa_cosa_data record_flags = ' ' record_structure = 'TCORT_COSA' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_COSAFL' TABLES table = lt_arch_cosafl * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_COSAPO' TABLES table = lt_arch_cosapo * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record = lwa_codmd_data record_flags = ' ' record_structure = 'TCORT_CODMD' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODCOFO' TABLES table = lt_arch_codcofo * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODCO' TABLES table = lt_arch_codco * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODDP' TABLES table = lt_arch_coddp * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODFL' TABLES table = lt_arch_codfl * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODIA' TABLES table = lt_arch_codia * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODPI' TABLES table = lt_arch_codpi * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODRP' TABLES table = lt_arch_codrp * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODULFL' TABLES table = lt_arch_codulfl * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record = lwa_codul2_data record_flags = ' ' record_structure = 'TCORT_CODUL2' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODUL2FL' TABLES table = lt_arch_codul2fl * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODULCOFO' TABLES table = lt_arch_codulcofo * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODULCO' TABLES table = lt_arch_codulco * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODUL' TABLES table = lt_arch_codul * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_COSI' TABLES table = lt_arch_cosi * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CODOC' TABLES table = lt_arch_codoc * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING archive_handle = g_handle_archive record_flags = ' ' record_structure = 'TCORT_CONOTES' TABLES table = lt_arch_conotes * RECORD_FLAGS_TABLE = ' ' EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 invalid_record_structure = 3 OTHERS = 4.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBPFHAPO' record_flags = ' ' record = g_wa_vtbpfhapo.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBAFINKO' record_flags = ' ' record = g_wa_vtbafinko.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBFINKO' record_flags = ' ' record = g_wa_vtbfinko.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'VTBFHAPO' record_flags = ' ' record = g_wa_vtbfhapo.

ARCHIVE_PUT_RECORD CALL FUNCTION 'ARCHIVE_PUT_RECORD' EXPORTING archive_handle = g_handle_archive record_structure = 'FTR_AVG_ASGN' record_flags = ' ' record = g_wa_avg_asgn.

ARCHIVE_SAVE_OBJECT CALL FUNCTION 'ARCHIVE_SAVE_OBJECT' EXPORTING archive_handle = g_handle_archive.

ARCHIVE_PROTOCOL_WRITE CALL FUNCTION 'ARCHIVE_PROTOCOL_WRITE'.

ARCHIVE_WRITE_STATISTICS CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS' EXPORTING archive_handle = g_handle_archive.

ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING archive_handle = g_handle_archive EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 OTHERS = 3.

PROGRESS_INDICATOR CALL FUNCTION 'PROGRESS_INDICATOR' EXPORTING i_text = text-006 * &2% data objects found i_processed = iv_cnt_pro i_output_immediately = iv_immediate IMPORTING e_progress_sent = lv_sent.

DB_COMMIT * CALL FUNCTION 'DB_COMMIT'. "force immediate output of message

PROGRESS_INDICATOR CALL FUNCTION 'PROGRESS_INDICATOR' EXPORTING i_text = text-005 * &1% of data objects processed (&2 of &3) i_processed = iv_cnt_pro i_total = iv_cnt_tot i_output_immediately = iv_immediate IMPORTING e_progress_sent = lv_sent.

DB_COMMIT CALL FUNCTION 'DB_COMMIT'. "force immediate output of message

ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_object = iv_obj_id i_msgtype = lv_msg_type i_text = lv_msg_text i_msgv1 = lv_msgv1.

ARCHIVE_WRITE_STATISTICS CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS' EXPORTING archive_handle = iv_archive_handle.

ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING archive_handle = iv_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 RFTRARCHIVE_WRITE or its description.