Sintaxis
LOOP
Propósito
El comando LOOP causa la vuelta del control del flujo de ejecución al inicio de los comandos de programación estructurada WHILE ... ENDDO o FOR ... NEXT. El LOOP evita la ejecución de las instrucciones restantes dentro de un bloque de estos comandos.
Argumentos
Ninguno.
Utilización
El comando LOOP debe utilizarse siempre dentro de un bloque de instrucciones de los comandos WHILE ... ENDDO o FOR ... NEXT. Al encontrarlo, causa el retorno inmediato del flujo de ejecución al inicio de estos comandos, sin la necesidad de alcanzar el ENDDO o el NEXT. Las instrucciones que estuvieran entre el LOOP y el ENDDO o el NEXT no se ejecutarán. En el caso del WHILE, la condición de control será nuevamente evaluada. En el caso del FOR ... NEXT, el contador se incrementará y se comparará con su límite.
Ejemplos
En la siguiente función, la ejecución se devuelve al inicio del WHILE cuando el segundo elemento del array aAlmox esté completado con “N”.
// Función de cálculo
FUNCTION CalcGrao(nSacas, aAlmox)
LOCAL nPos := 0
LOCAL nReserva := 0
LOCAL nSoma := 0
WHILE nPos < LEN(aAlmox) .AND. nReserva < nSacas
nPos++
IF aAlmox[nPos, 2] == "N"
LOOP
ENDIF
nSoma := nReserva + aAlmox[nPos]
IF nSoma <= nSacas
nReserva := nSoma
ELSE
nReserva := nSacas
ENDIF
ENDDO
RETURN nReserva
De la misma forma que en la función anterior, basada en el WHILE, la ejecución de la siguiente función se devuelve al inicio cuando el segundo elemento del array aAlmox esté completado con “N” o cuando la cantidad reservada sea igual a la cantidad de sacos solicitados.
// Función de cálculo
FUNCTION CalcGrao(nSacas, aAlmox)
LOCAL nPos := 0
LOCAL nReserva := 0
LOCAL nSoma := 0
FOR nPos := 1 TO LEN(aAlmox)
IF nReserva == nSacas .OR. aAlmox[nPos, 2] == "N"
LOOP
ENDIF
nSoma := nReserva + aAlmox[nPos, 1]
IF nSoma <= nSacas
nReserva := nSoma
ELSE
nReserva := nSacas
ENDIF
NEXT nPos
RETURN nReserva
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas