триггер

[veter_s_morya]

Забодал меня тут один триггер. Никак не могу его написать. Базу задал мне препод написать на чистом sql. И дал программу IBExpert c Сервером Firebird 1.0.
Создать 3 таблицы: sdelka, strokasdelki, tovar.

Вот мой код

CREATE TABLE SDELKA (
NSDELKI VARCHAR(4) NOT NULL,
SUMMA VARCHAR(20) NOT NULL,
TIPDOKUMENTA VARCHAR(20) NOT NULL
);
ALTER TABLE SDELKA ADD CONSTRAINT PK1 PRIMARY KEY (NSDELKI);

CREATE TABLE STROKASDELKI (
NSTROKI VARCHAR(4) NOT NULL,
NSDELKI VARCHAR(20) NOT NULL,
NTOVARA VARCHAR(20) NOT NULL,
KOLICHESTVO VARCHAR(20) NOT NULL
);
ALTER TABLE STROKASDELKI ADD CONSTRAINT PK2 PRIMARY KEY (NSTROKI);
ALTER TABLE STROKASDELKI ADD CONSTRAINT FK1 FOREIGN KEY (NSDELKI) REFERENCES SDELKA (NSDELKI);
ALTER TABLE STROKASDELKI ADD CONSTRAINT FK2 FOREIGN KEY (NTOVARA) REFERENCES TOVAR (NTOVARA);

CREATE TABLE TOVAR (
NTOVARA VARCHAR(4) NOT NULL,
NAZVANIE VARCHAR(20) NOT NULL,
CHENA VARCHAR(20) NOT NULL,
OSTATOK VARCHAR(20) NOT NULL
);
ALTER TABLE TOVAR ADD CONSTRAINT PK3 PRIMARY KEY (NTOVARA);

А само задание, создать триггер, который увеличивает или уменьшает остаток в таблице TOVAR, в зависимости от типа документа в таблице SDELKA. Т.е если тип документа приходный, то остаток по конкретному товару увеличивается путем умножения суммы сделки с количеством строкисделки. А вот с расходом остаток уменьшается. (правда, все это звучит дико? Не знаю правильно ли звучит это с экономической стороны…но вот так. )
Вот набросок триггера… откомпилировался, а работать не хочет…

CREATE TRIGGER PRZ FOR SDELKA
ACTIVE AFTER INSERT POSITION 0
as
declare variable ostat numeric(7);
begin
ostat=0;
if ('приход'=new.tipdokumenta) then
 select sum(sdelka.summa*strokasdelki.kolichestvo) as ostat
 from sdelka inner join strokasdelki
  on strokasdelki.ntovara=sdelka.nsdelki
  where sdelka.nsdelki=new.nsdelki
 into: ostat;
update tovar t
set t.ostatok=:ostat
where new.nsdelki=t.ntovara;
end

[veter_s_morya]

Подходил к преподу, в общем, недопонял (чувствовал ведь, что что-то не так). Задание осталось тем же, только вот умножения суммы сделки с количеством строкисделки делать не надо.
Вот код

CREATE TRIGGER PR FOR strokasdelki
ACTIVE AFTER INSERT POSITION 0
as
declare variable ostat numeric(7);

begin

ostat=0;
select(sdelka.tipdokumenta) as ostat
 from sdelka 
 where nsdelki=new.nsdelki
 into: ostat;
if ('приход'=new.tipdokumenta) then
begin 

update  tovar
set tovar.ostatok=tovar.ostatok+new.colichestvo
where sdelka.nsdelki=new.nsdelki;

end
else if ('расход'=new.tipdokumenta) then
begin

update  tovar
set tovar.ostatok=tovar.ostatok-new.kolichestvo
where sdelka.nsdelki=new.nsdelki;
end
end

Только вот ошибку выдает! Сам исправить не могу! Подскажите пожалуйста, бедняге ветру_с_ моря. Заранее спасибо!

[dron-s]

что за ошибка?

else if ('расход'=new.tipdokumenta) then

вот такое вот не допускается (не желательно) у операции РАСХОД есть идешник,по по нему и проверяй...

[veter_s_morya]

Что такое идешник? Я не понял этого сокращения!

вот такое вот не допускается (не желательно) у операции РАСХОД есть идешник,по по нему и проверяй...

А ошибка, вы правы, эта (только приход)!

Column does not belong to referenced table.
Dynamic SQL Error.
SQL error code = -206.
Column unknown.
NEW.TIPDOKUMENTA.
At line 13, column 18.

(это не паскальевский отладчик… тут все путано)

Перевод:

Колонка не принадлежит упомянутой таблице.
Динамическая SQL Ошибка.
SQL ошибка закодируют =-206.
Неизвестная колонка.
NEW.TIPDOKUMENTA.
На линии 13, символ 18.

Если поменять CREATE TRIGGER PR FOR strokasdelki на
CREATE TRIGGER PRZ FOR SDELKA, то хорошего тоже мало.
Естественно будет выдаваться ошибка на

set tovar.ostatok=tovar.ostatok+new.colichestvo

(new тут уже не прокатит)

[mihali4]

Что такое идешник?

Подразумевается уникальный идентификатор ID.

[veter_s_morya]

идешник,по по нему и проверяй...

Вот опять не понял... Как это сделать?
Я должен обработать только последний кортеж введенный в таблицу, касающийся только определенного товара.
врянтов кроме 'приход'=new.tipdokumenta у меня нет...

[dron-s]

veter_s_morya
я бы сделал вот так

if (new.id_oper = 1000) then
    begin
      execute procedure nalic_plus(new.articul, new.kolvo, new.cena, new.name_tovar, new.edin_izm, new.summa_tov, new.id_num_nakl, new.id_proizvod, new.id_oper, new.name_tovar_proizvod, new.kat_izdel);
    end

где id_oper = 1000 - это и есть Приход из таблицы Oper

[veter_s_morya]

if (new.id_oper = 1000) then
begin
execute procedure nalic_plus(new.articul, new.kolvo, new.cena, new.name_tovar, new.edin_izm, new.summa_tov, new.id_num_nakl, new.id_proizvod, new.id_oper, new.name_tovar_proizvod, new.kat_izdel);
end

В моем случаи это усложнит «простой триггер»(с процедурой nalic_plus вариант конечно интересный, но... не то).

[dron-s]

я тебе не про процедуру, а про

вот такое вот не допускается (не желательно) у операции РАСХОД есть идешник,по по нему и проверяй...

[veter_s_morya]

идешник,по по нему и проверяй

Малость не дошло, хотелось бы увидеть код. Если не трудно скинь, как ты себе это видишь.