ник: час
есть масса способов и кверху каком тоже есть=
=======================================
Можно так:
У докуммента имеется номер....
У списка товаров данного документа - тоже имеется его номер
Создаём запрос и выбираем все эти товары, которые нуна переоценить
Выбираем их в рекордсет1
рекордсет1.Open "SELECT ...... Where (табла.Номер_документа = Искомый_документ)
=========================
Далее бегая циклом по этому рекордсету,
Do
выбираем Dfirst( из справочника товаров тот товар, у которого ID = ID товара в рекордсет1 и берём Текущую цену из поля тек цена
Присваиваем её Рекордсет1.Цена=поле из справочника товаров ТекЦена
бежим дальше
Следующий товар
Нашли подходящее ID Проверили цену или сразу присвоили и фсе дела
цикл кончается
Loop
все переоценено... 