LOOP-END LOOP
La structure LOOP-END LOOP effectue des transformations répétées spécifiées par les commandes dans la boucle jusqu'à ce qu'elles atteignent une limite spécifiée. La limite peut être spécifiée par une clause d'indexation dans la commande LOOP , une clause IF dans la commande END LOOP ou une commande BREAK dans la structure de la boucle (voir BREAK).
LOOP [varname=n TO m [BY {1**}]] [IF [(]logical expression[)]]
{n }
transformation commands
END LOOP [IF [(]logical expression[)]]
* * Par défaut si le mot clé est omis.
Cette commande ne lit pas le jeu de données actif. Il est stocké, en attente d'exécution avec la commande suivante qui lit le jeu de données. Pour plus d'informations, voir la rubrique Commande .
Exemples
SET MXLOOPS=10. /*Maximum number of loops allowed
LOOP. /*Loop with no limit other than MXLOOPS
COMPUTE X=X+1.
END LOOP.
LOOP #I=1 TO 5. /*Loop five times
COMPUTE X=X+1.
END LOOP.