Submitted by: carolina alzate (pfalzate)

I need to find the number of months between 2 dates, using firebird-2.x, a UDF to do this, but always returns to annex as a result 0

dll code in delphi

library CAO_UDFS;
uses
SysUtils,
Classes,
Controls,
DateUtils;
{$R *.res}

function MesesEntreFechas(Fecha1,Fecha2: TDate): Integer; cdecl;
begin
Result := MonthsBetween(Fecha1,Fecha2);
end;

exports
MesesEntreFechas;
begin
end.

register udf en firebird

DECLARE EXTERNAL FUNCTION MESESENTREFECHAS
DATE,
DATE
RETURNS INTEGER BY VALUE
ENTRY_POINT 'MesesEntreFechas' MODULE_NAME 'CAO_UDFs.dll';

Always always returns zero when using MesesEntreFechas

I can help someone who is ill.