MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

change Expire date for tape

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL)
View previous topic :: View next topic  
Author Message
subbuy2k
Beginner


Joined: 12 Aug 2004
Posts: 29
Topics: 18

PostPosted: Tue Feb 01, 2005 3:22 am    Post subject: change Expire date for tape Reply with quote

Hi,
i want to change the expire date of my tape to end of april. Right now the experi date for the tape is feb 5.
Can anyone please tell me how to do it using batch jcl.

Thanks
subbu
Back to top
View user's profile Send private message
viji
Beginner


Joined: 03 Dec 2002
Posts: 17
Topics: 11

PostPosted: Tue Feb 01, 2005 4:40 am    Post subject: Reply with quote

I doesnot know whether the expiry date can be modified. But the following will work to change the expirty date.

Probably you can copy this file to another tape file with required expiry date. and then rename this new file.

//STEP1 EXEC PGM=IEBGENER
//SYSUT1 DD DSN=FILE1,DISP=SHR
//SYSUT2 DD DSN=FILE2,DISP=(NEW,CATLG),
// UNIT=TAPE,LABEL=(,,EXPDT=05300)
Back to top
View user's profile Send private message
Bill Dennis
Advanced


Joined: 03 Dec 2002
Posts: 579
Topics: 1
Location: Iowa, USA

PostPosted: Tue Feb 01, 2005 11:26 am    Post subject: Reply with quote

Do you know what tape management software you have? CA-1, RMM, TLMS, etc.

Regards,
Bill
Back to top
View user's profile Send private message
subbuy2k
Beginner


Joined: 12 Aug 2004
Posts: 29
Topics: 18

PostPosted: Tue Feb 01, 2005 11:59 pm    Post subject: Reply with quote

i have ca-1. but the file is production file i dont have access.
Thanks
subbu
Back to top
View user's profile Send private message
Bill Dennis
Advanced


Joined: 03 Dec 2002
Posts: 579
Topics: 1
Location: Iowa, USA

PostPosted: Wed Feb 02, 2005 1:56 pm    Post subject: Reply with quote

subbuy2k said
Quote:

the file is production file i dont have access
I guess you'll need to contact whomever DOES have access and ask them to change it. Perhaps a tape librarian or production job set up person? You could try this:
Code:
//UPDATE EXEC PGM=TMSUPDTE,PARM='AUDIT'
//TMSRPT   DD SYSOUT=*                       
VOL nnnnnn                           
VER DSN=dsname.here
REP E=2005.120                               

_________________
Regards,
Bill Dennis

Disclaimer: My comments on this foorum are my own and do not represent the opinions or suggestions of any other person or business entity.
Back to top
View user's profile Send private message
eklipze
Beginner


Joined: 29 Oct 2007
Posts: 7
Topics: 2

PostPosted: Tue Aug 18, 2009 6:53 am    Post subject: Reply with quote

Sorry to resurect this thread, but I'm trying to scratch a load of tapes which are set to EXPDT=PERM

Trouble is there are also stacked files on the tapes too. SYSIN in the example above is only changing the EXPDT of the first file on the Tape. How do I change the other files ?

I know it has something to do with the DSNB's but it's been sooo long since we've needed to do this, we can't find the correct documentation.
Back to top
View user's profile Send private message
Bill Dennis
Advanced


Joined: 03 Dec 2002
Posts: 579
Topics: 1
Location: Iowa, USA

PostPosted: Tue Aug 18, 2009 8:54 am    Post subject: Reply with quote

I'm no longer at that company, but I think the other utility is TMSUDSNB. You use the DSNB# as the identifier and give a new EXPDT. With your SITE-ID you can access the documentation on the CA website.

If you have CA-1 support you could ask a question to see if there is a method to force the DSNBs to expire with the base DSN.
_________________
Regards,
Bill Dennis

Disclaimer: My comments on this foorum are my own and do not represent the opinions or suggestions of any other person or business entity.
Back to top
View user's profile Send private message
eklipze
Beginner


Joined: 29 Oct 2007
Posts: 7
Topics: 2

PostPosted: Tue Aug 18, 2009 9:27 am    Post subject: Reply with quote

I have the CA1 manuals online but we're obviously searching for the wrong keywords.

I am aware of TMSUDSNB but cannot seem to get the individual DSNB's for the datasets on the tape. I can only seem to get 1STDSNB and LSTDSNB.

The other weird thing is we updated the EXPDT of the first file on the volume. CA1 online then says all other files are PERM but ..... has SCRATCHED the tape anyway ?

Got the result we wanted but didn't think this should have been possible.
Back to top
View user's profile Send private message
Bill Dennis
Advanced


Joined: 03 Dec 2002
Posts: 579
Topics: 1
Location: Iowa, USA

PostPosted: Wed Aug 19, 2009 11:34 am    Post subject: Reply with quote

I thought there might be an issue with forcing file 1 to expire but having DSNBs with higher EXPDTs but apparently not. Looks like you accomplished your goal.
_________________
Regards,
Bill Dennis

Disclaimer: My comments on this foorum are my own and do not represent the opinions or suggestions of any other person or business entity.
Back to top
View user's profile Send private message
eklipze
Beginner


Joined: 29 Oct 2007
Posts: 7
Topics: 2

PostPosted: Fri Aug 21, 2009 5:31 am    Post subject: Reply with quote

I think we were over-engineering the problem.

I think the rules go, if file1 has an expirey date later than any of the other files, then it will not scratch.
However, we were changing file1 to todays date and all other files were PERM so it was scratched.
Thanks for the help anyway
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL) All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group