Error en delete ML2

[falcon]

Buenos dias.

tengo un fichero en MIGRAT2, que quiero y no puedo borrar.

DSLIST - Data Sets Matching xxxxxx.xxxx.xxxxxx Row 1 of 1
Command ===> Scroll ===> CSR

Command - Enter "/" to select action Message Volume
-------------------------------------------------------------------------------
XXXXXXX.XXXX.XXXXX HDEL RC=0 MIGRAT2
***************************** End of Data Set list ****************************

He probado con DELETE, HDELETE, DEL NSCR. No hay forma. Cuando realizo cualquiera de los anteriores comandos, el sistema me responde :

ARC1010I USER REQUEST FOR A MIGRATED DATA SET FAILED.
ARC1001I XXXXXXX.XXXX.XXXXXX DELETE FAILED, RC=0002, REAS=0000
ARC1102I DATA SET IS NOT MIGRATED/BACKED UP
IDC3014I CATALOG ERROR+
IDC0551I ** ENTRY XXXXXXX.XXXX.XXXXXX NOT DELETED
IDC0014I LASTCC=8
IDC3007I ** VSAM CATALOG RETURN CODE IS 38

El fichero como tal no exite, sólo existe la entrada en el catálogo.

Se les ocurre algo????.

[idelucio]

Ejecuta lo siguiente:

HSEND FIXCDS D XXXXXXX.XXXX.XXXXX

[Fran Jimenez]

Hola,

ejecuta el siguiente comando vía IDCAMS

DELETE xxxx.xxxxxxxx.xxxxxxx NOSCRATCH

Salu2

[falcon]

Buenos dias,

gracias por contestar idelucio.

he hecho lo que propones, con D y fichero entre comillas, con D i fichero sin comillas, con D y DELETE con y sin comillas, con el mismo resultado : ERROR=RECORD NOT FOUND

//PASO01 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
HSENDCMD FIXCDS D 'XXXXXX.XXXX.XXXXX' DELETE

ARC0195I TYPE D, KEY XXXXXX.XXXX.XXXXX, FIXCDS DELETE, ERROR=RECORD NOT
ARC0195I (CONT.) FOUND
ARC1001I FIXCDS D XXXXXX.XXXX.XXXXX COMMAND FAILED, RC=0015, REAS=0000
ARC1615I FIXCDS COMMAND REJECTED
09.25.36 JOB45002 $HASP165 HSMFIX ENDED AT N1 MAXCC=0 CN(INTERNAL)

[falcon]

Gracias por contestar, Fran,

he hecho lo que propones pero sin resultado :

IDCAMS SYSTEM SERVICES

DELETE XXXXX.XXXX.XXXXX +
NONVSAM PURGE NOSCRATCH +
CAT(UCATALOG NAME)
IDC3014I CATALOG ERROR
IDC3007I ** VSAM CATALOG RETURN CODE IS 38
IDC0551I ** ENTRY XXXXX.XXXX.XXXXX NOT DELETED
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8

[Tintxiko]

Hola falcon, nos ocurrió algo parecido hace un tiempo.

Esto esto que hicimos en su momento:


Error al borrar un fichero migrado 6-7-2006

Si al borrar con HDELETE un fichero migrado se produce el error:

Código: Seleccionar todo

ARC1001I PTTSP.BANCOS.DIAGNOS  DELETE FAILED, RC=0003, REAS=0004
ARC1103I MIGRATION/BACKUP/DUMP VOLUME NOT AVAILABLE             
***  

En TSO dar el comando:

Código: Seleccionar todo

HSEND WAIT FIXCDS D PTTSP.BANCOS.DIAGNOS DELETE

Equivalente en 3.4: HSEND WAIT FIXCDS D / DELETE

Parámetro WAIT:
“If you want to delete a lot of backups, you will want to batch them up and run them as a job. When you do this, DFHSM will issue all the commands at once and queue them up. If the queue is too large, DFHSM will abend! You can avoid this by using the WAIT parameter as shown below. HSM will then process each delete one at a time.”

Responde con el mensaje:

Código: Seleccionar todo

ARC0197I TYPE D, KEY PTTSP.BANCOS.DIAGNOS, FIXCDS DELETE SUCCESSFUL
***  

A continuación, borrar la entrada de catálogo. En 3.4:

Código: Seleccionar todo

DELETE   PTTSP.BANCOS.DIAGNOS NSCR

o
Equivalente en 3.4: DELETE (/) NSCR ANCOS.DIAGNOS

Código: Seleccionar todo

Esssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss
e                             Confirm TSO Delete                             e
e Command ===>                                                               e
e                                                                More:     + e
e Data Set Name . : PTTSP.BANCOS.DIAGNOS                                     e
e Volume  . . . . : MIGRAT                                                   e
e Creation date . :                                                          e
e                                                                            e
e CAUTION:                                                                   e
e If TSO delete command was issued against an uncataloged data set, a        e
e cataloged version on a volume other than the one listed here may be        e
e deleted.                                                                   e
e                                                                            e
e Command  . . . : DELETE   'PTTSP.BANCOS.DIAGNOS' NSCR                      e
e                                                                            e
e                                                                            e
e Enter "/" to select option                                                 e
e    Set data set delete confirmation off                                    e
e                                                                            e
e Instructions:                                                              e
e   Press ENTER to confirm delete.                                           e
e   (The data set will be deleted.)                                          e
Dsssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss

Código: Seleccionar todo

ARC1020I DFSMSHSM IS RECALLING FROM TAPE DSN=PTTSP.BANCOS.DIAGNOS, YOU MAY CONTINUE THE RECALL IN THE BACKGROUND AND FREE YOUR TSO SESSION BY PRESSING THE ATTENTION KEY                                                                       
 IDC0550I ENTRY (A) PTTSP.BANCOS.DIAGNOS DELETED                                
 *** 

Si es un fichero VSAM, se repite el comando DELETE (/) NSCR para el resto de componentes del fichero VSAM.

[Tintxiko]

Si lo anterior no funciona y como dices sólo existe la entrada de catálogo y no el fichero en sí prueba simplemente a descatalogarlo en 3.4 con U (Uncatalog) a la izquierda del nombre del fichero.

[falcon]

Hola Tintxiko,
gracias por el aporte.

He hecho lo que has propuesto pero, , no ha dado resultado.

ARC0195I TYPE D, KEY XXXXXX.XXXX.XXXX, FIXCDS DELETE, ERROR=RECORD NOT
ARC0195I (CONT.) FOUND
10.35.15 JOB45010 $HASP165 HSMFIX ENDED AT N1 MAXCC=4 CN(INTERNAL)

Tal como comento, el maldito fichero, lo veo desde el 3.4 como MIGRAT2, por lo que entiendo que esta en el catalogo. Cualquier acción sobre el catalogo remite a desmigrar primero el fichero, pero al no estar, ni fisica ni como entrada de catalogo, en el HSM, con lo que siempre da error.

DSLIST - Data Sets Matching IT00048.SIST.BBISPRNT Row 1 of 1
Command ===> Scroll ===> CSR

Command - Enter "/" to select action Message Volume
-------------------------------------------------------------------------------------
XXXXXXX.XXX.XXXXXXX MIGRAT2

Seguimos intentandolo.

[Tintxiko]

Por descartar cosas, comprueba con LISTCAT ENTRIES (/) ALL a qué catálogo pertenece el fichero, y que ese catálogo está accedido por la máquina en la que quieres borrar el fichero.

[falcon]

Hola,

despues de muchos esfuerzos y pruebas hemos conseguido borrar el fichero.

Fran Jimenez tenia razón. Su post ha sido la solución. Nosotros habiamos probado con DELETE NSCR. Por alguna extraña razón que en estos momentos no quiero averiguar, el IDCAMS se comia el NSCR. Al poner la palabra NOSCRATCH completa, ha funcionado y lo hemos

Gracias a todos por vuestro tiempo.

Saludos

[kedijoke]

Queridos amigos de Dinoland...
Agregando mas informacion a la solucion de Fran Jimenez....es importante correr idcams poniendo la sentencia completa NOSCRATCH (sin abreviaciones)

DELETE xxxx.xxxx.xxxx NOSCRATCH

[albertutxo]

Buenas,

Pues yo me he encontrado con este mismo problema, el fallo me daba cuando ejecutaba el DELETE NSCR desde el ISPF (a través del 3.4 con DELETE / NSCR, o bien en la opción 6), pero he podido borrar los ficheros vía batch con IDCAMS DELETE NSCR, sin necesidad de poner el NOSCRATCH completo. Da la impresión de que la diferencia está en ejecutar IDCAMS o hacerlo a través de ISPF.

Un saludo.