Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   DateTime über ParamByName auf NULL setzen? (https://www.delphipraxis.net/190723-datetime-ueber-parambyname-auf-null-setzen.html)

Byteteufel 31. Okt 2016 20:03

Datenbank: MSSQL • Version: 2014 • Zugriff über: FireDac

DateTime über ParamByName auf NULL setzen?
 
Hallo zusammen,

ich habe ein Datumsfeld oin einer Datenbank, welches ich auf NULL setzen möchte.


Delphi-Quellcode:

  DBQuery:TFDQuery; // FireDac
...

  if getBeginDatum > '' then // Datum ist String
     DBQuery.ParamByName('P_BeginDatum').AsString := getBeginDatum
     else
     DBQuery.ParamByName('P_BeginDatum').AsDateTime := NULL; // Klappt so nicht, NULL ist nicht bekannt.....
Wen der String leer ist, erfolgt sonst ein "Defaultdatum". Das verwirrt aber.

Viele Grüße

Axel

Uwe Raabe 31. Okt 2016 20:36

AW: DateTime über ParamByName auf NULL setzen?
 
Versuch's mal mit
Delphi-Quellcode:
DBQuery.ParamByName('P_BeginDatum').Clear;

bnreimer42 31. Okt 2016 20:49

AW: DateTime über ParamByName auf NULL setzen?
 
Hallo,

zum leeren der gesetzten Parameter-Werte einfach die Methode
Code:
Clear
des jeweiligen Parameters aufrufen.

Prüfen, ob der Wert NULL ist geht mit
Code:
IsNull
.

himitsu 1. Nov 2016 00:00

AW: DateTime über ParamByName auf NULL setzen?
 
Delphi-Quellcode:
DBQuery.ParamByName('P_BeginDatum').Value := NULL;
:stupid:


Aber Achtung: Borland war auf die echt saublöde Idee gekommmen und hat in "einigen" Ableitungen das Value "verdeckt",
so ist z.B. bei TIntegerField das kein Variant mehr, so wie bei TField, sondern ein Integer. :wall:

jaenicke 1. Nov 2016 04:17

AW: DateTime über ParamByName auf NULL setzen?
 
Zitat:

Zitat von himitsu (Beitrag 1352328)
Aber Achtung: Borland war auf die echt saublöde Idee gekommmen und hat in "einigen" Ableitungen das Value "verdeckt",
so ist z.B. bei TIntegerField das kein Variant mehr, so wie bei TField, sondern ein Integer. :wall:

Was ist denn daran blöd? Wenn du das Feld nicht explizit auf einen bestimmten Typ castest, kannst du Value doch als Variant genauso benutzen wie vorher.

Wenn du aber auf einen konkreten Typ gecastet hast, wie zum Beispiel TIntegerField, macht es ja keinen Sinn, wenn dies etwas anderes als diesen Typ widerspiegelt. Denn dann ist es ja der konkrete Typ, der in diesem Feld enthalten ist, bekannt. Da wären die zusätzlichen Konvertierungen ja unnötig.

Ghostwalker 1. Nov 2016 14:40

AW: DateTime über ParamByName auf NULL setzen?
 
Eventuell auch mal in die Tabellendefinition der DB guggen. Kann sein, das da ein Default-Wert angegeben wurde. Wenn ja musst du die Tabellendefinition anpassen, sonst kannst du da löschen
wie du willst :)

Byteteufel 1. Nov 2016 19:29

AW: DateTime über ParamByName auf NULL setzen?
 
Hallo zusammen,

danke für die Antworten. Nun brat mir einer einen Storch. Wenn ich NULL definieren will. NULL ist ein Undeklarierter Bezeichner???
Muss ich da eine spezielle Unit einbinden? Ich nutze Delphi Seattle.

Danke!

Viele Grüße

Axel

mkinzler 1. Nov 2016 19:33

AW: DateTime über ParamByName auf NULL setzen?
 
Ist in der Unit Variants deklariert. Aber wie schon beschrieben besser mit .Clear setzen und mit .isNull abfragen.

Byteteufel 1. Nov 2016 19:38

AW: DateTime über ParamByName auf NULL setzen?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Halo zusammen,

Ok, die Unit "Variants" musste ich noch einbinden, dann war NULL möglich.

Delphi-Quellcode:
 if getBeginDatum > '' then
     DBQuery.ParamByName('P_BeginDatum').AsString := getBeginDatum
     else
     DBQuery.ParamByName('P_BeginDatum').Value := NULL;
bringt den Fehler:

mkinzler 1. Nov 2016 19:44

AW: DateTime über ParamByName auf NULL setzen?
 
In der fehlermeldung steht eigentlich genau der Grund. Aber wenn dir hier öfters gesagt wird, die Methode Clear zu verwenden, dann hben wir uns schon etwas dabei gedacht!


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:51 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz