AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi SQL monatliche Summierung
Thema durchsuchen
Ansicht
Themen-Optionen

SQL monatliche Summierung

Ein Thema von haentschman · begonnen am 24. Jul 2011 · letzter Beitrag vom 24. Jul 2011
Antwort Antwort
alex517

Registriert seit: 23. Nov 2004
Ort: Bernau b. Berlin
273 Beiträge
 
Delphi XE5 Enterprise
 
#1

AW: SQL monatliche Summierung

  Alt 24. Jul 2011, 13:33
Hi,

ich verwende für solche Fälle eine Procedure die mir den Zeitstrahl
vorgibt. Damit ist keine extra Tabelle notwendig.
Damit würde deine Abfrage so aussehen

SQL-Code:
select
  JM.Jahr,
  JM.Monat,
  sum(PAYMENT) as SumPrice
from
  SP_JJMM(:VonDatum, :BisDatum) JM
  left join PAYMENTS P on (EXTRACT(YEAR from P.PAYMENT_DATE) = JM.JAHR AND EXTRACT(MONTH from P.PAYMENT_DATE) = JM.MONAT)
group BY
  JM.Jahr,
  JM.Monat
Edit: muss natürlich left join heißen..

oder so

SQL-Code:
select
  JM.Jahr,
  JM.Monat,
  sum(PAYMENT) as SumPrice
from
  SP_JJMM(:VonDatum, :BisDatum) JM
  left join PAYMENTS P on (EXTRACT(YEAR from P.PAYMENT_DATE) * 100 + EXTRACT(MONTH from P.PAYMENT_DATE) = JM.JJJMM)
group BY
  JM.Jahr,
  JM.Monat
und hier noch die SP dazu:

SQL-Code:
create or alter procedure SP_JJMM (
    ADATUM_VON date,
    ADATUM_BIS date)
returns (
    JAHR integer,
    MONAT integer,
    JJJJMM INTEGER)
as
declare variable VON integer;
declare variable BIS integer;
begin
  IF (ADATUM_VON is not NULL) THEN
    VON = EXTRACT(YEAR FROM ADATUM_VON) * 100 + EXTRACT(MONTH FROM ADATUM_VON);
  ELSE
    VON = EXTRACT(YEAR FROM CURRENT_DATE) * 100 + EXTRACT(MONTH FROM CURRENT_DATE);

  IF (ADATUM_BIS is not NULL) THEN
    BIS = EXTRACT(YEAR FROM ADATUM_BIS) * 100 + EXTRACT(MONTH FROM ADATUM_BIS);
  ELSE
    BIS = EXTRACT(YEAR FROM CURRENT_DATE) * 100 + EXTRACT(MONTH FROM CURRENT_DATE);

  JAHR = NULL;
  MONAT = NULL;

  WHILE (VON <= BIS) DO
  BEGIN
    JAHR = VON / 100;
    MONAT = MOD(VON, 12) +1;
    JJJJMM = JAHR * 100 + MONAT;
    suspend;
    VON = VON +1;
  END
end
Alexander

Geändert von alex517 (24. Jul 2011 um 13:54 Uhr)
  Mit Zitat antworten Zitat
FredlFesl

Registriert seit: 19. Apr 2011
293 Beiträge
 
Delphi 2009 Enterprise
 
#2

AW: SQL monatliche Summierung

  Alt 24. Jul 2011, 13:45
Wenn Du aus deiner SP eine Tabelle aller Tage seit Christi Geburt (oder weiß der Himmel seit wann) machst, kannst Du zudem noch weitere Informationen dort hinein packen. Als da wären:
Name des Wochentags, Feiertage, Arbeitstage, Ferien, Bürozeiten, Mittagspausen.

Alles kann man natürlich individuell ausrechnen, das dauert aber auch...

Die Tabelle wird zwar nicht sonderlich klein sein (sagen wir: 2000x365x24 Zeilem, 20 oder so Spalten), aber WTF. Wir haben es schließlich mit einer DB zu tun, da sind die paar Zeilen ein Klacks.

Vorteil: Du kannst für jedes Projekt diese Tabelle übernehmen und musst nur geschäftslogik-spezifische Werte (Arbeitszeiten, Ferien etc.) anpassen.
Das Bild hängt schief.
  Mit Zitat antworten Zitat
omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#3

AW: SQL monatliche Summierung

  Alt 24. Jul 2011, 13:49
Da finde ich jobo's Ansatz ja noch besser. Naja, holt die Kanonen raus, die Spatzen sind im Anflug. (Ich bleibe lieber bei Datenmanipulation auf reinster SQL-Ebene -> kurz, einfach, einfach schön <- Geschmacksache)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:10 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-2025 by Thomas Breitkreuz