Download internal containt in CSV

Question

Hi all there ,
I want to dowload containt of internal table into csv file format, I have used following code but it is giving error while downloading how should i give the path in wf_file or what could be the solution
CALL FUNCTION 'SAP_CONVERT_TO_TEX_FORMAT'
EXPORTING
i_field_seperator = ';'
TABLES
i_tab_sap_data = T_INREC
CHANGING
i_tab_converted_data = T_INREC1.
*IF sy-subrc 0.
*ENDIF.
CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
filename = wf_file
TABLES
data_tab = T_INREC1.

Answer 1

Hi Sagar,
I suggest you to use the following example: (I have just used it here )
PARAMETERS : p_filen TYPE rlgrap-filename.
CONSTANTS: c_envvar  TYPE string VALUE 'USERPROFILE',
           c_title    TYPE string VALUE 'Save File'.
DATA: lit_filetable TYPE filetable,
          lwa_file      LIKE LINE OF lit_filetable.
DATA: lv_rc     TYPE sy-subrc,
      gv_dirusr TYPE string.
" --- Try to find My Documents path (WinXP)
cl_gui_frontend_services=>environment_get_variable(
        EXPORTING
          variable             = c_envvar
        CHANGING
          value                = gv_dirusr
        EXCEPTIONS
          cntl_error           = 1
          error_no_gui         = 2
          not_supported_by_gui = 3
          OTHERS               = 4 ).
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
             WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE.
  CONCATENATE gv_dirusr 'My Documents'     
              INTO gv_dirusr
              SEPARATED BY '\'.
ENDIF.      " sy-subrc <> 0.
" --- Open Dialog Window to choose destination path
cl_gui_frontend_services=>file_open_dialog(
      EXPORTING
        window_title            = c_title
        default_extension       = '*.txt'
        file_filter             = cl_gui_frontend_services=>filetype_text
        initial_directory       = gv_dirusr
      CHANGING
        file_table              = lit_filetable
        rc                      = lv_rc
      EXCEPTIONS
        file_open_dialog_failed = 1
        cntl_error              = 2
        error_no_gui            = 3
        not_supported_by_gui    = 4
        OTHERS                  = 5 ).
IF sy-subrc <> 0.
   MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
              WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE.
   READ TABLE lit_filetable INTO lwa_file INDEX 1.
   MOVE: lwa_file-filename TO p_filen.
ENDIF.      " sy-subrc <> 0.
Instead of using function modules, you'll can use ABAP objects to do the job.
The same can be done with GUI_DOWNLOAD function, using class CL_GUI_FRONTEND_SERVICES=>GUI_DOWNLOAD. Check it out on SE24.
Regards,
Eduardo