ABAP 繰り返し:Do…EndDo命令

  データ定義&編集

概要

何度も同じ処理を繰り返し行いたい時に使用するのがDo…EndDo命令である。
必ず処理を抜けるようプログラムミングしておかなければ無限ループになる可能性がある為、注意してもらいたい。

サンプルコード

*10回ループして処理を抜ける
DATA: V_CNT TYPE I.
Do.
  V_CNT = V_CNT + 1.
  WRITE V_CNT.

  IF V_CNT >= 10.
    EXIT.
  ENDIF.
ENDDO.

*結果は12345678910となるだろう。


*5回ループして処理を抜ける
Do 5 TIMES.
  V_CNT = V_CNT + 1.
  WRITE V_CNT.

  IF V_CNT >= 10.
    EXIT.
  ENDIF.
ENDDO.

*結果は12345となるだろう。
*あらかじめ決められた回数分ループするのか、条件に一致するまでループする等いくつかの構文が存在。

Dataの定義方法はこちらを参照