Skip to Content
0
Former Member
Apr 16, 2010 at 12:05 AM

How to Double quote the fields in the extract file

91 Views

Below is an extract for a program which generates a file and downloads it to the drive or server.

Can someone please let me know how I can double quote the output to look like

Current output: Field1,field2,field3,field4,field5,field6,field7,,field8,,,field9,field10

Desired output: "Field1","field2","field3","field4","field5","field6","field7","","field8","","","field9","field10"

FORM DOWNLOAD_FILE.

DATA: LV_FLNM TYPE STRING,

HDR TYPE XSTRING.

TYPES TRUXS_T_TEXT_DATA(4096) TYPE C OCCURS 0.

DATA: TS_CSV TYPE TRUXS_T_TEXT_DATA.

DATA: TEXT400(400) TYPE C.

DATA: LT_TEXT400 LIKE TEXT400 OCCURS 0.

LV_FLNM = P_PCFILE.

CALL FUNCTION 'SAP_CONVERT_TO_TEX_FORMAT'

EXPORTING

I_FIELD_SEPERATOR = ','

TABLES

I_TAB_SAP_DATA = GT_TABEVRI

CHANGING

I_TAB_CONVERTED_DATA = TS_CSV.

LOOP AT TS_CSV INTO TEXT400.

APPEND TEXT400 TO LT_TEXT400.

CLEAR TEXT400.

ENDLOOP.

CALL METHOD CL_GUI_FRONTEND_SERVICES=>GUI_DOWNLOAD

EXPORTING

FILENAME = LV_FLNM

FILETYPE = 'ASC'

WRITE_FIELD_SEPARATOR = ','

TRUNC_TRAILING_BLANKS_EOL = ' '

TRUNC_TRAILING_BLANKS = 'X'

CHANGING

DATA_TAB = LT_TEXT400.

ENDFORM. "DOWNLOAD_FILE