topic Re: Remove Alphanumeric charaters from a field in Application Development and Automation Discussions

Remove Alphanumeric charaters from a field

Former Member — Tue, 04 Sep 2007 21:09:24 GMT

I have a field which can have value as ABCD0123ef. Is there a function module which would return just the numeric part of it i.e 0123.

Please advise.

Re: Remove Alphanumeric charaters from a field

Former Member — Tue, 04 Sep 2007 21:30:40 GMT

Hi,

try this

data:v_type type char15 value 'ABCD0123e1f'.

data:v_num(10) type n.

v_num = v_type.

write:/ v_type,

v_num.

assign variable to a Numc type field.

Thanks,

Vamshi.

Re: Remove Alphanumeric charaters from a field

Former Member — Tue, 04 Sep 2007 21:54:22 GMT

Hi Ankur,

Try this,

DATA : TEXT(100) TYPE C.

TRANSLATE TEXT USING 'A B C......X Y Z'.

Hopes it helps you.

Ali

Re: Remove Alphanumeric charaters from a field

Former Member — Tue, 04 Sep 2007 22:09:10 GMT

Vamshi,

This returns 0000001231 and not 01231. Any clues

Re: Remove Alphanumeric charaters from a field

Former Member — Tue, 04 Sep 2007 22:13:11 GMT

It's because the lenght of the string....You can use...


DATA: TEST(5) TYPE N.

That way, your going to have <b>01231</b> instead of <b>0000001231</b>

Greetings,

Blag.

Re: Remove Alphanumeric charaters from a field

Former Member — Tue, 04 Sep 2007 22:15:17 GMT

That is not possible to define it before hand as numc(5). it could also be ABCD012334404ef.

Re: Remove Alphanumeric charaters from a field

Former Member — Tue, 04 Sep 2007 22:47:03 GMT

Ok...It took me a while...But this code works -;)


DATA:v_type TYPE string VALUE 'ABCD012334404ef'.
DATA: regex TYPE string.

regex = 'D+'.
REPLACE REGEX regex IN v_type WITH space.
regex = 'D+'.
REPLACE REGEX regex IN v_type WITH space.

WRITE:/ v_type

Greetings,

Blag.

Re: Remove Alphanumeric charaters from a field

Former Member — Tue, 04 Sep 2007 22:51:22 GMT

The code doesn't compile using the REGEX word as it is a reserved word.

Re: Remove Alphanumeric charaters from a field

Former Member — Tue, 04 Sep 2007 22:56:16 GMT

Really? It compiled in my box...LOL


DATA:v_type TYPE string VALUE 'ABCD012334404ef'.
DATA: reg_ex TYPE string.
 
reg_ex = 'D+'.
REPLACE REGEX reg_ex IN v_type WITH space.
reg_ex = 'D+'.
REPLACE REGEX reg_ex IN v_type WITH space.
 
WRITE:/ v_type

This should works fine -;)

Greetings,

Blag.

Re: Remove Alphanumeric charaters from a field

RichHeilman — Tue, 04 Sep 2007 22:58:41 GMT

RegEx or Regular Expressions is only supported in NetWeaver 7.0.

Regards,

RIch Heilman

Re: Remove Alphanumeric charaters from a field

RichHeilman — Tue, 04 Sep 2007 23:05:53 GMT

Easy, simple way is something like this.


REPORT  zrich_0002.

data: lv_str type string.
data: lv_str2 type string.
data: subset type string.
data: offset type i.
data: len type i.

lv_str = 'ABCD012334404ef'.
len = strlen( lv_str ).

do len times.
  subset = lv_str+offset(1).
  if subset CA '0123456789'.
    concatenate lv_str2 subset into lv_str2.
  endif.
  offset = offset + 1.
enddo.

write:/ lv_str2.

Regards,

RIch Heilman