Всем привет. ХЕЛП.
Учусь, пишу обработку для заполнения данных в документ ОперацияБух. Суть написал обработку, она выполняется в коде прослеживается что и основное средство определилось и счет, но документ на выходе пустой, не пойму что не так
---
во вроде разобрался тут без условий и тд, но робит

```1c
    ДокОперация = Документы.ОперацияБух.СоздатьДокумент();
    ДатаДокумента = ТекущаяДата();

    Организация = Справочники.Организации.НайтиПоНаименованию("ВОДОКАНАЛ-МЫТИЩИ АО");

    Содержание = "Тест" ;
    Комментарий = "Тестовый";
    ДокОперация.Дата = ДатаДокумента;
    ДокОперация.Организация = Организация;
    //ДокОперация.Ответственный = Ответственный;
    ДокОперация.Содержание = Содержание;
    ДокОперация.Комментарий = Комментарий;
    ДокОперация.Записать();
    ДокОперацияСсылка = ДокОперация.Ссылка;

    РегХозрасчетный = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
    РегХозрасчетный.Отбор.Регистратор.Значение = ДокОперацияСсылка;
    Для Каждого СтрокаДанных из Объект.Данные Цикл

    КодОС = СтрокаДанных.Инв;
    ОсновноеСредство = Справочники.ОсновныеСредства.НайтиПоКоду(КодОС);
    РегЗапись = РегХозрасчетный.Добавить();
    РегЗапись.Период = ДатаДокумента;
    РегЗапись.Регистратор = ДокОперацияСсылка;
    РегЗапись.Организация = Организация;
    РегЗапись.Содержание = "Тестовые проводки";
    РегЗапись.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоНаименованию("Аренда ОС");

    //БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт, РегЗапись.СубконтоДт, "Контрагенты", Контрагент);
    БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт, РегЗапись.СубконтоДт, "ОсновныеСредства", ОсновноеСредство);
    РегЗапись.Сумма = 8000000;
    КонецЦикла;
    РегХозрасчетный.Записать();
```
---
Привел к другому виду, все ровно мертво(((

```1c
    ДокументОперация= Документы.ОперацияБух.СоздатьДокумент();
    Дата = ТекущаяДата();
    Организация = Справочники.Организации.НайтиПоНаименованию("ВОДОКАНАЛ-МЫТИЩИ АО");
    ДокументОперация.Организация = Организация;
    ДокументОперация.Дата = Дата;

    ДокументОперация.Записать();

    ОперацияСсылка = ДокументОперация.Ссылка;

    РегХозрасчетный = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
    РегХозрасчетный.Отбор.Регистратор.Установить(ОперацияСсылка);

    Для Каждого СтрокаДанных из Объект.Данные Цикл

    ОсновноеСредство = Справочники.ОсновныеСредства.НайтиПоКоду(СтрокаДанных.Инв);
    Если ЗначениеЗаполнено(ОсновноеСредство) тогда;

    РегЗапись = РегХозрасчетный.Добавить();
    РегЗапись.Период = Дата;
    РегЗапись.Регистратор = ОперацияСсылка;
    РегЗапись.Организация = Организация;
    РегЗапись.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоНаименованию("Аренда ОС");
    БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт, РегЗапись.СубконтоДт, "ОсновныеСредства", ОсновноеСредство);

    Иначе
    Сообщить ("Ошибка");
    КонецЕсли
    КонецЦикла;

    ДокументОперация.Записать();
    Сообщить("Запись, создана" + ОперацияСсылка);
```
---
во вроде разобрался тут без условий и тд, но робит

```1c
    ДокОперация = Документы.ОперацияБух.СоздатьДокумент();
    ДатаДокумента = ТекущаяДата();

    Организация = Справочники.Организации.НайтиПоНаименованию("ВОДОКАНАЛ-МЫТИЩИ АО");

    Содержание = "Тест" ;
    Комментарий = "Тестовый";
    ДокОперация.Дата = ДатаДокумента;
    ДокОперация.Организация = Организация;
    //ДокОперация.Ответственный = Ответственный;
    ДокОперация.Содержание = Содержание;
    ДокОперация.Комментарий = Комментарий;
    ДокОперация.Записать();
    ДокОперацияСсылка = ДокОперация.Ссылка;

    РегХозрасчетный = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
    РегХозрасчетный.Отбор.Регистратор.Значение = ДокОперацияСсылка;
    Для Каждого СтрокаДанных из Объект.Данные Цикл

    КодОС = СтрокаДанных.Инв;
    ОсновноеСредство = Справочники.ОсновныеСредства.НайтиПоКоду(КодОС);
    РегЗапись = РегХозрасчетный.Добавить();
    РегЗапись.Период = ДатаДокумента;
    РегЗапись.Регистратор = ДокОперацияСсылка;
    РегЗапись.Организация = Организация;
    РегЗапись.Содержание = "Тестовые проводки";
    РегЗапись.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоНаименованию("Аренда ОС");

    //БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт, РегЗапись.СубконтоДт, "Контрагенты", Контрагент);
    БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт, РегЗапись.СубконтоДт, "ОсновныеСредства", ОсновноеСредство);
    РегЗапись.Сумма = 8000000;
    КонецЦикла;
    РегХозрасчетный.Записать();
```
---
набор записей нужно сначала прочитать, перед тем как заполнять, но вам скорее сюда:

https://forum.infostart.ru/forum9/topic9794/