Объект.Валюта<>"UAH" - кто-то прикалывается %))
ошибка вызвана тем, что в табличной части нету строк, тоесть нужно добавить типа
ТекущиеДанные = Элементы.Товары.ТекущиеДанные;
Если ТекущиеДанные <> Неопределено Тогда
Если Объект.Валюта<>"UAH" Тогда
ТекущиеДанные.ЦенаГрн = Окр((ТекущиеДанные.Цена*Валюта_Курс.Курс/Валюта_Курс.Кратность), 2, 1);
Иначе
ТекущиеДанные.ЦенаГрн = ТекущиеДанные.Цена;
КонецЕсли;
КонецЕсли;
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший