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
 
alex517

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

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
 


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 23:42 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