Sum in einer Selectanweisung

[karl der große]

Hallo an Alle,

ich hab ein kniffliges Problem

Für eine Auswertung von Artikelverkäufen hab ich eine Anzeige der Verkäufe im VirtualStringTree gemacht. Funzt soweit super!

Folgendes Layout hab ich:

Delphi-Quellcode:

Material1
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
Material2
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
Material3
   ...

Es ist nun sehr unkomfortabel, wenn man die Beträge mit der Rechenmaschine zusammenzählen muss

Dazu würd ich gern folgenden VST aufbauen:

Delphi-Quellcode:

Material1          Summe1                   Summe2
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
Material2          Summe1                    Summe2
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
   Verkaufsdatum   Menge Mengeneinheit Preis Betrag
Material3          Summe1                    Summe2
   ...

wobei Summe1 jeweils die Summe der darunterliegenden Mengen, Summe2 der darunterliegenden Beträge anzeigen soll.
Damit wär auch im eingeklappten Zustand der Knoten eine sinnvolle Anzeige möglich.

Ich hab jetzt eine Weile darüber gebrütet, vermutlich könnte es über den Select funktionieren.

Hab derzeit folgenden Select:

Delphi-Quellcode:

select distinct Artikelbezeichnung, Objektnr from nebenkosten where Objektnr = :Objektnummer

Hab mir gedacht, dass es so funktionieren könnte:

Delphi-Quellcode:

select distinct Artikelbezeichnung, Objektnr, sum(BetragVollkosten) from nebenkosten where Objektnr = :Objektnummer

Aber mit diesem Select bringt er mir dauernd eine Fehlermeldung.

Hat jemand von Euch eine Idee???

Vielen Dank für Eure Hilfe!

Karl

[Airblader]

muss man bei einem SUM(xxx) nicht so machen?

Code:

SUM(foo) AS bar

die fehlermeldung wäre aber auch gut zu wissen

air

[Wuaegner]

Ich kann auch völlig daneben liegen, aber ich meine für eine SUM( ) Anweisung braucht man am Ende noch ein GROUP BY Befehl.

[karl der große]

Ich habs. Vielen Dank. :bounce2: :bounce2: :bounce2:

Delphi-Quellcode:

select sum(GesamtVollkosten) as Gesamt, Artikelbezeichnung, Objektnr from nebenkosten  where objektnr = :=objektnummer group by Artikelbezeichnung, Objektnr

Gruss Karl

[Wuaegner]

Das nenn ich Teamwork @Airblaider :cheers: