Re: Free software to stack tape datasets?
Dave, Check to see if you have an existing license for a tape stacking utility. To be honest, some clients have a license for CA-1/Copycat and don't even realize it since it was signed for many years ago. Russell Witt CA 1 L2 Support Manager -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 16, 2009 7:25 AM To: IBM-MAIN@bama.ua.edu Subject: Free software to stack tape datasets? We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? Thanks, 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: Antwort: Re: Free software to stack tape datasets?
Try ZELA from SeaSoft or CopyCat from CA. -- 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
Antwort: Re: Free software to stack tape datasets?
Yes, that's what he mean. We do this since some years, even IBM has this concept which is called TMM. We created a large DASD pool, changed the ACS routines to point the UNIT=CART to this pool (no JCL change necessary) and let HSM migrate to cartridge. However there are still some very big files going out directly to cartridge, because migrating/recalling them would take too much time. Using this TMM concept saved us to get extra software for tape stacking, however HSM CPU usage is going up. Werner Kuehnel IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU schrieb am 16.06.2009 18:00:58: We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? DFSMShsm So are you saying he should copy the tape datasets to dasd and then migrate them with HSM? ddk ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- 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: Free software to stack tape datasets?
R.S. r.skoru...@bremultibank.com.pl wrote in message news:4a37c08c.3060...@bremultibank.com.pl... O'Brien, David W. (NIH/CIT) [C] pisze: We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? DFSMShsm -- Radoslaw Skorupka Free software??? HSM??? Not here. (Alanis Morriset's Ironic: it's a free ride when you've already paid). Kees. ** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 ** -- 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: Free software to stack tape datasets?
We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? Am in the throws of doing a buy for the same capability utility. My research indicates there are three players. Opentech has a tapecopy, Innovation DP has FATSCOPY, and IBM has Tivoli Tape Optimzer for z/OS. If anyone knows of others, let me know. Each has varying costs involved from quite inexpensive to quite expensive. Contact me offlist for further info. jim -- 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: Free software to stack tape datasets?
Jim Marshall jim.marsh...@opm.gov wrote in message news:listserv%200906170741044777.0...@bama.ua.edu... We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? Am in the throws of doing a buy for the same capability utility. My research indicates there are three players. Opentech has a tapecopy, Innovation DP has FATSCOPY, and IBM has Tivoli Tape Optimzer for z/OS. If anyone knows of others, let me know. Each has varying costs involved from quite inexpensive to quite expensive. Contact me offlist for further info. jim CA's Copycat for CA-1 and TLMS. Kees. ** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 ** -- 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: Free software to stack tape datasets?
Jim, Zela originally in the old Altai Z family of products now marketed by sea, when I was there I licensed it to a few large shops, ask for Larry Hayter for excellent support. Mike On Wed, Jun 17, 2009 at 8:52 AM, Vernooij, CP - SPLXMkees.vern...@klm.com wrote: Jim Marshall jim.marsh...@opm.gov wrote in message news:listserv%200906170741044777.0...@bama.ua.edu... We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? Am in the throws of doing a buy for the same capability utility. My research indicates there are three players. Opentech has a tapecopy, Innovation DP has FATSCOPY, and IBM has Tivoli Tape Optimzer for z/OS. If anyone knows of others, let me know. Each has varying costs involved from quite inexpensive to quite expensive. Contact me offlist for further info. jim CA's Copycat for CA-1 and TLMS. Kees. ** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 ** -- 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: Free software to stack tape datasets?
Yes, that's what he mean. We do this since some years, even IBM has this concept which is called TMM. We created a large DASD pool, changed the ACS routines to point the UNIT=CART to this pool (no JCL change necessary) and let HSM migrate to cartridge. However there are still some very big files going out directly to cartridge, because migrating/recalling them would take too much time. Using this TMM concept saved us to get extra software for tape stacking, however HSM CPU usage is going up. Werner Kuehnel I'm familiar with the concept. My understanding of the origin of this thread was that they were looking for free software to take datasets curently on tape and stack them onto new tape technology. While using HSM and even TMM for new datasets would be pretty straight-forward, using them to perform the stacking functions for existing tapes is a bit more complicated - consider existing tapes with stacked datasets. Catalog-control datasets - if even one of the stacked datasets is cataloged, the entire stack can be considered valid - that tape will not go scratch until the last dataset becomes uncataloged and the other uncataloged datasets can still be read and used. Unfortunately, we have customers who know this and have actually used the uncataloged datasets. Now you have to consider how you're going to replace this functionality when moving these datasets to disk. Even if you move them to the new tape technology and stack them with other datasets, you still have to consider how that's going to affect the new tape - will it ever expire? Then there are cycle-controlled datasets, expiration dates, retention periods. ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- 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: Antwort: Re: Free software to stack tape datasets?
That is a fine solution for an on-going basis. But for old / archived data, converting it from tape to HSM / TMM / DASD would leave the end result in a different format and destroy the original creation information that IT people (including auditors) may want in the future (creation date, time, jobname, pgmname, expdt, last used date, etc.). Even if the OP uses IEBGENER to stack, the tape management software (whatever it is) can be used to populate the tape catalog data from the original data set / file into the entry for the new tape volser / file. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html On Wed, 17 Jun 2009 08:53:19 +0200, Werner Kuehnel werner.kueh...@mannheimer.de wrote: Yes, that's what he mean. We do this since some years, even IBM has this concept which is called TMM. We created a large DASD pool, changed the ACS routines to point the UNIT=CART to this pool (no JCL change necessary) and let HSM migrate to cartridge. However there are still some very big files going out directly to cartridge, because migrating/recalling them would take too much time. Using this TMM concept saved us to get extra software for tape stacking, however HSM CPU usage is going up. Werner Kuehnel IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU schrieb am 16.06.2009 18:00:58: We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? DFSMShsm So are you saying he should copy the tape datasets to dasd and then migrate them with HSM? ddk -- 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: Free software to stack tape datasets?
O'Brien, David W. (NIH/CIT) [C] pisze: We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? DFSMShsm -- Radoslaw Skorupka Lodz, Poland -- BRE Bank SA ul. Senatorska 18 00-950 Warszawa www.brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237 NIP: 526-021-50-88 Wedug stanu na dzie 01.01.2009 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 118.763.528 zotych. W zwizku z realizacj warunkowego podwyszenia kapitau zakadowego, na podstawie uchway XXI WZ z dnia 16 marca 2008r., oraz uchway XVI NWZ z dnia 27 padziernika 2008r., moe ulec podwyszeniu do kwoty 123.763.528 z. Akcje w podwyszonym kapitale zakadowym BRE Banku SA bd w caoci opacone. -- 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: Free software to stack tape datasets?
We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? DFSMShsm So are you saying he should copy the tape datasets to dasd and then migrate them with HSM? ddk ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- 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: Free software to stack tape datasets?
Yes, Darth that is what Radoslav is saying. As a HSM bigot myself, it would be my first option IF all datasets were cataloged. I expect they are not. I was hoping there might be something on CBT that someone could recommend. Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Darth Keller [darth.kel...@assurant.com] Sent: Tuesday, June 16, 2009 12:00 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Free software to stack tape datasets? We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? DFSMShsm So are you saying he should copy the tape datasets to dasd and then migrate them with HSM? ddk ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- 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: Free software to stack tape datasets?
Darth Keller pisze: We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? DFSMShsm So are you saying he should copy the tape datasets to dasd and then migrate them with HSM? More or less. In fact the best way to use tapes is to avoid using them directly. No DD statements with 100MB datasets. No stacking. No manual duplexing. Simply keep data on DASD and migrate/backup them using HSM. Then issue like 9840A-D migration will be piece of cake (recycling). You will also get much better tape utilization, wihtout VSM. Last but not least - it's free (assumed you already have HSM or FDR). -- Radoslaw Skorupka Lodz, Poland -- BRE Bank SA ul. Senatorska 18 00-950 Warszawa www.brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237 NIP: 526-021-50-88 Wedug stanu na dzie 01.01.2009 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 118.763.528 zotych. W zwizku z realizacj warunkowego podwyszenia kapitau zakadowego, na podstawie uchway XXI WZ z dnia 16 marca 2008r., oraz uchway XVI NWZ z dnia 27 padziernika 2008r., moe ulec podwyszeniu do kwoty 123.763.528 z. Akcje w podwyszonym kapitale zakadowym BRE Banku SA bd w caoci opacone. -- 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: Free software to stack tape datasets?
On Tue, 16 Jun 2009 10:25:22 -0400, O'Brien, David W. (NIH/CIT) [C] obrie...@mail.nih.gov wrote: We are looking to copy data off of 9840A tapes to 9840D tapes. There are a limited number of free slots in our SL8500, so just letting them wither and die is not an option. Neither is boxing them and mounting on demand. Since there are a limited number of datasets to be stacked we need a cost effective solution. Does anyone know of a cheap or better yet free stacking mechanism besides Iebgener? I haven't used it in many years and I don't know anyone else who has either, but if you are running CA-1, I still have TAPESTAK on my web site / CBT file 434. It can utilize COPYCAT or IEBGENER. If you use the IEBGENER option, it creates TMSUPDTE cards for you in order to preserve some of the original information on the new tape (creation job name, date, etc.). Since you say there are a limited number of data sets to be stacked, this could work well for you. It has a test mode, so you can run it and see what will happen without actually destroying any of the original tapes / information. If you decide to try it, I'd be interested in hearing your results. Even if you don't have CA-1, you may be able to modify it for other software packages. Even if it takes reading some sort of report output instead of the TMC directly. Regards, Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.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: Free software to stack tape datasets?
On Tue, 16 Jun 2009 13:26:44 -0500, Mark Zelden mark.zel...@zurichna.com
wrote:
On Tue, 16 Jun 2009 10:25:22 -0400, O'Brien, David W. (NIH/CIT) [C]
obrie...@mail.nih.gov wrote:
We are looking to copy data off of 9840A tapes to 9840D tapes. There are a
limited number of free slots in our SL8500, so just letting them wither and
die is not an option. Neither is boxing them and mounting on demand. Since
there are a limited number of datasets to be stacked we need a cost
effective solution.
Does anyone know of a cheap or better yet free stacking mechanism besides
Iebgener?
I haven't used it in many years and I don't know anyone else who has either,
but if you are running CA-1, I still have TAPESTAK on my web site / CBT
file 434.
It can utilize COPYCAT or IEBGENER. If you use the IEBGENER option, it
creates TMSUPDTE cards for you in order to preserve some of the original
information on the new tape (creation job name, date, etc.).
Since you say there are a limited number of data sets to be stacked, this
could work well for you. It has a test mode, so you can run it and see
what will happen without actually destroying any of the original tapes /
information.
If you decide to try it, I'd be interested in hearing your results.
Even if you don't have CA-1, you may be able to modify it for other
software packages. Even if it takes reading some sort of report output
instead of the TMC directly.
I just ran a test and it still looks like it works with CA-1 11.5. However,
my first run didn't find any tapes to stack. In looking at the section
of code (copied below) that excludes certain tapes from selection, I found
that the outcode (vault) appears to be blanks now and my code was
checking for hex zeros. Not sure when that changed... like I said, I
haven't run this in years. I changed the check and it works.
Perhaps Russell Witt can tell me when that changed or why I am
seeing something different now than in the past when I used this
program.
/* If any of the following conditions are true - get */
/* another record.*/
/* */
/* 1) The tape volser STARTNUM or ENDNUM */
/* 2) The tape is a 9 track (3420) tape */
/* 3) The tape is a FDRABR tape */
/* 4) The tape is a DFHSM tape */
/* 5) The tape is vaulted*/
/* 6) The tape is part of a multi-volume set */
/* 7) The tape is a multi- file tape (tape has DSNBs)*/
/* */
If VOLSER STARTNUM | VOLSER ENDNUM then iterate
If Substr(INREC,89,1) = X2c('80') then iterate /* 9 track (3420) */
If Substr(INREC,7,6) = 'FDRABR' then iterate /* FDR/ABR tapes */
If Substr(INREC,7,5) = 'DFHSM' then iterate /* DFHSM tapes*/
/*If Substr(INREC,109,4) X2c('') then iterate *//*vaulted*/
If Substr(INREC,109,4) '' then iterate /* vaulted */
If Substr(INREC,57,6) X2c('') then iterate /*mlt-vol*/
If Substr(INREC,75,2) X2c('') then iterate /* multi file*/
/* */
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:mark.zel...@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.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: Free software to stack tape datasets?
Thank you Mark, I'll look into this.
Dave O'Brien
NIH Contractor
From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Mark
Zelden [mark.zel...@zurichna.com]
Sent: Tuesday, June 16, 2009 3:12 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Free software to stack tape datasets?
On Tue, 16 Jun 2009 13:26:44 -0500, Mark Zelden mark.zel...@zurichna.com
wrote:
On Tue, 16 Jun 2009 10:25:22 -0400, O'Brien, David W. (NIH/CIT) [C]
obrie...@mail.nih.gov wrote:
We are looking to copy data off of 9840A tapes to 9840D tapes. There are a
limited number of free slots in our SL8500, so just letting them wither and
die is not an option. Neither is boxing them and mounting on demand. Since
there are a limited number of datasets to be stacked we need a cost
effective solution.
Does anyone know of a cheap or better yet free stacking mechanism besides
Iebgener?
I haven't used it in many years and I don't know anyone else who has either,
but if you are running CA-1, I still have TAPESTAK on my web site / CBT
file 434.
It can utilize COPYCAT or IEBGENER. If you use the IEBGENER option, it
creates TMSUPDTE cards for you in order to preserve some of the original
information on the new tape (creation job name, date, etc.).
Since you say there are a limited number of data sets to be stacked, this
could work well for you. It has a test mode, so you can run it and see
what will happen without actually destroying any of the original tapes /
information.
If you decide to try it, I'd be interested in hearing your results.
Even if you don't have CA-1, you may be able to modify it for other
software packages. Even if it takes reading some sort of report output
instead of the TMC directly.
I just ran a test and it still looks like it works with CA-1 11.5. However,
my first run didn't find any tapes to stack. In looking at the section
of code (copied below) that excludes certain tapes from selection, I found
that the outcode (vault) appears to be blanks now and my code was
checking for hex zeros. Not sure when that changed... like I said, I
haven't run this in years. I changed the check and it works.
Perhaps Russell Witt can tell me when that changed or why I am
seeing something different now than in the past when I used this
program.
/* If any of the following conditions are true - get */
/* another record.*/
/* */
/* 1) The tape volser STARTNUM or ENDNUM */
/* 2) The tape is a 9 track (3420) tape */
/* 3) The tape is a FDRABR tape */
/* 4) The tape is a DFHSM tape */
/* 5) The tape is vaulted*/
/* 6) The tape is part of a multi-volume set */
/* 7) The tape is a multi- file tape (tape has DSNBs)*/
/* */
If VOLSER STARTNUM | VOLSER ENDNUM then iterate
If Substr(INREC,89,1) = X2c('80') then iterate /* 9 track (3420) */
If Substr(INREC,7,6) = 'FDRABR' then iterate /* FDR/ABR tapes */
If Substr(INREC,7,5) = 'DFHSM' then iterate /* DFHSM tapes*/
/*If Substr(INREC,109,4) X2c('') then iterate *//*vaulted*/
If Substr(INREC,109,4) '' then iterate /* vaulted */
If Substr(INREC,57,6) X2c('') then iterate /*mlt-vol*/
If Substr(INREC,75,2) X2c('') then iterate /* multi file*/
/* */
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:mark.zel...@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.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
