On Fri, 2 Jul 2010 23:48:25 -0500, Russell Witt wrote:
>You could create dummy entries for a secondary file that does not really
>exist. Let's say you have a tape with 15 data sets on it; you can use
>TMSAGGR or TMSUDSNB to create a file-16 in the TMC (chained to file-15 on
>that specific volume). Now, when the tape is scratched all secondary files
>are un-cataloged (including this dummy entry). However, the file does not
>actually exist on the tape; so a tape-map of the volume will NOT find it.VVee
>
>If you create a catalog entry that does not exist on the tape and you do not
>update the TMC however, you are correct that the dummy file will not be
>un-cataloged when the tape is scratched (since there is no pointer back to
>it). That is why you need to have a dummy entry in the TMC. That will allow
>it to be un-cataloged when the volume is scratched.
>
Thinking about this, it might be easiest in the cases where I
create the tape to leave the step that creates and catalogs file-16
as-is and add:
//STEP EXEC PGM=IEBGENER
//SYSUT2 DD LABEL=(46,BLP),DISP=(,KEEP),VOL=REF=FILE-15,EXPDT=98000
//SYSUT1 DD DUMMY
Are TMSAGGR and TMSUDSNB callable from Rexx?
Is the CA-1 doc available online?
Thanks for your advice,
gil
----------------------------------------------------------------------
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