But, because i can not find it, i browse through Google, read some posts in several forums, and here i got the code (with some minor changes)
DATA: BEGIN OF wa1,
ch(20) TYPE c,
END OF wa1.
DATA: itab1 LIKE TABLE OF wa1,
DATA: addr1(40) TYPE c,
addr2(40) TYPE c,
totalchar TYPE i.
SPLIT 'Desa Kamboyan, Kecamatan Hampang Km.29 Kab.Kotabaru, Kal-Sel' AT space INTO TABLE itab1.
LOOP AT itab1 INTO wa1.
WRITE:/ wa1-ch.
ENDLOOP.
READ TABLE itab1 INDEX 1 INTO wa1.
addr1 = wa1-ch.
DELETE itab1 INDEX 1.
LOOP AT itab1 INTO wa1.
totalchar = STRLEN( wa1-ch ) + STRLEN( addr1 ).
IF jumlahchar > 35.
CONCATENATE addr1 wa1-ch INTO addr1 SEPARATED BY space.
DELETE itab1.
ELSE.
EXIT.
ENDIF.
ENDLOOP.
FREE totalchar.
READ TABLE itab1 INDEX 1 INTO wa1.
addr2 = wa1-ch.
DELETE itab1 INDEX 1.
LOOP AT itab1 INTO wa1.
CONCATENATE addr2 wa1-ch INTO addr2 SEPARATED BY space.
ENDLOOP.
WRITE:/ addr1,
/ addr2.
it will display:
Desa Kamboyan, Kecamatan Hampang
Km.29 Kab.Kotabaru, Kal-Sel
Do you have a better idea?please give me some suggestion ^^
