Discussion :

[qqoos]

bonjour,

Je dois gerer des creations d'employes. Sur un panel ISPF, je dois recuperer le dernier n° de matricule, l'incrementer à chaque creation d'employé et le stocker. Il faut le recuperer au prochain logon.
Je pensais faire ça avec Vput et Vget dans le PROFILE associé à l'appli, mais je ne m'en sors pas. J'aurais besoin d'un exemple !!!

merci d'avance

[Peut-êtreUneRéponse]

Il vaut mieux à mon avis passer par une table ISPF.

.

[qqoos]

bonjour,

merci du retour, mais ce travail se situe dans le cadre d'un exercice, et s'il y a un exemple simple d'utilisation de vget et vput, je suis preneur.

à bientôt

[Luc Orient]

En REXX moi je ferai :

Lecture :

Code :

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

"ISPEXEC VGET ma_variable PROFILE"

Ecriture :

Code :

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

"ISPEXEC VPUT ma_variable PROFILE"

Voilà ...

[Homer-ac]

Attention si on veut garder le vontenu d'une session TSO il faut effectivement spécifier PROFILE dans le VPUT (et éventuellement dans le VGET) mais il est bien entendu que le 'VPUT (VAR) PROFILE' ISPF sera stocké dans l'ISPPROF du USER TSO pour l'application ISPF en cours -> pas de partage de sa valeur avec un autre USER , c'est pourquoi je pense que Peut-êtreUneRéponse a suggéré une table ISPF.
Maintenant on peut faire du VGET (VAR) et du VPUT (VAR) [PROFILE] directement dans la section )INIT du panel, et du VPUT dans la section )PROC bien entendu.
Dans du REXX on peut aussi faire de l'indirection, c'est à dire du VGET ou VPUT d'une variable contenue dans une autre variable exemple :

Code :

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

1
2
3
4
5
6
7
8
9
ADDRESS ISPEXEC                      
VAR1 = 'CONTENU DE VAR1'             
VAR2 = 'VAR3'                        
INTERPRET VAR2 "= 'CONTENU DE VAR3'" 
'VPUT (VAR1,VAR2)'                   
'VPUT ('VAR2')'                      
'VGET (VAR1,VAR2,VAR3)'              
SAY '1:'VAR1 '2:'VAR2 '3:'VAR3'.'

[qqoos]

bonjour,

merci pour ces réponses et bonne année à tous !!

[Peut-êtreUneRéponse]

pas de partage de sa valeur avec un autre USER , c'est pourquoi je pense que Peut-êtreUneRéponse a suggéré une table ISPF

Comme le dit Homer-ac, personnellement je fais mes VPUT/VGET dans la description du panel, c'est bien pratique pour garder les dernières saisies utilisateurs (PDS, options...) et leur représenter au rappel de ce panel.

.