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