Discussion :

[sam01]

Bonjour,

j'effectue en REXX un test sur une liste de fichier avec la commande SYSDSN
.

Le souci c'est quand je tombe sur un fichier qui est migrate, avec cette commande, HSM tente un hrecall.

De mon côte j'aimerais bypasser les fichiers migrate et faire mon test uniquement sur les fchiers non MIGRATE.

Existe un commande rexx qui permette de voir si un fichier est migrate sans effectuer le Recall...

Merci d'avance pour votre aide.

[Homer-ac]

Passes un LISTDSI avec le paramêtre NORECALL. ex : D1 = listdsi("'"MYDSN"' NORECALL").
Le code retour est 0 si le fichier est non migré et 16 sinon, dans ce cas la valeur de SYSREASON est à 0009 si le fichier est migré.
nb. Bien entendu, le LISTDSI remplacera alors le SYSDSN. Il suffit de tester la valeur du code retour 0 et SYSREASON pour savoir si le fichier est présent (RC = 0), migré (SYSRESON = 9) ou absent (RC > 0 et SYSREASON non 0009).

[sam01]

Parfait !

Merci ;-)