Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2004.12.26;
Скачать: [xml.tar.bz2];

Вниз

И снова про транзакции и обновление   Найти похожие ветки 

 
For   (2004-11-28 03:28) [0]

Подскажите тупому новичку, как правильно реализовать обновление таблиц с помощью транзакций. Пример: одна прога изменяет данные, другая их должна видеть, или получить сообщение, что таблица изменена. Везде где обсуждался этот вопрос нет ничего конкретного, или я не догоняю. Применимо как для IBDataset, так и для IBTable. ХЭЛП!


 
Vemer ©   (2004-11-28 11:09) [1]

Тут и рядом с ним можно найти много интересного:
http://www.sql.ru/forum/actualthread.aspx?tid=140992


 
MaxxSoft ©   (2004-11-28 11:28) [2]

Создаешь процедуру в БД для изменения данных, и на выходе генерируешь событие, напрмер:

CREATE PROCEDURE "CHANGE_TABLE1"
(
 "VALUE1" INTEGER,
 "VALUE2" INTEGER
)
AS
begin
 update TABLE1 set FIELD1 = :VALUE1 where FIELD2 = :VALUE2;
 post_event("TABLE1_CHANGED");
end

В приложении, изменяющем данные в БД создаешь SQL-запрос и через него вызываешь эту процедуру:

CHANGE_TABLE1_SQL: TIBSQL;
...
with CHANGE_TABLE1_SQL do
begin
 CHANGE_TABLE1_SQL.SQL.TEXT := "execute procedure CHANGE_TABLE1" (:VALUE1, :VALUE2);
 if not Prepared then Prepare;
 ParamByName("VALUE1").AsInteger := Value1;
 ParamByName("VALUE2").AsInteger := Value2;
 ExecQuery;
 Close;
end;


В приложении, которое отображает изменения создаешь Event:

CHANGE_TABLE1_EVENT: TIBEvents;
...
//при создании формы устанавливаешь и регистрируешь событие:
CHANGE_TABLE1_EVENT.Events.Clear;
CHANGE_TABLE1_EVENT.Events.Add("TABLE1_CHANGED");
CHANGE_TABLE1_EVENT.Registered := true;
...
//Пишешь обработчик события
procedure TDataModul.CHANGE_TABLE1_EVENTEventAlert(...);
begin
//To do...
end;

Вот и все, успехов...



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

Форум: "Базы";
Текущий архив: 2004.12.26;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.041 c
3-1101476166
Dimedrol
2004-11-26 16:36
2004.12.26
EhLib dropdown lookup list


1-1102867259
Elc_
2004-12-12 19:00
2004.12.26
Dll MDIForm


1-1103014114
Delphi5.01
2004-12-14 11:48
2004.12.26
выезжающее окошко как это сделано в WinAmp-е


6-1097321201
QuestionX
2004-10-09 15:26
2004.12.26
Клиент - сервер проблема синхронизации


3-1101295409
VitaWED
2004-11-24 14:23
2004.12.26
Название столбца.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский