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