No Hrm, pero sí que me ha ayudado a encontrar el error, y es que me había ofuscado en ese trozo y no hay como una opinión externa para ver el fallo.
El problema estaba en que FUNCTION UPPER-CASE, lleva entre paréntesis la variable, (o constante), que quieres convertir así que lo que no puede ir dentro es el operador de relación ...
Código COBOL:
PERFORM VARYING I FROM 1 BY 1 UNTIL I > 8
OR I > A
PERFORM VARYING II FROM 1 BY 1
UNTIL II > 81
OR FUNCTION UPPER-CASE (WENTCOD (I:1)) = LE (II)
CONTINUE
END-PERFORM
.
.
.
END-PERFORM.
ëste es el correcto.
Me da hasta verguenza el tener estos fallos ... a mis años ... :o :o
Un saludo