Discussion :

[redoran]

Salut ; j'ai la requête suivante

SELECT T1.TB,Count(T1.TB) AS [Total]
fROM T1
where
datedec>=:dt1
and
datedec<=:dt2
GROUP BY T1.TB

qui me retourne le résultat suivant :
A1 = 205,
A2=300,
c'est deux résultats sont affichés dans un dbgrid , et pour affiché le pourcentage de chaque élément dans le même dbgrid j'ai utilisé un champ calculé 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
 
procedure TDM.sreptbCalcFields(DataSet: TDataSet);
begin
m:=0;// var de type integer déclaré au début
 
                     dm.sreptb.First;
                      while not(dm.sreptb.Eof) do
                      begin
                      m:=m+ (dm.sreptbTotal.AsInteger);// Total de chaque A
                      dm.sreptb.Next;
                      end;
dm.sreptbTFC.Value:= ceil((dm.sreptbTotal.Value*100)div m);// valeur du champ calculé
 
end;

apparemment sa marche pas , je suis bloqué

[SergioMaster]

Quelques remarques :
- Quelle est la SGBD utilisée (par exemple Firebird permettrait de faire les calculs dans la Query)
- Pourquoi ne pas utiliser une query pour récupérer le total 'm' indépendante du OnCalcFields (refaire a chaque enregistrement le calcul , c'est une herésie) par exemple dans un After / BeforeOpen

- enfin je comprend que cela ne fonctionne pas , bonjour la boucle sur le datasource

[Cl@udius]

Salut

Quelle est la SGBD utilisée

C'est Access, repérable aux crochets autour de Total.

Pourquoi ne pas utiliser une query pour récupérer le total 'm' indépendante du OnCalcFields

+1, d'autant que si je comprends bien m est égal à RecordCount.

enfin je comprend que cela ne fonctionne pas , bonjour la boucle sur le datasource

+1. Effectuer un balayage sur le DataSet sur lequel s'effectue le CalcFields.
A proscrire.

@+

[redoran]

Bonjour; merci pour vos interventions ;je suis sous [D7+ access 2003], le "m" est la somme de tous les éléments .
alors je lancer une deuxième requête qui me calcule le "m" et calculé le pourcentage.