NUMERIC_CHECK – Validar valor numérico

Caso: se desea validar que el valor ingresado en pantalla por el usuario sea numérico.

Solución: Usando la función NUMERICK_CHECK puedo validar según los caracteres que deseo aceptar (por ejemplo puedo querer la coma pero no el punto)

CALL FUNCTION ‘NUMERIC_CHECK’
EXPORTING
string_in = ls_mod_cell-VALUE
IMPORTING
htype = lc_tipo
EXCEPTIONS
OTHERS = 1.

CHECK lc_tipo NE ‘CHAR’ OR ( lc_tipo EQ ‘CHAR’ AND ls_mod_cell-VALUE CO ‘ ,.0123456789’ ).

Anuncios