◄Key► ◄Up► ◄Contents► ◄Index► ◄Back► ──────────────────────────────────────────────────────────────────────────── Verb: PERFORM Function: Causes a group of statements to be executed repeatedly. If the statements are a procedure, this statement repeatedly transfers control to that procedure, with automatic return of control each time the procedure finishes. Syntax: Which format? ◄Simple► ◄TIMES► ◄UNTIL► VARYING ►►──PERFORM─┬─procedure-name-1─┬─────────────────────────────┬─phrase─┬─►◄ │ └┬─THROUGH─┬─procedure-name-2─┘ │ │ └─THRU────┘ │ └─phrase──imperative-statement END-PERFORM────────────────┘ where phrase is: ►─┬──────────────────────┬─VARYING─┬─identifier-2─┬──────────────────────► └┬────┬─TEST─┬─BEFORE─┬┘ └─index-name-1─┘ └WITH┘ └─AFTER──┘ ►────────FROM─┬─identifier-3─┬─BY─┬─identifier-4─┬─UNTIL─┬─condition-1─┬─► ├─index-name-2─┤ └─literal-2────┘ └─EXIT────────┘ └─literal-1────┘ ►┬──────────────────────────────────────────────────────────────────────┬► │ ┌───────────────────────────────────────────────────────────────────┐│ │ ▼ ││ └─AFTER─┬─identifier-5─┬─FROM─┬─identifier-6─┬─BY─┬─identifier-7─┬─┐ ││ └─index-name-3─┘ ├─index-name-4─┤ └─literal-4────┘ │ ││ └─literal-3────┘ │ ││ ┌───────────────┘ ││ └─UNTIL condition-2─┘ -♦-