Discussion :

[hanitax]

Salut à tous
je veux comparer les données d'une colonne (libelle) dans mon fichier HF (langue) avec une variable de type chaine "X"
si X se trouve parmi les données de (langue.libelle) il doit me renvoyer son ID (langue.IDlangue) sinon il faut l'ajouter dans le fichier et puis me renvoyer son ID! voila ce que j'au essayé mais il m'affiche aucun resultat !

Code :

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

1
2
3
4
5
6
7
8
HLitRecherchePremier(langue,Libelle,X)		
si  HTrouve(langue) alors
info(langue.IDlangue )
sinon
langue.libelle=X
info(langue.IDlangue)
fin
HLitSuivant(langue,Libelle)

[mail.spam]

bonjour,

Je n'ai fait que survolé ton code mais
peux tu nous dire ou tu as mis ton code?

et ta ligne HLitSuivant me pose problème car tu ne boucle pas pour faire la lecture suivante.

Si ton fichier langue ne dois comporter qu'une correspondance je ne vois pas pourquoi veux lire l'enregistrement suivant.

[hanitax]

j'ai met le code dans un button et HLitSuivant je pense pour lire l'enregistrement suivant etcomme ça lire tout les enregistrement dans mon fichier !!
en plus je ne suis pas trés sûr d'utiliser cette fonction HLitRecherchePremier() ,peut être que c'est Hfiltre mais je sais pas !

[mail.spam]

en plus je ne suis pas trés sûr d'utiliser cette fonction HLitRecherchePremier() ,peut être que c'est Hfiltre mais je sais pas !

Comment ca ?
Peux tu nous mettre le code complet de ton bouton

[tatayo]

Bonsoir,
Je vois comme un petit truc qui me dérange dans le code:

Code :

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

1
2
3
4
5
6
7
8
9
HLitRecherchePremier(langue,Libelle,X)		
si  HTrouve(langue) alors
info(langue.IDlangue )
sinon
langue.libelle=X <=ici
info(langue.IDlangue) 
fin
HLitSuivant(langue,Libelle)

Dans le cas où la langue n'est pas trouvée, la langue est affectée à un enregistrement, mais:
1. lequel, puisqu'aucun n'a été trouvé
2. comment, car il n'y a ni hModifie, ni hAjoute dans le code

Tatayo.

[hanitax]

langue.libelle=X <=ici
info(langue.IDlangue)
hajoute(langue)
Tatayo

désolé Tatayo j'au oublier une hajoute ;bn en tout cas merci à tous voila j'ai utilisé ce code est ca fonctionne trés bien

Code :

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

1
2
3
4
5
6
HLitRecherche(langue,Libelle,X)
								SI HTrouve() ALORS
								info(langue.IDLANGUE)
										SINON
									langue.Libelle=X							HAjoute(langue)							info(langue.IDLANGUE)
FIN