RFKKAR41 SAP ABAP Report - Archiving of Clearing History: Write

RFKKAR41 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for trados = docu -> fi -> fica Report RFKKAR41 carries out the first step in archiving clearing histories in Contract Accounts Receivable and Payable (FI-CA): Creation of an archive...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 RFKKAR41 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.

Text pool values

INCLUDES used within this REPORT RFKKAR41

INCLUDE RFKARI41_0.
INCLUDE RFKARI41_0FORMS.
INCLUDE RFKKPCR_FORMS.
INCLUDE ARCH_WRITE_PRG_STANDARD2.

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'.

ARCHIVE_OPEN_FOR_WRITE
  CALL FUNCTION 'ARCHIVE_OPEN_FOR_WRITE'
    EXPORTING
      object                        = sys_objct
      call_delete_job_in_test_mode  = p_deltst
      create_archive_file           = p_wriprd
      comments                      = p_coment
      output_sel_screen_when_dialog = ' '
    IMPORTING
      archive_handle                = arc_data-handle.

FKK_ARCHIVE_PROTOCOL_INIT
  CALL FUNCTION 'FKK_ARCHIVE_PROTOCOL_INIT'
    EXPORTING
      i_detailprotocol = p_prot.

FKK_ARCHIVE_WRITE_STATISTICS
  CALL FUNCTION 'FKK_ARCHIVE_WRITE_STATISTICS'
    EXPORTING
      archive_handle                 = arc_data-handle.

ARCHIVE_PROTOCOL_WRITE
  CALL FUNCTION 'ARCHIVE_PROTOCOL_WRITE'.

ARCHIVE_CLOSE_FILE
  CALL FUNCTION 'ARCHIVE_CLOSE_FILE'
    EXPORTING
      archive_handle = arc_data-handle.

FKK_DOC_EXISTS
  CALL FUNCTION 'FKK_DOC_EXISTS'
    TABLES
      it_opbel   = lt_opbel
    EXCEPTIONS
      notfound   = 1
      nocriteria = 2
      OTHERS     = 3.

FKK_DOC_EXISTS
      CALL FUNCTION 'FKK_DOC_EXISTS'
        EXPORTING
          i_opbel        = lt_opbel-opbel
          i_buffer_check = 'X'
        EXCEPTIONS
          notfound       = 1
          nocriteria     = 2
          OTHERS         = 3.

ARCHIVE_PROTOCOL_COLLECT
        CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT'
          EXPORTING
           i_object                   = gd_objid
            i_msgtype                  = 2
*        I_TEXT                     =
           i_msgid                    = '>A'
           i_msgno                    = 040
           i_msgv1                    = lt_opbel-opbel.

FKK_DOC_EXISTS
  CALL FUNCTION 'FKK_DOC_EXISTS'
    TABLES
      it_opbel   = lt_opbel2
    EXCEPTIONS
      notfound   = 1
      nocriteria = 2
      OTHERS     = 3.

FKK_DOC_EXISTS
        CALL FUNCTION 'FKK_DOC_EXISTS'
          EXPORTING
            i_opbel        = t_dfkkrapt-opbel
            i_buffer_check = 'X'
          EXCEPTIONS
            notfound       = 1
            nocriteria     = 2
            OTHERS         = 3.

ARCHIVE_PROTOCOL_COLLECT
          CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT'
            EXPORTING
             i_object                   = gd_objid
              i_msgtype                  = 2
*            I_TEXT                     =
             i_msgid                    = '>A'
             i_msgno                    = 040
             i_msgv1                    = lt_opbel-opbel.

FKK_ARCHIVE_NEW_OBJECT
    CALL FUNCTION 'FKK_ARCHIVE_NEW_OBJECT'       "Neues Objekt anmelden
         EXPORTING
           archive_handle = arc_data-handle
           object_id = gd_objid.

FKK_ARCHIVE_PUT_TABLE
    CALL FUNCTION 'FKK_ARCHIVE_PUT_TABLE'
      EXPORTING
        archive_handle   = arc_data-handle
        record_flags     = flags
        record_structure = crapt
      TABLES
        table            = lt_dfkkrapt.

ARCHIVE_SAVE_OBJECT
    CALL FUNCTION 'ARCHIVE_SAVE_OBJECT'
      EXPORTING
        archive_handle        = arc_data-handle
      EXCEPTIONS
        termination_requested = 1.

FKK_ARCHIVE_PROTOCOL_COLLECT
      CALL FUNCTION 'FKK_ARCHIVE_PROTOCOL_COLLECT'
        EXPORTING
          i_object  = gd_objid
          i_text    = 'Ausgl./Rücknahmeh. archiviert'(p01)

FKK_ARCH_STAT_READ
  CALL FUNCTION 'FKK_ARCH_STAT_READ'
    EXPORTING
      i_table  = iv_name
      i_number = iv_number.