Комплексная конфигурация 7.7(самописная)

Добрый день!!!<br>Подскажите пожалуйста кто может,если конечно что-то станет понятно из моего<br>рассказа.<br>Есть документ Заказ,на его форме есть реквизит ПолеВвода - "ВЗ", в который <br>автоматически с новой строки помещается такая строка "ПолныйКод()_Наименование_Цена".<br>При выводе документа на печать просто выводился перечень строк из этого реквизита.Сейчас<br>возникла необходимость сортировать строки (пока неважно по какому из полей) для <br>отслеживания дублей.<br>Вопрос,как в печатную форму документа передавать каждую строку из "ВЗ" и как впоследствии<br>можно их отсортировать(сгрупировать).<br>А может я не тем путём пошла???Может можно группировать сразу при автоматическом вводе <br>строки в ВЗ??? <br>Спасибо за помощь!!!

"Смутно, но примерно понятно.<br>Насколько я понял, "ВЗ" - поле для ввода многострочного текста и этот текст выглядит там примерно так:<br>000010_Колесо_5000.00<br>000014_Шина_2200.00<br>000031_Фара_4000.00<br><br>При этом значения в строках могут повторяться и основная задача - поиск дублей строк.<br>//Текстовое поле преобразуем в таблицу значений. С ней работать проще.<br>ТаблДанных=СоздатьОбъект("ТаблицаЗначений");<br>ТаблДанных.НоваяКолонка("Код");<br>ТаблДанных.НоваяКолонка("Наименование");<br>ТаблДанных.НоваяКолонка("Цена");<br>Для i=1 По СтрКоличествоСтрок(ВЗ) Цикл<br> Стр=СтрПолучитьСтроку(ВЗ,i);<br> Если ПустаяСтрока(Стр)=0 Тогда<br>       СписокРеквизитов=глРазложить(Стр,"_");<br>       Если СписокРеквизитов.РазмерСписка()=3 Тогда<br>             ТаблДанных.НоваяСтока();<br>             ТаблДанных.Код=СписокРеквизитов.ПолучитьЗначение(1);<br>             ТаблДанных.Наименование=СписокРеквизитов.ПолучитьЗначение(2);<br>             ТаблДанных.Цена=СписокРеквизитов.ПолучитьЗначение(3);<br>       КонецЕсли;<br> КонецЕсли;<br>КонецЦикла;<br>//получили ТаблДанных, которую можно сортировать, сворачивать и т.п.<br>//для примера решим подзадачу о выяснении дубликатов строк по ключевому полю, пусть, например, таким полем будет "Наименование"<br>КлонТаблДанных=СоздатьОбъект("ТаблицаЗначений");<br>ТаблДанных.Выгрузить(КлонТаблДанных);<br>КлонТаблДанных.НоваяКолонка("КоличествоВхождений","Число",10,0);<br>КлонТаблДанных.Заполнить(1,,,"КоличествоВхождений");<br>КлонТаблДанных.Свернуть("Наименование","КоличествоВхождений");<br>Для i=1 По КлонТаблДанных.КоличествоСтрок() Цикл<br> Если КлонТаблДанных.ПолучитьЗначение(i,"КоличествоВхождений")>1 Тогда<br>       Стр="В данных имеется дублирование по позиции """""+КлонТаблДанных.ПолучитьЗначение(i,"Наименование")+""""" в строках: ";<br>       Для t=1 По ТаблДанных.КоличествоСтрок() Цикл<br>             Если КлонТаблДанных.ПолучитьЗначение(i,"Наименование")=ТаблДанных.ПолучитьЗначение(t,"Наименование") Тогда<br>                   Стр=Стр+Строка(t)+", ";<br>             КонецЕсли;<br>       КонецЦикла;<br>       Сообщить(Лев(Стр,СтрДлина(Стр)-2));<br> КонецЕсли;<br>КонецЦикла;"

Ух ты!!!Ну вы как всегда меня не подвели,но неожидала что всё будет так отлично.<br>Буду сейчас пробовать.<br>Заранее огромадное спасибо!Thorvardr просто супер помощник.<br>Обязательно напишу про результаты

как это комплексная-самописная ?