ОтборСубк1=ОтборСубконто1.ТекущаяСтрока();
Если ВыбВидСубконто2.выбран=0 тогда
ОтборСубк2=3;
Иначе
ОтборСубк2=ОтборСубконто2.ТекущаяСтрока();
КонецЕсли;
Если ВыбВидСубконто3.выбран=0 тогда
ОтборСубк3=3;
Иначе
ОтборСубк3=ОтборСубконто3.ТекущаяСтрока();
КонецЕсли;
Ит=создатьобъект("БухгалтерскиеИтоги");
Ит.ИспользоватьСубконто(ВыбВидСубконто1,Субконто1,ОтборСубк1,0);
Если ОтборСубк2<>3 тогда
Ит.ИспользоватьСубконто(ВыбВидСубконто2,Субконто2,ОтборСубк2,0);
КонецЕсли;
Если ОтборСубк3<>3 тогда
Ит.ИспользоватьСубконто(ВыбВидСубконто3,Субконто3,ОтборСубк3,0);
КонецЕсли;
[b]Ит.ИспользоватьКорСубконто(ВидыСубконто.НЕОБХОДИМЫЙ_ВИД_КОРСУБКОНТО);[/b]
Ит.ВыполнитьЗапрос(Дата1,Дата2,счет[b],КОРСЧЕТ,,3[/b]);
Ит.ВыбратьСубконто();
Пока Ит.ПолучитьСубконто()=1 цикл
[b]ит.выбратькорсубконто();
пока ит.получитькорсубконто() = 1 цикл
конеццикла;[/b]
[s]Если отборСубк2=1 тогда
Ит.ВыбратьСубконто(2);
Пока Ит.ПолучитьСубконто()=1 цикл
Если отборСубк3=1 тогда
Ит.ВыбратьСубконто(3);
Пока Ит.ПолучитьСубконто()=1 цикл
Конеццикла;
КонецЕсли;
Конеццикла;
КонецЕсли;[/s]
Конеццикла;
Цитата
Пример приведен, если выборка выполняется только по 1-ому субконто
ОтборСубк1=ОтборСубконто1.ТекущаяСтрока();
Если ВыбВидСубконто2.выбран=0 тогда
ОтборСубк2=3;
Иначе
ОтборСубк2=ОтборСубконто2.ТекущаяСтрока();
КонецЕсли;
Если ВыбВидСубконто3.выбран=0 тогда
ОтборСубк3=3;
Иначе
ОтборСубк3=ОтборСубконто3.ТекущаяСтрока();
КонецЕсли;
Ит=создатьобъект("БухгалтерскиеИтоги");
Ит.ИспользоватьСубконто(ВыбВидСубконто1,Субконто1,ОтборСубк1,0);
Если ОтборСубк2<>3 тогда
Ит.ИспользоватьСубконто(ВыбВидСубконто2,Субконто2,ОтборСубк2,0);
КонецЕсли;
Если ОтборСубк3<>3 тогда
Ит.ИспользоватьСубконто(ВыбВидСубконто3,Субконто3,ОтборСубк3,0);
КонецЕсли;
Ит.ИспользоватьКорСубконто(ВидыСубконто.НЕОБХОДИМЫЙ_ВИД_КОРСУБКОНТО);
Ит.ВыполнитьЗапрос(Дата1,Дата2,счет,КОРСЧЕТ,,3);
Ит.ВыбратьСубконто();
Пока Ит.ПолучитьСубконто()=1 цикл
ит.выбратькорсубконто();
пока ит.получитькорсубконто() = 1 цикл
конеццикла;
Если отборСубк2=1 тогда
Ит.ВыбратьСубконто(2);
Пока Ит.ПолучитьСубконто()=1 цикл
Если отборСубк3=1 тогда
Ит.ВыбратьСубконто(3);
Пока Ит.ПолучитьСубконто()=1 цикл
Конеццикла;
КонецЕсли;
Конеццикла;
КонецЕсли;
Конеццикла;
Цитата
Так вроде лучше.