bonjour,
j'utilise delphi7les procedures stockées et sql server.
ma requete en sql est la suivante :
donc je veux une moyenne en choisissant dans un combobox le mois et dans un second l'année et mettre dans un edit la valeur de la moyenne. La requete marche en sql si je remplace @mois per par ex '10' et @an par '2004'.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 proc moy_score_total @mois datetime, @an datetime as select AVG (ECH_NORTON.Et_phy+ECH_NORTON.Et_ment+ECH_NORTON.Activite +ECH_NORTON.Mobilite+ECH_NORTON.Incontinence) as Moyenne from ech_norton where datepart(month, date)= @mois and datepart(year, date) = @an
En delphi, voici la procédure :
C'est ici que ca coince : parameters.ParamByName('@mois').Value := (CBMois.ItemIndex);
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 procedure TFMoy_Score.BitBtn1Click(Sender: TObject); begin with datamodule2.ProcStoMoy_ScTot do begin active := false; parameters.ParamByName('@mois').Value := (CBMois.ItemIndex); parameters.ParamByName('@an').Value := (CBAn.ItemIndex); active := true; execproc; end; edit1.Text := inttostr(datamodule2.ProcStoMoy_ScTotMoyenne.Value);
Je ne sais pas si c'est assez clair, en tout cas merci d'avance
Partager