topic Re: Check if string is numeric in Application Development and Automation Discussions

Check if string is numeric

Former Member — Mon, 06 May 2013 13:27:47 GMT

FORM IsNumeric.

DATA:   numeric(10) TYPE C VALUE '0123456789 ',
             account(10) TYPE C VALUE '600',
             rc TYPE C.

IF account CO numeric.
      rc = ''.
ELSE.
      rc = 'X'.
ENDIF.
ENDFORM.

The result is rc = 'X'

Where I'm wrong?

Regards,

Mioa

Re: Check if string is numeric

arindam_m — Mon, 06 May 2013 13:38:51 GMT

Hi,

your variable account(10) TYPE C VALUE '600'. Is of length 10 so account is actually ' 600' i.e. with 7 spaces in the value. but your string '0123456789 ' does not have space as the length is 10 so the space is truncated, so numeric = '0123456789' all total 10 chars the space is missing due to length. If numeric is of length 11 it will work.

Cheers,

Arindam

Re: Check if string is numeric

Former Member — Mon, 06 May 2013 13:40:07 GMT

Try this code .

DATA: numeric(10) TYPE C VALUE '0123456789 ',

account(3) TYPE C VALUE '600',

rc TYPE C.

IF account CO numeric.

rc = ''.

ELSE.

rc = 'X'.

ENDIF.

ENDFORM.

Re: Check if string is numeric

Former Member — Mon, 06 May 2013 13:41:13 GMT

Mio,

If the value for account was '0000000600' your code will work fine. Try as per below:

DATA: numeric(10) TYPE C VALUE '0123456789 ',

account(10) TYPE C VALUE '600',

len type char10,

rc TYPE C.

condense account.

len = strlen ( account ).

IF account+0(len) CO numeric.

rc = ''.

ELSE.

rc = 'X'.

ENDIF.

This should solve your issue.

Thanks,

Vikram.M

Re: Check if string is numeric

Former Member — Mon, 06 May 2013 13:51:56 GMT

Hi Mio,

Check if this below function module helps you.

NUMERIC_CHECK

Regards,

Santanu.

Re: Check if string is numeric

Former Member — Mon, 06 May 2013 15:58:34 GMT

Hi,

you can see this example:

   REPORT z_check_string.

DATA: account(10) TYPE c VALUE '2001',
             rc TYPE c,
             lung TYPE i,
             pos TYPE i,
             char(1).

lung = strlen( account ).
DO lung TIMES.
char = account+pos(1).
IF char CO '0123456789'.

*here if you want you can move char into others flow..............
ELSE.
rc = 'X'.
EXIT.
ENDIF.
pos = pos + 1.
ENDDO.

WRITE rc.

I hope that this example helped you and solve your issue.

Regards

Ivan

Re: Check if string is numeric

custodio_deoliveira — Tue, 07 May 2013 00:49:15 GMT

To make use of more modern ABAP I'd rather write:

DATA: numeric(11) TYPE C VALUE '0123456789 ', "as suggested by arindam

account(10) TYPE C VALUE '600',

rc TYPE C.

rc = boolc( account CO numeric ).

boolc returns a boolean for the given expression.

Cheers,

Custodio