Manualshelf

COBOL Manual for TNS and TNS/R Programs

ManualsBrandsHP ManualsServerHP NonStop G-Series
571572573574575576577578579580
Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
9-174
PERFORM VARYING
After termination of the PERFORM statement, vary-1 and vary-2 have the
values they contained at the end of the last execution of the specified set of
statements.
Figure 9-10. Execution of a PERFORM VARYING Statement
With a TEST AFTER Phrase and One AFTER Phrase
Enter
Set vary-1 to
current base-1
value.
Set vary-2 to
current base-2
value.
Exit
TRUE
condition-2
?
FALSE
Augment
vary-1
with step-1 .
condition-1
?
FALSE
TRUE
Execute the
range of the
PERFORM.
Augment
vary-2
with step-2 .
VST513.vsd