Muchas gracias por las propuestas.
En el caso de la comparación 'CO', no me funciona... La verdad es que no he llegado a entender porqué.
Al final como lo he solucionado es de la siguiente manera:
DATA: l_string(39) TYPE c VALUE 'ABCDEFGHIJKLMNÑOPQRSTUVWXYZ0123456789*/', "caracteres correctos
l_indice TYPE sy-index.
DO 5 TIMES. "le pongo un 5 porque el campo tiene esa longitud
l_indice = sy-index - 1.
SEARCH l_string FOR gs_zja_tr_t_0009-zzpappre+l_indice(1).
IF sy-subrc <> 0.
IF gs_zja_tr_t_0009-zzpappre+l_indice(1) <> '*'
AND gs_zja_tr_t_0009-zzpappre+l_indice(1) <> ' '.
MESSAGE e068(zja_tr_ms_01). "Caractétes de Patrones incorrecto.
ENDIF.
ENDIF.
ENDDO.
|