Operator

COBOL EVALUATE TRUE

The following COBOL program depicts the use of         01 WS-SUB   PIC 9  VALUE ZEROS.                   DISPLAY ‘WS-SUB IS GREATER THAN 4’                   DISPLAY ‘WS-SUB IS GREATER THAN 5’                   DISPLAY

COBOL EVALUATE TRUE Read More »

COBOL Example ACCEPT AND DISPLAY

Example of ACCEPT and DISPLAY PROGRAM IDENTIFICATION DIVISION.                    PROGRAM-ID. PGM001.                         AUTHOR. MAINFRAMEWIZARD.                   DATA DIVISION.                             WORKING-STORAGE SECTION.                    01 VAR1 PIC 9(3) VALUE ZEROES.              PROCEDURE DIVISION.                         10000-MAIN-PARA.                                 ACCEPT VAR1.                                DISPLAY ‘VARIABLE INPUT IS=’ VAR1.          STOP RUN.                                                      

COBOL Example ACCEPT AND DISPLAY Read More »

JCL interview questions

JCL Interview Questions ·        What is the difference between primary and secondary allocations for a dataset? Ans:-Secondary allocation is used when more space is required than what has already been allocated by primary. ·        How to access a file that had a disposition of KEEP? Ans:-Since the file is not in catalog you will need

JCL interview questions Read More »

COBOL PERFORM TIMES

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

COBOL PERFORM TIMES Read More »

What is a db2 package?

What is a package? A package is a single, bound DBRM which contains optimized access paths to DB2.  Packages are the ouput of “Bind Package” command which takes DBRM as input. There can be one DBRM per package.  Once the package is formed using the DBRM it can be fed to the “Bind Plan” command

What is a db2 package? Read More »

USE OF ARRAYS IN CLIST   Arrays are not supported by CLIST, but REXX has this option. In case you still want to use arrays in CLIST, find below the work around. SET NUM=1                               SET &ARRAY = &STR(&&ARRAY)              DO WHILE &NUM

Read More »