I'm attempting to copy data from a 'foreign' tape to a virtual tape on my VSM.
The input tape is duly designated as foreign with Expdt=98000, 

 My problem is TMS thinks the output tape is foreign as well.

JCL follows:
//FDRTCOPY  EXEC  PGM=FDRTCOPY,REGION=0M                              
//SYSPRINT   DD   SYSOUT=*                                            
//SYSUDUMP   DD   SYSOUT=*                                            
//TAPEIN     DD   DSN=abc.def,DISP=OLD,     
//           UNIT=FRGN3490,VOL=SER=BIS260,EXPDT=98000                 
//TAPEOUT    DD   DSN=abc.def,UNIT=ETAPE,   
//           DISP=(NEW,CATLG),VOL=(,,,255)                            
//SYSIN      DD   *                                                   
  COPY                                                                
/*                                                                    

The system mounts a tape number known to TMS but I then get the following:
TMS008  IEF233A M 0B6A,BIS260,,BISTC260,FDRTCOPY,abc.def
IEC501A M 05F0,PRIVAT,SL,COMP,BISTC260,FDRTCOPY              
TMS001  IEC501A M 05F0,PRIVAT,SL,COMP,BISTC260,FDRTCOPY,BXAIR
54 IECTMS2 05F0,503002,VERIFY TAPE FROM OUTSIDE LIBRARY  OR '
R 54,HELP                                                    
IECTMS2-HELP  823                                            
   THE TAPE MOUNTED FOR A NON-RESIDENT/FOREIGN               
   REQUEST MATCHES A CA-1 CONTROLLED VOLUME.                 
   ENTER 'M' TO DISMOUNT THE VOLUME, OR 'U'                  
   TO ALLOW OUTPUT PROCESSING FOR THE VOLUME.                
55 IECTMS2 05F0,503002,VERIFY TAPE FROM OUTSIDE LIBRARY  OR '
R 55,U                                                       
IECTMS9 05F0,503002,BISTC260,TAPEOUT ,FOREIGN   ,0001,CKUP.LA
IEC705I TAPE ON 05F0,503002,SL,COMP,BISTC260,FDRTCOPY,MEDIA1 
IEC205I TAPEOUT,BISTC260,FDRTCOPY,FILESEQ=1, COMPLETE VOLUME 
VOLS=503002,TOTALBLOCKS=12505                                

First of all my operator should not have replied U but does anyone have an idea 
as to why that TMS thinks 503002 is a duplicate of a known TMS tape when in 
fact it is the TMS 503002 being written to?
Of course a query against 503002 on TMS reveals a scratch tape.

Thank You,
Dave O'Brien
NIH Contractor

----------------------------------------------------------------------
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

Reply via email to