[Josber]

Tengo el siguiente trozo de código:

                         
     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.
     

Y al compilar, me dá el siguiente error:

JMN2700I-S The right parenthesis of the function is not specified. A right parenthesis is assumed

¿Dónde leshes me falta un paréntesis derecho?, ¿alguien lo ve?, y por cierto lo de "assumed" va a ser que no.

Un saludo