Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

DFSMShsm RECYCLE, DUPLEX tapes and SMS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Ivan P

New User


Joined: 08 Jun 2009
Posts: 63
Location: Europe

PostPosted: Thu Jun 21, 2012 1:53 pm    Post subject: DFSMShsm RECYCLE, DUPLEX tapes and SMS
Reply with quote

Hello everyone!

I have a question about HSM duplex tapes and the recycle process, so if anyone knows the answer please respond.

The goal is to automaticaly change the storage group of recycled duplex tapes (to scratch), so they can be reused as duplex tapes for new ML2 tapes.

Since DFSMSrmm isn't available, I was thinking a scenario along these lines would be the answer:

1. Operator issues the RECYCLE command (for ML2 tapes)
2. Upon marking a ML2 tape as empty and discarding it's duplex pair, HSM passes control to ARCTVEXT exit
3. ARCTVEXT exit submits a JCL job (using program ACBQBAI9 - Storage group volume add/Delete) which changes the storage group of the duplex tape to scratch
4. Profit

Ideas? Help?
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu Jun 21, 2012 9:56 pm    Post subject:
Reply with quote

If the storage environment is set up correctly the duplex tapes should be set back to scratch status when the primary volume is scratched.
Back to top
View user's profile Send private message
Ivan P

New User


Joined: 08 Jun 2009
Posts: 63
Location: Europe

PostPosted: Sat Jun 23, 2012 4:07 pm    Post subject:
Reply with quote

expat wrote:
If the storage environment is set up correctly the duplex tapes should be set back to scratch status when the primary volume is scratched.
Hi expat!

Do you maybe have any hints on where to look/what to check?

I tried the following HSM configuration:
SETSYS TAPEDELETION( -
BACKUP(HSMTAPE) -
MIGRATION(SCRATCH) -
DUMP(HSMTAPE))

But, after the primary volume is scratched (marked empty in MCDS, but storage group remains HSMML2), the duplex tape also remains in the HSMML2 storage group.
Upon writting to a new empty ML2 tape (from HSMML2 SG) HSM takes a new tape from the *SCRATCH* storage group for duplex..
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Sat Jun 23, 2012 7:28 pm    Post subject:
Reply with quote

Eeeek. I can't remember the settings, but you do have ARCTVEXT (I think) active.

Which TMS are you using.
Back to top
View user's profile Send private message
Ivan P

New User


Joined: 08 Jun 2009
Posts: 63
Location: Europe

PostPosted: Tue Jun 26, 2012 7:07 pm    Post subject:
Reply with quote

Nope, ARCTVEXT isn't active at the moment.
It needs to be activated with a SETSYS command:
Code:
SETSYS EXITON(TV)

Does it make sense to activate it if there is no (non-IBM) TMS to use it?

expat wrote:
Which TMS are you using.
No TMS is available (AFAIK), neither DFSMSrmm (as mentioned) nor CA 1..
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue Jun 26, 2012 8:29 pm    Post subject:
Reply with quote

Eeeeek, I've only ever used HSM with a TMS, which then does the required to put the tape back into scratch status.
Back to top
View user's profile Send private message
Ivan P

New User


Joined: 08 Jun 2009
Posts: 63
Location: Europe

PostPosted: Wed Jun 27, 2012 1:09 pm    Post subject:
Reply with quote

Any suggestions where else to ask? icon_smile.gif

(thanks for the responses so far!)
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Jun 27, 2012 7:00 pm    Post subject:
Reply with quote

Hello,

Suggest you talk with the storage management people and learn how they keep track of the tape inventory.

I do not recall the last time i worked somewhere that had NO tape management system . . . And that covers many years and many installations.
Back to top
View user's profile Send private message
Ivan P

New User


Joined: 08 Jun 2009
Posts: 63
Location: Europe

PostPosted: Wed Jun 27, 2012 7:09 pm    Post subject:
Reply with quote

dick scherrer wrote:
Suggest you talk with the storage management people and learn how they keep track of the tape inventory.
Excel spreadsheets icon_smile.gif

DFSMSrmm and CA 1 are not used, I am sure of that.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Jun 27, 2012 8:02 pm    Post subject:
Reply with quote

Hello,

Then i suspect the tape inventory is Very small or it is quite out of sync with the actual usage. . .

How do the volumes get recorded for every tape created by the system (in a timely manner?

Quote:
DFSMSrmm and CA 1 are not used, I am sure of that.
Is this something you "know" or did you ask the storage management people? There are several tape management systems from different vendors. . .
Back to top
View user's profile Send private message
Ivan P

New User


Joined: 08 Jun 2009
Posts: 63
Location: Europe

PostPosted: Thu Jun 28, 2012 2:05 pm    Post subject:
Reply with quote

Hello dick,
dick scherrer wrote:
Then i suspect the tape inventory is Very small or it is quite out of sync with the actual usage. . .
considering the usage of the tape inventory, there isn't much to track.
DFSMShsm is the biggest consumer of it (with backup, dump and ML2 tapes), and there are some job-driven usage of the WORM tapes.

dick scherrer wrote:
How do the volumes get recorded for every tape created by the system (in a timely manner?
I'm not following on this one, could you please explain what you've ment? icon_eyes.gif
If you mean how it is known which tape is used for which purpose - most tapes are pre-defined and used in certain (name) ranges.

dick scherrer wrote:
Is this something you "know" or did you ask the storage management people?
This is something I "know" and also have asked the S.M. people.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Jun 28, 2012 6:40 pm    Post subject:
Reply with quote

Hello,

Quote:
Quote:
How do the volumes get recorded for every tape created by the system (in a timely manner?
I'm not following on this one, could you please explain what you've ment?
If you mean how it is known which tape is used for which purpose - most tapes are pre-defined and used in certain (name) ranges.
Usually, scratch tapes are allocated dynamically from a "scratch pool". The volser(s) are not known before the job runs and creates the tape output.

If you jobs already know the volser(s), there may be issues when a potentially 5 volume tape only goes to 3 volumes. The other 2 volumes are kinda "lost" to the system.

If your system uses very little tape and it works this way, i'd probably leave it alone until a complete replacement of some kind is done.
Back to top
View user's profile Send private message
Ivan P

New User


Joined: 08 Jun 2009
Posts: 63
Location: Europe

PostPosted: Thu Jun 28, 2012 7:46 pm    Post subject:
Reply with quote

dick scherrer wrote:
Usually, scratch tapes are allocated dynamically from a "scratch pool". The volser(s) are not known before the job runs and creates the tape output.
We have drifted away from the subject a bit icon_smile.gif

But, nevertheless - we're using "scratch pool" tapes only for ML2 DUPLEX tapes (since HSM is only able to take new duplex tapes from that pool). All other tapes are pre-defined.

It all works fine, with the exception of the mentioned problem, because a manual intervention (putting back unused duplex tapes to the "scratch pool") is needed every couple of days (and no, complete replacement isn't coming icon_neutral.gif)
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Jun 28, 2012 8:26 pm    Post subject: Reply to: DFSMShsm RECYCLE, DUPLEX tapes and SMS
Reply with quote

Quote:
We have drifted away from the subject a bit
Yup, probably my bad.

I reacted because one of my clients did a kinda "manual" tape library and i was tasked to convert the tape inventory to virtual tape instead of carts.

The research showed that the inventory was out of sync by 30+%. And the inventory was rather small - less than 10,000 volumes.

Sorry 'bout the distraction . . . icon_redface.gif

d
Back to top
View user's profile Send private message
Ivan P

New User


Joined: 08 Jun 2009
Posts: 63
Location: Europe

PostPosted: Fri Jun 29, 2012 1:49 pm    Post subject:
Reply with quote

We also have a rather small inventory then.. (even less than 5,000 volumes).

Suggestions/Ideas on the solution or where else to ask are still welcome icon_smile.gif

Also help with the job (from step 3) which uses program ACBQBAI9 is wanted.
I can't seem to make it change the storage group.

Here's the used JCL:

Code:
//MYJOB JOB CARD ...,TIME=(0,10)
//MYLIB JCLLIB ORDER=SYS1.SACBCNTL
//ADDVOL1 EXEC ACBJBAOB,
//             PLIB1='SYS1.DGTPLIB',
//             TABL2=MYUSER.TEST.ISPTABL
//SYSUDUMP  DD SYSOUT=*
//TEMPFILE  DD DSN=&&VOLADDS,DISP=(NEW,PASS),
//             SPACE=(TRK,(1,1)),LRECL=300,RECFM=F,BLKSIZE=300
//SYSTSIN   DD *
ISPSTART CMD(ACBQBAI9) +
BATSCRW(132) BATSCRD(27) BREDIMAX(3) BDISPMAX(99999999)
/*
//VOLADD    DD *
/*
//VOLALT    DD *
UPDHLVLSCDS()
SCDSNAME(HLQ.MY.SCDS) VOL(MYVOL) SG(*SCRTCH*) STATUS(ENABLE)
/*
//VOLDEL    DD *
/*


SYSTSPRT list says:
Code:
READY
ISPSTART CMD(ACBQBAI9) BATSCRW(132) BATSCRD(27) BREDIMAX(3) BDISPMAX(99999999)
No Volume Delete records Specified
No Volume Add records Specified
 MYUSER.MYJOB.JOB37134.D0000108.? was preallocated (no free was done).
READY
END


And ISPLOG list says:
Code:
Time                *** ISPF transaction log ***                        Userid: MYUSER   Date: 12/06/29   Page: 1
                                                                                                                 
10:13   Start of ISPF Log - - -  - Session # 1 -------------------------------------------------------
10:13      TSO     - Command  -  - ACBQBAI9
10:13    End of ISPF Log - - - - - Session # 1 -------------------------------------------------------

And still... "MYVOL" remains in the original storage group...
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Report of uncataloged Tapes pmvino JCL & VSAM 9 Thu Jul 19, 2012 4:07 pm
No new posts How to recycle CICS region thru JCL? Prasanna SR CICS 3 Fri Jan 14, 2011 12:29 am
No new posts Need to Know about files writing on T... sureshmurali JCL & VSAM 5 Tue Dec 28, 2010 11:32 pm
No new posts Whats mounting and demounting in tapes sudhanaveenkumar Mainframe Interview Questions 12 Tue Jul 27, 2010 12:38 pm
No new posts Tapes that exists in ISMF ATL lib als... praveensinha CA Products 9 Thu Feb 18, 2010 5:59 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us