You will need to set EDMID=' ' and also FLAG3=00 These field tell CA-1 that the tape is externally managed, so CA-1 will not return the tape to scratch.
Brian On Thu, Sep 24, 2009 at 9:01 PM, esmie moo <[email protected]> wrote: > Darth, > > I did an inquiry on a tape and it is not Multi-file. The outcode is VMS > which means that they are still offsite. Below is some information: > > FLAG1 = E0 FLAG2 = C0 FLAG3 = 20 BATCHID= 0E = > TMSUPDTE > FLAG4 = 00 FLAG5 = 00 FLAG6 = 00 HOOKID = FE > = > EDMID = HPDM WMC = 00000 WWID = - - > CDATE = 2001/112 CJOB = SOVPROC CTIME = 1608 CPGM = SOVMAIN > LDATE = 2001/112 LJOB = SOVPROC LTIME = 1608 LPGM = SOVMAIN > CSTEP = SOVPROC CDDNAME= SYS00013 CUNIT = 1703 LUNIT = 1703 > OUTDATE= ZEROS OUTCODE= VMS SLOT = 0000000 TRERRC = 00000 > BTHDATE= 2001/069 VENDOR = BLANKS COUNT = 00002 TWERRC = 00017 > DATECLN= ZEROS USECLN = 00000 CLNCNT = 000 TRERRI = 00000 > VOLSEQ = 0001 ROBTY = ROBID = 000 TWERRI = 00017 > 1STVOL = NEXTVOL= PREVVOL= PRERRC = 00000 > NUMDSNB= 00000 1STDSNB= 0000000 LSTDSNB= 0000000 PWERRC = 00000 > LABEL = SL DEN = 3590 TRTCH = 128T PRERRI = 00000 > RECFM = U LRECL = 000000 BLKSIZE= 000000 PWERRI = 00000 > AUDATE = 2009/244 AUTIME = 1155 BESKEY = 00000 BLKCNT = 0000000000 > AUCODE = 00 AUFLAG1= 00 CPUID = IS02 USERID = GWGA09 > VOLPERC= 000 FILPERC= 000 COMPRES= 000 CTLGCNT= 000 > > Thanks for pointing that out. Thanks again. > > --- On Fri, 9/25/09, Darth Keller <[email protected]> wrote: > > > From: Darth Keller <[email protected]> > Subject: Re: CA-1 QUESTION : TAPE DOES NOT EXPIRE > To: [email protected] > Received: Friday, September 25, 2009, 12:47 AM > > > EDM flag set? Vault Code? Multi-file tape? Might be helpful if you > could include the record. > ddk > > > >>It is quite a mystery to me as to why several tapes are not expired even > though it has the > >>EXPDT = 2009/244. The tapes were expired (via CA 1 / ISPF) on August > 31, 2009. I verified if the TMS jobs which scratch the tapes were > executed >>and I received confirmation from our tape librarian that they > are executed daily. We are running CA 1(R) r11.5 & RELEASE z/OS 01.09.00 > > >>I am not sure where I should look. Could someone advise me? > > > > ************************************************************************************** > This e-mail message and all attachments transmitted with it may contain > legally privileged and/or confidential information intended solely for the > use of the addressee(s). If the reader of this message is not the intended > recipient, you are hereby notified that any reading, dissemination, > distribution, copying, forwarding or other use of this message or its > attachments is strictly prohibited. If you have received this message in > error, please notify the sender immediately and delete this message and all > copies and backups thereof. > > Thank you. > > ************************************************************************************** > > ---------------------------------------------------------------------- > 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 > > > > __________________________________________________________________ > Yahoo! Canada Toolbar: Search from anywhere on the web, and bookmark your > favourite sites. Download it now > http://ca.toolbar.yahoo.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 > ---------------------------------------------------------------------- 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
