Как убрать UDF-функцию?

[Rusland]

Есть udf dll-ка с одной единственной функцией:

function NOOT(var Flag: Integer): smallint; cdecl; export;
begin
  Result :=smallint((Flag and $0400)=$0400);
end;

А вот запрос где эта функция используется:

select naim, count(*) from evl e, spr s where NOOT(e.flags)=1 and e.id=s.id group by naim

Чтобы программа заработала на новом компьютере, приходится таскать с собой эту dll-ку и закидывать ее в папку Firebird_2_5/UDF, что совсем неудобно.
Как можно избавиться от этой функции и перенести ее в SQL-запрос?

PS. Firebird 2.5

[Stilet]

select naim, count(*) from evl e, spr s 
where BIT_AND(e.flags,1024)<>1 and e.id=s.id 
group by naim

Годится?

[Rusland]

Сообщение от Stilet

select naim, count(*) from evl e, spr s 
where BIT_AND(e.flags,1024)<>1 and e.id=s.id 
group by naim

Годится?

Благодарствую, уже люди подсказали про функцию bin_and

[Stilet]

Опечатался )
Ну ладно. Главное разобрался.