Добрый день. Нужно сохранить в Справочник ОбъектыНедвижимости данные из Документы при его записи.
Последний шаг не выходит. Пробовал разные циклы, и выборка и ТЗ. Все Ок, но не сохраняет данные в Справочник.
В справочнике реквизиты такие-же.

```1c
    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ
    | ПриобретениеНедвижимости.Номер КАК Номер,
    | ПриобретениеНедвижимости.Дата КАК Дата,
    | ПриобретениеНедвижимости.ПолноеНаименование КАК ПолноеНаименование,
    | ПриобретениеНедвижимости.АдресМестанахожджения КАК АдресМестанахожджения,
    | ПриобретениеНедвижимости.ОбщаяПлощадь КАК ОбщаяПлощадь,
    | ПриобретениеНедвижимости.ЖилаяПлощадь КАК ЖилаяПлощадь,
    | ПриобретениеНедвижимости.ВидНедвижимости КАК ВидНедвижимости,
    | ПриобретениеНедвижимости.Примечание КАК Примечание,
    | ПриобретениеНедвижимости.ОбщаяСтоимость КАК ОбщаяСтоимость,
    | ПриобретениеНедвижимости.СвоиСредства КАК СвоиСредства,
    | ПриобретениеНедвижимости.КредитныеСредства КАК КредитныеСредства
    |ИЗ
    | Документ.ПриобретениеНедвижимости КАК ПриобретениеНедвижимости";
    Запрос.УстановитьПараметр("Объект", Документы.ПриобретениеНедвижимости);
    РезультатЗапроса = Запрос.Выполнить();
    ТЗ = Новый ТаблицаЗначений;
    ТЗ = РезультатЗапроса.Выбрать();

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

    КонецЦикла;
    НовСтрокаСпрОбъекты.Записать();
```
---
Вообще этот ваш код ужастен, его замените на 2 строчки:

```1c
    НовСтрокаСпрОбъекты = Справочники.ОбъектыНедвижимости.СоздатьЭлемент();
    ЗаполнитьЗначенияСвойств(НовСтрокаСпрОбъекты ,ЭтотОбъект);
```

и записать не забыть конечно

```1c
    НовСтрокаСпрОбъекты.Записать();
```
---
```1c
    //Цикл для записи всправочник ОбъектыНедвижимости
    Для Каждого Элемент Из ТЗ.Следующий() Цикл
    //Пока ТЗ.Следующий() Цикл
    НовСтрокаСпрОбъекты = Справочники.ОбъектыНедвижимости.СоздатьЭлемент();
    ЗаполнитьЗначенияСвойств(НовСтрокаСпрОбъекты ,ТЗ);
    //ЗачениеЗаполнено(Справочники.ОбъектыНедвижимости);
    НовСтрокаСпрОбъекты.Записать();

    КонецЦикла;
```
---
ЗаполнитьЗначенияСвойств(НовСтрокаСпрОбъекты ,ТЗ);

{Документ.ПриобретениеНедвижимости.МодульОбъекта(25)}: Итератор для значения не определен
    Для Каждого Элемент Из ТЗ.Следующий() Цикл
Выдал ошибку итератора
---
Попробуйте так

```1c
    ...
    ТЗ = Запрос.Выполнить().Выгрузить();

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

у ТЗ нет метода Следующий()
---
Пусто, не сохраняет.(((
---
я изменил еще строчку
ЗаполнитьЗначенияСвойств(НовСтрокаСпрОбъекты ,Элемент);
сразу не заметил
---
ЗаполнитьЗначенияСвойств(Справочники.ОбъектыНедвижимости,Элемент);
Зараза, создает 2 пустые строки. в них только код заполнен
---
так вот тут тоже ошибка

```1c
    Запрос.УстановитьПараметр("Объект", Документы.ПриобретениеНедвижимости);
    //должно быть ссылка контретного документа
    Запрос.УстановитьПараметр("Объект", ДокументыСсылка);
```

и в самом запросе нет секции ГДЕ Документ.ПриобретениеНедвижимости.Ссылка = &Объект

слишком много ошибок делаете
---
У меня там была ссылка, это я пробовал поменять на Объект
---
Объект нельзя. Только ссылка. Да и вместо ссылки вижу параметром менеджер документа
---
Вообще непонятно что вы вытворяете, установка параметра на записываемый документ нужна? и зачем вообще цикл? в выборке должны быть данные документа? я че то не совсем понял задумку
---
Нужно все данные с документа покупки недвижимого имущества перенести в Справочник Объектов недвижимости.
---
Вообще этот ваш код ужастен, его замените на 2 строчки:

```1c
    НовСтрокаСпрОбъекты = Справочники.ОбъектыНедвижимости.СоздатьЭлемент();
    ЗаполнитьЗначенияСвойств(НовСтрокаСпрОбъекты ,ЭтотОбъект);
```

и записать не забыть конечно

```1c
    НовСтрокаСпрОбъекты.Записать();
```
---
ЗаполнитьЗначенияСвойств(НовСтрокаСпрОбъекты ,ЭтотОбъект);
С циклом записал 2 строки, без цикла 1 строку.
Данные перешли в справочник, только адрес не попал. Буду копать дальше, возможно порядок Реквизитов другой.
Спасибо Вам)))
---
а с чего 2 строки то? не пойму сути - документ то один? откуда 2я запись взялась? (в цикле)
---
Сам не понял, но без цикла пишет в справочник. Теперь с реквизитами еще разобраться. И параметр уберу попробую.
---
имена реквизитов должны называться одинаково, если пользуете ЗаполнитьЗначениеСвойств().
Пишет в справочник в любом случае, хоть в цикле, хоть без. Все от задачи зависит (сколько элементов в выборке)
---
имена одинаковые. Может букву перепутал, перепроверю. Чуть позже гляну количество элементов. В душ схожу...
---
правочник в любом случае, хоть в цикле, хоть без. Все от задачи зависит (сколько
В Документе и в Справочнике разное количество реквизитов, реквизит Адрес сходится - привел к единому знаменателю. Но пока не выгружает в справочник. Видимо из-за даты документа. Надо еще будет дату подтянуть в справочник.
---
Неважно какое количество реквизитов. Они должны быть одинакового типа (источник-приемник). Если адрес - это строка, тогда в приемнике тоже должна быть строка, и ее длина достаточной чтобы он туда поместился
---
Да, так и было, только в справочнике был Адерс, вместо Адрес. Теперь пишет все. Только приходится справочник переоткрывать, чтобы увидеть запись.
---
там есть кнопочка Обновить, чтобы не переоткрывать
---
Утром буду допилить формы и код чистить. За одно в справочнике контрагентов подобное реализую для записи данных из одного справочника в другие. Спасибо Вам ещё раз)))
---
да пожалуйста))
---
Вот изначальный код:

```1c
    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ
    | ПриобретениеНедвижимости.Номер КАК Номер,
    | ПриобретениеНедвижимости.Дата КАК Дата,
    | ПриобретениеНедвижимости.ПолноеНаименование КАК ПолноеНаименование,
    | ПриобретениеНедвижимости.АдресМестанахожджения КАК АдресМестанахожджения,
    | ПриобретениеНедвижимости.ОбщаяПлощадь КАК ОбщаяПлощадь,
    | ПриобретениеНедвижимости.ЖилаяПлощадь КАК ЖилаяПлощадь,
    | ПриобретениеНедвижимости.ВидНедвижимости КАК ВидНедвижимости,
    | ПриобретениеНедвижимости.Примечание КАК Примечание,
    | ПриобретениеНедвижимости.ОбщаяСтоимость КАК ОбщаяСтоимость,
    | ПриобретениеНедвижимости.СвоиСредства КАК СвоиСредства,
    | ПриобретениеНедвижимости.КредитныеСредства КАК КредитныеСредства
    |ИЗ
    | Документ.ПриобретениеНедвижимости КАК ПриобретениеНедвижимости";
    Запрос.УстановитьПараметр("Ссылка", Документы.ПриобретениеНедвижимости);
    ТЗ = Запрос.Выполнить().Выгрузить();

    //Цикл для записи всправочник ОбъектыНедвижимости
    Для Каждого Элемент Из ТЗ Цикл

    НовСтрокаСпрОбъекты = Справочники.ОбъектыНедвижимости.СоздатьЭлемент();
    //ЗаполнитьЗначенияСвойств(Справочники.ОбъектыНедвижимости,ТЗ);
    ЗаполнитьЗначенияСвойств(Справочники.ОбъектыНедвижимости,Элемент);

    НовСтрокаСпрОбъекты.Записать();

    КонецЦикла;
```
---
в запросе нет секции ГДЕ - параметр для чего объявляете?
---
Подглядел где-то, практикуюсь.
---
ну понятно!)) ученье- свет, а неученье - чуть свет и на работу))
---
Спасибо Вам за помощь. Буду дальше копать.
---
Та немазашо)) учитесь ;-) никто ж ученым не родился)