БД в Delphi

[nata-khramenkova]

Здравствуйте. Есть три таблицы сделанные в interbase.

CREATE TABLE CLIENTS
(
ID_CLIENT INTEGER NOT NULL  PRIMARY KEY,
C_F_I_O VARCHAR (50) NOT NULL,
DOCUMENT VARCHAR (25) NOT NULL,
SERIA_NUMBER VARCHAR (25) NOT NULL,
DATA_ROJDENIA DATE NOT NULL,
CONTACTS VARCHAR (200) NOT NULL
);

CREATE TABLE PERSONALS
(
ID_PERSONAL INTEGER NOT NULL PRIMARY KEY,
P_F_I_O VARCHAR (50) NOT NULL,
TELEPHONE VARCHAR (20) NOT NULL,
DOLJNOST VARCHAR (50) NOT NULL
);


CREATE TABLE DOGOVOR
(
ID_DOGOVOR INTEGER NOT NULL PRIMARY KEY,
STRAHOVSHCHIK VARCHAR (50) NOT NULL,
ID_CLIENT INTEGER NOT NULL,
ID_PERSONAL INTEGER NOT NULL,
STRAHOVAYA_SUMMA NUMERIC (10,2) NOT NULL,
STRAHOVOI_VZNOS NUMERIC (10,2) NOT NULL,
STRAHOVAYA_VIPLATA NUMERIC (10,2),
DATA_START DATE NOT NULL,
DATA_END DATE NOT NULL,
PERIOD INTEGER NOT NULL,
COMMENT VARCHAR (200)
);

Скажите пожалуйста, как вставить все записи insert'ом в таблицу договор, еще не создавая записи в таблице клиент, тоесть как то одновременно чтоли. Или в ib console это получится только поочередно вручную? вбивая id ключи?

А еще в приложении, таблица договор должна заполняться через форму "новый договор" с полями для ввода текста, и комбобоксами (для персонала) как там тогда это организовать?
Я совсем что то ничего не пойму, полазив по форуму состряпала вот такой код для кнопочки "Добавить клиента" это:

procedure TForm1.Button2Click(Sender: TObject);
begin
   with IBQuery1 do begin
   sql.text:='insert into clients (c_f_i_o, document, seria_number, data_rojdenia, contacts) values (:c_f_i_o, :document, :seria_number, :data_rojdenia, :contacts)';
   with IBQuery1.Params do
begin
   IBQuery1.ParamByName('c_f_i_o').Value:= edit1.text;
   IBQuery1.ParamByName('document').Value:= edit2.text;
   IBQuery1.ParamByName('seria_number').Value:= edit3.text;
   IBQuery1.ParamByName('data_rojdenia').Value:= edit4.text;
   IBQuery1.ParamByName('contacts').Value:=edit5.text;
   execsql;
  IBQuery1.Close;
IBQuery1.Open;
end;
end;

Но почему то запись в бд добавляется после перезагрузки приложения. почему так? Но это только для клиента, а как сделать так чтобы сразу в главную - клиент, и в дочернюю-договор информация добавлялась? Пожалуйста, подскажите!

[Stilet]

Что такое "хранимые процедуры" знаешь?
Я бы сделал хранимую процедуру, выполняющую два запроса вставки, а из клиента вызывал ее передавая параметры:
http://www.firebirdsql.su/doku.php?id=execute_procedure
http://www.programmersforum.ru/showthread.php?t=79077

[nata-khramenkova]

Чтобы прям знать как сделать эти процедуры-не знаю) но читала, представляю. В принципе такие мысли и были, но надо ведь убедиться. ОК, спасибо. Буду пытаться.
А еще вопросик можно? У меня в бд в принципе 5 таблиц, генератор и триггер сделала только для таблиц которые будут пополняться в работе, а для трех делать не стала, ну потому что данные вставлены в ходе разработки, и пополняться не будут, и по сути меняться не должны. Так оставить можно, или обязательно для всех таблиц делать "счетчики"? Спасибо.

Ой, а про заполнение в ibconsole как быть?вручную? мне надо буквально пару строк, чтоб для отчетности.

[Аватар]

Но почему то запись в бд добавляется после перезагрузки приложения

Почитай о транзакциях. Видимо COMMIT не выполняется

[superedward]

Сообщение от Аватар

Почитай о транзакциях. Видимо COMMIT не выполняется

Судя по коду, приведённому ТС, так оно и есть.

[Stilet]

Так оставить можно, или обязательно для всех таблиц делать "счетчики"?

Если счетчики не нужны то их и не делают.
Однако для справочных таблиц ключевые поля если таблицы большие не помешают.

а про заполнение в ibconsole как быть?вручную?

Можешь и вручную. А вообще открой для себя бесплатный IBExpert - он тебе поможет.