LazReport : count si valeur différente de 0

Bonjour

J'ai besoin de faire un rapport avec LazReport qui liste des dossiers et des montants.
J'arrive à faire le count du nombre de dossier :

Code:

---

[COUNT([_QueryRapport."NumDossier"], Masterdata1)] Dossiers au total

---

par contre j'essaye d'avoir le nombre de dossier sur lesquels un certain montant est non nul

Code:

---

[COUNT([[_QueryRapport."MontantValide"]<>0], Masterdata1)] Dossiers validés

---

malheureusement ce code ne fonctionne pas, il me sort le même count que le nombre de dossier total. Avez vous déjà fait ce genre de count et comment ?

(Laz1.2 Win64)

@bientôt

Bonjour,

Citation:

---

Envoyé par mtournay

Avez vous déjà fait ce genre de count et comment ?

---

1. Je dénombrerai les dossiers "non nuls" en implémentant le gestionnaire d'événement TfrDBDataSet.OnNext
   Code:

   ---

   1 2 3 4 5

   procedure TDataModule1.frDBDataSet1Next(Sender: TObject); begin if DossierCourantNonNul then FNbDossiersNonNuls := FNbDossiersNonNuls + 1; // initialisée à 0 en début de parcours... end;

   ---

2. J'utiliserai une variable personnelle : [NbDossiersNonNuls] que je placerai sur une bande "Pied de page"
3. J'implémenterai le gestionnaire d'événement TfrReport.OnGetValue pour initialiser cette variable.
   
   Code:

   ---

   1 2 3 4 5

   procedure TForm1.frReport1GetValue(const ParName: String; var ParValue: Variant); begin if ParName = 'NbDossiersNonNuls' then ParValue := FNbDossiersNonNuls; end;

   ---

bonjour à tous

Merci Ph.B pour ta réponse. Je suis désolé de n'avoir pu y répondre plus tôt, mais les calendriers de travail sont ainsi fait que je n'ai pu tester ta solution qu'hier.

Dans l'absolu, cette solution fonctionne presque.

• Il y a des problèmes avec le comptage du 1er élément
• En cas de rupture, le comptage se passe mal, il y a un compte en plus par rupture

Ayant besoin d'une solution maintenant rapide, je vais passer par des requêtes intermédiaires appelée via les variables...

Merci quand même. Je vais continuer mes investigations sur ta solution, je reviendrais poster pour donner des nouvelles

à bientôt