We need to remove a GDG entry from a GDG base, but the catalog entry doesn't
exist. What happened was that during the creation of the GDG
(PTP.DP.TRMS.ARCH999.X3.G0308V00) the user catalog filled up and could not
extend. We received IEC331I 020-000..... error message on this. We corrected
the catalog space issue, but the PTP.DP.TRMS.ARCH999.X3 GDG base has the
G0308V00 GDG associated with it, but there is no catalog entry for G0308V00.
if you do a LISTCAT ALL ENTRY(PTP.DP.TRMS.ARCH999.X3) this is what you get.
GDG BASE ------ PTP.DP.TRMS.ARCH999.X3
IN-CAT --- TAPE.USER.CAT
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2017.248
RELEASE----------------2 LAST ALTER------2018.184
ATTRIBUTES
LIMIT-----------------999 SCRATCH NOEMPTY LIFO NOPURGE
EXTENDED
ASSOCIATIONS
NONVSAM--PTP.DP.TRMS.ARCH999.X3.G0001V00
NONVSAM--PTP.DP.TRMS.ARCH999.X3.G0002V00
.......
NONVSAM--PTP.DP.TRMS.ARCH999.X3.G0307V00
NONVSAM--PTP.DP.TRMS.ARCH999.X3.G0308V00
........
NONVSAM ---- PTP.DP.TRMS.ARCH999.X3.G0307V00
IN-CAT --- TAPE.USER.CAT
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2018.172
RELEASE----------------2 EXPIRATION------0000.000
VOLUMES
VOLSER------------A58863 DEVTYPE------X'78048081'
FSEQN------------------1
ASSOCIATIONS
GDG------PTP.DP.TRMS.ARCH999.X3
ATTRIBUTES
IDC3012I ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT FOUND+
IDC1566I ** PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT LISTED
IDC0014I LASTCC=4
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
Doing a LISTCAT All ENTRY(PTP.DP.TRMS.ARCH999.X3.G0308V00) gets
IDC3901I ERROR QUALIFYING PTP.DP.TRMS.ARCH999.X3.G0308V00
IDC3902I ** DEFAULT SERVICE ROUTINE ERROR CODE 20, LOCATE ERROR CODE 8
IDC0014I LASTCC=4
Is there anyway to delete the unwanted GDG entry from the GDG base without have
to delete and rebuild the GDG base?
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
