Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Datenanzeige nach Datum und gleichzeitig summieren (https://www.delphipraxis.net/73178-datenanzeige-nach-datum-und-gleichzeitig-summieren.html)

Ati 13. Jul 2006 11:22

Datenbank: Firebird • Version: 1.5 • Zugriff über: Zeos

Datenanzeige nach Datum und gleichzeitig summieren
 
Hallo zusammen,

nachdem ich das Problem mit der Datenabfrage gelöst habe, stehe ich nun vor dem nächsten Problem. Ich lasse die Anzeige der Daten durch zwei TDateEdit-Felder begrenzen. Nun soll im Grid alle Einträge aus diesem Zeitraum aufgelistet werden und gleichzeitig in einem Edit-Feld die jeweiligen Einträge summiert werden. Jedoch habe ich noch keinen Plan wie ich das geschmeidig hinbekommen kann. Ich hoffe ich konnte ich klar ausdrücken.

Mfg
Ati

morri 13. Jul 2006 12:05

Re: Datenanzeige nach Datum und gleichzeitig summieren
 
Du willst die Datumswerte summieren :gruebel:

Ati 13. Jul 2006 12:11

Re: Datenanzeige nach Datum und gleichzeitig summieren
 
Nein. Es handelt sich hierbei um die Erfassung von Lademittel (Europaletten,Einwegpaletten, Gitterboxen). Diese Daten werden nun jeden Tag vom Wareneingang erfasst. Ich möchte dann unter Begrenzung eines Start und Enddatums alle Einträge einmal im DBGrid sehen und die entsprechenden Lademittel in einem Edit-Feld summiert haben.

mkinzler 13. Jul 2006 12:19

Re: Datenanzeige nach Datum und gleichzeitig summieren
 
SQL-Code:
Select Sum( Lademittel) where datum between startDatum and EndDatum;

Ati 13. Jul 2006 12:42

Re: Datenanzeige nach Datum und gleichzeitig summieren
 
Dann habe ich im Grid aber nur die Summe der Lademittel, ohne die Einzelaufstellung zu haben. Habe das Problem wie folgt gelöst. Für jede Lademittelart eine zusätzliche Query-Komponente auf dem Formular plaziert und mit der DB-Komponente verknüpft. Dann mit
Delphi-Quellcode:
qr2.sql.text:='select sum(gibo) as summeg FROM Zandereingang WHERE DATUM BETWEEN ' + quotedstr(de1.Text) + ' AND ' + quotedstr(de2.Text);
    qr2.open;
    lblgibo.Caption:=qr2.FieldByName('summeg').AsString;
Die entsprechende Summe ermittelt und dargestellt. Funktioniert einwandfrei auch wenn es bestimmt noch einfacher geht.

marabu 13. Jul 2006 12:53

Re: Datenanzeige nach Datum und gleichzeitig summieren
 
Hi,

richtig elegant wird es erst, wenn deine Daten entsprechend normalisiert sind. Dann kannst du gruppierte Summen ausweisen:

SQL-Code:
SELECT typ, SUM(menge)
FROM LadeMittel lm
WHERE datum BETWEEN :beginn AND :ende
GROUP BY typ
Aber alles in einer einzigen Query solltest du ohnehin nicht anstreben - falls du das unter elegant verstehen solltest. Da es sich um eine interaktive Anwendung handelt, musst du dir um eine zusätzliche Query keine Gedanken machen.

Grüße vom marabu

Jasocul 13. Jul 2006 13:05

Re: Datenanzeige nach Datum und gleichzeitig summieren
 
Zitat:

Zitat von Ati
Dann habe ich im Grid aber nur die Summe der Lademittel, ohne die Einzelaufstellung zu haben.

Dann nimm einfach ein zweite Query zur Summenberechnung.
Andere Möglichkeit:
In einer Schleife die ganze Tabelle durchgehen und selbst addieren.


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:30 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz