Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.04;
Скачать: CL | DM;

Вниз

Триггеры и генераторы в IB6   Найти похожие ветки 

 
Turalyon ©   (2002-03-11 12:08) [0]

Помогите пожалуйста.
Проблемма следущая. Есть БД в IB6 в ней 3 таблицы. Одна связана с 2-мя другими. Необходимо добавлять записи сразу во все 3 в одной транзакции.
В качестве ключевых полей во всех таблицах сделал автоинкрементные поля, реализовал с помощью триггеров и генераторов. Работаю с компонентами IBDataSet, IBDataase, ...
Проблемма заключается в том, что при добавлении новой записи в таблицу прога требует от меня значение этих самых ключевых полей (в SQL запросах связанных с добавлением, удалением.... поставил что бы ключевое поле не обновлялось). Постаил присваивание ключевому полю любого значения, начало добавлять... (в базу реально добавляет нужное значение, триггер срабатывает нормально), но из программы видно только то левое значение, которое я присвоил... (а не то которое реально в базе), Даже если сделать IBTransaction1.CommitRetaining значения все равно не обновляются. Вопрос такой - как с этим боротся чтобы реально получить значение в таблице, желательно не завершая транзакцию.

Вот код добавления новой записи:

IBDataSet1.Edit;
IBDataSet1.FieldByName("C_ID").AsInteger := 1;
IBDataSet1.FieldByName("C_NAME").AsString := CompName;
IBDataSet1.Post;


Если заремарить строку
IBDataSet1.FieldByName("C_ID").AsInteger := 1;
Начинает ругаться... что полю C_id должно быть присвоено значение...
Вот SQL запрос связанный с добавлением
insert into COMPUTER
(C_NAME)
values
(:C_NAME)


 
Turalyon ©   (2002-03-11 14:59) [1]

И все же???


 
Igor_ ©   (2002-03-11 15:04) [2]

У тебя триггер, который назначает значение автоинкрементных полей объявлен Before Insert? Если его объявить Before Insert, то по идее в программе при добавлении новой записи она не будет требовать значения этих автоинкрементных полей


 
Turalyon ©   (2002-03-11 15:16) [3]

Вот так он создан....

CREATE TRIGGER "COMPCOUNT" FOR "COMPUTER"
ACTIVE BEFORE INSERT POSITION 0
as
begin
new.c_id = gen_id(COMP_GEN,1);
end


И все равно требует...


 
Turalyon ©   (2002-03-11 15:21) [4]

Я вроде разобрался у компонента IBDataSet есть св-во Generator Field там настроил, и вроде все заработало..... пока


 
Igor_ ©   (2002-03-11 15:23) [5]

Поздравляю...
пока Поздравляю



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

Текущий архив: 2002.04.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
1-9526
Лана Розанова
2002-03-23 18:30
2002.04.04
ListBox


14-9633
Neox
2002-02-23 11:45
2002.04.04
Delphi6 Help


1-9535
snoup
2002-03-23 20:15
2002.04.04
Как в определенное время запустить exe-файл (например в 10:37) написав его название


3-9355
Злой
2002-03-11 13:16
2002.04.04
Каким образом можно осущестьвить 100% сохранение данны


3-9401
Sewix
2002-03-12 16:39
2002.04.04
Работа с TDBGrid