Author: Hervey Martinez
Posted: Fri Nov 04, 2016 6:41 pm (GMT 5.5)
On sysut3 & 4 I have tried, primary only, with dir blocks & without.
Code'd - please use code tags while posting code/data
_________________
Regards,
hervey
Posted: Fri Nov 04, 2016 6:41 pm (GMT 5.5)
On sysut3 & 4 I have tried, primary only, with dir blocks & without.
| Code: |
| //STEP01 EXEC PGM=IEBCOPY,PARM='SIZE=64M' //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=OLD,DSN=OPS.USERTEXT.UTJD //SYSUT2 DD DSN=OPS.USERTEXT.UTJD.NEW,DISP=SHR //* DISP=(NEW,CATLG,DELETE), //* UNIT=SYSDA,DCB=(LRECL=132,BLKSIZE=27984), //* SPACE=(CYL,(1500,100,14000)) //* //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(2000,0,14000)), // DISP=(NEW,DELETE) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(2000)), // DISP=(NEW,DELETE) //SYSIN DD * COPY INDD=SYSUT1,OUTDD=SYSUT2 |
_________________
Regards,
hervey