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

Reply via email to