Move xml to application server

Question

Hi gurus
iam converting sap data into xml and now iam able to download the file onto presentation server properly.
now i want to write the file onto application server.
DATA:   l_ixml            TYPE REF TO if_ixml,
        l_streamfactory   TYPE REF TO if_ixml_stream_factory,
        l_ostream         TYPE REF TO if_ixml_ostream,
        l_renderer        TYPE REF TO if_ixml_renderer,
        l_document        TYPE REF TO if_ixml_document.
l_streamfactory = l_ixml->create_stream_factory( ).
    l_ostream = l_streamfactory->create_ostream_itable(
              table = l_xml_table ).
    l_renderer = l_ixml->create_renderer( ostream  = l_ostream
                                          document = l_document ).
    l_rc = l_renderer->render( ).
  Saving the XML document
    l_xml_size = l_ostream->get_num_written_raw( ).
    CALL METHOD cl_gui_frontend_services=>gui_download
      EXPORTING
        bin_filesize = l_xml_size
        filename     = 'c:\satish\sample_trans.xml'
        filetype     = 'BIN'
      CHANGING
        data_tab     = l_xml_table
      EXCEPTIONS
        OTHERS       = 24.
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.

Answer 1

HI KUMAR
I TRIED THAT IT DIDNT WORK.
DATA: XML_TABLE       TYPE TABLE OF XML_LINE.
L_OSTREAM = L_STREAMFACTORY->CREATE_OSTREAM_ITABLE(
              TABLE = XML_TABLE ).
CLEAR P_FILE.
CONCATENATE SY-DATUM4(2) SY-DATUM6(2) SY-DATUM(4) INTO V_DATLO.
CONCATENATE P_OUT V_DATLO P_OFILE '.XML' INTO P_FILE.
OPEN DATASET P_FILE FOR OUTPUT IN BINARY MODE." ENCODING DEFAULT.
IF SY-SUBRC = 0.
  LOOP AT XML_TABLE INTO XML_TABLE_WA.
  TRANSFER XML_TABLE_WA TO P_FILE.
  ENDLOOP.
  ELSE.
  MESSAGE E001(02) WITH 'UNABLE TO OPEN THE FILE FOR OUTPUT'.
WRITE :/ 'UNABLE TO OPEN THE FILE FOR OUTPUT'.
  ENDIF.
CLOSE DATASET P_FILE.