Re: Question concerning pre-mature uncatalog/delete of a tape file.
Lizette, A belated Thank You is in order for suggesting TMSAUDIT and then gently reminding me when I didn't run it when you first suggested. The volume which was scratched had Expdt=LDATE/005 from 2008/323 until 2009/144. On 2009/149 it was picked up by TMSCLEAN and scratched. File now is under Catalog control. 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=0 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
Re: Question concerning pre-mature uncatalog/delete of a tape file.
You are welcome. Sometimes we forget the simplest things and that is what we are here for. To help us remember the stuff we forget. :-D Lizette Lizette, A belated Thank You is in order for suggesting TMSAUDIT and then gently reminding me when I didn't run it when you first suggested. The volume which was scratched had Expdt=LDATE/005 from 2008/323 until 2009/144. On 2009/149 it was picked up by TMSCLEAN and scratched. File now is under Catalog control. . 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=0 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
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 [ibm-m...@bama.ua.edu] On Behalf Of John Kelly [john_j_ke...@ao.uscourts.gov] Sent: Tuesday, June 02, 2009 5:50 PM To: IBM-MAIN@bama.ua.edu 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=0 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 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
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=0 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
Re: Question concerning pre-mature uncatalog/delete of a tape file.
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=0 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=0 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
Re: Question concerning pre-mature uncatalog/delete of a tape file.
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] obrie...@mail.nih.gov Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu 06/03/2009 06:41 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu To IBM-MAIN@bama.ua.edu 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 [ibm-m...@bama.ua.edu] On Behalf Of John Kelly [john_j_ke...@ao.uscourts.gov] Sent: Tuesday, June 02, 2009 5:50 PM To: IBM-MAIN@bama.ua.edu 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=0 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 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 -- 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
Re: Question concerning pre-mature uncatalog/delete of a tape file.
Hi Jack, That is correct, jcl has been running for years not has not been changed. I am currently running a TMS Audit, per Lizette's suggestion. Perhaps that will shed some light on the subject. Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of John Kelly [john_j_ke...@ao.uscourts.gov] Sent: Wednesday, June 03, 2009 11:02 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. 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] obrie...@mail.nih.gov Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu 06/03/2009 06:41 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu To IBM-MAIN@bama.ua.edu 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 [ibm-m...@bama.ua.edu] On Behalf Of John Kelly [john_j_ke...@ao.uscourts.gov] Sent: Tuesday, June 02, 2009 5:50 PM To: IBM-MAIN@bama.ua.edu 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=0 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 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 -- 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
Question concerning pre-mature uncatalog/delete of a tape file.
User complained the other day that we had destroyed one of their tapes. I ran a DAF report and sure enough TMS had scratched the tape and uncataloged the file. When the tape was originally created it was under catalog control so that TMS should not have trashed it. But as I look at the DAFRPT I see the EXPDT change from 99000 to 0 and back again. The last entry 5 days before TMS scratched showed Expdt=0. I would have thought that once a tape was created with Expdt=99000, then that field should have remained 99000. Or does 99000 have to be coded in the JCL each time the tape is used? Dave O'Brien NIH Contractor -- 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
Re: Question concerning pre-mature uncatalog/delete of a tape file.
Does this job RGWOPMSC have EXPDT coded in the JCL? Is there something in the CA1 exit to change EXPDT in certain conditions? Do you use the following exits: CL05228 CL05232 CL05245 How is TMOOPT00 coded? MG3480 YES ISSUE NOT SCRATCH MSGS TO 3480 DISPLAY SCRTCH NOTMSCLEAN SCRATCH EXTERNAL SECURITY SCRCAT YES SCRATCH EVEN IF CATALOG'ED Lizette Yes I recalled the default 5 day default retention as well. Here are the DAF records for the file: 2009142 20.18.01.43 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.16.48.80 CRTDT=09135 EXPDT=99000 DISP=Old BUFNO=2 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3914 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3913 DSSNO=522187 2009142 20.18.36.15 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT2 OPE=20.18.24.31 CRTDT=09142 EXPDT=0 DISP=Old DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=42 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009142 20.36.54.65 4090 RGWOPDOF SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.36.41.28 CRTDT=09142 EXPDT=0 DISP=OldShr BUFNO=5 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3916 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009144 22.00.24.19 4090 RGWOPMHF SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT1 OPE=22.00.14.36 CRTDT=09142 EXPDT=0 DISP=OldShr DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=83 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009149 00.05.19.80 4090 STGTMSSC SUB=Delete FNC=Uncatalog CAT=SYSICF.USERCAT.UCAT05 TYP=NonVSAM_Dataset Here is the alleged JCL that referenced the file before it went scratch 5 days later. //COPY.SYSUT1 DD DSN=APA3JLC.PUBLIC.MASTER,DISP=SHR, // UNIT=ETAPE Not sure why they specify UNIT=ETAPE for a cataloged input file. But they claim to have been doing this for years. And before I forget, we are at Zos 1.9 with Jes2. File is not SMS managed. Something else I find strange is the DISP=Oldshr in jobs RGWOPDOF and RGWOPMHF. I checked the JCL and DISP=SHR is specified. e. IIRC 5 days is the default hold before scratch for a catalog controlled tape in order to prevent a catalog issue causing tapes to go scratch. Look at catalog records (60-69) and see if the data set was uncataloged prior to that date. All opinions expressed by me are mine and may not agree with my employer or any person, company, or thing, living or dead, on or near this or any other planet, moon, asteroid, or other spatial object, natural or manufactured, since the beginning of time. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of O'Brien, David W. (NIH/CIT) [C] Sent: Tuesday, June 02, 2009 1:26 PM To: IBM-MAIN@bama.ua.edu Subject: Question concerning pre-mature uncatalog/delete of a tape file. User complained the other day that we had destroyed one of their tapes. I ran a DAF report and sure enough TMS had scratched the tape and uncataloged the file. When the tape was originally created it was under catalog control so that TMS should not have trashed it. But as I look at the DAFRPT I see the EXPDT change from 99000 to 0 and back again. The last entry 5 days before TMS scratched showed Expdt=0. I would have thought that once a tape was created with Expdt=99000, then that field should have remained 99000. Or does 99000 have to be coded in the JCL each time the tape is used? Dave O'Brien NIH Contractor -- 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
Re: Question concerning pre-mature uncatalog/delete of a tape file.
Hi Lizzette, Thanks for chiming in. Yes, RGWOPMSC has Expdt=99000 No, CA1 exits are in use. MG3480 YES SCRTCH NO SCRCAT YES Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Lizette Koehler [stars...@mindspring.com] Sent: Tuesday, June 02, 2009 3:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. Does this job RGWOPMSC have EXPDT coded in the JCL? Is there something in the CA1 exit to change EXPDT in certain conditions? Do you use the following exits: CL05228 CL05232 CL05245 How is TMOOPT00 coded? MG3480 YES ISSUE NOT SCRATCH MSGS TO 3480 DISPLAY SCRTCH NOTMSCLEAN SCRATCH EXTERNAL SECURITY SCRCAT YES SCRATCH EVEN IF CATALOG'ED Lizette Yes I recalled the default 5 day default retention as well. Here are the DAF records for the file: 2009142 20.18.01.43 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.16.48.80 CRTDT=09135 EXPDT=99000 DISP=Old BUFNO=2 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3914 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3913 DSSNO=522187 2009142 20.18.36.15 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT2 OPE=20.18.24.31 CRTDT=09142 EXPDT=0 DISP=Old DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=42 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009142 20.36.54.65 4090 RGWOPDOF SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.36.41.28 CRTDT=09142 EXPDT=0 DISP=OldShr BUFNO=5 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3916 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009144 22.00.24.19 4090 RGWOPMHF SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT1 OPE=22.00.14.36 CRTDT=09142 EXPDT=0 DISP=OldShr DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=83 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009149 00.05.19.80 4090 STGTMSSC SUB=Delete FNC=Uncatalog CAT=SYSICF.USERCAT.UCAT05 TYP=NonVSAM_Dataset Here is the alleged JCL that referenced the file before it went scratch 5 days later. //COPY.SYSUT1 DD DSN=APA3JLC.PUBLIC.MASTER,DISP=SHR, // UNIT=ETAPE Not sure why they specify UNIT=ETAPE for a cataloged input file. But they claim to have been doing this for years. And before I forget, we are at Zos 1.9 with Jes2. File is not SMS managed. Something else I find strange is the DISP=Oldshr in jobs RGWOPDOF and RGWOPMHF. I checked the JCL and DISP=SHR is specified. e. IIRC 5 days is the default hold before scratch for a catalog controlled tape in order to prevent a catalog issue causing tapes to go scratch. Look at catalog records (60-69) and see if the data set was uncataloged prior to that date. All opinions expressed by me are mine and may not agree with my employer or any person, company, or thing, living or dead, on or near this or any other planet, moon, asteroid, or other spatial object, natural or manufactured, since the beginning of time. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of O'Brien, David W. (NIH/CIT) [C] Sent: Tuesday, June 02, 2009 1:26 PM To: IBM-MAIN@bama.ua.edu Subject: Question concerning pre-mature uncatalog/delete of a tape file. User complained the other day that we had destroyed one of their tapes. I ran a DAF report and sure enough TMS had scratched the tape and uncataloged the file. When the tape was originally created it was under catalog control so that TMS should not have trashed it. But as I look at the DAFRPT I see the EXPDT change from 99000 to 0 and back again. The last entry 5 days before TMS scratched showed Expdt=0. I would have thought that once a tape was created with Expdt=99000, then that field should have remained 99000. Or does 99000 have to be coded in the JCL each time the tape is used? Dave O'Brien NIH Contractor -- 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
Re: Question concerning pre-mature uncatalog/delete of a tape file.
Lizzette, Sorry, I mis-typed. There are no CA1 exits in use. Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of O'Brien, David W. (NIH/CIT) [C] Sent: Tuesday, June 02, 2009 3:29 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. Hi Lizzette, Thanks for chiming in. Yes, RGWOPMSC has Expdt=99000 No, CA1 exits are in use. MG3480 YES SCRTCH NO SCRCAT YES Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Lizette Koehler [stars...@mindspring.com] Sent: Tuesday, June 02, 2009 3:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. Does this job RGWOPMSC have EXPDT coded in the JCL? Is there something in the CA1 exit to change EXPDT in certain conditions? Do you use the following exits: CL05228 CL05232 CL05245 How is TMOOPT00 coded? MG3480 YES ISSUE NOT SCRATCH MSGS TO 3480 DISPLAY SCRTCH NOTMSCLEAN SCRATCH EXTERNAL SECURITY SCRCAT YES SCRATCH EVEN IF CATALOG'ED Lizette Yes I recalled the default 5 day default retention as well. Here are the DAF records for the file: 2009142 20.18.01.43 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.16.48.80 CRTDT=09135 EXPDT=99000 DISP=Old BUFNO=2 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3914 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3913 DSSNO=522187 2009142 20.18.36.15 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT2 OPE=20.18.24.31 CRTDT=09142 EXPDT=0 DISP=Old DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=42 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009142 20.36.54.65 4090 RGWOPDOF SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.36.41.28 CRTDT=09142 EXPDT=0 DISP=OldShr BUFNO=5 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3916 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009144 22.00.24.19 4090 RGWOPMHF SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT1 OPE=22.00.14.36 CRTDT=09142 EXPDT=0 DISP=OldShr DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=83 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009149 00.05.19.80 4090 STGTMSSC SUB=Delete FNC=Uncatalog CAT=SYSICF.USERCAT.UCAT05 TYP=NonVSAM_Dataset Here is the alleged JCL that referenced the file before it went scratch 5 days later. //COPY.SYSUT1 DD DSN=APA3JLC.PUBLIC.MASTER,DISP=SHR, // UNIT=ETAPE Not sure why they specify UNIT=ETAPE for a cataloged input file. But they claim to have been doing this for years. And before I forget, we are at Zos 1.9 with Jes2. File is not SMS managed. Something else I find strange is the DISP=Oldshr in jobs RGWOPDOF and RGWOPMHF. I checked the JCL and DISP=SHR is specified. e. IIRC 5 days is the default hold before scratch for a catalog controlled tape in order to prevent a catalog issue causing tapes to go scratch. Look at catalog records (60-69) and see if the data set was uncataloged prior to that date. All opinions expressed by me are mine and may not agree with my employer or any person, company, or thing, living or dead, on or near this or any other planet, moon, asteroid, or other spatial object, natural or manufactured, since the beginning of time. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of O'Brien, David W. (NIH/CIT) [C] Sent: Tuesday, June 02, 2009 1:26 PM To: IBM-MAIN@bama.ua.edu Subject: Question concerning pre-mature uncatalog/delete of a tape file. User complained the other day that we had destroyed one of their tapes. I ran a DAF report and sure enough TMS had scratched the tape and uncataloged the file. When the tape was originally created it was under catalog control so that TMS should not have trashed it. But as I look at the DAFRPT I see the EXPDT change from 99000 to 0 and back again. The last entry 5 days before TMS scratched showed Expdt=0. I would have thought that once a tape was created with Expdt=99000, then that field should have remained 99000. Or does 99000 have to be coded in the JCL each time the tape is used? Dave O'Brien NIH Contractor -- 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email
Re: Question concerning pre-mature uncatalog/delete of a tape file.
I forgot one more field. The OCTLG. What is that set to. And that job that uses DISP=OLD has EXPDT=99000 coded? Amazing. Lizette Lizzette, Sorry, I mis-typed. There are no CA1 exits in use. Hi Lizzette, Thanks for chiming in. Yes, RGWOPMSC has Expdt=99000 No, CA1 exits are in use. MG3480 YES SCRTCH NO SCRCAT YES Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Lizette Koehler [stars...@mindspring.com] Sent: Tuesday, June 02, 2009 3:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. Does this job RGWOPMSC have EXPDT coded in the JCL? Is there something in the CA1 exit to change EXPDT in certain conditions? Do you use the following exits: CL05228 CL05232 CL05245 How is TMOOPT00 coded? MG3480 YES ISSUE NOT SCRATCH MSGS TO 3480 DISPLAY SCRTCH NOTMSCLEAN SCRATCH EXTERNAL SECURITY SCRCAT YES SCRATCH EVEN IF CATALOG'ED Lizette Yes I recalled the default 5 day default retention as well. Here are the DAF records for the file: 2009142 20.18.01.43 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.16.48.80 CRTDT=09135 EXPDT=99000 DISP=Old BUFNO=2 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3914 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3913 DSSNO=522187 2009142 20.18.36.15 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT2 OPE=20.18.24.31 CRTDT=09142 EXPDT=0 DISP=Old DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=42 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009142 20.36.54.65 4090 RGWOPDOF SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.36.41.28 CRTDT=09142 EXPDT=0 DISP=OldShr BUFNO=5 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3916 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009144 22.00.24.19 4090 RGWOPMHF SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT1 OPE=22.00.14.36 CRTDT=09142 EXPDT=0 DISP=OldShr DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=83 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009149 00.05.19.80 4090 STGTMSSC SUB=Delete FNC=Uncatalog CAT=SYSICF.USERCAT.UCAT05 TYP=NonVSAM_Dataset Here is the alleged JCL that referenced the file before it went scratch 5 days later. //COPY.SYSUT1 DD DSN=APA3JLC.PUBLIC.MASTER,DISP=SHR, // UNIT=ETAPE Not sure why they specify UNIT=ETAPE for a cataloged input file. But they claim to have been doing this for years. And before I forget, we are at Zos 1.9 with Jes2. File is not SMS managed. Something else I find strange is the DISP=Oldshr in jobs RGWOPDOF and RGWOPMHF. I checked the JCL and DISP=SHR is specified. e. IIRC 5 days is the default hold before scratch for a catalog controlled tape in order to prevent a catalog issue causing tapes to go scratch. Look at catalog records (60-69) and see if the data set was uncataloged prior to that date. All opinions expressed by me are mine and may not agree with my employer or any person, company, or thing, living or dead, on or near this or any other planet, moon, asteroid, or other spatial object, natural or manufactured, since the beginning of time. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of O'Brien, David W. (NIH/CIT) [C] Sent: Tuesday, June 02, 2009 1:26 PM To: IBM-MAIN@bama.ua.edu Subject: Question concerning pre-mature uncatalog/delete of a tape file. User complained the other day that we had destroyed one of their tapes. I ran a DAF report and sure enough TMS had scratched the tape and uncataloged the file. When the tape was originally created it was under catalog control so that TMS should not have trashed it. But as I look at the DAFRPT I see the EXPDT change from 99000 to 0 and back again. The last entry 5 days before TMS scratched showed Expdt=0. I would have thought that once a tape was created with Expdt=99000, then that field should have remained 99000. Or does 99000 have to be coded in the JCL each time the tape is used? Dave O'Brien NIH Contractor -- 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
Re: Question concerning pre-mature uncatalog/delete of a tape file.
OCTLG YES DISP=(OLD,PASS,CATLG), with EXPDT=99000 Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Lizette Koehler [stars...@mindspring.com] Sent: Tuesday, June 02, 2009 3:36 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. I forgot one more field. The OCTLG. What is that set to. And that job that uses DISP=OLD has EXPDT=99000 coded? Amazing. Lizette Lizzette, Sorry, I mis-typed. There are no CA1 exits in use. Hi Lizzette, Thanks for chiming in. Yes, RGWOPMSC has Expdt=99000 No, CA1 exits are in use. MG3480 YES SCRTCH NO SCRCAT YES Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Lizette Koehler [stars...@mindspring.com] Sent: Tuesday, June 02, 2009 3:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. Does this job RGWOPMSC have EXPDT coded in the JCL? Is there something in the CA1 exit to change EXPDT in certain conditions? Do you use the following exits: CL05228 CL05232 CL05245 How is TMOOPT00 coded? MG3480 YES ISSUE NOT SCRATCH MSGS TO 3480 DISPLAY SCRTCH NOTMSCLEAN SCRATCH EXTERNAL SECURITY SCRCAT YES SCRATCH EVEN IF CATALOG'ED Lizette Yes I recalled the default 5 day default retention as well. Here are the DAF records for the file: 2009142 20.18.01.43 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.16.48.80 CRTDT=09135 EXPDT=99000 DISP=Old BUFNO=2 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3914 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3913 DSSNO=522187 2009142 20.18.36.15 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT2 OPE=20.18.24.31 CRTDT=09142 EXPDT=0 DISP=Old DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=42 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009142 20.36.54.65 4090 RGWOPDOF SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.36.41.28 CRTDT=09142 EXPDT=0 DISP=OldShr BUFNO=5 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3916 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009144 22.00.24.19 4090 RGWOPMHF SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT1 OPE=22.00.14.36 CRTDT=09142 EXPDT=0 DISP=OldShr DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=83 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009149 00.05.19.80 4090 STGTMSSC SUB=Delete FNC=Uncatalog CAT=SYSICF.USERCAT.UCAT05 TYP=NonVSAM_Dataset Here is the alleged JCL that referenced the file before it went scratch 5 days later. //COPY.SYSUT1 DD DSN=APA3JLC.PUBLIC.MASTER,DISP=SHR, // UNIT=ETAPE Not sure why they specify UNIT=ETAPE for a cataloged input file. But they claim to have been doing this for years. And before I forget, we are at Zos 1.9 with Jes2. File is not SMS managed. Something else I find strange is the DISP=Oldshr in jobs RGWOPDOF and RGWOPMHF. I checked the JCL and DISP=SHR is specified. e. IIRC 5 days is the default hold before scratch for a catalog controlled tape in order to prevent a catalog issue causing tapes to go scratch. Look at catalog records (60-69) and see if the data set was uncataloged prior to that date. All opinions expressed by me are mine and may not agree with my employer or any person, company, or thing, living or dead, on or near this or any other planet, moon, asteroid, or other spatial object, natural or manufactured, since the beginning of time. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of O'Brien, David W. (NIH/CIT) [C] Sent: Tuesday, June 02, 2009 1:26 PM To: IBM-MAIN@bama.ua.edu Subject: Question concerning pre-mature uncatalog/delete of a tape file. User complained the other day that we had destroyed one of their tapes. I ran a DAF report and sure enough TMS had scratched the tape and uncataloged the file. When the tape was originally created it was under catalog control so that TMS should not have trashed it. But as I look at the DAFRPT I see the EXPDT change from 99000 to 0 and back again. The last entry 5 days before TMS scratched showed Expdt=0. I would have thought that once a tape was created with Expdt=99000, then that field should have remained 99000. Or does 99000 have to be coded in the JCL each time the tape is used? Dave O'Brien NIH Contractor -- 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
Re: Question concerning pre-mature uncatalog/delete of a tape file.
David, I might run the TMSAUDIT report on the volser and see what it says. I do not know at this point why CA1 might have changed the EXPDT from 99000 to 0 unless something told it to (TMSCLEAN, or TMSCRATCH) See if the AUDIT shows anything. VOLSER=?? TYPE=0,1,2,3,4 FORMAT=LONG Lizette -Original Message- From: O'Brien, David W. (NIH/CIT) [C] obrie...@mail.nih.gov Sent: Jun 2, 2009 3:46 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. OCTLG YES DISP=(OLD,PASS,CATLG), with EXPDT=99000 Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Lizette Koehler [stars...@mindspring.com] Sent: Tuesday, June 02, 2009 3:36 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. I forgot one more field. The OCTLG. What is that set to. And that job that uses DISP=OLD has EXPDT=99000 coded? Amazing. Lizette Lizzette, Sorry, I mis-typed. There are no CA1 exits in use. Hi Lizzette, Thanks for chiming in. Yes, RGWOPMSC has Expdt=99000 No, CA1 exits are in use. MG3480 YES SCRTCH NO SCRCAT YES Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Lizette Koehler [stars...@mindspring.com] Sent: Tuesday, June 02, 2009 3:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file. Does this job RGWOPMSC have EXPDT coded in the JCL? Is there something in the CA1 exit to change EXPDT in certain conditions? Do you use the following exits: CL05228 CL05232 CL05245 How is TMOOPT00 coded? MG3480 YES ISSUE NOT SCRATCH MSGS TO 3480 DISPLAY SCRTCH NOTMSCLEAN SCRATCH EXTERNAL SECURITY SCRCAT YES SCRATCH EVEN IF CATALOG'ED Lizette Yes I recalled the default 5 day default retention as well. Here are the DAF records for the file: 2009142 20.18.01.43 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.16.48.80 CRTDT=09135 EXPDT=99000 DISP=Old BUFNO=2 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3914 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3913 DSSNO=522187 2009142 20.18.36.15 4090 RGWOPMSC SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT2 OPE=20.18.24.31 CRTDT=09142 EXPDT=0 DISP=Old DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=42 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009142 20.36.54.65 4090 RGWOPDOF SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.36.41.28 CRTDT=09142 EXPDT=0 DISP=OldShr BUFNO=5 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3916 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009144 22.00.24.19 4090 RGWOPMHF SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT1 OPE=22.00.14.36 CRTDT=09142 EXPDT=0 DISP=OldShr DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=83 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 2009149 00.05.19.80 4090 STGTMSSC SUB=Delete FNC=Uncatalog CAT=SYSICF.USERCAT.UCAT05 TYP=NonVSAM_Dataset Here is the alleged JCL that referenced the file before it went scratch 5 days later. //COPY.SYSUT1 DD DSN=APA3JLC.PUBLIC.MASTER,DISP=SHR, // UNIT=ETAPE Not sure why they specify UNIT=ETAPE for a cataloged input file. But they claim to have been doing this for years. And before I forget, we are at Zos 1.9 with Jes2. File is not SMS managed. Something else I find strange is the DISP=Oldshr in jobs RGWOPDOF and RGWOPMHF. I checked the JCL and DISP=SHR is specified. e. IIRC 5 days is the default hold before scratch for a catalog controlled tape in order to prevent a catalog issue causing tapes to go scratch. Look at catalog records (60-69) and see if the data set was uncataloged prior to that date. All opinions expressed by me are mine and may not agree with my employer or any person, company, or thing, living or dead, on or near this or any other planet, moon, asteroid, or other spatial object, natural or manufactured, since the beginning of time. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of O'Brien, David W. (NIH/CIT) [C] Sent: Tuesday, June 02, 2009 1:26 PM To: IBM-MAIN@bama.ua.edu Subject: Question concerning pre-mature uncatalog/delete of a tape file. User complained the other day that we had destroyed one of their tapes. I ran a DAF report and sure enough TMS had scratched the tape and uncataloged the file. When the tape was originally created it was under catalog control so that TMS should not have trashed it. But as I look at the DAFRPT I see the EXPDT change from 99000 to 0 and back again. The last entry 5 days before TMS scratched showed Expdt=0. I would have thought that once a tape was created with Expdt=99000, then that field should have remained 99000. Or does 99000 have to be coded in the JCL each time
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=0 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
