Requête sur une vue.

**thierrybatlle** · 25/05/2010, 17h05

Bonjour,

J'ai une procédure globale dans laquelle j'exécute une requête sur une vue passer en paramètre.
Voici le code :

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
22
23
24
25
26
27
28
 
PROCEDURE ListeDesProduitsParPays(nNumPays est un entier, lstProd est une Liste d'entier, sdVueProd est une Source de Données)
 
sQuery 			est une chaîne
sdResultQuery 	est une Source de Données
 
Trace(HNbEnr(sdVueProd))
 
sQuery = [
	SELECT 
		sdVueProd.T_produits_ID AS T_produits_ID,	
		T_distributeurs.T_distributeurs_numPays AS T_distributeurs_numPays
	FROM 
		T_distributeurs,	
		sdVueProd
	WHERE 
		sdVueProd.T_produits_numDistributeur	=	T_distributeurs.T_distributeurs_ID
	AND
	(
		T_distributeurs.T_distributeurs_numPays = %1
	)
]
 
sQuery = ChaîneConstruit(sQuery,nNumPays)
 
SI PAS HExécuteRequêteSQL(sdResultQuery,hRequêteDéfaut,sQuery) ALORS
	Erreur(ErreurInfo())
FIN

Dans le "Trace" j'ai bien le bon nombre d'enregistrements, mais quand j'exécute la requête il me dit que "sdVueProd" est inconnu ??

Quelqu'un a t'il une idée ?

Merci.

**=JBO=** · 25/05/2010, 18h07

Bonjour,

Que se passe-t-il si tu traces le "nom logique" de la vue ?
Qu'est-ce qui est affiché ?

Code WLangage :

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

1
2
3
4
5
6
7
8
 
PROCEDURE ListeDesProduitsParPays(nNumPays est un entier, lstProd est une Liste d'entier, sdVueProd est une Source de Données)
 
sQuery est une chaîne
sdResultQuery est une Source de Données
 
Trace(HNbEnr(sdVueProd))
Trace(sdVueProd)

Dans le code SQL, il faut utiliser les "noms logiques" déclarés au moteur de bases de données HyperFile, et non pas les variables du WLangage.

Ok ?
_

**thierrybatlle** · 26/05/2010, 08h56

Bonjour,

Effectivement il fallait utiliser le nom logique et là plus de soucis. Merci.

Maintenant ce que je ne comprend pas c'est que si je fais ma requête sur ma table produits j'ai un certain nombre de produits qui remontent.

Je crée ma vue sur ma table produits, sans condition, quand je trace le nombre de produits (sur mon paramètre sdVueProd) je vois qu'ils y sont tous.
Mais quand je fais ma requête sur cette vue (avec son nom logique), qui est une image conforme de ma table, je ne remonte aucun résultat !?

Pourquoi ?

Je ne comprend pas une chose, je passe en paramètre ma vue, que je récupère dans sdVueProd, mais dans ma requête j'utilise le nom logique qui est : sdVueProduits.
En conclusion je n'ai pas besoin de passer ma vue en paramètre ?
Et quand je fais un

Code :

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

Trace(HNbEnr(sdVueProduits))

ma procédure me dit que sdVueProduits n'existe pas.

Merci.

**=JBO=** · 26/05/2010, 14h42

Bonjour,

Envoyé par thierrybatlle

Maintenant ce que je ne comprend pas c'est que si je fais ma requête sur ma table produits j'ai un certain nombre de produits qui remontent.

Je crée ma vue sur ma table produits, sans condition, quand je trace le nombre de produits (sur mon paramètre sdVueProd) je vois qu'ils y sont tous.
Mais quand je fais ma requête sur cette vue (avec son nom logique), qui est une image conforme de ma table, je ne remonte aucun résultat !?

Pourquoi ?

Je ne connais pas précisément ta situation, peut être devrais-tu nous donner tout le code correspondant à ton problème.

Néanmoins, je peux témoigner sur la faisabilité de ta démarche.

Si je crée une source de données de type Vue, puis je crée une source de données basée sur une requête qui utilise la Vue... la source de données basée sur la requête me donne bien accès aux données issues de la Vue.
Je confirme.

Envoyé par thierrybatlle

Je ne comprend pas une chose, je passe en paramètre ma vue, que je récupère dans sdVueProd, mais dans ma requête j'utilise le nom logique qui est : sdVueProduits.
En conclusion je n'ai pas besoin de passer ma vue en paramètre ?

De toute façon, il te faut connaître le nom logique, n'est-ce pas ?

Envoyé par thierrybatlle

Et quand je fais un

Code :

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

Trace(HNbEnr(sdVueProduits))

ma procédure me dit que sdVueProduits n'existe pas.

Il faut que tu sois bien clair par rapport aux conditions d'utilisation d'un nom sans guillemet dans une fonction HyperFile H*.
Tu peux utiliser un nom sans guillemet dans un des 3 cas suivants:

c'est un nom de "fichier HyperFile" décrit dans l'analyse associée au projet,
c'est un nom "symbolique" déclaré avec le mot clé EXTERNE et qui correspond au nom logique d'un "fichier HyperFile" déclaré autrement que par l'analyse,
c'est un nom de variable de type source de données, dans le respect des règles de portée.

Autrement, tu dois utiliser une chaîne de caractères qui contient le nom logique du "fichier HyperFile".
_

**thierrybatlle** · 27/05/2010, 09h22

Bonjour,

Depuis que j'utilise les guillemets j'ai le bon nombre d'enregistrement dans :

Code :

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

1
2
 
Trace(HNbEnr("sdVueProduits"))

Mais toujours pas de résultat lors de l'exécution de la requête !?

Voici mon code :

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
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
PROCEDURE ListeDesProduitsParPays(nNumPays est un entier, lstProd est une Liste d'entier, sdVueProd est une Source de Données)
 
sQuery 			est une chaîne
sdResultQuery 	est une Source de Données
 
Trace(HNbEnr("sdVueProduits"))
Trace(sdVueProd)
sQuery = [
	SELECT 
		sdVueProduits.T_produits_ID AS T_produits_ID,	
		T_distributeurs.T_distributeurs_numPays AS T_distributeurs_numPays
	FROM 
		T_distributeurs,	
		sdVueProduits
	WHERE 
		sdVueProduits.T_produits_numDistributeur	=	T_distributeurs.T_distributeurs_ID
	AND
	(
		T_distributeurs.T_distributeurs_numPays = %1
	)
]
 
sQuery = ChaîneConstruit(sQuery,nNumPays)
 
SI PAS HExécuteRequêteSQL(sdResultQuery,hRequêteDéfaut,sQuery) ALORS
	Erreur(ErreurInfo())
FIN
Trace(HNbEnr(sdResultQuery))
HLitPremier(sdResultQuery)
TANTQUE PAS HEnDehors(sdResultQuery)
	Ajoute(lstProd,"sdVueProduits".T_produits_ID)
	HLitSuivant(sdResultQuery)
FIN
 
Trace(lstProd..Occurrence)

sdVueProduits est créée dans le code du bouton qui appelle cette procédure.
Je passe cette vue en 3eme paramètre à ma procédure.

Merci bien.

**=JBO=** · 27/05/2010, 12h20

Bonjour,

Envoyé par thierrybatlle

Mais toujours pas de résultat lors de l'exécution de la requête !?

Qu'est que tu entends par «toujours pas de résultat» ?

Quelle est la valeur tracée par:

Code WLangage :

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

Trace(HNbEnr(sdResultQuery))

Je vois que tu veux remplir une variable de type liste lstProd avec des données... mais tu fais erreur sur la source de données, j'ai l'impression...

Au lieu de:

Code :

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

1
2
3
4
5
6
 
HLitPremier(sdResultQuery)
TANTQUE PAS HEnDehors(sdResultQuery)
	Ajoute(lstProd,"sdVueProduits".T_produits_ID)
	HLitSuivant(sdResultQuery)
FIN

Je te propose d'essayer ceci :
(j'ai utilisé une instruction de parcours HyperFile POUR TOUT, qui équivaut à HLitPremier, TANTQUE PAS HEnDehors, HLitSuivant)

Code :

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

1
2
3
4
 
POUR TOUT sdResultQuery
	Ajoute(lstProd,sdResultQuery.T_produits_ID)
FIN

**=JBO=** · 27/05/2010, 12h49

Encore un conseil en ce qui concerne la source de données et l'utilisation de son nom logique, en particulier dans une requête SQL.

Envoyé par thierrybatlle

Bonjour,

Depuis que j'utilise les guillemets j'ai le bon nombre d'enregistrement dans :

Code :

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

1
2
 
Trace(HNbEnr("sdVueProduits"))

Si la procédure reçoit en paramètre une source de données, autant utiliser "son" nom logique, plutôt qu'un nom logique tapé "en dur", n'est-ce pas ?

Dans une requête SQL, pour éviter de recopier le nom logique autant de fois que c'est nécessaire, je te propose d'utiliser un ALIAS SQL (cf. mot clé AS dans la requête SQL).
Ainsi, en déclarant l'alias SQL V_Produits, il sera plus simple de coder la requête

C'est la fonction ChaîneConstruit() qui se chargera d'insérer le nom logique dans la requête SQL.

Cerise sur le gateau

: tu remarqueras que le nom logique est placé entre crochets pour se protéger de l'éventualité d'un nom logique qui pourrait contenir des caractères problématiques via à vis de la syntaxe SQL (espace, tabulation, point...).

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
22
23
 
 
PROCEDURE ListeDesProduitsParPays(nNumPays est un entier, lstProd est une Liste d'entier, sdVueProd est une Source de Données)
 
sQuery est une chaîne
sdResultQuery est une Source de Données
 
Trace(HNbEnr(sdVueProd))
Trace(sdVueProd)
 
sQuery = [
    SELECT 
        V_Produits.T_produits_ID AS T_produits_ID, 
        T_distributeurs.T_distributeurs_numPays AS T_distributeurs_numPays 
    FROM 
        T_distributeurs, 
        [%1] AS V_Produits 
    WHERE 
        V_Produits.T_produits_numDistributeur = T_distributeurs.T_distributeurs_ID 
        AND T_distributeurs.T_distributeurs_numPays = %2 
]
 
sQuery = ChaîneConstruit(sQuery,sdVueProd,nNumPays)

**thierrybatlle** · 02/06/2010, 15h20

Si je fais cette requête :

Code :

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

1
2
3
4
5
6
 
SELECT 
	V_Produits.T_produits_ID AS T_produits_ID,
	V_Produits.T_produits_numDistributeur
FROM 
	[%1] AS V_Produits

J'ai bien les numéros des distributeurs quand j'exécute ma requête.

Je ne vois pas pourquoi ma liaison ne veut pas fonctionner ???

**thierrybatlle** · 02/06/2010, 16h03

Même cela ne fonctionne pas :

Code :

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

1
2
3
4
5
6
7
8
 
SELECT 
	V_Produits.T_produits_ID ,
	V_Produits.T_produits_numDistributeur
FROM 
	[%1] AS V_Produits JOIN T_distributeurs ON V_Produits.T_produits_numDistributeur = T_distributeurs.T_distributeurs_ID
WHERE
	T_distributeurs.T_distributeurs_numPays = %2

Alors que dans WDSQL ce code marche très bien.

**=JBO=** · 02/06/2010, 16h30

Salut Thierry, ne désespère pas.

Je n'ai pas de réponse pour l'instant, mais à titre de comparaison, je vais te montrer mon code de test qui fonctionne.

Code WLangage :

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
22
23
24
25
26
27
28
29
 
 
srcVue est une Source de Données
srcVue+=HeureSys()
 
HCréeVue(srcVue,PIECES,"*","T_JOURNAL","",hVueDéfaut)
 
Info(HNbEnr(srcVue))
 
srcReq est une Source de Données
SQL est une chaîne = [
SELECT 
	V.ID_BORDEREAU, V.ID_PIECE, V.T_JOURNAL, V.D_PIECE, 
	V.T_CPT_TIERS, V.T_NUM_PIECE, 
	BORDEREAUX.T_FICHIER 
FROM 
	[%1] AS V, BORDEREAUX 
WHERE 
	T_JOURNAL='VTEDIV' 
	AND V.ID_BORDEREAU = BORDEREAUX.ID_BORDEREAU 
]
SQL=ChaîneConstruit(SQL,srcVue)
 
SI HExécuteRequêteSQL(srcReq,hRequêteDéfaut,SQL) = Faux ALORS
	Erreur()
	RETOUR
FIN
 
Info(HNbEnr(srcReq))

**thierrybatlle** · 02/06/2010, 16h56

Petite remarque :
Est-ce que cela ne viendrait pas du fait que j'ai tout mon code avec la vue dans une procédure globale ?

Merci.

**=JBO=** · 02/06/2010, 18h03

Envoyé par thierrybatlle

Petite remarque :
Est-ce que cela ne viendrait pas du fait que j'ai tout mon code avec la vue dans une procédure globale ?

Je ne vois pas pourquoi...

Peut être que tu pourrais nous montrer le code qui construit la vue (de la déclaration de la variable source de données jusqu'à la déclaration de la vue) ?

Comme je te l'ai déjà proposé, as-tu essayé ta requête SQL en gardant la jointure mais sans filtrer sur le pays ?
_

Requête sur une vue.

WinDev

Vue hybride

Discussions similaires

Partager

Partager