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

Thanks
Ron T

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to