Posiblemente pues hacer lo siguiente
Hola
Estimado, una solución podría ser la siguiente.
Cra una tabla interna con un campo donde podrias guardar todos los caracteres validos.
ti_validos-caracter = 'A'.
ti_validos-caracter = 'a'.
ti_validos-caracter = '1'.
etc...
etc...
Lee el tamaño de tu parametro input.
len = strlen( parametro ).
Despues ve recorriendo tu cadena, caracter por caracter en base al tamaño y validando contra la tabla, si algun valor no esta en la tabla marcar el error.
pos = 1.
Do len times.
CLEAR ti_validos.
READ TABLE ti_validos WITH KEY caracter = parametro+pos(1).
IF sy-subrc NE 0.
** Error de caracter
ENDIF.
ADD 1 to pos.
ENDDO.
Y con eso creo podrias resolver tu escenario.
Espero te sirv. Saludos.
|