Can you show us the DCB attributes of PPDIT.SPEP.EI350M.EDI395W1.XXX2014 from ISPF 3.4?
Remove the BLKSIZE from the first SYSUT1 and try again. > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] On > Behalf Of Ron Thomas > Sent: Tuesday, March 03, 2015 11:53 AM > To: [email protected] > Subject: Re: Data formatting > > This is what i have provided and i am receving the error > > WER061A I/O ERR S23R3VBD,S020I123,91BC,D,SYSUT1 ,**- > OP,WRNG.LEN.RECORD,00000461000001,EXCP > > > > //S020I123 EXEC PGM=IEBGENER > //SYSPRINT DD SYSOUT=* > //SYSUT2 DD DSN=PPDIT.SPEP.EI350M.EDI395W1.XXX, > // DISP=(NEW,CATLG,DELETE), > // DCB=(LRECL=2,RECFM=FB,BLKSIZE=3360),UNIT=UTST, > // SPACE=(CYL,(5,2),RLSE) > //SYSUT1 DD DSN=PPDIT.SPEP.EI350M.EDI395W1.XXX2014,DISP=SHR, > // DCB=(LRECL=2,RECFM=FB,BLKSIZE=3380),UNIT=SYSDA > //SYSIN DD DUMMY > //* > //S020I124 EXEC PGM=IEBGENER > //SYSPRINT DD SYSOUT=* > //SYSUT2 DD DSN=PPDIT.SPEP.EI350M.EDI395W1.XXY, > // DISP=(NEW,CATLG,DELETE), > // DCB=(LRECL=336,RECFM=FB,BLKSIZE=3360),UNIT=UTST, > // SPACE=(CYL,(5,2),RLSE) > //SYSUT1 DD DSN=PPDIT.SPEP.EI350M.EDI395W1.XXX,DISP=SHR, > // DCB=(LRECL=336,DSORG=PS),UNIT=SYSDA > //SYSIN DD DUMMY ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
