SYSDSN et fichier migrate [Résolu]

sam01 · 07/01/2010, 11h20

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 · 07/01/2010, 12h54

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 · 07/01/2010, 15h24

Parfait !

Merci ;-)

07/01/2010, 11h20	#1
sam01 Membre confirmé Inscription : mars 2004 Messages : 1 149 Détails du profil Informations forums : Inscription : mars 2004 Messages : 1 149 Points : 224 Points : 224	SYSDSN et fichier migrate 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.
	00

07/01/2010, 12h54	#2
Homer-ac Membre expérimenté Inscription : octobre 2007 Messages : 449 Détails du profil Informations personnelles : Localisation : France Informations forums : Inscription : octobre 2007 Messages : 449 Points : 518 Points : 518	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). Dernière modification par Homer-ac ; 07/01/2010 à 13h51. Motif: nb
	00

07/01/2010, 15h24	#3
sam01 Membre confirmé Inscription : mars 2004 Messages : 1 149 Détails du profil Informations forums : Inscription : mars 2004 Messages : 1 149 Points : 224 Points : 224	Parfait ! Merci ;-)
	00

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email