In SQL Zeitraum abfragen

[DeddyH]

Zitat:

dazu gehören auch die Teilnehmer, die in 2023 gestartet sind und deren Veranstaltung bis irgendwann in 2024 (oder sogar bis 2025) läuft.

Daraus habe ich geschlossen, dass so eine Veranstaltung auch über mehr als ein Jahr gehen kann, daher die relativ einfache Abfrage.

[harfes]

Danke für eure zahlreichen Tips! Ich werde jetzt mal testen... Und um es noch zu präzisieren: es kann sein das eine Veranstaltung in 2023 beginnt und erst in 2025 endet. Ich muss also abfragen, wieviel Teilnehmer in 2024 betreut werden müssen - das trifft dan ja auf alle zu, die in 2023 begonnen haben und im ganzen Jahr 2024 dabei sind. Zur Info: die Felder Datumstart und Datumende sind in der Tabelle der DB als DATE deklariert (also kein String).

Hartmut

[harfes]

So, jetzt habe ich mal die Variante von DeddyH getestet (J=2024):

DM1.DataModule1.IBCQuery1.SQL.Add('select VERANSTALTUNGSID from VERANSTALTUNGEN ');
DM1.DataModule1.IBCQuery1.SQL.Add('where ((EXTRACT(YEAR from DatumStart) <= '+QuotedStr(IntToStr(J))+') and (EXTRACT(YEAR from DatumEnde) >= '+QuotedStr(IntToStr(J))+')) ');

Der code funktioniert zwar - ABER: es ist egal, ob ich für J 2024 oder 2023 oder 2022 eingebe, es kommt immer das gleiche Ergebnis dabei heraus. Da alle Veranstaltungen irgendwie vor/in oder in/nach 2024 starten/enden, kann das so nicht funktionieren...

Dann habe ich die Variante von Uwe Raabe getestet:

DM1.DataModule1.IBCQuery1.SQL.Add('where ( (EXTRACT(YEAR from DatumStart) = '+QuotedStr(IntToStr(J))+') or (EXTRACT(YEAR from DatumEnde) = '+QuotedStr(IntToStr(J))+') ');
DM1.DataModule1.IBCQuery1.SQL.Add('or ((EXTRACT(YEAR from DatumStart) < '+QuotedStr(IntToStr(J))+' and (EXTRACT(YEAR from DatumEnde) > '+QuotedStr(IntToStr(J))+'))) ');

Leider auch nicht besser...nur anderes Ergebnis. Mache ich einen Denkfehler oder muss die Abfrage anders verschachtelt werden?

Hartmut

[Jumpy]

SQL-Code:

Where Datumstart <= make_date(2024, 12, 31) and DatumEnde >= make_date(2024, 1, 1)
//

Wobei make_date postgreSQL ist. Mit der entsprechenden Firebird Funktion ersetzen (im MSSQL wäre das DateFromParts oder so). Es geht darum, dass man die 2024 dabei ersetzen kann.

[mkinzler]

where Datumstart <= last_day(of year from 2024) and DatumEnde >= first_day( of year from 2024);

[harfes]

mkinzler: ich glaube das war's! Danke.

Allerdings musste ich das anders umsetzen, da die Funktion Last_day wohl erst ab Firebird 4 vorhanden ist...also so habe ich das jetzt gemacht (wobei ComboBox1 eine Auswahliste der Jahre enthält - ComboBox1.Text wäre dann z.B. 2024):

where Datumstart <= '+QuotedStr('31.12.'+ComboBox1.Text)+' and DatumEnde >= '+QuotedStr('01.01.'+ComboBox1.Text)+'

Hartmut

[Medium]

Zumindest MySQL/MariaDB kennen auch den Operator "between..and". Zusammen mit Parametern ergibt das dann ein gut lesbares Stück Code:

Delphi-Quellcode:

DM1.DataModule1.IBCQuery1.SQL.Text := 'SELECT * FROM `Tabelle` WHERE `Datumsfeld` BETWEEN :dt1 AND :dt2';

DM1.DataModule1.IBCQuery1.ParamByName('dt1').AsDateTime := EncodeDateTime(StrToInt(ComboBox1.Text), 12, 31, 23, 59, 59, 999);
DM1.DataModule1.IBCQuery1.ParamByName('dt2').AsDateTime := EncodeDateTime(StrToInt(ComboBox2.Text),  1,  1,  0,  0,  0,   0);

Damit wäre es dann sogar auf die Millisekunde genau. Falls nicht nötig, gäbe es auch noch EncodeDate(), womit man sich die Uhrzeit-Parameter spart. (Es ist (natürlich...) nicht dokumentiert, aber ich gehe davon aus, dass hier immer die Uhrzeit 00:00:00:0000 implizit zurückgegeben wird.)


Edit: Schon spät. Geht natürlich nur, wenn das Datumsfeld für beide Grenzbedingungen dasselbe ist. Sorry!
Aber Parameter finde ich dennoch deutlich hübscher (und sicherer!)

[Uwe Raabe]

Zitat von harfes:

Da alle Veranstaltungen irgendwie vor/in oder in/nach 2024 starten/enden, kann das so nicht funktionieren...

Die Abfrage verknüpft das StartDatum und das EndDatum aber mit AND und nicht mit OR. Insofern sollte eine Veranstaltung im Ergebnis schonmal nicht nach 2024 beginnen und nicht vor 2024 enden. (Das wäre übrigens eventuell auch ein valides Kriterium.)

Könntest du mal konkret die Start- und Ende-Daten der Records auflisten, die deiner Meinung nach nicht im Ergebnis sein sollten?

Übrigens: Deine Abfrage macht meiner Meinung nach auch eine falsche Konvertierung beim übergebenen Jahr (J):
DM1.DataModule1.IBCQuery1.SQL.Add('where ((EXTRACT(YEAR from DatumStart) <= '+QuotedStr(IntToStr(J))+') and (EXTRACT(YEAR from DatumEnde) >= '+QuotedStr(IntToStr(J))+')) ');

Da EXTRACT(YEAR FROM einen SmallInt zurückgibt, solltest du den nicht mit einem String vergleichen. Versuch es mal ohne die Quotes:
DM1.DataModule1.IBCQuery1.SQL.Add('where ((EXTRACT(YEAR FROM DatumStart) <= '+IntToStr(J)+') and (EXTRACT(YEAR FROM DatumEnde) >= '+IntToStr(J)+')) ');