
Reply to comment
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')
OUTREC FIELDS=(1:19,3,4:39,15,19:59,8,27:67,4,31:92,2963),VTOF
/*
I need output dataset size only 3000.
Am getting below error.
WER146B 4K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=VB ; LRECL= 20476; BLKSIZE= 27998
WER237I OUTREC RECORD LENGTH = 2993
WER110I PVALOUT : RECFM=FB ; LRECL= 3000; BLKSIZE= 27000
WER110I INQCOUT : RECFM=FB ; LRECL= 3000; BLKSIZE= 27000
WER247A PVALOUT HAS INCOMPATIBLE LRECL
WER247A INQCOUT HAS INCOMPATIBLE LRECL
Please someone help me.
Reply
Click the +1 button below to share it with your friends and colleagues
Share this if you liked it!