Discussion :

[happymiss]

bonjour
J'explique ma situation,j'ai deux tables :Tache et Demande ,tache contient la clé étrangère de demande (num_demande) , je veux ajouter les données a la table Tache avec une condition

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
tache.nom_tache=SAI_Nom_tache
tache.debut=SAI_Debut
tache.fin_tache=SAI_Fin_tache
tache.responsable=SAI_Responsable
tache.achevee=INT_Achevee
tache.descreption=SAI_Descreption
 
HExécuteRequête(maReq)
IF SAI_Entier1 = maReq.num_client ALORS
	tache.Num_demande=maReq.num_demande
END
Info("L'ajout c'est bien passé")
HAjoute(tache)
RAZ(Vrai)
Ferme

tous les champs s'ajoutent sauf num_demande

[laurent30s]

Normal, tu ne parcours pas le résultat de la requête...

Essaye avec ça

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
tache.nom_tache=SAI_Nom_tache
tache.debut=SAI_Debut
tache.fin_tache=SAI_Fin_tache
tache.responsable=SAI_Responsable
tache.achevee=INT_Achevee
tache.descreption=SAI_Descreption
 
HExécuteRequête(maReq)
HLitPremier(maReq)
TANTQUE HTrouve(maReq)
	IF SAI_Entier1 = maReq.num_client ALORS
		tache.Num_demande=maReq.num_demande
	END
	HLitSuivant(maReq)
FIN
Info("L'ajout c'est bien passé")
HAjoute(tache)
RAZ(Vrai)
Ferme

c'est pas très logique de dire que l'ajout c'est bien passé alors qu'il n'a pas encore été fait...

ce qui est préconisé dans l'aide c'est plutôt...

Code :

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

1
2
3
SI HAjoute(CLIENT) = Faux ALORS
        Erreur("Impossible d'ajouter le client")
FIN