PERFORM

Format 1

PERFORM IN THREAD

        [ procedure-1 [ {THROUGH} procedure-2 ] ]
                        {THRU   }

        [ HANDLE IN handle-1 ]

        [ statement END-PERFORM ]

Format 2

PERFORM IN THREAD
        [ procedure-1 [ {THROUGH} procedure-2 ] ]
                        {THRU   }

        [ HANDLE IN handle-1 ]

        number TIMES

        [ statement END-PERFORM ]

Format 3

PERFORM IN THREAD

        [ procedure-1 [ {THROUGH} procedure-2 ] ]
                        {THRU   }

        [ HANDLE IN handle-1 ]

        [ WITH TEST {BEFORE} ] UNTIL condition
                    {AFTER }

        [ statement END-PERFORM ]

Format 4

PERFORM IN THREAD

        [ procedure-1 [ {THROUGH} procedure-2 ] ]
                        {THRU   }

        [ HANDLE IN handle-1 ]

        [ WITH TEST {BEFORE} ]
                    {AFTER }

        VARYING counter FROM starting-val

            BY increment UNTIL condition

        [ AFTER} counter FROM} starting-val

            BY} increment UNTIL} condition ] ...

        [ statement END-PERFORM} ]