Discussion :

[a_karim_fr]

Bonjour,
On a supprimer par erreur le PDS suivant 'TEST.MAA.SRC' mais qu'on vas récupéré ce PDS via la commande HRECOVER il donne ce message d'erreur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
ARC1001I TEST.MAA.SRC RECOVER FAILED, RC=0028, REAS=0000
ARC1128I BACKUP/DUMP COPY DOES NOT EXIST

La question est comment récupérer ce PDS.

une autre chose on peux recuprér aussi un membre X supprimer.


Merci pour votre aide

[Lemmings1406]

Malheureusement pour toi, il faut que tu te renseignes en interne pour savoir si ton pds serait sauvegardé (chaine de sauvegardes ou pra... par exemple) sinon, je crains que ce soit définitif.

[a_karim_fr]

Oui j'ai contacté l'équipe système mais malheureusement le PDS n'est pas sauvegarder mais s'il es sauvegarder comment récupérer un membre x supprimer.

[Lemmings1406]

S'il est sauvegardé, il suffit simplement de faire un adrdssu restore avec option rename en indiquant quelle bibli restaurée à partir de la sauvegarde X et sous le nom Y. Tu auras ainsi l'ensemble des membres de la bibliothèque et tu pourras récupérer ce que tu veux. Quand tu as finis, tu supprimes la bibliothèque restaurée pour ne pas polluer l'environnement.

Si tu veux un exemple de jcl, je peux t'en fournir un.

[a_karim_fr]

Merci pour votre réponse.

Ok tu peux me donnée cette exemple de ce JCL ;

Merci

[Lemmings1406]

Le jcl:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//RESTO    EXEC  PGM=ADRDSSU                                               
//*-------------------------------------------------------------------*    
//SYSPRINT DD  SYSOUT=*                                                    
//DDX      DD  DSN=Nom_de_la_sauvegarde,                         
//             DISP=SHR                                                    
//SYSIN    DD  *                                                           
     REST INDDNAME(DDX) -                                                
     DATASET INCLUDE(sélection_du_fichier_a_restaurer)) -                 
     RENUNC(fichier_a_renommer, -                                                        
                 nouveau_nom_de_fichier) -    
     SPHERE  -                                            
     TGTGDS(ACTIVE) -                                                        
     SHR                                                                     
//*

[a_karim_fr]

Merci pour votre aide.