Добавление даты в таблицу

[Ernest027]

Всем привет.
Необходимо дату из одной таблицы добавить в другую таблицу.
Делаю так:

sql.Add('insert into Basket (OrganizationID,[Организация],ZavodID,');
  SQL.Add('[Структурное подразделение],OborudovanieID,[№ п/п],[Наименование единицы],');
  sql.Add('[Оперативный номер],[Тип оборудования],[Заводской номер],[Технические характеристики],');
  sql.Add('[Год выпуска],[Дата замеров],[Техническое состояние],[Дата следующих замеров],');
  SQL.Add('[Фото],[Адрес фото],[До следующих замеров осталось, дней])');
  SQL.Add('values (:a,:f,:b,:g,:c,:d,:h,:i,:j,:k,:l,:e,:q,:m,:r,:n,:o,:p)');

Объявляю параметры:

Parameters.ParamByName('q').Value:=
  DataModule2.ADOQuery3.FieldByName('Дата замеров').AsDateTime;

в этом случае, если в 1-ой таблице поле дата пустое, то во 2-ую таблицу идет дата 30.12.1899.
Как сделать так, чтобы если в первой таблице не было даты, то и во вторую ничего не вставлял?
Пытаюсь сделать по условию, что-то типа

if DataModule2.ADOQuery3.FieldByName('Дата замеров').AsDateTime<>0 then
  Parameters.ParamByName('q').Value:=
  DataModule2.ADOQuery3.FieldByName('Дата замеров').AsDateTime
  else
Parameters.ParamByName('q').Value:=???

Подскажите как сделать правильно.
Спасибо.

[evg_m]

Parameters.ParamByName('q').Value:= UnAssigned; /// NULL; // EmptyParam;

Parameters.ParamByName('q').Value:= DataModule2.ADOQuery3.FieldByName(' Дата замеров').Value;

if DataModule2.ADOQuery3.FieldByName(' Дата замеров').IsNull then

[Ernest027]

Parameters.ParamByName('q').Value:=
  DataModule2.ADOQuery3.FieldByName('Дата замеров').Value;

Parameters.ParamByName('q').Value:= UnAssigned; /// NULL; // EmptyParam;

Неправильно определен объект Параметр. Предоставлены несовместимые или неполные сведения

[evg_m]

используйте другой вариант из предложенных.
; /// NULL; // EmptyParam;

[Ernest027]

Parameters.ParamByName('q').Value:= UnAssigned
Parameters.ParamByName('q').Value:= Null
Parameters.ParamByName('q').Value:= emptyparam

все пробовал, пишет "Неправильно определен объект Параметр. Предоставлены несовместимые или неполные сведения"

[evg_m]

; .

так может это поле (соответствующее параметру q) и не может принимать пустое значение (NOT NULL) ?

[Ernest027]

так может это поле (соответствующее параметру q) и не может принимать пустое значение (NOT NULL) ?

проверил, поле может принимать значение Null.