&НаКлиенте
Процедура  ДобавитьРазвернутыеУровни(Массив)
   
   Массив = Новый Массив;
   //ЭлементыДерева = СписокЗадачОтМеня.ПолучитьЭлементы();
   //

   Для Каждого Строка Из Элементы.СписокЗадачОтМеня.ТекущиеДанные.Ссылка Цикл
   
           Если Элементы.СписокЗадачОтМеня.Развернут(Строка) = Истина Тогда
            Массив.Добавить(Строка);
        КонецЕсли;
       
       КонецЦикла;
   
   
   
   
         
КонецПроцедуры

Помогите!

Задача какая?

рекурсией обойти все дерево можно

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

см (3)