Como determinar si X Fecha esta en Hor. Verano pero en firebird????

[AGAG4]

Alguien tiene alguna udf de firebird para detectar si X fecha estra dentro del rango del horario de verano ????

Algo asi como en delphi:

Código Delphi [-]
function EsHorarioVerano(Date: TDate): Boolean;
var
  tzInfo  : TTimeZoneInformation;
  Horario : DWORD;
begin
  Horario := GetTimeZoneInformation(tzInfo);
  if Horario = TIME_ZONE_ID_DAYLIGHT then
   Result := True
  else
   Result := False;
end;

Agradezco cualquier información al respecto.

[AGAG4]

Bueno, yo mismo me voy a responder , gracias a un amigo Daniel Arturo Salinas, mejor me voy a ir por el camino de crear una udf con delphi

http://www.ibphoenix.com/main.nfs?a=...age=ibp_howto7
http://delphi.about.com/od/windowssh...dll_basics.htm

Por si a alguien le sirve