LOOP-END LOOP (ループ終了ループ)
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.