1С Вывод справочника, таблицы значений в дерево значений

Процедура Кнопка1Нажатие(Элемент) Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | Номенклатура.Код, | Номенклатура.Наименование, | 0 КАК Количество |ИЗ | Справочник.Номенклатура КАК Номенклатура |ГДЕ | Номенклатура.ЭтоГруппа = ИСТИНА | |УПОРЯДОЧИТЬ ПО | Номенклатура.ЭтоГруппа ИЕРАРХИЯ, | Номенклатура.Наименование"; ТабДерево = Запрос.Выполнить().Выгрузить(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией); Запрос.Текст = "ВЫБРАТЬ | КОЛИЧЕСТВО(РАЗЛИЧНЫЕ Номенклатура.Ссылка) КАК ВсегоЭлементов |ИЗ | Справочник.Номенклатура КАК Номенклатура |ГДЕ | Номенклатура.ЭтоГруппа = ИСТИНА"; ВыборкаКоличество = Запрос.Выполнить().Выгрузить(); КоличествоПапок = ВыборкаКоличество[0].ВсегоЭлементов; ПолучитьКоличество(ТабДерево.Строки); ЭлементыФормы.ТабДерево.СоздатьКолонки(); КонецПроцедуры Функция ПолучитьКоличество(Строки) Для Каждого Строка из Строки цикл Запрос = Новый Запрос; Запрос.УстановитьПараметр("Родитель",Справочники.Номенклатура.НайтиПоКоду(Строка.Код)); Запрос.Текст = "ВЫБРАТЬ | КОЛИЧЕСТВО(РАЗЛИЧНЫЕ Номенклатура.Ссылка) КАК ВсегоЭлементов |ИЗ | Справочник.Номенклатура КАК Номенклатура |ГДЕ |...