Hallo zusammen,
mein Problem besteht darin, dass ich eine Tabelle mit Haushaltsstellen(HhST) habe und eine Haupttabelle, in der Einnahmen zu den HhSt stehen. Nun möchte ich die Einnahmen HhSt-weise zusammenaddieren und mein Report soll dann wie folgt aussehen:
HhST 1 enthält 100,00 Euro
HhSt 2 enthält 150,00 Euro
etc.
Im Moment habe ich nur eine Lösung, dass für jede HhSt ein Report gedruckt wird.
Delphi-Quellcode:
// Auszug mit etwas vereinfachter SQL-Abfrage
// Report ausführen
DataModule2.IBTableHhst.First;
While not DataModule2.IBTableHhst.Eof
do begin
HHSTNR := DataModule2.IBTableHhst.FieldByName('
HHST').AsString;
DataModule2.IBQueryMonatsabschluss.Active := false;
DataModule2.IBQueryMonatsabschluss.SQL.Clear;
DataModule2.IBQueryMonatsabschluss.SQL.Text := '
SELECT STRBETRAG FROM TMAIN WHERE HHST = ' + QuotedStr(HHSTNR);
DataModule2.IBQueryMonatsabschluss.Active := true;
DataModule2.RvProjectMonatsabschluss.ExecuteReport('
Report1');
DataModule2.IBTableHhst.Next;
end;
Im Rave-Report werden dann die Beträge aus der Tabelle zusammenaddiert.
Kann mir jemand helfen?