Delete par JCL [Résolu]

[Antichoc]

Bonjour,

J'ai quelques fichiers de la structure suivante

Code :

1
2
3
BASE.LIB.USER1.TEST
BASE.LIB.USER1
BASE.LIB.USER1.ALPHA.PROG

Je souhaites effacer l'intégraliter de BASE.LIB par JCL, seulement quand je tape la commande DELETE BASE.LIB.*, seulement les niveaux n+1 sont supprimés (BASE.LIB.USER1) le reste n'est pas impacté.

Y a t il une option du programme IDCAMS pour supprimer tout les "sous fichiers" ?

Merci

[SPACHFR]

Salut,

Passe la commande avec 2*

DELETE BASE.LIB.**

[Antichoc]

Merci,

Apparement, ca ne marche pas, "restricted" ....

[SPACHFR]

Dans ce cas je pense qu'il faut utiliser ADRDSSU pour faire un DUMP DELETE

Code :

1
2
3
4
5
6
7
8
9
10
EX.
//STEP10 EXEC PGM=ADRDSSU               
//SYSPRINT DD SYSOUT=*                  
//DELETE DD DUMMY                       
//SYSIN DD *                            
 DUMP DATASET(INCLUDE(BASE.LIB.**)) - 
 OUTDD(DELETE) DELETE PURGE             
/*                                      
//*

[Antichoc]

C cool

Ca marche

Merci beaucoup pour cette aide précieuse

[Antichoc]

Bonjour,

Je remonte ce topic pour savoir si quelqu'un sait où je peux trouver la documentation officielle de ADRDSSU ?

Je n'arrive pas à la trouver sur le site d'IBM ...

Merci d'avance

[Homer-ac]

ADRDSSU est dans la doc SMS : DFSMSdss Strorage Administration référence (SC35-0424-00)
Ici un lien plus général vers la doc IBM au format PDF. Tu trouveras ce que tu demandes dans la rubrique DFSMS.

nb. DFSMSdss, ne pas confondre aves DFSMShsm et autres produits de la famille SMS.

[Antichoc]

Merci beaucoup, ce lien, c'est ce qui me manquait pour rechercher de la doc sur IBM !!!

Un jour je comprendrais l'architecture de ce site qui doit renfermer pas mal d'info !