Bonjour,
Soit le codeEst-il envisageable de créer une procédure utilisable ainsi : LireFichier(CLIENT); LireFichier(FOURNISSEUR) avec
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 LOCAL i est un entier POUR i = 1 _A_ HNbEnr(CLIENT, hEtatTous) HLit(CLIENT, i) SI HEtat() = hEtatActif ALORS Message(CLIENT.NOM) FIN POUR i = 1 _A_ HNbEnr(FOURNISSEUR, hEtatTous) HLit(FOURNISSEUR, i) SI HEtat() = hEtatActif ALORS Message(FOURNISSEUR.NOM) FIN
...et dans ce cas quel est le type de Fichier ? J'avais pensé initialement Source de Données mais j'obtiens l'erreur
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Procedure LireFichier(Fichier est un ?????) LOCAL i est un entier POUR i = 1 _A_ HNbEnr(Fichier, hEtatTous) HLit(Fichier, i) SI HEtat() = hEtatActif ALORS Message(Fichier.NOM) FIN
Erreur :'CLIENT' est ici considéré comme le fichier HyperFileSQL. Pour accéder à un autre élément, utilisez une déclaration externe.
Merci.
Partager