*DOWHILE, Par
Loops repeatedly through the next *ENDDO command.
ParThe name of the scalar parameter to be used as the loop index.
There is no character parameter substitution for the Par field.
*DOWHILE loops repeatedly through the next *ENDDO command
as long as Par is greater than zero. The block
of commands following the *DOWHILE command (up to the *ENDDO command)
is executed repeatedly until some loop control is satisfied. Printout is
automatically suppressed on all loops after the first (include a /GOPR command
to restore the printout). The command line loop control (Par)
must be input; however, *IF within the block can also be
used to control looping [*EXIT, *CYCLE].
One level of internal file switching is used for each nested *DOWHILE.
Twenty levels of nested do-loops are allowed.
This command is valid in any processor.