Lizette,

The sysut2 in the proc is

//SYSUT2   DD  DISP=(NEW,KEEP,DELETE)   

I wholeheartedly agree that if this were a CA1 problem we would be talking 
about multiple tapes. However as is usually the case, unless I can prove to the 
user that we didn't scratch his file, it will be our fault. I was hoping that 
DAF would resolve the question but the last reference to this file shows 
Expdt=00000 and an examination of the CA1 tape record shows an Expdt=99000.

No, didn't run the TMS audit yet. I'll look into that now.

Dave O'Brien
NIH Contractor
________________________________________
From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Lizette 
Koehler [stars...@mindspring.com]
Sent: Wednesday, June 03, 2009 8:12 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file.

David,

The second step seems to be a proc over ride statement.  What does the
SYSUT2 DD statement look like in the COPY Proc?

I would think that if there were an issue with CA1 then you would have more
than one tape dataset getting expired and scratched like this.  It is more
likely that the way the job ran caused the tape to be scratched.  The
original output from the job would be so helpful in resolving this issue.
However, since you no longer have that output, I am not sure what other
steps could help identify the issue.

Did you run the TMS AUDIT?  If so, what did it show?



Lizette


>
> Yes, I did notice that.
>
> Checking the jcl the first reference to the dataset in question is
>
> //M4OLD  DD  DSN=HLQ.PUBLIC.MASTER,DISP=(OLD,PASS,CATLG),
> //       UNIT=ETAPE,EXPDT=99000
>
> The second reference is a Icegener
>
> //COPY.SYSUT2  DD  DSN=HLQ.PUBLIC.MASTER,DISP=(OLD,KEEP)
>
> One would think Expdt=99000 should have been coded here but that is not
the case.
>
> I'm sure that you noticed but the CRTDT changed with RGWOPMSC @ 2009142
> 20.18.36.15. It went from
> CRTDT=09135 EXPDT=99000 at 20.18.01.43 to CRTDT=09142 EXPDT=00000 at
> 20.18.36.15. And it looks like the same job? I don't know how to read DAF
> but could a step in the job (SYSUT2) opened the tape for output and
> changed TMS?
> Just a thought
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to