Rick: You have proven that IEHMOVE should be nuked and or zapped out of existance. There is also a cavet if you go into multi volume to make sure you put the sequence numer in parenthess eg vol=tape=(123456,1,23456,1, etc etc Heaven help you if you have multiple iehmove datasets on a volume. Then I think you need the original listing to get it back. God I hated IEHMOVE.
Ed ________________________________ From: Rick Fochtman <[email protected]> To: [email protected] Sent: Tue, May 17, 2011 7:26:20 PM Subject: Re: Copying tapes with 256K blocksizes Fred Schmidt wrote: > On Thu, 12 May 2011 14:21:15 -0500, Rick Fochtman <[email protected]> wrote: > > >> -----------------------------------<snip>----------------------------------- >> Does the name "TAPE" appear in your device name table? You also need a >> DD statement that refers to each tape volume; IEHMOVE will modify it and >> use OPEN TYPE=J to access the ap[[ropriate files. >> >> Rick >> >> > > Yes, "TAPE" is in the device table, Rick. JCL used was as follows. VOLSER > 200198 was a scratch tape. > > //COPY EXEC PGM=IEHMOVE > //SYSPRINT >DD SYSOUT=* //SYSUT1 DD >DISP=(NEW,KEEP),VOL=SER=SYS006, // >UNIT=3390,DSN=SYS1.DONOT.EXIST,SPACE=(CYL,(10,10)) //INDD1 DD >UNIT=TAPE,DISP=OLD,VOL=SER=101178 //OUTDD1 DD >UNIT=TAPE,DATACLAS=ATL3592,DISP=(,KEEP) //SYSIN DD * > > COPY VOLUME=TAPE=101178,TO=TAPE=200198 > > /* > > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html > > Try this: COPY DSNAME=a.b.c,FROM=TQAPE=(101178,file#),TO=TAPE=(200198,file#), x FROMDD=INDD1,TODD=OUTDD1 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
