Problemas al guardar HORA

[Sara Paz]

Solucionado el problema. Comunico la solución enviada por el Equipo de Desarrollo de FIBPlus para conocimiento general de aquellos que usen estos componentes.

Hay que hacer lo siguiente:

• Modificar el codigo de:

unit FIBQuery;
method
function TFIBXSQLVAR.GetAsDateTime: TDateTime;

• Reemplazar las siguientes líneas:

SQL_TIMESTAMP:
begin
Result:=
PISC_QUAD(FXSQLVAR^.sqldata)^.gds_quad_high-IBDateDelta+
PISC_QUAD(FXSQLVAR^.sqldata)^.gds_quad_low/MSecsPerDay10;
end;

• Por estas otras:

SQL_TIMESTAMP:
begin
Result:=
HookTimeStampToDateTime(AsTimeStamp);
end;

• Abrir desde Delphi FIBPlus6.dpk y compilar.

Saludos.
Sara Paz.