v7: Итоги по валютам выдают ноль. Надо развернутое сальдо по каждой валюте.

Итоги по валютам  выдают ноль. Надо развернутое сальдо по каждой валюте.
Что не так? Проверяла все параметры , не знаю в чем проблема. Везде нули.

Если ИтогиВалютные =1 тогда
    Т.ВывестиСекцию("Шапка_ВалРазвер");
        СНДР1 = 0;
        СНКР1 = 0;
        СКДР1 = 0;
        СККР1 = 0;
         СН1=0;
         СК1=0;
    Ит1 = СоздатьОбъект("БухгалтерскиеИтоги");
      ТЗ1.ВыбратьСтроки();
      Пока ТЗ1.ПолучитьСтроку()=1 цикл
        Сообщить(Счет.Код);
          Ит1.ВыполнитьЗапрос(Дата1,Дата2, Счет.Код,,ТЗ1.Валюта,1,,2);
                Ит1.ВыбратьВалюты(1,0,,0,);
               Пока Ит1.ПолучитьВалюту(ТЗ1.Валюта)=1 Цикл
                СН1 = Ит1.СНД()-Ит1.СНК();
                Если СН1 > 0 Тогда
                    СНДР1 = СНДР1+СН1;
                Иначе
                    СНКР1 = СНКР1-СН1;
                КонецЕсли;

                СК1 = Ит1.СКД()-Ит1.СКК();
                Если СК1 > 0 Тогда
                    СКДР1 = СКДР1+СК1;
                Иначе
                    СККР1 = СККР1-СК1;
                КонецЕсли;
                Т.ВывестиСекцию("Вал_Разв");
                КонецЦикла;
     Конеццикла;