RJKSDDEMANDFIX_WRITE_TO_ARCH SAP ABAP Report - Constant Quantity Plan Archiving: Write Archive

RJKSDDEMANDFIX_WRITE_TO_ARCH 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 RJKSDDEMANDFIX_WRITE_TO_ARCH 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 RJKSDDEMANDFIX_WRITE_TO_ARCH

INCLUDE ARCHCOMO.
INCLUDE LJPISMDC1.
INCLUDE RJKSDDEMANDFIX_ARCH_DATA.
INCLUDE RJKSDDEMANDFIX_ARCH_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_INIT
  call function 'ARCHIVE_PROTOCOL_INIT'
    exporting
      i_detailprotocol  = p_prot
      i_protocol_output = p_prot_o.

ARCHIVE_OPEN_FOR_WRITE
  call function 'ARCHIVE_OPEN_FOR_WRITE'
    exporting
      call_delete_job_in_test_mode = p_deltst
      create_archive_file          = p_wriprd
      object                       = con_arch_object
      comments                     = p_coment
    importing
      archive_handle               = archive_handle
    exceptions
      internal_error               = 1
      object_not_found             = 2
      open_error                   = 3
      not_authorized               = 4
      others                       = 5.

ISM_SD_CQP_ARCHIVEABLE_PRODS
  call function 'ISM_SD_CQP_ARCHIVEABLE_PRODS'
    exporting
      in_product      = s_prod[]
    importing
      out_product_ok  = gt_prod_ok
      out_product_nok = gt_prod_nok.

ARCHIVE_PROTOCOL_COLLECT
    call function 'ARCHIVE_PROTOCOL_COLLECT'
      exporting
        i_msgtype = 2
        i_object  = gv_prod-low
        i_msgid   = 'JKSDDEMANDCQP'
        i_msgno   = '007'.

ISM_SD_SEQUENCE_SELECT
    call function 'ISM_SD_SEQUENCE_SELECT'
      exporting
        im_product             = gv_prod-low
        im_publdate_range_tab  = lt_publdate
*       IM_FLAG_HORIZONT       = 'X'
      importing
        out_sequence_tab       = gt_seq
      exceptions
        sequence_not_found     = 1
        invalid_parameter      = 2
        others                 = 3.

ARCHIVE_PROTOCOL_COLLECT
      call function 'ARCHIVE_PROTOCOL_COLLECT'
        exporting
          i_msgtype = 2
          i_msgid   = 'JKSDDEMANDCQP'
          i_msgno   = '007'
          i_object  = gv_prod-low.

ISM_SD_SELECT_CONTRACTS
    call function 'ISM_SD_SELECT_CONTRACTS'
      tables
        in_contract  = s_vbeln[]
        in_posnr     = s_posnr[]
        in_product   = lt_prod
        out_contract = gt_contract.

ARCHIVE_PROTOCOL_COLLECT
      call function 'ARCHIVE_PROTOCOL_COLLECT'
        exporting
          i_msgtype = 2
          i_object  = gv_prod-low
          i_msgid   = 'JKSDQEVENT'
          i_msgno   = '005'.

ISM_SD_CQP_ARCHIVE_ALLOWED
      call function 'ISM_SD_CQP_ARCHIVE_ALLOWED'
        exporting
          demandfixdat = 
        exceptions
          caller_error = 1
          not_allowed  = 2
          others       = 3.

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

ISM_SD_CQP_ARCHIVE_ALLOWED
      call function 'ISM_SD_CQP_ARCHIVE_ALLOWED'
        exporting
          demandfixiss = 
        exceptions
          caller_error = 1
          not_allowed  = 2
          others       = 3.

ARCHIVE_PROTOCOL_COLLECT
        call function 'ARCHIVE_PROTOCOL_COLLECT'
          exporting
            i_msgtype = 2
            i_object  = -vbeln
            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_COLLECT
      call function 'ARCHIVE_PROTOCOL_COLLECT'
        exporting
          i_msgtype = 2
          i_object  = gv_prod-low
          i_msgid   = 'JKSDDEMANDCQP'
          i_msgno   = '003'.

ARCHIVE_WRITE_STATISTICS
  call function 'ARCHIVE_WRITE_STATISTICS'
    exporting
      archive_handle = archive_handle
    exceptions
      internal_error = 1
      others         = 2.

PROGRESS_INDICATOR
  call function 'PROGRESS_INDICATOR'
    exporting
      i_text               = text-002
      i_processed          = gv_cnt_proc
      i_total              = gv_cnt_tot
      i_output_immediately = 'X'
    importing
      e_progress_sent      = lv_progress_send.

ARCHIVE_PROTOCOL_WRITE
  call function 'ARCHIVE_PROTOCOL_WRITE'.

ARCHIVE_CLOSE_FILE
    call function 'ARCHIVE_CLOSE_FILE'
      exporting
        archive_handle          = archive_handle
      exceptions
        internal_error          = 1
        wrong_access_to_archive = 2
        others                  = 3.