Hey Dave, Yeah, since I would assume that SYSUT2 is output, it should update the TMC and with no EXPDT=99000 I would image TMS would update it to zeros. Seems like they have the EXPDT=99000 on the wrong step because the first one seems to have read the tape while the other step wrote to it. Don't remember but did you say that this had been running and 'no problems'?
Jack Jack Kelly 202-502-2390 (Office) "O'Brien, David W. (NIH/CIT) [C]" <[email protected]> Sent by: IBM Mainframe Discussion List <[email protected]> 06/03/2009 06:41 AM Please respond to IBM Mainframe Discussion List <[email protected]> To [email protected] cc Subject Re: Question concerning pre-mature uncatalog/delete of a tape file. Hi John, 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. Dave O'Brien NIH Contractor ________________________________________ From: IBM Mainframe Discussion List [[email protected]] On Behalf Of John Kelly [[email protected]] Sent: Tuesday, June 02, 2009 5:50 PM To: [email protected] Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. Hi Dave, 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 Jack Kelly 202-502-2390 (Office) ---------------------------------------------------------------------- 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 ---------------------------------------------------------------------- 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
