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
