Ошибка при записи в рег. контактная информация.

Пардон ребят, не мой сегодня день, подскажите из-за чего ошибка?
КОД:

            //СОЗДАЕМ КОНТРАГЕНТА

            СпрКонтрагент              = Справочники.Контрагенты.СоздатьЭлемент();
            СпрКонтрагент.Наименование = стр.ФИО;
            СпрКонтрагент.ОсновнойМенеджерПокупателя = ПолеВвода3;
            СпрКонтрагент.НаименованиеПолное = стр.ФИО;
            СпрКонтрагент.ЮрФизЛицо    = Перечисления.ЮрФизЛицо.ФизЛицо;
            СпрКонтрагент.Покупатель   = Истина;
            СпрКонтрагент.Родитель = Выбрано;
            СпрКонтрагент.Записать();

            //ЗАПОЛНЯЕМ ИНФОРМАЦИЮ О КОНТРАГЕНТЕ
            //ТЕЛЕФОН
            НаборЗаписей = РегистрыСведений.КонтактнаяИнформация.СоздатьНаборЗаписей();
            НаборЗаписей.Отбор.Объект.Установить(СпрКонтрагент);
            НаборЗаписей.Отбор.Тип.Установить(Перечисления.ТипыКонтактнойИнформации.Телефон);
            НаборЗаписей.Отбор.Вид.Установить(Справочники.ВидыКонтактнойИнформации.ТелефонКонтрагента);
            НаборЗаписей.Прочитать();
            Если НаборЗаписей.Количество() > 0 Тогда
                Для каждого Запись из НаборЗаписей Цикл
                    Если Запись.Вид = Справочники.ВидыКонтактнойИнформации.НайтиПоНаименованию("Телефон контрагента") Тогда
                        Запись.Представление = стр.телефон;
                    КонецЕсли;
                КонецЦикла;
            Иначе
                НовСтр = НаборЗаписей.Добавить();
                НовСтр.Объект = СпрКонтрагент;
                НовСтр.Тип = Перечисления.ТипыКонтактнойИнформации.Телефон;
                НовСтр.Вид = Справочники.ВидыКонтактнойИнформации.ТелефонКонтрагента;
                НовСтр.Представление = стр.телефон;
            КонецЕсли;
            НаборЗаписей.Записать();

Ошибка:

{ВнешняяОбработка.ВнешняяОбработка1.Форма.Форма.Форма(151)}: Ошибка при вызове метода контекста (Записать)
            НаборЗаписей.Записать();
по причине:
Не удалось записать: "Контактная информация"!