Do you have at least UPDATE authority to the catalog?

Since the dataset is nonvsam, you can use 3.4 and specify the volser to list
the DSN.  If you delete it using this list, the catalog will not be
referenced.

You can then clean up the catalog later if you want to.  If you don't intend
to keep the SERVERPAC catalog, you don't need to worry about it containing
superfluous entries.

:>: -----Original Message-----
:>: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
:>: Behalf Of Skip Robinson
:>: Sent: Wednesday, June 18, 2014 8:07 AM
:>: To: IBM-MAIN@LISTSERV.UA.EDU
:>: Subject: IKJ56228I trying to delete a data set
:>:
:>: Cleaning up after a ServerPac install. There are some 'operational' data
:>: sets that I don't want to keep around. One of those is 'SYS1.XCF.CDS03',
:>: which lives on the 'CAT' volume and cataloged in the ServerPac catalog
:>: 'MVSR21.ICF.MASTER' on the same volume. I wrote a simple Rexx to LISTC
:>: the
:>: data set and, if it exists, delete it. LISTC shows the data set, DELETE
:>: fails as shown.
:>:
:>: I also LISTC and delete the associated alias 'OSR21.SYS1.XCF.CDS03' in
:>: the
:>: same catalog. That command worked fine. What am I missing for the data
:>: set
:>: delete? I run this Rexx under foreground TSO.
:>:
:>:
:>:      9 *-* "LISTC ENT('"dsn"') CAT('MVSR21.ICF.MASTER')"
:>:        >>>   "LISTC ENT('SYS1.XCF.CDS03') CAT('MVSR21.ICF.MASTER')"
:>: NONVSAM ------- SYS1.XCF.CDS03
:>:     13 *-*   "DEL '"dsn"' CAT('MVSR21.ICF.MASTER')"
:>:        >>>     "DEL 'SYS1.XCF.CDS03' CAT('MVSR21.ICF.MASTER')"
:>: IKJ56228I DATA SET SYS1.XCF.CDS03 NOT IN CATALOG OR CATALOG CAN NOT BE
:>: ACCESSED
:>: IDC0551I ** ENTRY SYS1.XCF.CDS03 NOT DELETED
:>: IDC0014I LASTCC=8
:>:        +++ RC(8) +++
:>:
:>: .
:>: .
:>: J.O.Skip Robinson
:>: Southern California Edison Company
:>: Electric Dragon Team Paddler
:>: SHARE MVS Program Co-Manager
:>: 626-302-7535 Office
:>: 323-715-0595 Mobile
:>: jo.skip.robin...@sce.com
:>:
:>: ----------------------------------------------------------------------
:>: For IBM-MAIN subscribe / signoff / archive access instructions,
:>: send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to