How to fetch even records from one file to another file by using ICETOOL in JCL?
Submitted by: Administrator//STEP1 EXEC PGM=SORT
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=INPUT.DATA,DISP=SHR
//OUTDATA DD DSN=OUTPUT.DATA,DISP=(NEW,CATLG,DELETE)
.
.
.
//SYSIN DD *
OPTION COPY
OUTFIL FNAMES=OUTDATA,SAMPLE=2
THIS WILL COPY ALL EVEN RECORDS
-------------------------------------------
FOR ODD RECORDS
OUTFIL FNAMES=OUTDATA,STARTREC=1,SAMPLE=2
Submitted by: Administrator
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=INPUT.DATA,DISP=SHR
//OUTDATA DD DSN=OUTPUT.DATA,DISP=(NEW,CATLG,DELETE)
.
.
.
//SYSIN DD *
OPTION COPY
OUTFIL FNAMES=OUTDATA,SAMPLE=2
THIS WILL COPY ALL EVEN RECORDS
-------------------------------------------
FOR ODD RECORDS
OUTFIL FNAMES=OUTDATA,STARTREC=1,SAMPLE=2
Submitted by: Administrator
Read Online IBM MainFrame Job Interview Questions And Answers
Top IBM MainFrame Questions
| ☺ | How do define Dynamic array in COBOL how do u define single dimensional array and multidimensional array in your COBOL? |
| ☺ | Can 88 level variable be declared in FD section? |
| ☺ | What is difference b/w file-aid tool and file-aid utility? |
| ☺ | How to handle -911 (deadlock) error in a db2 program so that the program will never abend? |
| ☺ | Suppose I have 1000 rows in a db2 table. I want to update first 100 records, How do I do it? |
Top Mainframe Technical Categories
| ☺ | IBM MainFrame Interview Questions. |
| ☺ | IBM AS400 Interview Questions. |
| ☺ | JCL Interview Questions. |
| ☺ | IMS DB Interview Questions. |
| ☺ | CICS Interview Questions. |
