Schlagwort: cl_rsan_ut_appserv_file_writer

DATA: it_file_content TYPE rsanm_file_table.
DATA: lv_file TYPE string VALUE '/usr/sap/trans/EPS/SAL/Test1.txt'.
DATA: lv_lines_written TYPE i.

it_file_content = value #( ( |Testtext 1| )
                           ( |Testtext 2| )
                           ( |Testtext 3| ) ).

TRY.
  cl_rsan_ut_appserv_file_writer=>appserver_file_write( EXPORTING
                                                          i_filename = lv_file
                                                          i_data_tab = it_file_content
                                                          i_overwrite = abap_true       " abap_false -> append, abap_true -> overwrite
                                                        IMPORTING
                                                          e_lines_written = lv_lines_written ).

  WRITE: / 'Lines written: ', lv_lines_written.

CATCH cx_root INTO DATA(e_text).
  WRITE: / e_text->get_text( ).
ENDTRY.