SAP Reports / Programs

FI_DOCUMNT_WRI SAP ABAP Report - Archiving of Financial Accounting Documents: Write Program







FI_DOCUMNT_WRI 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 FI_DOCUMNT_WRI 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 FI_DOCUMNT_WRI. "Basic submit
SUBMIT FI_DOCUMNT_WRI AND RETURN. "Return to original report after report execution complete
SUBMIT FI_DOCUMNT_WRI 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: SO_BLART = D .
Selection Text: P_WRITST = D .
Selection Text: P_WRIPRD = D .
Selection Text: P_STAG = D .
Selection Text: P_SNAP = D .
Selection Text: P_PROT_O = D .
Selection Text: P_PROT = D .
Selection Text: P_DEST = D .
Selection Text: P_DELTST = D .
Selection Text: P_COMENT = D .
Selection Text: SO_BUKRS = Company Codes
Selection Text: SO_BELNR = Document Numbers
Selection Text: P_VMONAT = From Fiscal Period
Selection Text: P_VGJAHR = From Fiscal Year
Selection Text: P_CPUTG = Min.No.of Days in the System
Selection Text: P_BMONAT = To Fiscal Period
Selection Text: P_BGJAHR = To Fiscal Year
Selection Text: P_AR_ILM = D .
Title: Archiving of Financial Accounting Documents: Write Program
Text Symbol: 014 = Selections
Text Symbol: 013 = To
Text Symbol: 011 = Financial Accounting Documents
Text Symbol: 006 = Continue anyway?
Text Symbol: 005 = Open Periods in Archiving Period
Text Symbol: 001 = Fiscal Year/Period


INCLUDES used within this REPORT FI_DOCUMNT_WRI

No INCLUDES are used within this REPORT code!


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_LINE_DETAIL call function 'ARCHIVE_PROTOCOL_LINE_DETAIL'.

DB_COMMIT CALL FUNCTION 'DB_COMMIT'.

FI_DOCUMENT_CHECK_ARCH_HEADER call function 'FI_DOCUMENT_CHECK_ARCH_HEADER' exporting i_bkpf = iw_bkpf i_stich = iv_stichtag_vpr i_mindays = iv_cputg IMPORTING e_unarchivable_reason = ev_obj_status.

FI_DOCUMENT_ARCH_EMU_ARCH_CHCK CALL FUNCTION 'FI_DOCUMENT_ARCH_EMU_ARCH_CHCK' EXPORTING ibkpf = iw_bkpf IMPORTING e_unarchivable_reason = ev_obj_status.

FI_DOCUMENT_CHECK_DESTR_HEADER CALL FUNCTION 'FI_DOCUMENT_CHECK_DESTR_HEADER' EXPORTING i_bkpf = iw_bkpf IMPORTING E_UNDESTROYABLE_REASON = ev_obj_status.

FI_DOCUMENT_ARCH_EMU_ARCH_CHCK CALL FUNCTION 'FI_DOCUMENT_ARCH_EMU_ARCH_CHCK' EXPORTING ibkpf = iw_bkpf IMPORTING e_unarchivable_reason = ev_obj_status.

FI_DOCUMENT_CHECK_ARCH_ITEM call function 'FI_DOCUMENT_CHECK_ARCH_ITEM' exporting i_bkpf = iw_bkpf i_bseg = i_stich = iv_stichtag_vpr importing e_unarchivable_reason = ev_obj_status.

FI_DOCUMENT_CHECK_DESTR_ITEM CALL FUNCTION 'FI_DOCUMENT_CHECK_DESTR_ITEM' EXPORTING i_bkpf = iw_bkpf i_bseg = i_stich = iv_stichtag_vpr IMPORTING E_UNDESTROYABLE_REASON = ev_obj_status.

FI_DOCUMENT_CHECK_ARCH_ITEM_AD call function 'FI_DOCUMENT_CHECK_ARCH_ITEM_AD' exporting i_bkpf = iw_bkpf i_bseg_add = i_stich = iv_stichtag_vpr importing e_unarchivable_reason = ev_obj_status.

FI_CHECK_EXTENDED_WT call function 'FI_CHECK_EXTENDED_WT' exporting i_bukrs = iw_bkpf-bukrs exceptions component_not_active = 1 not_found = 2.

FAGL_CHECK_GLFLEX_ACTIVE CALL FUNCTION 'FAGL_CHECK_GLFLEX_ACTIVE' EXPORTING id_bukrs = iw_bkpf-bukrs IMPORTING e_glflex_active = lw_buffer-fgl_active.

FAGL_GET_ALL_LEDGERS_IN_BUKRS call function 'FAGL_GET_ALL_LEDGERS_IN_BUKRS' exporting i_bukrs = iv_bukrs importing et_ledgers = lt_ledgers.

FAGL_GET_TABLENAMES call function 'FAGL_GET_TABLENAMES' exporting i_ledger = lv_ledger importing es_tabnames = lw_tabnames.

MM_ARRANG_CHECK_CREDOC_ARCHIVE call function 'MM_ARRANG_CHECK_CREDOC_ARCHIVE' exporting i_bkpf = iw_bkpf importing e_no_check_bonus = sv_no_check_mm_bonus exceptions document_incomplete = 1 agreement_not_settled = 2 agreement_datbi_valid = 3 agreement_reszt_valid = 4 no_ebox_index = 5.

POPUP_TO_CONFIRM call function 'POPUP_TO_CONFIRM' exporting titlebar = text-005 text_question = text-006 default_button = '2' display_cancel_button = space userdefined_f1_help = 'FI_DOCUMNT_OPEN_PER_HELP' importing answer = lv_answer.

ARCHIVE_NEW_OBJECT call function 'ARCHIVE_NEW_OBJECT' exporting archive_handle = iv_handle.

ARCHIVE_PUT_TABLE call function 'ARCHIVE_PUT_TABLE' exporting archive_handle = iv_handle record_flags = gc_ownflag record_structure = -tabname tables table = .

ARCHIVE_SAVE_OBJECT call function 'ARCHIVE_SAVE_OBJECT' exporting archive_handle = iv_handle exceptions termination_requested = 42 data_object_not_saved = 43.

ARCHIVE_PROTOCOL_COLLECT





call function 'ARCHIVE_PROTOCOL_COLLECT' exporting i_object = lv_objtext i_msgtype = 2 i_msgid = sy-msgid i_msgno = sy-msgno i_msgv1 = sy-msgv1 i_msgv2 = sy-msgv2 i_msgv3 = sy-msgv3 i_msgv4 = sy-msgv4.

CHANGEDOCU_ARCHIVE_OBJECT call function 'CHANGEDOCU_ARCHIVE_OBJECT' exporting archive_handle = iv_handle objectclass = 'BELEG' objectid = lv_objectid object_delete_flag = 'X'.

CHANGEDOCU_ARCHIVE_OBJECT call function 'CHANGEDOCU_ARCHIVE_OBJECT' exporting archive_handle = iv_handle objectclass = 'BELEGMASS' objectid = lv_objectid object_delete_flag = 'X'.

CHANGEDOCU_ARCHIVE_OBJECT call function 'CHANGEDOCU_ARCHIVE_OBJECT' exporting archive_handle = iv_handle objectclass = 'BELEGR' objectid = lv_objectid object_delete_flag = 'X'.

CHANGEDOCU_ARCHIVE_OBJECT call function 'CHANGEDOCU_ARCHIVE_OBJECT' exporting archive_handle = iv_handle objectclass = 'WITH_ITEM' objectid = lv_objectid object_delete_flag = 'X'.

CHANGEDOCU_ARCHIVE_OBJECT call function 'CHANGEDOCU_ARCHIVE_OBJECT' exporting archive_handle = iv_handle objectclass = 'BELEGV' objectid = lv_objectid_parked_docs object_delete_flag = 'X'.

CHANGEDOCU_ARCHIVE_OBJECT call function 'CHANGEDOCU_ARCHIVE_OBJECT' exporting archive_handle = iv_handle objectclass = 'WITH_ITEM' objectid = lv_objectid_parked_docs object_delete_flag = 'X'.

TEXT_ARCHIVE_OBJECT call function 'TEXT_ARCHIVE_OBJECT' exporting archive_handle = iv_handle client = sy-mandt id = '*' language = '*' name = lv_name object = 'BELEG'.

TEXT_ARCHIVE_OBJECT call function 'TEXT_ARCHIVE_OBJECT' exporting archive_handle = iv_handle client = sy-mandt id = '*' language = '*' name = lv_name object = 'DOC_ITEM'.

BF_FUNCTIONS_FIND call function 'BF_FUNCTIONS_FIND' exporting i_event = lv_event tables t_fmrfc = lt_fmrfc exceptions nothing_found = 0.

FI_DOCUMENT_DIAGNOSTIC_TEXT call function 'FI_DOCUMENT_DIAGNOSTIC_TEXT' exporting i_unarchivable_reason = iv_obj_status i_xtestlauf = iv_writst importing e_diagnostics = lv_text.

FI_DOCUMENT_DIAGNOSTIC_TEXT CALL FUNCTION 'FI_DOCUMENT_DIAGNOSTIC_TEXT' EXPORTING i_UNDESTROYABLE_reason = iv_obj_status i_xtestlauf = iv_writst IMPORTING e_diagnostics = lv_text.

ARCHIVE_PROTOCOL_COLLECT call function 'ARCHIVE_PROTOCOL_COLLECT' exporting i_object = lv_objtext "bukrs/gjahr/belnr i_msgtype = lv_msgtype i_text = lv_text.

FI_DOCUMENT_ARCH_EMU_ARCH_PREP call function 'FI_DOCUMENT_ARCH_EMU_ARCH_PREP' exporting budat_max = iv_stichtag_sel tables isel_bukrs = it_bukrs isel_gjahr = lt_gjahr changing xarch_protect_gjahr = ev_proyear xarch_emu_project = ev_emuproj exceptions no_archiving_possible = 1 others = 99.

HELP_OBJECT_SHOW_FOR_FIELD call function 'HELP_OBJECT_SHOW_FOR_FIELD' exporting called_for_tab = 'BKPF' called_for_field = 'MONAT'.

ARCHIVE_PROTOCOL_INIT call function 'ARCHIVE_PROTOCOL_INIT' exporting i_detailprotocol = iv_prot i_callback_parameter = lw_callback_param.

PROGRESS_INDICATOR call function 'PROGRESS_INDICATOR' exporting i_msgid = 'FG' i_msgno = '653' i_msgv1 = iv_cnt_sel i_msgv2 = iv_cnt_arc i_output_immediately = iv_immediate importing e_progress_sent = lv_sent.

DB_COMMIT call function 'DB_COMMIT'. "force immediate output of message

ARCHIVE_OPEN_FOR_WRITE call function 'ARCHIVE_OPEN_FOR_WRITE' exporting call_delete_job_in_test_mode = lv_delete_in_test create_archive_file = lv_create_file object = iv_object comments = iv_coment do_not_delete_data = l_not_delete destroy = l_destroy output_sel_screen_when_dialog = space importing archive_handle = ev_archive_handle exceptions internal_error = 1 object_not_found = 2 open_error = 3 not_authorized = 4.

ARCHIVE_PROTOCOL_COLLECT call function 'ARCHIVE_PROTOCOL_COLLECT' exporting i_msgtype = 2 i_msgid = sy-msgid i_msgno = sy-msgno i_msgv1 = sy-msgv1 i_msgv2 = sy-msgv2 i_msgv3 = sy-msgv3 i_msgv4 = sy-msgv4.




ARCHIVE_PROTOCOL_WRITE call function 'ARCHIVE_PROTOCOL_WRITE'.

ARCHIVE_WRITE_STATISTICS call function 'ARCHIVE_WRITE_STATISTICS' exporting archive_handle = iv_handle.

ARCHIVE_PROTOCOL_WRITE call function 'ARCHIVE_PROTOCOL_WRITE'.

ARCHIVE_CLOSE_FILE call function 'ARCHIVE_CLOSE_FILE' exporting archive_handle = iv_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 FI_DOCUMNT_WRI or its description.