заполнение поля автоматически и вручную

день добрый всем
возник такой вопрос
есть база в Access 2000, в которую заносятся различные договоры. для каждого договора есть поле [Тип], у поля всего 2 значения - "Продажа" и "Аренда". еще есть поле [СуммаДоговара], которая для договоров "Продажа" вычисляется всегда по одной и той же формуле, а для договоров "Аренда" всегда по-разному.
можно ли сделать так, чтобы при выборе в поле [Тип] значения "Продажа" поле [СуммаДоговара] заполнялось бы по формуле автоматически, а при значении "Аренда" это же поле можно было бы заполнить вручную?
заранее спасибо

на beforupdate поля [тип] можно поставить сл. код
if me.[полетип] = "Продажа" then me.[полеСумма] = 2+2

JMK

заранее спасибо

зря вы искусственно ограничиваете типы договоров - а если будет договор обмена или долевого выкупа или еще что - будете новую базу клепать?

лучше всего формулу расчета сумм по договору привязывать к конкретному типу договора

например

tblAgreements

AgreementID - код договора
AgreementTerms - условия договора
AgreementTypeID - тип договора

tblAgreementTypes

AgreementTypeID - код типа договора
AgreementType - тип договора
CalculateScheme - схема расчета сумм (алгоритм)

DiDis

на beforupdate поля [тип] можно поставить сл. код if me.[полетип] = "Продажа" then me.[полеСумма] = 2+2

дело в том, что данные иногда импортируются из Excel, минуя форму ввода
можно ли как то реализовать это на уровне запроса?

DiDis

на beforupdate поля [тип] можно поставить сл. код if me.[полетип] = "Продажа" then me.[полеСумма] = 2+2

Этого недостаточно. По условию задачи - если Продажа, то ручной ввод исключен. Следовательно, мало вычислять это поле, надо еще в будущем предохранять его от ручной правки. Для этого надо в процедуре события Текущая запись (Current) проверять признак и если стоит Продажа, надо блокировать значение поля

If Me.Тип="Продажа" Then
   Me.[СуммаДоговара].Locked = True
End If

BULK INSERT

в том то и дело, что нет единого алгоритма расчета суммы для договора "Аренда"; сумма рссчитывается каждый раз по-разному, поэтому и нужно заносить ее вручную

может быть у кого-нибудь все-таки будут идеи, подскажите пожалуйста, знатоки

А в импортируемых екселовских файлах тоже есть признак Продажа, Аренда?
Если да, то в предположении, что связь с ексел-файлом уже установлена, запрос может иметь вид:

Update tabl Inner Join ExcelTabl On tabl.Id = ExcelTabl.ID
Set tabl.[СуммаДоговара]= ВашаФункцияПреобразования()
Where ExcelTabl.[Тип]="Продажа"

Здесь ВашаФункцияПреобразования() это функция с атрибутом Public, которую вы должны определить в стандартном модуле. Эта функция выполняет нужное преобразование при Тип="Продажа". Когда Тип="Аренда", ничего не происходит.

Я бы в обоих случаях рекомендовал автоматический подсчет,который исключает ошибки с созданием таблицы (может быть список) в которой(м) указывается порядок расчета или предоставляется выбор (или ввод) коэффициентов в необходимых пределах,а открытие формы или списка для выбора "послеОбновления" поля Тип.

спасибо всем кто откликнулся