COBOL PERFORM WITH TEST BEFORE

PERFORM WITH TEST BEFORE UNTIL The following COBOL program depicts the use of  PERFORM WITH TEST BEFORE UNTIL        01 WS-SUB   PIC 9 VALUE ZEROS.              PERFORM 20000-FIRST-PARA WITH TEST BEFORE 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  10000-FIRST-PARA