Объединение строк в одну в табличной части

[Серёжа Сухинин]

Доброго времени суток,
Нужно что бы если в табличной части присутствуют несколько одинаковых записей(товары),сделать одну и сложить их колличесто

Код Выделить Развернуть

СтрокаТабличнойЧасти=Элементы.ТабличнаяЧасть1.ТекущиеДанные;
    Реквезит = ПолучитьЗначениеРеквизитаНаСервере(Объект.НомерПрихода,"Товар");
    Количество = ПолучитьЗначениеРеквизитаНаСервере(Объект.НомерПрихода,"Количество");

Для  Каждого Стр из объект.ТабличнаяЧасть1 цикл               // получаем в цикле строки табличной части                     
    Если  Реквезит = Стр.Нименование    Тогда       
                       //СтрокаТабличнойЧасти.Нименование = Реквезит;
                                      СтрокаТабличнойЧасти.Количество = 0;
                                    СтрокаТабличнойЧасти.Количество=Число(Стр.Количество)+Число(Количество);
               
                    //объект.ТабличнаяЧасть1.Удалить(Стр);
                               
                 Иначе Если Реквезит <> Стр.Нименование   Тогда
                    СтрокаТабличнойЧасти.Нименование = Реквезит;
                  СтрокаТабличнойЧасти.Количество = Количество;
                  Прервать;
              КонецЕсли;
              КонецЕсли;
              КонецЦикла;


по какой - то причине

Код Выделить Развернуть

Если  Реквезит = Стр.Нименование    Тогда
это условие проскакивает, хотя значения равны, кто подскажет как решить проблему?

[LexaK]

да-а-а, с таким подходом вы ни когда на научитесь программировать на 1С
задача решается в 3 команды

Код Выделить Развернуть


&НаСервере
Процедура СвернутьТЧ()
    лкТЧ = Объект.ТабличнаяЧасть1.Выгрузить();
    лкТЧ.Свернуть("Номенклатура","Количество");
    Объект.ТабличнаяЧасть1.Загрузить(лкТЧ);
КонецПроцедуры;


[Серёжа Сухинин]

лкТЧ = Объект.ТабличнаяЧасть1.Выгрузить();

почему то вообще перестал доюовлять, не чего не происходит

[LexaK]

повесьте эту процедуру на кнопку СвернутьТЧ (сделайте команду, поместите на форму) или вызывайте в событии перед закрытием формы!