Hallo.
Ich habe ein Problem mit einer UDF für Firebird 1.5.
Wenn ich mit Delphi die
DLL schreibe und dort eine Funktion habe, die Aufgrund von Parametern ein Datum ändern soll, bekomme ich das irgendwie nicht hin.
Die Funktionen (es ist ein ganzer Satz) sehen (Beispielhaft) so aus:
Delphi-Quellcode:
unit DatumFunktionen;
interface
function DatumPerOption_1(OriginalDatum:TDateTime;Option:integer):TDateTime;
cdecl;
implementation
uses SysUtils,
DateUtils,
.
.
.
function DatumPerOption_1(OriginalDatum:TDateTime;Option:integer):TDateTime;
VAR NeuDatum:TDateTime;
begin
// Änderungscode
...
Result:=NeuDatum;
end;
Das Ganze habe ich dann im Export Teil der
DLL per Name bekannt gemacht, für obiges Beispiel z.B.:
Delphi-Quellcode:
exports
DatumPerOption_1 name 'DatumPerOption_1',
Im Firebird habe ich das ganze als UDF deklariert. Weiter im Beispiel sieht das so aus:
SQL-Code:
DECLARE EXTERNAL FUNCTION "DatumPerOption_1"
TIMESTAMP,
INTEGER
RETURNS TIMESTAMP
ENTRY_POINT 'DatumPerOption_1' MODULE_NAME 'FbUdfShLib';
Soweit so gut. Mit anderen Funktionen (Strings, Real, Integer usw.) aus der selben Lib funktioniert das alles.
Verwende ich aber die mit Timestamp deklarierte Funktion, bekomme ich verschiedene Fehlermeldungen, wie z.B.:
Zitat:
Stack overflow. The resource requirements of the runtime stack have exceeded the memory available to it
Bei einer anderen Funktion dieser Art bekomme ich Meldungen, dass ein Match der Datentypen nicht möglich sei.
Was mache ich falsch, bzw. wie muss grundsätzlich mit dem Typ "TimeStamp" aus Firebird umgehen in Delphi- geschriebenen UDF?