Download recods with '|' delimieter

Question

Hi all,
I need to download records with delimieter '|' as txt file.
I used FM 'SAP_CONVERT_TO_TEX_FORMAT' to convert internal record to text with delemieter '|'.
But it works fine, but spaces between fields are truncated. So alignment in downloaded file  is not identical.
ex: 000001|aaaa|12/09/2010
      000002|bbb|21/09/2010 
But should be.
      000001|aaaa|12/09/2010
      000002|bbb  |21/09/2010 
Is any other FM avilable do the exactly same as above.
Thanks in advance.
Shruthi

Answer 1

Hi Shruti,
Try the below code
* itab to store data ready to be sent to csv file
  DATA: BEGIN OF wa_csvdata,
    line(4096),
  END OF wa_csvdata.
  DATA: gt_csvdata LIKE TABLE OF wa_csvdata.
* stores the field separator used throughtout the file output
  CONSTANTS const_sep VALUE '|'.
*&      Form  CONVERT_TO_CSV
*       text
*      -->IT_DATATAB any internal table
FORM convert_to_csv  TABLES   lt_datatab.
  FIELD-SYMBOLS: <wa_datatab> TYPE ANY.
  FIELD-SYMBOLS: <wa_field> TYPE ANY.
* character variable incase table fields are of a diff type (ie: int)
  DATA: lv_data TYPE string.
* set to X if the no data has been put into the csv workarea
  DATA: flag_firstcol TYPE xflag.
  REFRESH gt_csvdata.
  CLEAR wa_csvdata.
  LOOP AT lt_datatab ASSIGNING <wa_datatab>.
    flag_firstcol = 'X'.
    DO.
*  one by one assign each position of the structure to the field
      ASSIGN COMPONENT sy-index OF STRUCTURE <wa_datatab> TO <wa_field>.
      IF sy-subrc <> 0.
        EXIT.
      ELSE.
*  we use lv_data since concatenate fails for integer types
        lv_data = <wa_field>.
*  remove commas in the data
        WHILE sy-subrc = 0.
          REPLACE const_sep WITH '' INTO lv_data.
        ENDWHILE.
*       if this data belongs to the first non ignored column
        IF flag_firstcol = 'X'.
          wa_csvdata = lv_data.
          flag_firstcol = ''.
        ELSE.
          CONCATENATE wa_csvdata const_sep lv_data INTO wa_csvdata.
        ENDIF.
      ENDIF.
    ENDDO.
    APPEND wa_csvdata TO gt_csvdata.
    CLEAR wa_csvdata.
  ENDLOOP.
ENDFORM.                    " CONVERT_TO_CSV