zOs/REXX.O13/LOOP

DO I = 1 TO 200                                                         00010000
    SAY 'LINE' I                                                        00020000
    END                                                                 00030000