If variable TOTAL or variable AVERAGE (extracted from the report by a previous EXECUTE block) is not within the specified range, rule processing flow proceeds directly to label ERROR using statement DO GOTO. The rule then terminates NOTOK.
Figure 205 DO GOTO Statement – Example 1
LIBRARY : CTB.PROD.RULES RULE : CHKACC
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
===========================================================================
EXECUTE CHECK UPON C
ON DATA
ALWAYS
DO PRINT = CHECKING ACCOUNTS REPORT - SYSDATE, SYSTIME F C
DO
IF TOTAL>200 C
DO PRINT = TOTAL CHECKED AND IS ACCORDING TO EXPECTATIONS. F C
DO
ELSE
DO PRINT = TOTAL NOTOK, PLEASE CHECK ... F C
DO GOTO LABEL ERROR
DO
IF AVERAGE>150 AND AVERAGE<2000 C
DO PRINT = AVERAGE CHECKED AND IS IN THE CORRECT RANGE. F C
DO
ELSE
DO PRINT = AVERAGE NOT IN THE RIGHT RANGE, PLEASE CHECK ... F C
DO GOTO LABEL ERROR
DO
ALWAYS
DO TERMINAT = OK COD 0000
DO
LABEL: ERROR
ALWAYS
DO TERMINAT = NOTOK COD 3333
DO
(ENTER "ALWAYS", "IF")
===========================================================================
EXECUTE UPON C
ON
======= >>>>>>>>>>>>>>> END OF RULE DEFINITION PARAMETERS <<<<<<<<<<<<<<< =====
PLEASE FILL IN RULE DEFINITION. 10.35.56
Parent Topic |