S3VBRKDLS is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Archiving of billing documents in SD: Deletion program This program deletes billing documents from the database after they have been written as archive files by the write program...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 S3VBRKDLS 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.
Selection Text: P_DELPRD = Production Mode
Selection Text: P_DELTST = Test Mode
Title: Archiving Billing Documents: Deletion Program
Text Symbol: 001 = &1 of &2 Billing Documents Processed
Text Symbol: 002 = No Problems Opening Archive Files
INCLUDE ARCHCOMO.
INCLUDE S3VBRKTB.
INCLUDE RVVBTYP.
INCLUDE ARCH_DELETE_PRG_STANDARD1.
No SAP DATABASE tables are accessed within this REPORT code!
ARCHIVE_OPEN_FOR_DELETE CALL FUNCTION 'ARCHIVE_OPEN_FOR_DELETE' EXPORTING object = 'SD_VBRK' test_mode = p_deltst IMPORTING archive_handle = archive_handle.
ARCHIVE_GET_CUSTOMIZING_DATA CALL FUNCTION 'ARCHIVE_GET_CUSTOMIZING_DATA' EXPORTING object = 'SD_VBRK' IMPORTING commit_count_for_delete_prg = commcnt maintain_index = index.
NAMETAB_GET CALL FUNCTION 'NAMETAB_GET' EXPORTING langu = sy-langu only = 'H' tabname = 'KONV' IMPORTING header = xheader rc = rc_err TABLES nametab = nametab EXCEPTIONS internal_error = 1 table_has_no_fields = 2 table_not_activ = 3 no_texts_found = 4 OTHERS = 5.
NAMETAB_GET CALL FUNCTION 'NAMETAB_GET' EXPORTING langu = sy-langu only = 'H' tabname = 'VBFA' IMPORTING header = xheader rc = rc_err TABLES nametab = nametab EXCEPTIONS internal_error = 1 table_has_no_fields = 2 table_not_activ = 3 no_texts_found = 4 OTHERS = 5.
ARCHIVE_GET_NEXT_OBJECT CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT' EXPORTING archive_handle = archive_handle IMPORTING object_id = obj_id object_offset = obj_offset archive_name = arc_name EXCEPTIONS end_of_file = 01.
ARCHIVE_DELETE_OBJECT_DATA CALL FUNCTION 'ARCHIVE_DELETE_OBJECT_DATA' EXPORTING archive_handle = archive_handle.
ARCHIVE_GET_NEXT_RECORD CALL FUNCTION 'ARCHIVE_GET_NEXT_RECORD' EXPORTING archive_handle = archive_handle IMPORTING record_flags = arc_buffer-flags record_structure = arc_buffer-rname record_ref = gf_record_ref EXCEPTIONS end_of_object = 01 wrong_access_to_archive = 02.
ARC_ADMIN_SAVE_SGL_INDEX_VBRK CALL FUNCTION 'ARC_ADMIN_SAVE_SGL_INDEX_VBRK' EXPORTING xvbrk = hvbrk archivekey = arc_name object_offset = obj_offset EXCEPTIONS OTHERS = 1.
ARCHIVE_WRITE_STATISTICS CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS' EXPORTING archive_handle = archive_handle EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 OTHERS = 3.
ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING archive_handle = archive_handle.
NAST_PROTOCOL_DELETE CALL FUNCTION 'NAST_PROTOCOL_DELETE' EXPORTING nr = lnast-cmfpnr.
RV_INVOICE_LIST_INDEX_UPDATE CALL FUNCTION 'RV_INVOICE_LIST_INDEX_UPDATE' EXPORTING db_error_handling = 'X' array_delete = 'X' TABLES zxvbrk = xvbrk zyvbrk = yvbrk zxvbrl = xvbrl zyvbrl = yvbrl zxvbpa = xvbpa zyvbpa = yvbpa zxvbuk = xvbuk zyvbuk = yvbuk.
RV_BILLING_INDEX_UPDATE CALL FUNCTION 'RV_BILLING_INDEX_UPDATE' EXPORTING db_error_handling = 'X' array_delete = 'X' TABLES fxvbrk = xvbrk fyvbrk = yvbrk fxvbrp = xvbrp fyvbrp = yvbrp fxvbpa = xvbpa fyvbpa = yvbpa fxvbuk = xvbuk fyvbuk = yvbuk fxvbup = xvbup fyvbup = yvbup.
RV_INDEX_ARRAY_DELETE CALL FUNCTION 'RV_INDEX_ARRAY_DELETE' TABLES ct_statistics = gt_statistics.
ARCHIVE_GIVE_STATISTICS CALL FUNCTION 'ARCHIVE_GIVE_STATISTICS' EXPORTING archive_handle = archive_handle TABLES table = stat_tab EXCEPTIONS internal_error = 1.
ARCHIVE_GET_INFORMATION CALL FUNCTION 'ARCHIVE_GET_INFORMATION' EXPORTING archive_handle = if_archive_handle IMPORTING archive_document = lf_archive_document archive_name = lf_archive_name.
PROGRESS_INDICATOR_APPL CALL FUNCTION 'PROGRESS_INDICATOR_APPL' EXPORTING i_text = lf_prog_text i_processed = if_processed i_total = if_total i_output_immediately = lf_output_immediately IMPORTING "v_n_590818 e_progress_sent = lf_progress_sent.
DB_COMMIT CALL FUNCTION 'DB_COMMIT'.
CALL FUNCTION 'ARCHIVE_GIVE_STATISTICS' EXPORTING archive_handle = archive_handle TABLES table = gt_statistics EXCEPTIONS internal_error = 1 wrong_access_to_archive = 2 OTHERS = 3.
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 S3VBRKDLS or its description.
S3VBRKDLS - Archiving Billing Documents: Deletion Program S3VBRKDLS - Archiving Billing Documents: Deletion Program S3VBRKDL - Archiving billing documents: Deletion program S3VBRKDL - Archiving billing documents: Deletion program S3VBRKCF - documentation and ABAP source code S3VBRKCD - documentation and ABAP source code