7.64.2 GOTO の使用例

例1:フィールド#Xが10未満の場合、制御をラベルL10に渡します。

IF     COND('#X *LT 10')
GOTO   LABEL(L10)
ENDIF
 

例2:フィールド#Xが10未満の場合、制御をラベルL10に渡します。それ以外の場合は、制御をラベルL11に渡します。

IF     COND('#X *LT 10')
GOTO   LABEL(L10)
ELSE
GOTO   LABEL(L11)
ENDIF