Процедура ПриЗаписи(Отказ)
Для Каждого Стр ИЗ ЭтотОбъект.Товары Цикл
Если Не ЗначениеЗаполнено(Стр.Партия) Тогда
Стр.Партия = ПолучитьПартию(Стр.Номенклатура,Ссылка);
КонецЕсли;
КонецЦикла;
КонецПроцедуры
После нажатия "Записать" на форме отображает, но при переоткрытии реквизит пустой.
А, например такой код работает, как ожидается.