iBase.ru Forum

Здравствуйте, давненько Вас не тревожил. Вопрос следующий: хочу, что бы пользователи немедленно видели изменения в БД, сделанные другими пользователями. Для этого открываю книгу Хелен Борри (рекомендую всем) и нахожу прекрасное решение через использование Post_Event. Только одно неудобство - для это...

Мдя-а-а, не густо... Вобщем пока вышел из ситуации путём установки AutoCommit=False. Не совсем то, что хотелось бы, но в моей ситуации вполне приемлемое решение.

Вопрос мож и детский, но FIB купил только вот-вот, ещё не со всем разобрался.. а сроки жмут.. вобщем все как у всех.. :lol: Вопрос такой: если установлено свойство CachedUpdates в True (это необходимо для обработки события LostConnect) и использованы две транзакции одна длинная для чтения и другая к...

Вы будете смеяться господа (возможно), но вот такая реализация вышеуказанной функции работает: function UST(S:PChar): PChar; cdecl; export; var s_res,s_tmp:string; i:byte; begin // s_tmp:=string(S); s_tmp:=AnsiUpperCase(string(S)); for i:=1 to Length(s_tmp) do if s_tmp <>#32 then s_res:=s_res+s_tmp ...

муть ведь написана. так сложно faq и статью по написанию udf посмотреть, или взять примеры (safeudf)? Если free_it, то где в функции вызов ib_util_malloc??? Позвольте на этот раз не совсем согласиться в том плане, что "...неужели сложно почитать..." Перед тем как отважиться задать вопрос на столь с...

Имеется следующая UDF { /* Upper Space Trim*/ /* возвращает входной параметр в верхнем регистре без пробелов */ DECLARE EXTERNAL FUNCTION UST CSTRING(255) RETURNS CSTRING(255) FREE_IT ENTRY_POINT 'UST' MODULE_NAME 'udf_ib' ; } function UST(S:PChar): PChar; cdecl; export; var s_res,s_tmp:string; i:by...

kdv писал(а):...специально для спецов рекомендую смотреть примеры на сайте и статью Кукарцева по написанию UDF.

Буду очень признателен за ссылочку и на статью и на примеры

Ну а посмотреть как это сделано в той же rfunc не судьба? Дык там на С++, а я и с Delphi-то не разобрался ещё как следует :oops: За совет спасибо, коротко и внятно и все заработало. Для таких же спецов как я добавлю - при использовании X:PDouble , вместо строки Result:=X, нужно писать Result:=X^; :D

Ситуация следующая: есть ХП CREATE PROCEDURE CALCS1 RETURNS ( RES NUMERIC(15,2)) AS DECLARE VARIABLE TMP_REAL DOUBLE PRECISION; begin tmp_real=1.256; /*тут будет результат вычисленя*/ res=R2(tmp_real); /*R2-округляет до двух знаков после запятой*/ suspend; END и есть UDF function R2(X:Double):Double...

Спасибо за внятный ответ. Но поскольку авторы рекомендуют пользоваться execute statement только когда по другому ну никак - рискну огласить саму задачку, мож кто уже её делал и подскажет чё-нить более дельное. Мне нужно написать процедуру для расчета алгоритма. В теле алгоритма использованы поля таб...

Уважаемые знатоки! Как можно реализовать хранимую процедуру под Firebird 1.5.2 такаким образом, что бы она получив в качестве входных параметров Param_1 ='Limit*0.1' и Param_2='Table' смогла реализовать запрос: select Limit*0.1 from Table into :Result Конструкция select :Param_1 from :Param_2 into :...