Discussion :

[lazariel]

Hello à tous !

J'ai quelques problèmes de compréhension du fonctionnement de HDéclareExterne()... Ou du moins la suite.

Attaquons !

Voici le code en l'état actuel des choses :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Connexion à la base distance
Requetes est une Connexion
 
// Paramètres de la connexion
Requetes..Provider = hAccèsHFClientServeur
Requetes..Utilisateur = "admin"
Requetes..MotDePasse = ""
Requetes..Serveur = "<.....>"
Requetes..BaseDeDonnées = "<.....>"
Requetes..Cryptage = hCryptageNon
 
//Déclaration externe du fichier Contacts pour pouvoir le manipuler
MesContacts est une Source de Données
 
SI PAS HOuvreConnexion(Requetes) ALORS
	Trace(HErreurInfo())
FIN
 
SI PAS HDéclareExterne("CONTACTS.fic",MesContacts,Requetes) ALORS
	Trace(HErreurInfo())
FIN

Ok jusque là, ça va plutôt bien.

En faisant un bête

Code :

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

1
2
3
4
5
 
HLitPremier(MesContacts)
SI HTrouve()
Trace(MesContacts.AdresseEmail)
FIN

Tip top ! ça fonctionne ! Youpi ! Tralala !

Et là.......... c'est le drame.

J'essaye d'isoler une enregistrement. Dans le cas présent, je désire vérifier 2 paramètres qui se traduisent par un AND en SQL..

Essai n° 1 :

HFiltre(MesContacts,"NoCLIENT = '"<Truc>"' ET Initiales = '"+<Machin>+"'")

Windev me répond (assez sèchement d'ailleurs)

Erreur à la ligne 66 du traitement Procédure globale PrepareMail.
Vous avez appelé la fonction HFiltre.
Il n'existe pas de rubrique <NoCLIENT='' ET INitialesSMS = 'GEM> dans le fichier <MesContacts>.

Essai n°2 :

Dans le désespoir, un HExécuteRequêteSQL... pas mieux, un gros message d'erreur

Essai n°3 :
HLitRecherche(). alors oui, super, mais je n'ai qu'un seul de mes deux paramètres à vérifier.

Je pensais qu'une variable de type source de données était une sorte d'"Image" des enregistrements qu'on donne et sur laquelle on pouvait faire n'importe quelle interrogation "standard"....


Des pistes?

[vmolines]

Bonjour,

Essai n°1, d'après l'aide :

Après l'exécution de la fonction HFiltre, le parcours du fichier doit obligatoirement être effectué sur la rubrique renvoyée par la fonction HFiltre. Si une autre rubrique est utilisée pour le parcours du fichier, le filtre ne sera pas pris en compte.

Sachant que je n'utilise jamais HFiltre.

Essai n°2 :

Il serait bon de préciser les messages, sinon pas d'aide possible

Essai n°3 :

Voir HLitRecherche dans l'aide, section "Recherche sur une clé composée"

[lazariel]

Oulah, je déleste déjà, je viens de trouver la solution.

En l'occurrence j'ai opté pour la solution de requête SQL. J'ai dû créer une autre Source de Données différente que celle utilisée dans le HDéclareExterne() et cela fonctionne (pour l'instant).

[Bowen]

Heu, bêtement, tu as essayé en mettant AND à la place de ET ?
(perso j'écris toujours mes HFiltres comme des where de SQL)

de plus, je suppose que c'est une faute de frappe, mais si le poste répond bien
<NoCLIENT='' ET INitialesSMS = 'GEM>
alors il te manques un apostrophe, le moteur ne peut donc pas comprendre la requête qu'il reçoit.
EDIT :
Je viens de tester chez moi

Code :

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

1
2
3
4
5
6
7
8
9
10
 
LOCAL
	Article			est une Source de Données
	sCleFiltre		est une chaîne
	sCleFiltre = HFiltre(Article, "Article_Cle LIKE 'A5%' AND Article_Valide_ID = 0")
	SI sCleFiltre <> "" _ET_ HLitPremier(Article, sCleFiltre) ALORS 
		BOUCLE
			Trace(Article.Article_Cle)
		A FAIRE TANTQUE HLitSuivant(Article, sCleFiltre)
	FIN

ça marche parfaitement

[N_Ron]

Bonjour,


D'accord Avec Bowen pour le AND.
Et les + pour la première condition,

"NoCLIENT = '"<Truc>"'
"NoCLIENT = '"+<Truc>+"'

C'est un détail mais bon...

Par contre c'est possible dans ta table que <Truc> soit vide?

N_Ron


PS : SORRY ... pas vu le Résolu!!

[lazariel]

Hello à tous !

Absolument pas et c'est bien là le problème. Quant à l'apostrophe, j'ai viré le code maintenant mais je ne crois pas (ou n'espère) pas avoir fait cette erreur

Je note pour mes prochains HFiltre de penser en SQL pur et dur !

J'ai toutefois opté pour une autre solution (qui fonctionne ma foi extrêmement bien) :

Je fais mon HDéclareExterne(), puis attaque la source de données avec un bon vieux HExécuteRequêteSQL(). Ca fonctionne


Amicalement