In SQL Zeitraum abfragen

[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!)

[DeddyH]

Kann mir mal irgendjemand erklären, wieso eine zu vergleichende Zahl vor dem Vergleich in einen String gewandelt wird? Nochmal: verwende SQL-Parameter, mit diesem ganzen Gequote bekommst Du nicht nur falsche Ergebnisse, sondern bist auch anfällig für SQL-Injection.

Delphi-Quellcode:

DM1.DataModule1.IBCQuery1.SQL.Text := 'select VERANSTALTUNGSID from VERANSTALTUNGEN where EXTRACT(YEAR from DatumStart) <= :Anfang and EXTRACT(YEAR from DatumEnde) >= :Ende';
DM1.DataModule1.IBCQuery1.ParamByName('Anfang').AsInteger := J;
DM1.DataModule1.IBCQuery1.ParamByName('Ende').AsInteger := J;

Das sollte alle Veranstaltungen liefern, die im betreffenden Jahr begonnen haben oder enden bzw. die das komplette Jahr überlappen.

[TigerLilly]

Zitat:

die in 2023 gestartet sind und deren Veranstaltung bis irgendwann in 2024 (oder sogar bis 2025)

Ich würde das in vier Teile aufteilen:
- vor JAHR begonnen und nach JAHR beendet
- vor JAHR begonnen und im JAHR beendet
- im JAHR begonnen und nach JAHR beendet
- im JAHR begonnen und im JAHR beendet

Da du alle willst: mit OR verknüpfen. SQL Umsetzung ist dann trivial.

[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)+')) ');