hola, aqui te pongo el codigo q te puede servir... ya lo probe y si funciona pero de todas maneras pruebalo... espero q te sirva.
despues del check... sigues con tu proceso normal si es q te cumple la condicion.
DATA: w_numero(10) TYPE n,
w_flag TYPE c.
w_numero = '0123456789'.
IF w_wblnr(4) CO w_numero.
w_flag = 'X'.
IF w_wblnr+4(1) CN w_numero.
w_flag = 'X'.
IF w_wblnr+5 CO w_numero.
w_flag = 'X'.
ELSE.
CLEAR w_flag.
ENDIF.
ELSE.
CLEAR w_flag.
ENDIF.
ELSE.
CLEAR w_flag.
ENDIF.
CHECK w_flag EQ 'X'.
write: 'cumple'.
|