v7: Найти элемент справочника, изменить реквизит, записать...

Добрый день.
Пожалуйста, растолкуйте, какого лешего после этого куска кода 1С-ка выдает сообщение, что не может записать элемент, т.к. он не выбран. 7-кой заниматься приходиться постольку-поскольку, не поленилась даже залезть в описание встроенного языка 7, но не доходит, видимо......

СпрКонтр = СоздатьОбъект("Справочник.Номенклатура");

Если (ФайлСравнения.Rezult = 1) и (СокрЛП(ФайлСравнения.Zamena)<>"Не требуется")  Тогда
            если  СпрКонтр.НайтиПоНаименованию(СокрЛП(ФайлСравнения.Name),0,1) =1 тогда
                Тек = СпрКонтр.текущийэлемент();
                Тек.Наименование = СокрЛП(ФайлСравнения.Zamena);
                Тек.Записать();
            иначе
                Сообщить("Не найден "+ СокрЛП(ФайлСравнения.Name));
            КонецЕсли;
        КонецЕсли;