Конвертация данных!

Перегружаю из торговли 9,2 в БП 2,0 документ "Строка выписки приход/расход". При загрузке он мне в ТЧ документа "Расшифровка платежа" записывает несколько строчек (1,2,3 или 5). Это при перегрузке берется из регистра "Покуптели или Поставщики". Мне нужно чтобы одной строчкой перегружалось. Вот код в КД , который установлен у ТЧ "Расшифровка", я закоментировал ненужное, но мне все равно строчками выгружает, что не так?
КоллекцияОбъектов = СоздатьОбъект("ТаблицаЗначений");

КоллекцияОбъектов.НоваяКолонка("ДоговорКонтрагента");
КоллекцияОбъектов.НоваяКолонка("ВидДоговора");
КоллекцияОбъектов.НоваяКолонка("КурсВзаиморасчетов");
КоллекцияОбъектов.НоваяКолонка("КратностьВзаиморасчетов");
КоллекцияОбъектов.НоваяКолонка("СуммаПлатежа");
КоллекцияОбъектов.НоваяКолонка("СуммаВзаиморасчетов");
КоллекцияОбъектов.НоваяКолонка("СтавкаНДС");
КоллекцияОбъектов.НоваяКолонка("СуммаНДС");
КоллекцияОбъектов.НоваяКолонка("СтатьяДвиженияДенежныхСредств");

////Если (Источник.КодОперации = Перечисление.КодыОпераций.ОплатаОтПокупателя)
//// Или (Источник.КодОперации = Перечисление.КодыОпераций.ВозвратОплатыОтПоставщика) Тогда
//// Если Источник.КодОперации = Перечисление.КодыОпераций.ОплатаОтПокупателя Тогда
//// Рег = СоздатьОбъект("Регистр.Покупатели");
//// ИначеЕсли Источник.КодОперации = Перечисление.КодыОпераций.ВозвратОплатыОтПоставщика Тогда
//// Рег = СоздатьОбъект("Регистр.Поставщики");
//// КонецЕсли;

//// ОбщаяСуммаПлатежа = Источник.Сумма;
//// ОбщаяСуммаПлатежаОстаток = Источник.Сумма;
//// Рег.ВыбратьДвиженияДокумента(Источник);
//// Пока Рег.ПолучитьДвижение() = 1 Цикл
//// КоллекцияОбъектов.НоваяСтрока();
//// КоллекцияОбъектов.ДоговорКонтрагента = Источник.Договор;
//// Если Источник.Валюта = Источник.Договор.ВалютаВзаиморасчетов Тогда
//// КоллекцияОбъектов.КурсВзаиморасчетов = Источник.Курс;
//// КоллекцияОбъектов.КратностьВзаиморасчетов = Источник.Кратность;
//// Иначе
//// КоллекцияОбъектов.КурсВзаиморасчетов = глКурсДляВалюты(Источник.Договор.ВалютаВзаиморасчетов, Источник.ДатаДок);
//// КоллекцияОбъектов.КратностьВзаиморасчетов = глКратностьДляВалюты(Источник.Договор.ВалютаВзаиморасчетов, Источник.ДатаДок);
//// КонецЕсли;

//// Если Источник.Валюта = Константа.ВалютаБухУчета Тогда
//// СуммаПлатежа = Рег.ОценкаРуб;
//// ИначеЕсли Источник.Валюта = Константа.ВалютаУпрУчета Тогда
//// СуммаПлатежа = Рег.СуммаУпр;
//// ИначеЕсли Источник.Валюта = Источник.Договор.ВалютаВзаиморасчетов Тогда
//// СуммаПлатежа = Рег.СуммаВал;
//// Иначе
//// СуммаПлатежа = ОбщаяСуммаПлатежа * Рег.СуммаВал / Источник.СуммаВзаиморасчетов
//// КонецЕсли;
//// ОбщаяСуммаПлатежаОстаток = ОбщаяСуммаПлатежаОстаток - СуммаПлатежа;
//// КоллекцияОбъектов.СуммаПлатежа = СуммаПлатежа;
////
//// КоллекцияОбъектов.СуммаВзаиморасчетов = глПересчет(СуммаПлатежа, Источник.Валюта, Источник.Курс,
//// Источник.Договор.ВалютаВзаиморасчетов, КоллекцияОбъектов.КурсВзаиморасчетов,
//// Источник.Кратность, КоллекцияОбъектов.КратностьВзаиморасчетов);
//// КоллекцияОбъектов.СтатьяДвиженияДенежныхСредств = Источник.ДвижениеДенежныхСредств;
//// ВидДоговора = "";
//// Если Источник.КодОперации = Перечисление.КодыОпераций.ВозвратОплатыОтПоставщика Тогда
//// Если Рег.КредДокумент.Вид() = "ОтчетКомитенту" Тогда
//// ВидДоговора = "СКомитентом";
//// ИначеЕсли Найти(Рег.КредДокумент.Вид(), "ПоступлениеТМЦ,ПоступлениеТМЦРозница,ПоступлениеТМЦИмпорт,ВозвратПоставщику,
//// |ВводОстатковПоставщика,ПоступлениеДопРасходы, ПоступлениеПрочее") > 0 Тогда
//// ВидДоговора = "СПоставщиком";
//// Иначе
//// ТекДоговор = Источник.Договор;
//// Запрос = СоздатьОбъект("Запрос");
//// ТекстЗапроса = "
//// | КредДокумент = Регистр.Поставщики.КредДокумент;
//// | Договор = Регистр.Поставщики.Договор;
//// | Группировка КредДокумент;
//// | Условие(Договор = ТекДоговор);
//// |";
////
//// Запрос.Выполнить(ТекстЗапроса);
//// Пока Запрос.Группировка(1) = 1 Цикл
//// Если Запрос.КредДокумент.Вид() = "ОтчетКомитенту" Тогда
//// ВидДоговора = "СКомитентом";
//// Прервать;
//// ИначеЕсли Найти(Запрос.КредДокумент.Вид(), "ПоступлениеТМЦ,ПоступлениеТМЦРозница,ПоступлениеТМЦИмпорт,ВозвратПоставщику,
//// |ВводОстатковПоставщика,ПоступлениеДопРасходы, ПоступлениеПрочее") > 0 Тогда
//// ВидДоговора = "СПоставщиком";
//// Прервать;
//// КонецЕсли;
//// КонецЦикла;
//// Если ВидДоговора = "" Тогда
//// ВидДоговора = "СПоставщиком";
//// КонецЕсли;
//// КонецЕсли;
//// ИначеЕсли Источник.КодОперации = Перечисление.КодыОпераций.ВозвратОплатыПокупателю Тогда
//// Если Рег.КредДокумент.Вид() = "ОтчетКомиссионера" Тогда
//// ВидДоговора = "СКомиссионером";
//// ИначеЕсли Найти(Рег.КредДокумент.Вид(), "ВозвратОтПокупателя, Реализация, ВводОстатковПокупателя") > 0 Тогда
//// ВидДоговора = "СПокупателем";
//// Иначе
//// ТекДоговор = Источник.Договор;
//// Запрос = СоздатьОбъект("Запрос");
//// ТекстЗапроса = "
//// | КредДокумент = Регистр.Покупатели.КредДокумент;
//// | Договор = Регистр.Покупатели.Договор;
//// | Группировка КредДокумент;
//// | Условие(Договор = ТекДоговор);
//// |";
////
//// Запрос.Выполнить(ТекстЗапроса);
//// Пока Запрос.Группировка(1) = 1 Цикл
//// Если Запрос.КредДокумент.Вид() = "ОтчетКомиссионера" Тогда
//// ВидДоговора = "СКомиссионером";
//// Прервать;
//// ИначеЕсли Найти(Запрос.КредДокумент.Вид(), "ВозвратОтПокупателя,Реализация,ВводОстатковПокупателя") > 0 Тогда
//// ВидДоговора = "СПокупателем";
//// Прервать;
//// КонецЕсли;
//// КонецЦикла;
//// Если ВидДоговора = "" Тогда
//// ВидДоговора = "СПокупателем";
//// КонецЕсли;
//// КонецЕсли;
//// КонецЕсли;
//// КоллекцияОбъектов.ВидДоговора = ВидДоговора;
//// КонецЦикла;
//// КоллекцияОбъектов.СуммаПлатежа = КоллекцияОбъектов.СуммаПлатежа + ОбщаяСуммаПлатежаОстаток;
//
////ИначеЕсли Источник.КодОперации = Перечисление.КодыОпераций.Прочее Тогда
//
КоллекцияОбъектов.НоваяСтрока();

КоллекцияОбъектов.ДоговорКонтрагента = Источник.Договор;
КоллекцияОбъектов.КурсВзаиморасчетов = глКурсДляВалюты(Источник.Валюта, Источник.ДатаДок);
КоллекцияОбъектов.КратностьВзаиморасчетов = глКратностьДляВалюты(Источник.Валюта, Источник.ДатаДок);
КоллекцияОбъектов.СуммаПлатежа = Источник.Сумма;
КоллекцияОбъектов.СуммаВзаиморасчетов = Источник.Сумма;
КоллекцияОбъектов.СтатьяДвиженияДенежныхСредств = Источник.ДвижениеДенежныхСредств;

////КонецЕсли;