Extraer Hora de Campo Date en firebird

[ecfisa]

Hola rrufino.

Te pongo un ejemplo más concreto en que se compara un valor tipo TIMESTAMP y un tipo TIME:

Código SQL [-]
CREATE PROCEDURE ES_IGUAL(HORA1 TIMESTAMP, HORA2 TIME)
RETURNS(RESULT SMALLINT)
AS
DECLARE VARIABLE AUX TIME;
BEGIN
  AUX = CAST(HORA1 AS TIME);
  IF (AUX = HORA2) THEN  /* directamente: IF (CAST(HORA1 AS TIME) = HORA2) THEN */
    RESULT = 1;
  ELSE
    RESULT = 0;
END;

La variable AUX es innecesaria en este caso, pero está como para ejemplificar el uso con una variable interna.

Saludos.