//DITTOTT JOB CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1),NOTIFY=&SYSUID //STEP1 EXEC PGM=DITTO,PARM='JOBSTREAM',REGION=4096K //SYSPRINT DD SYSOUT=* //TAPEIN DD UNIT=3490,LABEL=(,SL),VOL=SER=XXXXXX,DISP=SHR //TAPEOUT DD UNIT=T3590,DISP=NEW,LABEL=(,SL),VOL=SER=YYYYYY //SYSIN DD * İİDITTO SET RESET İİDITTO TT INPUT=TAPEIN,OUTPUT=TAPEOUT,NFILES=EOV İİDITTO EOJ
Sorry, that is not going to work.
//TAPEIN DD UNIT=3490,LABEL=(,SL),VOL=SER=XXXXXX,DISP=SHR Since LABEL=(,SL) is specified (actuallly it is the default and is unnecessary) you MUST specify DSN= with the actual dataset name of the input dataset.
//TAPEOUT DD UNIT=T3590,DISP=NEW,LABEL=(,SL),VOL=SER=YYYYYY Since just DISP=NEW is specified, the default for the second parameter (normal termination disposition) is DELETE, i.e., it is equivalent to DISP=(NEW,DELETE). So the output dataset will be deleted at step end, which is not very useful. Since no DSN= is provided, a temporary dataset name will be used.
I don't know DITTO, so perhaps DITTO overcomes these requirements somehow. Chances are that the original poster wanted to copy the data AND update the catalog to point to the new 3590 tape. I have no idea if DITTO will recatalog the tape dataset.
If you use CA-1 or CA-TLMS for tape management, they provide utilities to copy and recatalog tape datasets. My company also markets FATSCOPY, a tape copy utility. All of these are probably superior to DITTO for copying and recataloging tape datasets.
-- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.com ---------------------------------------------------------------------- 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
