Interbase - Dia del sistema

Q tal foro como puedo hacer para obtener el dia de la fecha del servidor en interbase. Se como obtener la fecha del servidor , pero ahora necesito obtener solo el dia de la fecha del servidor.
Por ejemplo en foxpro : Day(Date()) siendo date=17/11/2004 me dabe coo resultado 17.

Prueba creando una DLL para IB udf en Delphi o C++Builder para incorporarla como función dentro de tu database. udf es una posibilidad muy potente para crear funciones personalizadas en Interbase.

El código sería algo como esto:
library ej_edgar;

uses sysutils;

function getday(Fecha : TDateTime):Integer; cdecl; export;
var day, month, year : Word;
begin
DecodeDate(Fecha, day, month, year); //revisa decodedate
Result := day;
end;

exports
getday index 1 name 'getday';

begin
end.

luego en IB:

DECLARE EXTERNAL FUNCTION DIASEM
DATE
INTEGER BY VALUE
ENTRY_POINT 'getday' MODULE_NAME 'ej_edgar';
COMMIT;

luego para probarlo deberás ejecutar en un SQL;

select diasem(Fecha_a_dar) from rdb$database;

Esto es algo parecido, no lo he probado, pero escríbeme para ayudarte mejor...