ПоДоговору=v7.CreateObject("БухгалтерскиеИтоги");
ПоДоговору.ИспользоватьСубконто(v7.EvalExpr("ВидыСубконто.Контрагенты"));
ПоДоговору.ИспользоватьСубконто(v7.EvalExpr("ВидыСубконто.Договоры"));
ПоДоговору.ВключатьСубсчета(1);
Если ПоДоговору.ВыполнитьЗапрос(ДатаПереноса2, ДатаПереноса2) = 0 Тогда
Предупреждение("Запрос не выполнен!");
КонецЕсли;
ПоДоговору.ВыбратьСчета();
Пока ПоДоговору.ПолучитьСчет() = 1 Цикл
Если ПоДоговору.Счет.ЭтоГруппа()=0 Тогда
Продолжить;
КонецЕсли;
ПоДоговору.ВыбратьСубконто(1);
Пока ПоДоговору.ПолучитьСубконто(1) = 1 Цикл // Контрагенты
ПоДоговору.ВыбратьСубконто(2);
Пока ПоДоговору.ПолучитьСубконто(2) = 1 Цикл //Договора
(1)в 8-ку переношу,
Если ПоДоговору.ВыполнитьЗапрос(ДатаПереноса2, ДатаПереноса2)
так по всем счетам Контрагента получаю,в данном случаи ПоДоговору.ВключатьСубсчета(1); не отрабатывает