Реферат: Перенос приложений MIDAS с одной СУБД на другую

if (exists (select * from DOC_TITLE

where FROM_ID = OLD.CLIENT_ID))

then

exception EX_CLIENT_IN_DOC;

if (exists (select * from DOC_TITLE

where TO_ID = OLD.CLIENT_ID))

then

exception EX_CLIENT_IN_DOC;

end

^

Преобразуется в

create trigger CLIENT_AFTER_DELETE on CLIENT

for delete

as

if (exists (select d.CLIENT_ID from

DOC_TITLE dt, deleted d

where dt.FROM_ID = d.CLIENT_ID))

begin

--чтобы сообщение было видно на клиенте

raiserror ('Существует запись в документе', 16, 1)

--необходимо ручками откатить транзакцию

rollback transaction

end

if (exists (select d.CLIENT_ID from

DOC_TITLE dt, deleted d

where dt.TO_ID = d.CLIENT_ID))

begin

raiserror ('Существует запись в документе', 16, 1)

rollback transaction

К-во Просмотров: 370
Бесплатно скачать Реферат: Перенос приложений MIDAS с одной СУБД на другую