On Aug 4, 2005, at 4:31 AM, R.S. wrote:
Mautalen Juan Guillermo wrote:
Hi,
I have a TAPE containing many datasets (there were copied to tape
using
IEBGENER utility program).
What is the easiest way to download to disk ALL the TAPE datasets? (i
want 1 sequential disk dataset per tape dataset exiting on the volume)
I beleive DITTO can be used for this, but after a quick look to its
documentation i was unable to find this specific function.
Of course, i can run an IEBGENER job, with 1 step for each tape label
to
be copied, but i was looking for something not requiring so much work.
Juan,
IMHO you have to work a little <g>
What dataset names would you want for these files ? How can DITTO know
your requirements ?
IEBGENER job doesn;t mean so much work, rather several similar steps:
//STEP10 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DISP=OLD,VOL=SER=tape,UNIT=tapeunit,
// DSN=FILE1,LABEL=1
//SYSUT2 DD DISP=(,CATLG),SPACE=(TRK,(1000,1000),RLSE),
// DSN=HLQ.FILE1
using editor it's piece of cake to repeat block text and change few
fields: 2 x DSN + LABEL.
---------------SNIP___________________
I think you might want to code ,RETAIN for sysut1 or else your
operators will not like you to much.
Ed
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
