Ошибка по взаиморасчетам в Актах разногласий

Если ВалютаДокумента=ДоговорВзаиморасчетов.ВалютаВзаиморасчетов Тогда
            СуммаДвиженияДог=Мин(Выборка.Сумма,СуммаДокументаДог);
            СуммаДвиженияУпр=обПересчет(СуммаДвиженияДог,ВалютаДокумента,КурсДокумента,ВалютаУпр,КурсВалютыУпр);
            СуммаДвиженияБаз=обПересчет(СуммаДвиженияДог,ВалютаДокумента,КурсДокумента,ВалютаРегл,КурсРегл);
            СуммаДокументаОстаток=СуммаДокументаОстаток-СуммаДвиженияДог;
         ИначеЕсли ВалютаДокумента=ВалютаУпр Тогда
            СуммаДвиженияУпр=Мин(Выборка.СуммаУпр,СуммаДокументаУпр);
            СуммаДвиженияДог=обПересчет(СуммаДвиженияУпр,ВалютаУпр,КурсВалютыУпр,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени());
            СуммаДвиженияБаз=обПересчет(СуммаДвиженияУпр,ВалютаУпр,КурсВалютыУпр,ВалютаРегл,КурсРегл);
            СуммаДокументаОстаток=СуммаДокументаОстаток-обПересчет(СуммаДвиженияУпр,ВалютаУпр,КурсВалютыУпр,ВалютаДокумента,КурсДокумента);
         ИначеЕсли ВалютаДокумента=ВалютаРегл Тогда
            СуммаДвиженияБаз=Мин(Выборка.СуммаБаз,СуммаДокументаБаз);
            СуммаДвиженияДог=обПересчет(СуммаДвиженияБаз,ВалютаРегл,КурсРегл,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени());
            СуммаДвиженияУпр=обПересчет(СуммаДвиженияБаз,ВалютаРегл,КурсРегл,ВалютаУпр,КурсВалютыУпр);
            СуммаДокументаОстаток=СуммаДокументаОстаток-обПересчет(СуммаДвиженияБаз,ВалютаРегл,КурсРегл,ВалютаДокумента,КурсДокумента);
         Иначе
            СуммаДвиженияДог=обПересчет(СуммаРазногласий,ВалютаДокумента,КурсДокумента,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени());
            СуммаДвиженияДог=Мин(СуммаДвиженияДог,Выборка.Сумма);
            СуммаДвиженияУпр=обПересчет(СуммаДвиженияДог,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени(),ВалютаУпр,КурсВалютыУпр);
            СуммаДвиженияБаз=обПересчет(СуммаДвиженияДог,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени(),ВалютаРегл,КурсРегл);
            СуммаДокументаОстаток=СуммаДокументаОстаток-обПересчет(СуммаДвиженияДог,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени(),ВалютаДокумента,КурсДокумента);
         КонецЕсли;

Иначе
            СуммаДвиженияДог=обПересчет(СуммаРазногласий,ВалютаДокумента,КурсДокумента,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени());
            СуммаДвиженияДог=Мин(СуммаДвиженияДог,Выборка.Сумма);
            СуммаДвиженияУпр=обПересчет(СуммаДвиженияДог,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени(),ВалютаУпр,КурсВалютыУпр);
            СуммаДвиженияБаз=обПересчет(СуммаДвиженияДог,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени(),ВалютаРегл,КурсРегл);
            СуммаДокументаОстаток=СуммаДокументаОстаток-обПересчет(СуммаДвиженияДог,ДоговорВзаиморасчетов.ВалютаВзаиморасчетов,МоментВремени(),ВалютаДокумента,КурсДокумента);
         КонецЕсли;