БухИтоги = СоздатьОбъект("БухгалтерскиеИтоги");
БухИтоги.ИспользоватьСубконто(ВидыСубконто.Контрагенты, , );
БухИтоги.ВыполнитьЗапрос(Дата1, Дата2,"64.4.1,64.4.2", ); 
БухИтоги.ВыбратьСубконто( 1 );
Пока БухИтоги.ПолучитьСубконто( 1 ) =  1  цикл
      ДебНач41 = БухИтоги.СНД( 6441 );
      КредНач41 = БухИтоги.СНК( 6441 );
      ДебКон41 = БухИтоги.СКД( 6441 );
      КредКон41 = БухИтоги.СКК( 6441 ); 
	   
     ДебНач42 = БухИтоги.СНД( 6442 );
     КредНач42 = БухИтоги.СНК( 6442 );
     ДебКон42 = БухИтоги.СКД( 6442 );
     КредКон42 = БухИтоги.СКК( 6442 );
     Таб.ВывестиСекцию("Строка_1");
КонецЦикла;