topic Re: ABAP SPLIT Command in Application Development and Automation Discussions

ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 13:04:54 GMT

Hi Guys,

I need some help.

I need to SPLIT data that I am gathering in SAP to pass to an interface.

Street and House Number field looks like : " Avenue Boulevard 235 C"

What I need is ALL before number in field a, number in field b, all after number in field c.

What I have into the program is in attachment.

I have tried a couple of things with no success, please help. quite urgent.

Next time do not post any urgent threads on SCN! (Why?? - Read the forum RoE)

Thank you

Message was edited by: Suhas Saha

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 13:09:23 GMT

This is the code into my program:

data:

str5 type string,

str6 type string,

str7 type strring,

stringstreet type string,

i_streethause_tab type table of string,

textstras type string.

....

split textstras at space into str5 str6 str7,

table i_streethause_tab.

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 13:18:52 GMT

Anyone to help please?

Re: ABAP SPLIT Command

PeterJonker — Tue, 22 Oct 2013 13:25:06 GMT

Data: numberpassed type c.

loop at i_streethause_tab into wa_streethouse.

if wa_streethouse CO '0123456789'.

* here is your number field

move wa_streethouse to numberfield.

numberpassed = 'X'.

else.

if numberpassed = 'X'.

concatenate afternumberfield wa_streethouse into afternumberfield.

else.

concatenate streetfield wa_streethouse into streetfield.

endif.

endloop.

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 13:28:01 GMT

Hi Fafa,

Follow the logic in this thread.

http://scn.sap.com/thread/1388064

If there is going to be only three parts, you can follow this logic.

DATA : str1 TYPE c,
        str2 TYPE string,
        str7 TYPE string,
        c TYPE string,
       stringstreet TYPE string,
       i_streethouse_tab TYPE TABLE OF string,
       len TYPE i,
       counter TYPE i, begin TYPE i, offset TYPE i.
stringstreet = ' Avenue Boulevard 235 C'.
begin = 0.
counter = 0.
len = STRLEN( stringstreet ).

* First part.

DO .
   str1 = stringstreet+counter(1).
   IF str1 CO '0123456789'.
     str2 = stringstreet+begin(counter).
     APPEND str2 TO i_streethouse_tab.
     begin = counter.
     EXIT.
   ENDIF.
   counter = counter + 1.
ENDDO.

* Second part.

clear str2.
DO.
   counter = counter + 1.
   str1 = stringstreet+counter(1).
   IF str1 NA '0123456789'.
     offset = counter - begin.
     str2 = stringstreet+begin(offset).
     APPEND str2 TO i_streethouse_tab.
     begin = counter.
     EXIT.
   ENDIF.
ENDDO.

* Third part

CLEAR str2.
offset = len - begin.
str2 = stringstreet+begin(offset).
APPEND str2 TO i_streethouse_tab.

LOOP AT i_streethouse_tab INTO str7.
WRITE 😕 str7.
ENDLOOP.

Output

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 13:32:59 GMT

data: str type string value 'Avenue Boulevard 235 C'.

data: str1 type string,

str2 TYPE string,

str3 type string,

str4 type string.

data: itab type table of string.

data: wa LIKE LINE OF itab.

SPLIT str at space into: str1 str2 str3 str4, table itab.

WRITE: str1.

WRITE😕 str2.

WRITE😕 str3.

WRITE😕 str4.

loop at itab into wa.

write😕 wa.

ENDLOOP.

Re: ABAP SPLIT Command

former_member188282 — Tue, 22 Oct 2013 13:33:31 GMT

Try this code:

data: str(100),       
len type i,       
counter type i,       
symb. data: begin of itab occurs 0,       
flag,       
str(20),       
end of itab. 
data: begin of xtab occurs 0,       
str(20),       
end of xtab. 
str = '56ddfdfhh hjhj 12 ggh fss 33s-yuyu'. len = strlen( str ). 
do len times.  
 symb = str+counter(1).   
itab-str = symb.   
if symb CO '0123456789'.     
itab-flag = 'N'.   
else.     
itab-flag = 'C'.   
endif.   
append itab.   
counter = counter + 1. 
enddo.  
loop at itab.   
at new flag.     
clear xtab.  
 endat.    
concatenate xtab-str itab-str into xtab-str.    
at end of flag.     
append xtab.   
endat. 
endloop

Regards,

Rajesh

Re: ABAP SPLIT Command

nabheetscn — Tue, 22 Oct 2013 13:39:11 GMT

This message was moderated.

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 13:40:47 GMT

Regular expression can give desired result in one line.

DATA: a TYPE string,
      b TYPE string,
      c TYPE string.
a = 'Avenue Boulevard 235 C'.
FIND REGEX '(\D+)(\d.*)' IN a SUBMATCHES b c.
WRITE:/ b,
      / c.

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 13:47:08 GMT

DATA LV_B(10) TYPE N.

LV_ADDRESS = " Avenue Boulevard 235 C"

LV_B = LV_ADDRESS. ----Since this is of type N only numbers will be stored here charachters will be ignrored

SPLIT LV_ADRESS AT LV_B into LV_A LV_C.

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 14:28:37 GMT

Thank you for posting.

It did not work for me though.

But big thanks anyways!

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 15:11:17 GMT

Hi Guys,

Unfortunatelly I tried a couple of solutions but none of them work.

I will try to be more specific:

I need to SPLIT data that I am gathering in SAP to pass to an interface. Street and House Number field looks like : " Avenue Boulevard Margout 235 C" What I need is ALL before number in field a, number in field b, all after number in field c.

field a ) should contain " Avenue Boulevard Margout " and all spaces MUST remain because they need to feed the interface as is. If they are without spaces, outsourced system does not read data.

field b) should contain "235"

field c) should contain "C" - which means everything else in this string after number.

I need to pass those values so i am not looking to write them in the output ....

Please help. Any help is highly appreciated!

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 15:45:36 GMT

please help, I really appreciate if you could.

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 16:11:18 GMT

This snippet extract 235 and C from given string using regular expression.

DATA: a TYPE string,
      b TYPE string,
      c TYPE string.
a = 'Avenue Boulevard 235 C'.
FIND REGEX '(\d+)\s*(.*)' IN a SUBMATCHES b c.
WRITE:/ b,
      / c.

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 16:17:30 GMT

Hi Fafa,

Try using the shift command to find the beginning and ending postions of the numbers and then use the postions numbers to parse the field. In this case you would not need the split command.

Here's an example of what I am trying to say:

data: wa_street_house char 80,

wa_begin type i,

wa_end type i.

loop at i_street_house into wa_street_house

l_street_house = wa_street_house.

do 80 times.

if l_street_house(1) CO '0123456789'.

if wa_begin is initial.

wa_begin = sy-index.

else.

wa_end = sy-index.

endif.

shift l_street_house left by 1 space.

enddo.

l_numb = wa_end - wa_begin.

wa_str5 = wa_street_house+0(wa_begin)

wa_str6 = wa_street_house+wa_begin(l_numb)

wa_str7 = wa_street_house+wa_end( the rest .....)

endloop.

You may have to adjust some of the index values but I think this will get you close.

Regards,

Steve

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 17:08:26 GMT

Thank you Steve.

Will try to use this logic but not sure I can as it will change code a lot.

But thank you anyways, will try.

Any Expert that could give me some light into SPLIT would be appreciated.

Thank you!

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 17:29:35 GMT

Hi Fafa

Did you try running logic posted by me?

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 17:32:17 GMT

Hi Manish,

I did but it does not work for what I need.

I need to pass result structure for the interface not display output.

If i can pass structure with your code, please enlighten me.

Thank you

Fafa

Re: ABAP SPLIT Command

Former Member — Tue, 22 Oct 2013 17:46:08 GMT

Some expert to chime in?

The code for the interface is so extensive that I would really rather to keep the SPLIT as I have it also in other areas.

I am feeding webservices so I really need to pass straight to the call.

Re: ABAP SPLIT Command

former_member192854 — Tue, 22 Oct 2013 17:51:45 GMT

Hi Fafa,

you might want to enlighten us on what type of interface structure all the results should come together - since I think all solutions provided are looking quiet sufficient.

Best,

Sander