Вниз
Скачать: CL | DM;

Логическая ошибка в триггере   Найти похожие ветки 

← →
}|{yk ©   (2004-05-07 11:12) [0]

На insert и update срабатывает нормально, а на delete - устанавливает значение в null

AS
declare variable out_free_cash double precision;
begin
if (inserting or updating) then
 begin
select a.left_to_raspr from get_free_cash(new.plat_id) a into :out_free_cash;
update app_plateg a set a.free_cash=:out_free_cash where a.plat_id=new.plat_id;
 end
if (deleting) then
  begin
select a.left_to_raspr from get_free_cash(old.plat_id) a into :out_free_cash;
update app_plateg a set a.free_cash=:out_free_cash where a.plat_id=old.plat_id;
 end


← →
Reindeer Moss Eater ©   (2004-05-07 11:15) [1]

После селекта в ветке удаления параметр принимает значение null


← →
Курдль ©   (2004-05-07 11:17) [2]

А он after или before?


← →
}|{yk ©   (2004-05-07 11:19) [3]

Триггер after insert, update, delete

Функция get_free_cash(new.plat_id)
begin
 select a.plat_sum from app_plateg a where a.plat_id=:inplat_id into :fullsumm;
 select sum(a.summa) from app_bank a where a.plat_id=:inplat_id into :already_raspr;
 left_to_raspr=:fullsumm-:already_raspr;
 suspend;
end


← →
Курдль ©   (2004-05-07 11:28) [4]

А что показывает трассировка триггера?


← →
}|{yk ©   (2004-05-07 11:38) [5]

Все, решил
Нужно было
 select coalesce(sum(a.summa),0) from app_bank a where a.plat_id=:inplat_id into :already_raspr;
иначе мог возвращаться null



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c
14-1083935165
Mim1
2004-05-07 17:06
2004.05.30
Где взять клиент для этого форума


4-1081746607
Delphi5.01
2004-04-12 09:10
2004.05.30
Как используя только API функции можно включить WordWrap


3-1084334558
BanderLog_t
2004-05-12 08:02
2004.05.30
Вопрос по UDF в FB 1.5


3-1083450579
Goida
2004-05-02 02:29
2004.05.30
Как убрать пробелы в полях БД?


7-1083306934
studentt
2004-04-30 10:35
2004.05.30
COM10 и функция CreateFile()




   Наверх