Uncategorized

Skip first n records and last n records in a file I have to skip first N records and last N records in a file, can any one suggest a way  using SYNCSORT to do this. Actually my file has first 5 records as header and last 5 records are trailer records which are not […]

Basic ISPF commands ISREDIT commands can be classified into “line commands” and “command line commands”.  Figure 1 shows the line command area. Figure 2 shows the command line commands area The following presentation walks you through the basic ISPF editor line commands and command line commands. Demo on ISPF line commands Demo on ISPF command

Difference between copy pending and check pending Can someone please throw some light on the differences between copy pending and checkpending?   “; ; ; ; http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=%2Fcom.ibm.db2z9.doc.ugref%2Fsrc%2Ftpc%2Fdb2z_checkpendingstatus.htm what is check pending status? When a table is LOADed with ENFORCE NO option, then the table is set to CHECK PENDING status. This means that the LOAD

Is binding required when program does not refer a newly added column There are few tables in the system and a column is added to one of these tables. There is a COBDB2 program which accesses this table but is not referring to the newly added column, do we need to bind this program to

How to find the TSO region in which you are logged on? You can use the following command This command will show the ISPF STATISTICS pop up where you  can find the TSO region in which you are logged on, along with

How to get the number of members in a PDS without opening it? How to get the number of members in a PDS without opening it? I was asked this question in an interview, How to count the number of members in a PDS, I did not have a clue, but I said, it can

UNSTRING DELIMITED ON OVERFLOW The following COBOL program depicts the use of  UNSTRING DELIMITED ON OVERFLOW        01 WS-STRING1    PIC X(12) VALUE ‘GRACE HOPPER’.        01 WS-FIRST-NAME PIC X(05) VALUE SPACES.        01 WS-LAST-NAME  PIC X(05) VALUE SPACES.       ** ON OVERFLOW GIVES US THE OPTION TO

Problem with SORT OUTRFIL and OUTREC Hi, Am facing one problem for below scenario. //STEP01   EXEC PGM=SYNCSORT                                       //SYSPRINT DD SYSOUT=*                                             //SYSOUT   DD SYSOUT=*                                             //SYSDUMP  DD SYSOUT=*                                             //SORTIN   DD DSN=MLIFE24.VCSE.MIS.MISEXTRM(+0),DISP=SHR          —> lrecl size is 20476 and recfm is VB //PVALOUT  DD DSN=TLIFE24.VCSED.MIS.PVAL2,                         //            DISP=(NEW,CATLG,DELETE),                             //            DATACLAS=DATAF,LRECL=3000                            //INQCOUT  DD DSN=TLIFE24.VCSED.MIS.INQC2,                         //            DISP=(NEW,CATLG,DELETE),                             //            DATACLAS=DATAF,LRECL=3000                            //SYSIN    DD *                                                     SORT FIELDS=COPY             OUTFIL FNAMES=PVALOUT,INCLUDE=(67,4,CH,EQ,C’PVAL’)                 OUTFIL FNAMES=INQCOUT,INCLUDE=(67,4,CH,EQ,C’INQC’)                    

I have created this section to host some good mainframe websites. If you own a website and would be interested in exchanging links with us then contact us at mainframewizard@gmail.com. http://mainframewizard.com

convert COMP-3 data in readable mode I have a file on mainframe with packed data in it, the COBOL program  which created this file had comp-3 variables defined in this file, is it possible to convert this file to readable values by some utility. One option is to read this file using another COBOL program