Trigger

[Neumann]

Ist das wirklich Firebird 2? Aktuell ist Firebird 5, wobei der Umstieg nicht besonders schwierig ist.

Wenn da ein eigenes Programm mit der Datenbank arbeitet, ist es wesentlich einfacher die Delphi Datumsroutinen zu verwenden als so einen relativ komplizierten Trigger zu bauen. Auch braucht man 4 Felder in der Datenbank, wo eigentlich eines reicht, wovon 3 berechnete Werte speichern. Das hat wahrscheinlich geringen Einfluss auf Größe und Performance der Datenbank, ist aber unschön.

Braucht man die Werte z.B. für Export von Daten, könnte man sie auch über eine Stored Procedure abfragen.

[Jasocul]

Ich weiß nicht, ob man FB debuggen kann, aber falls nicht, würde ich aus dem Trigger erstmal eine User Defined Function oder Stored Procedure machen.
Mit entsprechenden Parametern und Rückgabewerten kann man dann prüfen, an welcher Stelle es hakt.
Damit hättest du auch die Möglichkeit, dir einen Soll-Ist-Vergleich zu erstellen.

[IBExpert]

debuggen kann man so was in ibexpert, aber das bringt nur wenig erkenntnisse wenn man grundlegende
vergleiche sinnlos codiert.

Code:

    if (new.geburtsdatum > '') then

warum soll ein datum >'' sein?

entweder kommt da rechts auch ein datum rein oder du prüfst auf not null

firebird liefert auch brauchbare fehler, in einigermaßen aktuellen firbeird versionen
auch gleich mit zeilennummer (die o.a. zeile ist in meinem test genau zeile 12)

Code:

Overflow occurred during data type conversion.
conversion error from string "".
At trigger 'TESTX_BU0' line: 12, col: 5.
----------------------------------------------
SQLCODE: -413
SQLSTATE: 22018
GDSCODE: 335544334

so funktioniert das

Code:

    if (new.geburtsdatum > '1.1.1900') then

[Walter Landwehr]

Danke an Holger Klemt, das war der entscheidende Tipp.

[Benmik]

Zitat von IBExpert:

Code:

    if (new.geburtsdatum > '1.1.1900') then

Der älteste lebende Mensch wurde 1908 geboren, also passt das tatsächlich.

[joachimd]

Zitat von Benmik:

Zitat von IBExpert:

Code:

    if (new.geburtsdatum > '1.1.1900') then

Der älteste lebende Mensch wurde 1908 geboren, also passt das tatsächlich.

Datenbank NULL entspricht diesem Datum

[mkinzler]

Zitat von joachimd:

Zitat von Benmik:

Zitat von IBExpert:

Code:

    if (new.geburtsdatum > '1.1.1900') then

Der älteste lebende Mensch wurde 1908 geboren, also passt das tatsächlich.

Datenbank NULL entspricht diesem Datum

Ein Windowsdatum von 0 (nicht NULL) entspricht 31.12.1899. Der 01.01.1900 wäre dann 1.

[Uwe Raabe]

Zitat von mkinzler:

Ein Windowsdatum von 0 (nicht NULL) entspricht 31.12.1899. Der 01.01.1900 wäre dann 1.

Bei Firebird steht aber:

Zitat:

The DATE data type in Dialect 3 stores only date without time. The available range for storing data is from January 01, 1 to December 31, 9999.

Intern sieht das noch etwas anders aus:

Zitat:

In storage, a date value or date-part of a timestamp is represented as the number of days elapsed since date zero — November 17, 1898