how to concatenate all the fields in a single statement with tilda..

[Former Member]

hi, i have 10 fields, i have to concatenate those fields seperated with tilda... and put into the application server...in a single statement,

kindly suggest me hw to write..?

Thanx in Advance.

Akshitha.

[Former Member]

hi akshitha,

use the fallowing statement.

concatenate field1 field2 so on field10 into <internaltable> separated by tild.

thanks,

venkat.

[Former Member]

hi

DATA: C1(10) VALUE 'Sum',

C2(3) VALUE 'mer',

C3(5) VALUE 'holi ',

C4(10) VALUE 'day',

C5(30),

SEP(3) VALUE ' ~ '.

CONCATENATE C1 C2 C3 C4 INTO C5.

WRITE C5.

CONCATENATE C1 C2 C3 C4 INTO C5 SEPARATED BY SEP.

WRITE / C5.

try the code .

reward if helpful.

regards,

kiran kumar k

[Former Member]

Hi,

Data : v_var type c value '~',

v_str(1000).

concatenate f1 f2 f3 f4 f5 f6 f7 f8 f9 f10 into v_str separated by v_var.

Then use OPEN Dataset, read datsaet and Transfer dataset.. to oput this on Appln server.

Regards,

Anji

[Former Member]

You must have already tried out the<b> CONCATENATE </b> statement.

A little curious why has this need arised??

[Former Member]

hi

data v_rec(90) type c.

concatenate f1 f2...f10 into v_rec seperated by <tilda>

now u can open dataset <fname> in output mode and transfer it

transfer v_rec to <fname>.

[Former Member]

HI Akshitha,

Use CONCATENATE statement.

CONCATENATE X1 X2 ... X10 INTO <Filed>

SEPARATED BY ~.

[Former Member]

Hi.....

Just see the following code...

It solves your requirement.....

REPORT ZCSV_SPFLI_APP.

TABLES :

SPFLI. " Flight

FIELD-SYMBOLS : <FS>. "TYPE C.

DATA T_SPFLI LIKE STANDARD TABLE OF SPFLI .

DATA W_CHAR(20) TYPE C.

DATA W_TYPE .

DATA:

BEGIN OF T_TABLE OCCURS 0,

LINE TYPE STRING,

END OF T_TABLE.

SELECT * FROM SPFLI INTO TABLE T_SPFLI.

LOOP AT T_SPFLI INTO SPFLI.

DO.

ASSIGN COMPONENT SY-INDEX OF STRUCTURE SPFLI TO <FS>.

IF SY-SUBRC NE 0.

EXIT.

ELSE.

MOVE <FS> TO W_CHAR.

IF SY-INDEX EQ 1.

T_TABLE-LINE = <FS>.

ELSE.

CONCATENATE T_TABLE-LINE '~' W_CHAR INTO T_TABLE-LINE.

ENDIF.

ENDIF.

ENDDO.

CONDENSE T_TABLE-LINE.

APPEND T_TABLE.

ENDLOOP.

LOOP AT T_TABLE.

WRITE / T_TABLE-LINE.

ENDLOOP.

OPEN DATASET 'YH647_SPFLI' FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.

IF SY-SUBRC NE 0.

MESSAGE ' File is Not Opend' TYPE 'S'.

ENDIF.

LOOP AT T_TABLE.

TRANSFER T_TABLE-LINE TO 'YH647_SPFLI'.

ENDLOOP.

CLOSE DATASET 'YH647_SPFLI'.

This reads flight detail and makes the separated by '~' and stores in the application server (<b>OPEN_DATASET, TRANAFER , CLOSE DATASET</b>)

Reward points if useful.........

Suresh........

[Former Member]

first concateante all the fields with tild .

CONCATENATE v1 v2 v3.... separated by titld.

Then use OPEN Dataset, read datsaet and Transfer dataset.. to output this on Application server.

Regards,

Sujatha.