The following COBOL program depicts the use of 01 WS-SUB PIC 9 VALUE ZEROS. DISPLAY ‘WS-SUB IS EQUAL TO 4’ DISPLAY ‘WS-SUB IS EQUAL TO 5’ DISPLAY ‘NO CONDITION MET’ The output of the program is
The following COBOL program depicts the use of 01 WS-SUB PIC 9 VALUE ZEROS. DISPLAY ‘WS-SUB IS EQUAL TO 4’ DISPLAY ‘WS-SUB IS EQUAL TO 5’ DISPLAY ‘NO CONDITION MET’ The output of the program is