Как обойти, перебрать дерево значений?

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

//Вызываем перебор так:
Дерево = Новый ДеревоЗначений;
Запрос = Новый Запрос;
Запрос.Текст="ВЫБРАТЬ
  |Ном.Ссылка как ссылка
  |ИЗ
  | Справочник.Номенклатура КАК Ном
  |ИТОГИ ПО
  |Ном.Ссылка ТОЛЬКО ИЕРАРХИЯ";
Дерево = Запрос.Выполнить().Выгрузить(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией);
// перебор дерева значений
ОбойтиУровеньДерева(Дерево.Строки);