Goes directly to the END of an iterating block
and starts the next iteration of the block.
Syntax
-
label
- The name of the block for which you want to start the next iteration. If
you do not name a block, the AVM starts the next iteration of the
innermost iterating block that contains the NEXT statement.
Example
The
FOR EACH block in this procedure reads a single Customer record
on each iteration of the block. If the SalesRep field
of a Customer record does not match the SalesRep value supplied
to the PROMPT-FOR statement, the NEXT statement causes the AVM to
do the next iteration of the FOR EACH block, bypassing the DISPLAY
statement.
r-next.p
PROMPT-FOR Customer.SalesRep LABEL "Enter salesman initials"
WITH SIDE-LABELS CENTERED.
FOR EACH Customer:
IF Customer.SalesRep <> INPUT Customer.SalesRep THEN NEXT.
DISPLAY Customer.CustNum Customer.Name Customer.City Customer.State
WITH CENTERED USE-TEXT.
END.
|
