12-18-2006 10:41 AM
hello gurus,
this below code works fine now
TABLES mara.
DATA:BEGIN OF itab OCCURS 0,
matnr LIKE mara-matnr,
mtart LIKE mara-mtart,
matkl LIKE mara-matkl,
END OF itab.
DATA:file(200) TYPE c VALUE 'F:\usr\sap\DEV\DVEBMGS00\data\X.txt'.
IF sy-subrc EQ 0.
SELECT matnr mtart matkl
FROM mara INTO TABLE itab
WHERE matnr = matnr.
ELSE.
ENDIF.
OPEN DATASET file FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc EQ 0.
LOOP AT itab.
TRANSFER itab TO file.
ENDLOOP.
ELSE.
ENDIF.
CLOSE DATASET file.
I want to have a tab deleimited like aaa | bbb | ccc
into the file what i am writing in application server
senthil
12-18-2006 10:46 AM
Hi ,
Try thr following code
IF sy-subrc EQ 0.
Data : v_string type string.
LOOP AT itab.
<b>concatenate itab-matnr itab-mtart itab-matkl into v_string separated by '|'.</b>
*TRANSFER itab TO file.
<b>TRANSFER V_STRING TO file.
clear v_string.</b>
ENDLOOP.
ELSE.
ENDIF.
CLOSE DATASET file.
Regards
Arun
12-18-2006 10:45 AM
HI Senthil,
Do like this:
data ws_char type char200.
OPEN DATASET file FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc EQ 0.
LOOP AT itab.
clear ws_char.
concatenate matnr sy-vline mtart sy-vline matkl into ws_char.
or
concatenate matnr 'I' mtart 'I' matkl into ws_char.
TRANSFER ws_char TO file.
ENDLOOP.
ELSE.
ENDIF.
CLOSE DATASET file.
Reward points if this Helps.
Manish
12-18-2006 10:46 AM
Hi ,
Try thr following code
IF sy-subrc EQ 0.
Data : v_string type string.
LOOP AT itab.
<b>concatenate itab-matnr itab-mtart itab-matkl into v_string separated by '|'.</b>
*TRANSFER itab TO file.
<b>TRANSFER V_STRING TO file.
clear v_string.</b>
ENDLOOP.
ELSE.
ENDIF.
CLOSE DATASET file.
Regards
Arun