Как получить значение всех  субконто в  документе ОперациЯБух?

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

Сообщить(НаборЗаписей.СубконтоДт);  - ясно дело неправильно.
Как лучше написать?

выбрать запросом с видом субконто?

(0) А ничего, что на одной стороне проводки может быть больше одного субконто?

А я не говорю что у меня правильно. Я спрашиваю как сделать?

Опер = Документы.ОперацияБух.Выбрать(Дата1,Дата2);
Пока Опер.Следующий() цикл

Запрос= Новый Запрос;

Запрос.Текст=

"ВЫБРАТЬ
|    ХозрасчетныйДвиженияССубконто.Период,
|    ХозрасчетныйДвиженияССубконто.Регистратор,
|    ХозрасчетныйДвиженияССубконто.НомерСтроки,
|    ХозрасчетныйДвиженияССубконто.Активность,
|    ХозрасчетныйДвиженияССубконто.СчетДт,
|    ХозрасчетныйДвиженияССубконто.СубконтоДт1,
|    ХозрасчетныйДвиженияССубконто.ВидСубконтоДт1,
|    ХозрасчетныйДвиженияССубконто.СубконтоДт2,
|    ХозрасчетныйДвиженияССубконто.ВидСубконтоДт2,
|    ХозрасчетныйДвиженияССубконто.СубконтоДт3,
|    ХозрасчетныйДвиженияССубконто.ВидСубконтоДт3,
|    ХозрасчетныйДвиженияССубконто.СчетКт,
|    ХозрасчетныйДвиженияССубконто.СубконтоКт1,
|    ХозрасчетныйДвиженияССубконто.ВидСубконтоКт1,
|    ХозрасчетныйДвиженияССубконто.СубконтоКт2,
|    ХозрасчетныйДвиженияССубконто.ВидСубконтоКт2,
|    ХозрасчетныйДвиженияССубконто.СубконтоКт3,
|    ХозрасчетныйДвиженияССубконто.ВидСубконтоКт3,
|    ХозрасчетныйДвиженияССубконто.Организация,
|    ХозрасчетныйДвиженияССубконто.ВалютаДт,
|    ХозрасчетныйДвиженияССубконто.ВалютаКт,
|    ХозрасчетныйДвиженияССубконто.ПодразделениеДт,
|    ХозрасчетныйДвиженияССубконто.ПодразделениеКт,
|    ХозрасчетныйДвиженияССубконто.Сумма,
|    ХозрасчетныйДвиженияССубконто.ВалютнаяСуммаДт,
|    ХозрасчетныйДвиженияССубконто.ВалютнаяСуммаКт,
|    ХозрасчетныйДвиженияССубконто.КоличествоДт,
|    ХозрасчетныйДвиженияССубконто.КоличествоКт,
|    ХозрасчетныйДвиженияССубконто.СуммаНУДт,
|    ХозрасчетныйДвиженияССубконто.СуммаНУКт,
|    ХозрасчетныйДвиженияССубконто.СуммаПРДт,
|    ХозрасчетныйДвиженияССубконто.СуммаПРКт,
|    ХозрасчетныйДвиженияССубконто.СуммаВРДт,
|    ХозрасчетныйДвиженияССубконто.СуммаВРКт,
|    ХозрасчетныйДвиженияССубконто.Содержание,
|    ХозрасчетныйДвиженияССубконто.НеКорректироватьСтоимостьАвтоматически,
|    ХозрасчетныйДвиженияССубконто.МоментВремени
|ИЗ
|    РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто КАК ХозрасчетныйДвиженияССубконто
|ГДЕ
|    ХозрасчетныйДвиженияССубконто.Регистратор = &ДокОпер";

Запрос.УстановитьПараметр("ДокОпер",Опер.Ссылка);
Т=Запрос.Выполнить().Выгрузить();
Т.ВыбратьСтроку();

Конеццикла;

Теперь правильно? Все равно не работает. Все повисло...

ап....

а зачем Т.ВыбратьСтроку(); ??

(4) ДвиженияССубконто - виртуальная таблица. Чтобы не повисло надо заполнить параметры, перенести туда условие.

Делаю в Бухгалтерии 3.0. В процедуре на сервере.
Выбратьстроку чтобы проверить что у меня все отобразилось.

(8) отладчик применяй

(7) Ничего не виртуальная а обычная.

(10) тогда ждите, восьмерка сырая - тормозит.

можно взять все данные из таблицы субконто, а не движения с субконто

А разница?

(13) а разница - разница есть

Ладно попробую

Та же фигня.....

Самое быстрое:
ВЫБРАТЬ Значение ИЗ РегистрБухгалтерии.<Имя регистра бухгалтерии>.Субконто ГДЕ Регистратор=&Регистратор