The following COBOL program depicts the use of 01 WS-SUB PIC 9 VALUE ZEROS. PERFORM 20000-FIRST-PARA UNTIL WS-SUB=5 DISPLAY ‘PARA NAME IS 10000-FIRST-PARA’ DISPLAY ‘PARA NAME IS 20000-FIRST-PARA’. The ouput of the above program is PARA NAME IS 20000-FIRST-PARA PARA NAME IS 20000-FIRST-PARA PARA NAME IS 20000-FIRST-PARA PARA NAME IS 20000-FIRST-PARA PARA NAME IS 20000-FIRST-PARA PARA NAME IS 10000-FIRST-PARA Note: By default the condition is evaluated before the loop is executed.