5.4.16 IFデータの値比較

条件が成立したときは,ELSEの前のTDコマンド群を実行します。条件が成立しないときは,ELSEのあとのTDコマンド群を実行します。

形式
[図データ]
使用例
文番号8700で中断し,R-CODE(I)の値によって,TDコマンドを実行します。

SET QUALIFICATION (#PROG(社員))
SET BREAK  ST(8700) DO
  IF CONDITION(R-CODE(I) = 0)
    DISPLAY COM('**TEST OK **')
  ELSE
    IF CONDITION(R-CODE(I) NOT= 8)
      DISPLAY COMMENT ('??? TEST NG')
      DISPLAY DATA(R-CODE(I))  HEX
      ASSIGN DATA(R-CODE(I)) VALUE(8)
    ELSE
      DISPLAY COMMENT ('**ERROR TEST OK**')
    ENDIF
  ENDIF
  GO
ENDDO
GO