Подскажите пожалуйста как найти максимальный уровень дерева значений

ДЗ.КоличествоУровней()

(0) пробежаться по дереву с рекурсией
(1) нет такого.. =)

(2) блин. через три релиза в платформе будет. поторопился

Так првильно?

Уровень = 0;

ОбрататьДерево(ДеревоЗн.Строки);

Процедура ОбрататьДерево(Строки)
   Уровень = Уровень + 1;
   Для Каждого Строка Из Строки Цикл
       ОбрататьДерево(Строка.Строки);      
   КонецЦикла;    
КонецПроцедуры // ОбрататьДерево()

(4) нет.
Уровень-то ты как получишь?
Либо переменную делать глобальной (в пределах модуля), что не айс, либо функция рекурсивную - которая будет возвращать уровень.

А как првильно?

НулевойУровень = 0;МаксУровень = 0;

ОбрататьДерево(ДеревоЗн.Строки, НулевойУровень);

Процедура ОбрататьДерево(Строки, Знач Уровень)

   Уровень = Уровень + 1;
   Если МаксУровень < Уровень Тогда
       МаксУровень = Уровень;
   КонецЕсли;
   Для Каждого Строка Из Строки Цикл
       ОбрататьДерево(Строка.Строки, Уровень);      
   КонецЦикла;    
КонецПроцедуры // ОбрататьДерево()

(7) Можно и без глобальных переменных.

(6) Думать же надо...
Вот 1С лениво запускать проверить и с СП сверится, но как-то так...

Функция КоличествоУровней(СтрокиДЗ)
  Если СтрокиДЗ.Количество() = 0 Тогда Возврат 0 КонецЕсли;

  КоличествоУровней = 0;
  Для Каждого СтрокаДЗ ИЗ СтрокиДЗ Цикл
      КоличествоУровней = Макс(КоличествоУровней(СтрокиДЗ), КоличествоУровней);
  КонецЦикла;

  Возврат КоличествоУровней + 1;
КонецФункции

*КоличествоУровней = Макс(КоличествоУровней(СтрокаДЗ.Строки), КоличествоУровней);

Да и начальное условие не надо вроде как...
В бесконечную рекурсию не впадет