COBOL

COBOL PERFORM WITH TEST AFTER

PERFORM WITH TEST AFTER UNTIL The following COBOL program depicts the use of  PERFORM WITH TEST AFTER UNTIL        01 WS-SUB   PIC 9 VALUE ZEROS.              PERFORM 20000-FIRST-PARA WITH TEST AFTER UNTIL WS-SUB=5              DISPLAY ‘PARA NAME IS  10000-FIRST-PARA’       

COBOL PERFORM WITH TEST AFTER Read More »

COBOL INLINE PERFORM

The following simple COBOL program depicts the use of         01 WS-SUB PIC 9(3) VALUE ZEROS.             PERFORM VARYING WS-SUB FROM 1 BY 1 UNTIL WS-SUB=5               DISPLAY ‘INLINE PERFORM DEPICTED BY MAINFRAMEWIZARD.COM’ INLINE PERFORM DEPICTED BY MAINFRAMEWIZARD.COM            

COBOL INLINE PERFORM Read More »

DIFFERENCE BETWEEN COBOL SEARCH AND SEARCH ALL

DIFFERENCE BETWEEN SEARCH AND SEARCH ALL The following mainframe tutorial list down the basic differences between the COBOL SEARCH and SEARCH ALL. SEARCH SEARCH ALL 1) Used for sequential search in COBOL tables.                     1) Used for Binary search. 2) The entries do not need to  be in any order.                     2) The

DIFFERENCE BETWEEN COBOL SEARCH AND SEARCH ALL Read More »

COBOL GO TO DEPENDING ON

The following COBOL program depicts the use of         01 PARA-NUM PIC 9 VALUE ZEROS.              DISPLAY ‘PARA NAME IS  10000-FIRST-PARA’              DISPLAY ‘PARA NAME IS  20000-FIRST-PARA’.              DISPLAY ‘PARA NAME IS  25000-SECOND-PARA’.           

COBOL GO TO DEPENDING ON Read More »