Неудаётся сохранить изменения в таблице

[Herly]

var k:Integer; n:TdateTime;
begin
n:=now;
List.Table2.DatabaseName:='SE';
List.Table2.TableName:='SPVinp';
List.Table2.Active:=true;
List.Table2.Append;
List.Table2.Edit;
List.Table2.FieldByName('Num').Text :=Mpr.Query1.FieldByName('Num').Tex t;
List.Table2.FieldByName('Fam').Text :=Mpr.Query1.FieldByName('Fam').Tex t;
List.Table2.FieldByName('Name').Tex t:=Mpr.Query1.FieldByName('Name').T ext;
List.Table2.FieldByName('Ot').Text: =Mpr.Query1.FieldByName('Ot').Text;
List.Table2.FieldByName('Clas').Tex t:=Mpr.Query1.FieldByName('Clas').T ext;
List.Table2.FieldByName('Date').AsD ateTime:=n;
List.Table2.FieldByName('Time').AsD ateTime:=n;
List.Table2.Post;
Vbr.Close;
List.DataSource3.DataSet:=List.Tabl e2;
List.DBGridB.DataSource:=List.DataS ource3;

Вот при таком раскладе выдаёт ошибку, и изменения не сохраняются в таблицу базы данных.
Если убрать пост, то результат можно наблюдать в DBGrid.
Подскажите как сделать чтобы изменения сохранялись в таблицу базы данных

[evg_m]

вар 1. заполнены не ВСЕ обязательные поля таблицы
вар 2. добавляемая запись является дубликатом

[Herly]

В моей ситуации оказался вариант 2.
А не могли бы вы уточнить по каким критериям БД определяет дубликат это или нет?(поросто у меня даже 2 эдентичные по обязательным полям записи будут иметь разное время занисения их в таблицу(что отражено в поле), но оно не является обязятельным.)
Собственно нужно сделать чтобы база могла содержать записи, с отличием всего в 1-но поле.

[evg_m]

уникальность определяется по наборам полей входяших в
1. primary key (первичный ключ)
2. unique key (уникальный ключ)