have a "default" dataclass for errant allocations;
my routine looks something like this:

            WHEN ((&DSTYPE NE 'TEMP')   AND
                  ((&DSORG NE 'PO')  OR
                   (&DSORG NE 'VS')  OR
                   (&DSORG NE 'DA'))    AND
                  (&DSORG EQ ''))
                DO
                  SET &DATACLAS = 'DCPS'
                  EXIT
                END

"DCPS" is my naming convention for Dataclass for DSORG=PS;
no space values, nothing, except for DSORG=PS.


- ravi.



On Tue, 13 Sep 2005 13:48:34 -0500, Mark Steely <[EMAIL PROTECTED]> wrote:

>We are z/OS V1R4. We have several datasets which are allocated but never
>opened or closed. This leaves the dataset with an invalid DSORG. These
>datasets are SMS managed, which I thought SMS would prevent from
>happening. As a result HSM will not back up or migrate these datasets.
>How do other shop's manage these datasets?
>
>Thank You

----------------------------------------------------------------------
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