topic Re: ABAP function module to check data is a valid number in Application Development and Automation Discussions

ABAP function module to check data is a valid number

Former Member — Thu, 26 Feb 2009 21:21:10 GMT

Hi Guys,

I am parsing a long string from a R3 table to load into BW, and need to verify the incoming data is valid number instead of having some or all charactors so I can load into a quantity field, in BW, it is a Key figure infoObject. The string length is 14.

For example, if data is 123.34, then the number is valid. If data is 1A23, then it is not valid number.

Thanks in advance.

Re: ABAP function module to check data is a valid number

former_member156446 — Thu, 26 Feb 2009 21:24:51 GMT

Look at this:

PARAMETER: p_cahr TYPE char10.

IF p_cahr CN '1234567890 '.
  WRITE: 'invalid'.
ENDIF.

Re: ABAP function module to check data is a valid number

Jelena_Perfiljeva — Thu, 26 Feb 2009 22:02:00 GMT

See some examples here, including function modules:

http://friendlyabaper.blogspot.com/2006/10/fun-with-numbers.html

Re: ABAP function module to check data is a valid number

Former Member — Fri, 27 Feb 2009 15:26:37 GMT

Thank you J@Y, you solution works. I added check for "." decimal point to make sure only one ".". My code is below.

Thank you everyone!

DATA: count type i.

PARAMETER: p_input TYPE char14.

FIND ALL OCCURRENCES OF '.' IN p_input MATCH COUNT count.

Write: ' occurance of the . = ', count.

IF p_input CO '1234567890. ' and count <= 1.

WRITE: /'Yes, valid', p_input.

Else.

WRITE: /'invalid', p_input.

ENDIF.

Re: ABAP function module to check data is a valid number

Former Member — Fri, 27 Feb 2009 15:39:53 GMT

Just to point out: in J@Y solution,

There is a space in the number "123456789. ", that is very important. Otherwise it would not work.

Re: ABAP function module to check data is a valid number

Former Member — Tue, 29 Apr 2014 14:19:34 GMT

Hi,

SAP provides the function BUS_NUMBERFIELD_PAI,

You pass in a table/field reference that matches the number you want to match to say GLT0-TSLVT (len 15 dec 2) and the string.

It tells you if the number is valid and will even return a reformatted string.

I.E.

123456,78 is valid and formatted as 123,456.99

123,,456.78 raises AMOUNT_NOT_ALLOWED

123.456 raises INTERNAL_ERROR as there are too many decimals

Hope that helps.

FUNCTION BUS_NUMBERFIELD_PAI .
*" IMPORTING
*"     VALUE(I_TABNAME) LIKE DD03L-TABNAME (Ex
*"     VALUE(I_FIELDNAME) LIKE DD03L-FIELDNAME
*"     VALUE(I_CURRENCY) LIKE TCURC-WAERS OPTIONAL
*" EXPORTING
*"     VALUE(E_VALUE_DB)
*" CHANGING
*"     VALUE(C_VALUE_DYNP)
*" EXCEPTIONS
*"      NUMBER_NOT_ALLOWED
*"      AMOUNT_NOT_ALLOWED
*"      INTERNAL_ERROR

Re: ABAP function module to check data is a valid number

Former Member — Thu, 21 May 2015 00:35:53 GMT

Thanks Jun