sandip_datta
Active User
Joined: 02 Dec 2003
Posts: 150
Location: Tokyo, Japan
|
|
|
|
Hi Kiran,
If you copy the dataset to any temporary file using IDCAMS or SORT the at the spool you will get the output records copied or OUT count (in case of sort).
| Code: |
//STEP01 EXEC PGM=SORT
//SORTIN DD DSN=INPUT DSN,DISP=SHR
//SORTOUT DD DSN=&&TEMP,DISP=Give as your input
//SORTLIB DD DSN=SYS1.SORTLIB,
// DISP=SHR
//SORTWK01 DD UNIT=DISK,SPACE=(CYL,50,,CONTIG)
//SORTWK02 DD UNIT=DISK,SPACE=(CYL,50,,CONTIG)
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
/*
//*
|
Or IDCAMS
| Code: |
//SAVE EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//IN DD DSNINPUT DSN,
// DISP=SHR
//OUT DD DSN=&&TEMP,other as your input
//SYSIN DD *
REPRO INFILE(IN) OUTFILE(OUT)
//*
|
|
|
