COBOL PERFORM VARYING UNTIL

The following COBOL program depicts the use of         01 WS-SUB   PIC 9  VALUE ZEROS.              PERFORM 20000-FIRST-PARA VARYING WS-SUB FROM 1 BY 1 UNTIL              DISPLAY ‘PARA NAME IS  10000-FIRST-PARA’              DISPLAY ‘VALUE OF WS-SUB IS = ‘ WS-SUB. The ouput of the above program will be PARA NAME IS  10000-FIRST-PARA