how tp split

[Former Member]

Hi all,

how to split

T149D_{BWTAR AS A T149D}KKREF AS B T149D~ANY AS C ..........

so that we find

Qfield T149D_{BWTAR T149D}KKREF T149D~ANY.....

value A B C.....

Regards

[RahulKeshav]

wt do u mean by split...

are looking for concatenate....

plz eleborate...

[Former Member]

HI

I HVE A STRING 'T149D_{BWTAR AS A T149D}KKREF AS B T149D~ANY AS C ..........'

but i want to divide these values in two string so how to do that

1 string ---> T149D_{BWTAR T149D}KKREF T149D~ANY.....

2 string ---> A B C.....

regards,

[matt]

Split at space into an internal table

Every 1st, 4th, 7th... record will be your T149D_{BWTAR T149D}KKREF T149D~ANY etc.

Every 3rd, 6th, 9th... record will be your A, B, C etc.

Throw other records away.

[Former Member]

Hi Try this code.

DATA : gv_str TYPE string.

DATA : BEGIN OF gt_str OCCURS 0,
         sub(20),
       END OF gt_str.

DATA: gv_index TYPE i.

DATA: gv_str1 TYPE string.
DATA: gv_str2 TYPE string.


gv_str = 'T149D~BWTAR AS A T149D~KKREF AS B T149D~ANY AS C'.

SPLIT gv_str AT ' ' INTO TABLE gt_str.

LOOP AT gt_str.
  gv_index = sy-tabix MOD 3.
  CASE gv_index.
    WHEN 1.
      CONCATENATE gv_str1 gt_str-sub INTO gv_str1 SEPARATED BY space.
    WHEN 0.
      CONCATENATE gv_str2 gt_str-sub INTO gv_str2 SEPARATED BY space.
  ENDCASE.
ENDLOOP.

WRITE:/ gv_str1.
WRITE:/ gv_str2.

Regards,

Bhupal

[matt]

Nice implementation, Bhupal

[Former Member]

Thanks Matthew.

[Former Member]

Thanks bhupal.

u rocks!!!!!!!

[Former Member]

Hi all,

in bhupal case we are getting a syntax with a order of 1- 'T149D~BWTAR 2- AS 3- A ,so it's ok but it's generate a error if we have a input of mix type means

gv_str = 'T149D_{BWTAR T149D}KKREF AS B T149D~ANY AS C'................

or

gv_str = 'T149D_{BWTAR AS A T149D}KKREF T149D~ANY........... .

OR

gv_str = 'T149D_{BWTAR T149D}KKREF T149D~ANY......

or

-

---

REGARDS,