In SQL Zeitraum abfragen

[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.

[harfes]

DeddyH: ja, natürlich sieht das besser und eleganter aus mit Parametern...und kommt bei mir auch beim "Finetuning" - ich wollte nur erstmal testen, ob die Ergebnisse passen, daher die "String-Orgie".

TigerLilly: das werde ich dann als nächstes testen, damit ich auch wirklich alle Varianten ermitteln kann - danke.

Hartmut

[Blup]

Im Prinzip werden Veranstaltungen gesucht, deren Zeitraum sich mit einem angegebenen Zeitraum überschneiden.
Das es sich dabei um Jahresanfang und Ende eines bestimmten Jahres handelt, ist nur ein Spezialfall, den man im SQL nicht gesondert behandeln muss.
Sind 'datumstart' und 'datumende' reine Datumsfelder, benötigt man den Zeitanteil bei den Parametern nicht.

Delphi-Quellcode:

var Jahr := StrToInt(ComboBoxJahr.Text);
Query.SQL.Text := 'select * from verabstaltungen  where (datumstart <= :bis) and ((datumende is null) or (datumende >= :von))';
Query.ParamByName('von').AsDateTime := EncodeDateTime(Jahr, 1, 1, 0, 0, 0, 0); 
Query.ParamByName('bis').AsDateTime := EncodeDateTime(Jahr, 12, 31, 23, 59, 59, 999);