(0) Для УФ примерно так:
Процедура <ТЧ>ПриНачалеРедактирования(НоваяСтрока, Копирование)
текСтрока = Элементы.<ИмяТЧ>.ТекущаяСтрока;
Если НоваяСтрока И НЕ Копирование Тогда
текСтрока.Валюта = Справочники.Валюты.<ИмяПредопределенногоЭлемента>;
КонецЕсли;
КонецПроцедуры
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший