Writing internal table contents to excel

Question

hi,
i need to write data in my internal table to an excel spread sheet which should be similar to my internal table structure.
can someone help me out.
thanks,
ravi.

Answer 1

Hi,
Try this one
FORM f9008_f4_hlp_for_pc_file.
  DATA: li_filetable TYPE STANDARD TABLE OF file_table,
        lv_return TYPE i,
        lw_filetable TYPE file_table.
  CALL METHOD cl_gui_frontend_services=>file_open_dialog
     EXPORTING
       window_title            = 'Select file for download'
       default_extension       = '.txt'
       initial_directory       =  'C:'
     CHANGING
       file_table              = li_filetable
       rc                      = lv_return
     EXCEPTIONS
       file_open_dialog_failed = 1
       cntl_error              = 2
       error_no_gui            = 3
       OTHERS                  = 4
  IF sy-subrc <> 0.
    MESSAGE e006 WITH text-077.
  ELSE.
    READ TABLE li_filetable INTO lw_filetable INDEX 1.
    v_fnam = lw_filetable-filename.
  ENDIF.
FORM f9007_download_file TABLES p_output.
  DATA:  lv_size   TYPE i.
  CALL FUNCTION 'WS_DOWNLOAD'
       EXPORTING
            filename                = v_fnam
            filetype                = 'DAT'
       IMPORTING
            filelength              = lv_size
       TABLES
            data_tab                = p_output
       EXCEPTIONS
            file_open_error         = 1
            file_write_error        = 2
            invalid_filesize        = 3
            invalid_type            = 4
            no_batch                = 5
            unknown_error           = 6
            invalid_table_width     = 7
            gui_refuse_filetransfer = 8
            customer_error          = 9
            OTHERS                  = 10.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.
ENDFORM.                    " f9007_download_file
<b>While downloading file, u wont get the header part, u have to append the header part</b>. Then u pass the final output table with header to the function module.
So that it will read the first line that will be header and then remaning data.
<i>Sample code:</i>U can create an internal table.
TYPES: begin of ty_itab ,
            name(4) TYPE c, 
            ***(3)  Type c,
        end of ty_itab.
DATA: i_itab type standard table of ty_itab,              
      w_itab type ty_itab.
Then do as below.
w_itab-name = 'NAME'.
w_itab-***  = '***'.
APPEND w_itab to i_output_final.
i_output[] = i_output_final.
APPEND i_output_final.
Now pass this final table to the functionmodule, so it is now with header.
Try this out.
Get back to me if u want any clarification.