Здраствуйте.
Есть небольшая база данных на VPF 7.0. Мне необходимо написать несколько программок в Delphi 7, работающих с этой базой через ADO.

И возникла такая проблемка. Все таблицы в этой базе данных содержат суррогатный ключ, который вычисляется по формуле макс_значение_ключа + 1. Ключ вычисляет хранимая процедура, которая в качестве параметров принимает имя таблицы и имя поля, для которого должен быть вычислен ключ, и возвращает новое значение ключа. Для всех полей, содержащих суррогатный ключ, в default value прописан вызов этой процедуры.

Проблема заключается в добавлении новых записей. Когда я работал в Фоксе, все было просто - я писал команду INSERT, опуская значение ключа, и Фокс автоматически подставлял туда выражение из default value, где был прописан вызов хранимой процедуры. В Delphi + ADO такой приём не проходит - очевидно, драйвер пытается вставить NULL value, не вызывая процедуру. Прямо вызвать хранимую процедуру у меня тоже не получилось - ни прямым обращением к ней в INSERT, ни через компонент ADOStoredProc.

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