Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Выполнить start transaction commit в процедуре InterBase 6 [D5, IB6.x, ]


NLO ©   (2001-12-07 12:29:00) 

нужно чтобы при выполнении процедуры, обязательно InterBase 6 вне зависимости от успешность выполнения этой процедуры записать в таблицу журнала кое какие данные.
типа такого

/* Stored procedures */

CREATE PROCEDURE "GET_DOCUMENT"
(
AS
begin
select * from access_mark_pack where user=e.employee
into :local_yesno;
satrt transaction
insert into journal (id, user_action) value (100,"exec")
commit
end


PVR   (2001-12-09 17:45:00) [1]

CREATE PROCEDURE "GET_DOCUMENT"
(
AS
begin
begin
begin
select * from access_mark_pack where user=e.employee
into :local_yesno;
when any do local_yes_no=local_yes_no;
end
insert into journal (id, user_action) value (100,"exec")
end

Или воспользуйся делфей и накатай соответствующий UDF он у тебя при запуске Jornal_udf(id,user_action,100,"exec"); зделает свой запрос к БД который будет явно в другой транзакции или воспользуйся первой страницей сайта http://ib.demo.ruтам внизу


Наверх

Титульная страница Поиск, карта сайта Написать письмо