[firebase-br] Parameter name expected

[Hélio Oliveira]

Boa tarde Colegas!

EXECUTE BLOCK (W_ANO INTEGER = ?)
RETURNS (W_RESULTADO INTEGER)
AS
BEGIN
    IF (MOD(:W_ANO, 4) = 0) AND ((MOD(:W_ANO, 100) <> 0) OR (MOD(:W_ANO, 
4) = 0)) THEN BEGIN
       W_RESULTADO = 1;
    END ELSE BEGIN
       W_RESULTADO = 0;
    END
END

Firebird 2.5 - quando faço este execute block, recebo a seguinte 
mensagem de erro "Parameter name expected"

[ ]'s,
Hélio Oliveira