Добрый день!
Не срабатывают строки по заполнению Субконто:

БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетКт, РегЗапись.СубконтоКт, "ПрочиеДоходыИРасходы", Справочники.ПрочиеДоходыИРасходы.НайтиПоНаименованию("Прочие расходы"));
        БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт, РегЗапись.СубконтоДт, "Номенклатура", Выборка.Номенклатура);
        БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт, РегЗапись.СубконтоДт, "Склады", Выборка.Склад);

Вот полный код процедуры:
БухСпр = Документы.ОперацияБух.СоздатьДокумент();

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

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

    БухСпр.Записать();
    РезультатЗапроса = Запрос.Выполнить();
    Выборка= РезультатЗапроса.Выбрать();
    Пока Выборка.Следующий() Цикл
        
        РегЗапись = РегХозрасчетный.Добавить();
        РегЗапись.Период = Дата;
        РегЗапись.Регистратор = БухСпрСсылка;
        РегЗапись.Организация = Справочники.Организации.НайтиПоКоду("00-000001");
        РегЗапись.СчетДт=ПланыСчетов.Хозрасчетный.ПрочиеРасходы;
        РегЗапись.СчетКт=Выборка.Счет;
        //Сообщить(Выборка.Номенклатура);

        //РегЗапись.СубконтоДт=Справочники.ПрочиеДоходыИРасходы.НайтиПоНаименованию("Прочие расходы");
        БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетКт, РегЗапись.СубконтоКт, "ПрочиеДоходыИРасходы", Справочники.ПрочиеДоходыИРасходы.НайтиПоНаименованию("Прочие расходы"));
        БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт, РегЗапись.СубконтоДт, "Номенклатура", Выборка.Номенклатура);
        БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт, РегЗапись.СубконтоДт, "Склады", Выборка.Склад);

        РегЗапись.КоличествоКт=Выборка.Количество;
        РегЗапись.Сумма=Выборка.Сумма;  

    КонецЦикла;

Документ и строки создаются,но значения субконто не заполняются((

(1) ну и где запись набора движений ?!

И писать  БухСпр.Записать по сто раз нет необходимости, как и в отборе по новому документу в регистре

РегХозрасчетный.Записать(Истина);

последнюю строку,после цикла-забыла вставить

(5) и  ? Что не работает то ?

Дт и Кт в строках заполнения субконто перепутаны.

(7) может ещё и про НУ что то вспомнит.