7.51.2 GOTOの使用例

LANSA

previous page next page

7.51.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
 

previous page start next page