Discussion :

[Aenur56]

Bonjour,

J'ai besoin de récupérer le résultat d'une requête dans un champ de saisie mais je n'y arrive pas. Au mieux, il y a un chiffre (1 ou 0) qui s'affiche dans le champ.

Ce champ de saisie doit contenir le type de carte d'une commande passée en paramètre, sachant qu'une commande a un unique type de carte.

Pour ce faire, j'ai créé une requête dont voici le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
SELECT 
	TypeCarte.libelle AS libelle
FROM 
	TypeCarte,	
	Commande
WHERE 
		Commande.IDTypeCarte	=	TypeCarte.IDTypeCarte
	AND
	(
		Commande.IDCommande = {Param1}
	)

J'ai lié le champ de saisie à ma requête et je l'ai initialisé par programmation ainsi :

Code :

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

SAI_TypeCarte = HExécuteRequête(REQ_TypeCarte, hRequêteDéfaut, gParam1)

Comment faire pour que le champ m'affiche bien le résultat que je veux, c'est à dire le libellé du Type de carte ?

Merci d'avance,

Aenur.

[hpascal]

Bonjour

HExécuteRequête renvoi vrai (1) ou faux (0), donc le résultat est juste

Après avoir testé si le HExécuteRequête renvoi bien VRAI il faut utiliser HLitPremier pour se positionner sur l'enregistrement retourné et alimenter ton champ avec une zone du résultat de ta requête (ici REQ_TypeCarte.libelle)

[klbsjpolp]

Bonjour,

HExécuteRequête

La valeur de retour de la fonction est un booléen pour dire si l'exécution s'est bien passé. Pour récupérer la valeur de la rubrique libelle, tu dois utiliser la syntaxe REQ_TypeCarte.libelle après t'être assuré que l'exécution de la requête s'est bien passée.

[Aenur56]

Merci beaucoup, problème résolu

Code :

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

1
2
3
4
SI (HExécuteRequête(REQ_TypeCarte,hRequêteDéfaut, gParam1) = Vrai) ALORS
	HLitPremier(REQ_TypeCarte)
	SAI_TypeCarte = REQ_TypeCarte.libelle
FIN

Par contre je trouve que la doc de PCSoft n'est pas très détaillée à ce niveau je ne l'avais pas comprise comme ça.

Merci encore !

Aenur.

[Raptor92]

Bonjour,

Personnellement, je me sert de la commande "SQLLitcol".
L'exemple ci-dessous est fait pour être exécuté avec une base SQLServer, mais si je ne trompe pas,vous pouvez remplacer votre commande HExecuteRequete par HexecuteRequeteSQL

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Requete2="SELECT OB_MAG,OB_CA FROM OBJECTIFS WHERE OB_ANNEE = '"+Left(DateSys(),4)+"' AND OB_MOIS = '"+Milieu(DateSys(),5,2)+"' "+...
"GROUP BY OB_MAG "+...
"ORDER BY OB_MAG "
SI EnModeTest() ALORS Trace(ReqName2,Requete2)
SI SQLExec(Requete2,ReqName2) ALORS
    SI SQLAvance(ReqName2)=0 alors
	Valeur=SQLLitcol(ReqName2,1)
	Valeur2=SQLLitcol(ReqName2,2)
	
FIN
SQLFerme(ReqName2)

Les variables 1 et2 ayant préalablement été déclarées en tant qu'entier.
Ensuite, rien de plus simple:

Champ_Saisie1=Valeur
Champ_Saisie2=Valeur2

Voilà....voilà