Forum: Datenbanken
Delphi
by Hansa,
21. Aug 2009
function LeseArtPg (ID_ART : integer;pg : integer;Datum : TDate): real;
begin
LeseArtPg := 0;
SpMod.LeseArtPgSP.ParamByName ('ID_ART').AsInteger := ID_ART;
SpMod.LeseArtPgSP.ParamByName ('PGNR').AsInteger := PG;
SpMod.LeseArtPgSP.ParamByName ('ABDATUM').AsDate := Datum;
Was soll das helfen ? Zuerst vermute ich immer einen Fehler im eigenen Programm. Aber da IBExpert denselben...
Forum: Datenbanken
Delphi
by Hansa,
21. Aug 2009
Nix AsDateTime. AsDate.
Nachtrag : in IBExpert ist folgendes festzustellen. Ich setze den Befehl ab. Für den Parameter wird das heutige Datum vorgegeben. Ergebnis : keine Daten. Neu gemacht, allerdings Parameter-Datum von Hand auf 28.08.2009 gesetzt => geht. Wieder neu gemacht und das Datum von Hand auf 21.08.2009, also den Vorgabewert gesetzt => geht.
Forum: Datenbanken
Delphi
by Hansa,
21. Aug 2009
Typ : date. Klammer : egal. :mrgreen:
Forum: Datenbanken
Delphi
by Hansa,
21. Aug 2009
Moin,
/*SELECT * FROM ARTPG8 WHERE ID_ART = 39 AND ABDATUM < ('20.08.2009');*/
/*SELECT * FROM ARTPG8 WHERE ID_ART = 39 AND ABDATUM < current_timestamp;*/
SELECT * FROM ARTPG8 WHERE ID_ART = 39 AND ABDATUM < (:ABDATUMEIN);
Das auskommentierte geht. Wird ein Parameter eingesetzt, dann wird nichts zurückgeliefert. Weiß einer, was da schief läuft ?