Rechnungen/Reports --> Ergebnis speichern

[Rote Zora]

Es ist zum Haareraufen!

Ich hab ein Verwaltungsprogramm mit einem handgestrickten Programm entwickelt (hauptsächlich sql), bin aber jetzt an meine Grenzen gestossen. Nu möchte ich gerne alles in Delphi neu aufziehen.

Möchte einen automatischen Rechnungslauf erstellen, dessen Ergebnis nachher in die RG.db gespeichert wird.

Verwendete Dateien:

Klienten.db
leistungen.db
Mitarbeiter.db
leistungsmeldung.db

im "alten" Programm brauchte ich 8 verschiedene sql's und hab absolut keinen blassen Schimmer, wie ich dass in Delphi hinkriegen kann.

Hoffentlich hört mich einer!

Ciao
Barbara

[r_kerber]

Hallo Barbara,

laß die roten Haare ruhig auf'm Kopf.

Du hast zum einen auch mit Delphi die Möglichkeit die 8 SQL-Befehle and die DB zu schicken (TQuery). Dies ist unter Umständen aber nicht der Weisheit letzter Schluß. Vielleicht erläuterst Du mal etwas genauer, was der Rechnungslauf macht und welche Informationen Du in die rg.db abspeichern willst.

[Rote Zora]

Hoi Rainer

okay, ich gebe den Haaren noch 'ne Chance.

Also, nun ein bisschen mehr ins Detail:

Ich habe ein Zeit-Leistungserfassungs-Formular, indem ich MitarbeiterNr, KlientenNr, Leistungsnr und -menge erfasse. (Wobei ich auch schon über was gestolpert bin, weil ich in delphi das mit den Listenfeldern oä noch nicht gecheckt hab)
Diese Daten gehen dann in die Leistungsmeldung.db, die mir für sämtliche Auswertungen genügen soll.

Nun möchte ich daraus Rechnungen erstellen (nachher entsprechend auch Lohnabrechnungen).
Mastersource ist dabei im Moment

Select distinct KlientNr from Leistungsmeldung.db

Dann werden noch entsprechende Stammdaten aus der Klientenstamm.db eingefügt

RGNr (+1)

anschliessend möchte ich eine Gruppe für jede Leistungsart incl sum
aber natürlich nur die, die der jeweilige Klient auch tatsächlich erhalten hat.

Rechnungstotal

Fusszeile

ausserdem benötige ich zusätzlich eine Anlage zu jeder Rechnung, in der jede Leistung/Klient separat aufgeführt ist.

Wenn das fertig ist, möchte ich die Ergebnisse (9 verschiedene Summen, durch Nummerngruppen definiert?) unter der RgNr in die RG.db speichern Zusätzlich Zahlungsziel (+30) ZahlDatum, Betrag, GegKto, Rest oder wie auch immer

Ich hoffe, das bringt dich ein bisschen weiter.

Ciao

Barbara

[r_kerber]

Hallo Barbara,

zunächst freut es mich, dass ich zur Rettung Deiner Haare beitragen konnte.

Zum Thema:

Für den ersten Teil würde ich zunächst versuchen mit dem vorhandenen Report-Generator (QuickReport, ab D7 Rave) zu arbeiten. Da kann man gruppieren, summieren und auch Master-Detail-Reports zusammenbasteln. Hierfür einfach mal die mitgelieferten Beispiele anschauen. Mit Rave sollte es übrigens auch gehen, den gesamten (!) Report, sprich die Rechnung in einer Datenbank-Tabelle (Blob-Feld) abzuspeichern. Mit Rave kannst Du auch PDF'S erstellen, falls Dir der Sinn danach steht.

Für den letzten Teil (rg.db)Hast Du im Prinzip zwei Möglichkeiten. Entweder Du schickst mit TQuery oder mit TUpdateSQL einen entsprechenden SQL der gruppiert, summiert und anschließend einen neuen Datensatz in die Tabelle schreibt:

SQL-Code:

select sum(betrag) as betrag, sum(GegKto) as GegKto from Leistungsmeldung
where irgendetwas
group by KlientNr
into rg

Oder Du führst Die Berechnung in Delphi (TQuery-Select, Aufsummierung innerhalb einer Schleife) selbst durch und fügst die Ergebnnisse als neuen Datensatz in die Tabelle rg (TQuery oder TUpdateSQL).

Ich hoffe ich konnte etwas zum Erhalt der Haare beitragen

[Rote Zora]

Salü Rainer,

danke für die prompte Antwort! Ich werde mich heute abend mal dran setzen (wenn Zeit bleibt : )

Ich tu mich noch ein bisschen schwer mit der Terminologie, aber das wird schon!

(Bei den Haaren ist sowieso nicht mehr allzuviel zu retten, hab sie schon letzte Woche ratzeputz abgeschnitten.)

Also: Ich lass dann von mir hören!

[r_kerber]

Zitat von Rote Zora:

(Bei den Haaren ist sowieso nicht mehr allzuviel zu retten, hab sie schon letzte Woche ratzeputz abgeschnitten.)

Das kann nicht Dein Ernst sein!

[Rote Zora]

Na ja, 2 cm sind noch übrig geblieben...