Año en firebird

[linuz]

Gracias Casimiro notevi,pero lo que estoy intentando hacer es esto:

Código SQL [-]
create trigger empresas_ai0 for EMPRESAS active after insert position 0
as
declare variable anyo integer;
begin
anyo = Extract (Year From 'TODAY');

insert into ejercicios
(ejercicio,empresa,codigo)
values
(:anyo,new.codigo,0);
end

Me da el siguiente error:

ERROR: ISC ERROR CODE:335544569

ISC ERROR MESSAGE:
Dynamic SQL Error
SQL error code = -105
Specified EXTRACT part does not exist in input datatype

gracias por la ayuda.