SQL Abfrage mit Where Bedingung auf einen Zeitraum

[stonimahoni]

oder auch nicht
@mikhal :
parameter 'von' wurde nicht gefunden ?!


@ s14 :

undefinierter bezeichner: 'b'
array typ erforderlich

[mikhal]

Hast du im ObjectInspector die Parameter auch definiert? Sprich: Hast du festgelegt, welchen Typ die Daten haben (ftDateTime)?

Grüße
Mikhal

[stonimahoni]

@ mikhal :

du meinst bei den iegenschaften der edit felder ?
wo kann ich dort das (ftDateTime) einstellen ????

[s14]

Zitat:

undefinierter bezeichner: 'b'

Ich wollte eigentlich die letzten Zeichen im SQLStr fett markieren, habe den Tag aber wieder entfernt weil er nicht korrekt angezeigt wurde. Ich wollte nur vermitteln, daß vielleicht nur das abschließende Anführungszeichen im SQLStr fehlt.

[mikhal]

Nein, In deiner AdoQuery hast du doch Parameter festgelegt. Diesen Parametersn mußt du über die Eigenschaft Params den Datentyp mitgeben, sonst sind diese Parameter undefiniert.

Mir stellt sich jetzt die Frage, für welche Variante du dich entscheiden hast: Das Select-Statement mit Parametern (also WHERE Annahmedatum BETWEEN :Von AND :Bis...) oder die Variante, in der das Statement zusammengefrickelt wird. Beide haben Vor- und Nachteile, aber wie bereits festgestellt wurde, überwiegen bei Datumsfeldern die Vorteile eindeutig bei der Variante mit Parameterübergabe. Vielleicht solltest du nach der Parameterübergabe noch folgende Zeile in deinen Quelltext einfügen, bevor du die Query erneut öffnest:

Code:

AdoQuery1.Prepared := True;

Grüße
Mikhal

[stonimahoni]

@ s14 : ne wird ja alles einwandfrei compiliert, nur beim ausführen bekomme ich dann nen fehler wie schon oben beschrieben mit den "gänsefüsschen"

@ mikhal :
ich probiere all eure vorschläge aus
atm bin ich bei folgendem :

Delphi-Quellcode:

     + 'hersteller.Herstellernr, hersteller.Firma, auftrag.Abgeholt where Annahmedatum >= :Von AND Annahmedatum < :Bis';
     ADOQR_Statistik.Parameters.ParamByName('Von').Value := Datum1;
     ADOQR_Statistik.Parameters.ParamByName('Bis').Value := Datum2;

[s14]

@stonimahoni: Ich meinte ja auch nicht den Compiler, sondern tatsächlich das abschließende Anführungszeichen.
Nicht der Compiler braucht das, sehrwohl aber der DB-Server. 8)

[stonimahoni]

ok...hab das ganze teil gelöst *freu*

anbei der quellcode :

Delphi-Quellcode:

     with ADODataSetstatistik do begin
          Active:= False;
          sqlstr:= 'SELECT auftrag.Wgr, wgr.Wgr_Bezeichnung, auftrag.Kostentraeger, auftrag.TatGarantie,'
          + ' hersteller.Firma, Sum(auftrag.Gesamtkostrep) AS [Summe von Gesamtkostrep] '
          + 'FROM wgr INNER JOIN (hersteller INNER JOIN auftrag ON hersteller.Herstellernr = auftrag.Herstellernr) '
          + ' ON wgr.Wgr = auftrag.Wgr '
          + 'where Annahmedatum between DATEVALUE ("' + von.Text + '") and DATEVALUE ("' + bis.Text +'") '
          + 'GROUP BY auftrag.Wgr, wgr.Wgr_Bezeichnung, auftrag.Kostentraeger, auftrag.TatGarantie, hersteller.Firma '
          + 'HAVING (((Sum(auftrag.Gesamtkostrep))>0));';
          CommandText := sqlstr;
          Active:= True;

so long...

mfg

stoni