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

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

Проблема с Post [D6, IB6.x]


Pavel_S ©   (2002-05-06 16:00:00) 

Проблема в следующем, у меня есть таблица в которую я добавляю default данные :
...
DM_CARDS.TBL_HR_CARDS.Append;
DM_CARDS.TBL_HR_CARDS["SITE_NO"]:=0;
DM_CARDS.TBL_HR_CARDS["HOME_OFFICE_NO"]:=0;
DM_CARDS.TBL_HR_CARDS["CARD_START_DATE"]:=Date;
DM_CARDS.TBL_HR_CARDS["RECORD_DATE"]:=Date;
DM_CARDS.TBL_HR_CARDS["DUTY_ID"]:=1;
DM_CARDS.TBL_HR_CARDS["CATEGORY_ID"]:=1;
DM_CARDS.TBL_HR_CARDS["CLASS_ID"]:=1;
DM_CARDS.TBL_HR_CARDS["PROJECT_ID"]:=1;
DM_CARDS.TBL_HR_CARDS["COMPANY_ID"]:=1;
DM_CARDS.TBL_HR_CARDS["DEPARTMENT_ID"]:=1;
DM_CARDS.TBL_HR_CARDS["VACATION_PERIOD_ID"]:=1;
DM_CARDS.TBL_HR_CARDS["CLOSURE_REASON_ID"]:=1;
DM_CARDS.TBL_HR_CARDS["CLOSED"]:=0;
DM_CARDS.TBL_HR_CARDS.Post;
FormCard.ShowModal;...

В FormCard для сохранения изменений есть кнопка содержащаяя следующее

if DM_CARDS.TBL_HR_CARDS.State in [dsEdit, dsInsert] then
begin
DM_CARDS.TBL_HR_CARDS.Post;
end;


Все изменения, сделанные в форме FormCard не сохраняются.
Пробовал после Post добавлять
DM_CARDS.TBL_HR_CARDS.Transaction.CommitRetaining;
все равно не сохраняет. Оставются только те данные которые я программно добавил перед вызовом формы FormCard

ОЧЕНЬ НУЖНА ПОМОЩЬ !!!
Помогите пожалуйста.


Pavel_s   (2002-05-07 08:13:00) [1]

Разобрался с этой проблемой. Проблема была в том что после Post значение PK поля не было известно - всегда показывало 0 и решилась она следующим:
В IBDataset есть свойство GeneratorField
В нем надо указывать ApplyEvent в OnNewRecord, а у меня стояло OnServer

Спасибо всем


gek   (2002-05-07 08:08:00) [2]

AppendRecord(["SITE_NO"]);


Pavel_S   (2002-05-07 07:22:00) [3]

ПОМОГИТЕ !!!! ПОЖАЛУЙСТА !!!!


Наверх

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