Mise en variable d'une zone en RPG

[AAWOOPY56]

Bjr,

Est-il possible de mettre en variable le résultat d'une zone après lecture Exemple

J'ai un fichier avec 6 colonnes
1er colonne correspond à des numéros de rangs sur 2 de long
2eme colonne des noms de clients sur 10 de long
3eme colonne des noms de rues sur 80 de long
4eme colonne des noms de villes sur 30 de long
5eme colonne des numéros de téléphones sur 13 de long
6eme colonne des numéros de fax sur 13 de long

les 2 premières colonnes sont des clés secondaires qui ce trouvent dans FicSec001 du fichier FicGroupe

Mon pgm

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
FFicGroupe  IF   E           K Disk                               
FFicRef00   UF A E             Disk    rename(FicRef00:FicRef00F)   
0005.00 C     *Entry        pList                                                  
0006.00 C                   Parm                    colCli                          
0007.00 C                   Parm                    Tst               1            
0009.00 C     CleSec        klist                                                  
0010.00 C                   kFld                    colNum                          
0011.00 C                   kFld                    colCli    

Je voudrais mettre le contenu de colNum par exemple dans une variable pour que je puisse l'utiliser dans l'Eval suivant                      
0013.00 C                   Eval      colNum=[Mon contenu colNum à travers ma variable ] est-il possible de faire un read par exemple pour faire ça?                                    
                                              
0015.00 C     CleSec        Chain     FicSec001                           90        
[...]

[FORMULARY]

Tes fichiers sont déclarés en externe.
L'instruction chain va automatiquement alimenter des variables de ton programme portant le même nom que les zones du fichier (sauf bien sûr si on les renomme dans les cartes D

[AAWOOPY56]

Slt

Ok merci par contre t'aurais un exemple d'écriture du chain Stp

Merci

[FORMULARY]

Regardes EXTRMAIL que je t'ai transmis !!!