Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / Избавиться от UDF / 10 сообщений из 10, страница 1 из 1
22.07.2015, 16:51
    #39013650
Ruslang
Ruslang
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
Есть udf dll-ка с одной единственной функцией:

Код: pascal
1.
2.
3.
4.
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
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2015, 16:56
    #39013656
Мимопроходящий
Мимопроходящий
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
используй встроенную (SDF) функцию BIN_AND
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2015, 17:08
    #39013680
Ruslang
Ruslang
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
Мимопроходящий , так?
Код: plsql
1.
select naim, count(*) from evl e, spr s where (BIN_AND(e.flags,1024)=1024) and e.id=s.id group by naim
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2015, 17:16
    #39013701
Мимопроходящий
Мимопроходящий
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
Hello, Ruslang!
You wrote on 22 июля 2015 г. 17:15:53:

Ruslangтак?типа того.
шестнадцатеричные литералы тоже можешь использовать, если тебе так удобнее.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2015, 17:17
    #39013705
Ivan_Pisarevsky
Ivan_Pisarevsky
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
Ruslangтак?
[SRC plsql][/SRC]данные же у тебя выполни 2 запроса и проверь идентичность наборов. Например можно исполнить их как вложенные и потом сджойнить.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2015, 17:18
    #39013709
Ruslang
Ruslang
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
Мимопроходящий , а как их использовать? IBExpert ругается на знак доллара $0400.
И еще вопрос bin_and в Firebird версии 2.1 есть?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2015, 17:21
    #39013719
Ivan_Pisarevsky
Ivan_Pisarevsky
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
Ruslangbin_and в Firebird версии 2.1 есть?да.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2015, 17:24
    #39013730
Мимопроходящий
Мимопроходящий
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
Hello, Ruslang!
You wrote on 22 июля 2015 г. 17:24:09:

Ruslang> IBExpert ругается на знак доллара $0400.0x0400
Ruslang> И еще вопрос bin_and в Firebird версии 2.1 есть?да
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2015, 17:30
    #39013742
Ivan_Pisarevsky
Ivan_Pisarevsky
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
запусти для проверки нечто подобное и погляди насколько оно одинаково
Код: sql
1.
2.
3.
4.
5.
select * from 
(select naim m1 , count(*) c1 from evl e, spr s where NOOT(e.flags)=1 and e.id=s.id group by naim) a1
join
(select naim m2, count(*) c2 from evl e, spr s where (BIN_AND(e.flags,1024)=1024) and e.id=s.id group by naim) a2
on a1.m1 = a2.m2 and a1.c1 = a2.c2

код я не проверял.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.07.2015, 08:52
    #39014149
Ruslang
Ruslang
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Избавиться от UDF
Ivan_Pisarevskyзапусти для проверки нечто подобное и погляди насколько оно одинаково

О, отлично, не догадался бы так проверить. Сравнил, данные идентичны.

Ivan_Pisarevsky , Мимопроходящий спасибо, вы мне очень помогли.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / Избавиться от UDF / 10 сообщений из 10, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 435ms
Закрыть
start [/forum/topic.php?fid=40&tablet=1&tid=1562706]:
 0ms
get settings:
 10ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 43ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 2ms
others: 296ms
total:  435ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]