迴圈-結束迴圈

LOOP-END LOOP 結構會執行迴圈中指令指定的重複轉換，直到達到指定的截斷為止。 截斷值可以由 LOOP 指令上的索引子句、 END LOOP 指令上的 IF 子句或迴圈結構內的 BREAK 指令指定 (請參閱 BREAK)。

LOOP [varname=n TO m [BY {1**}]]  [IF [(]logical expression[)]] 
                         {n  }

transformation commands

END LOOP [IF [(]logical expression[)]]

* * 如果省略關鍵字，則為預設值。

此指令不會讀取作用中資料集。 它會以下一個讀取資料集的指令來儲存，擱置執行。 如需相關資訊，請參閱主題 指令順序 。

範例

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.