Рекурсия

[Пустовалов Артем]

Всем привет) Есть код добавления строк в дерево значений)

Пока Выборка.Следующий() Цикл
      
      Если Выборка.ключСвязи = 0 Тогда
         Строка = Дерево.Строки.Добавить();   
         Строка.Номенклатура = Выборка.Номенклатура;
         Строка.КлючСвязи = Выборка.КлючСвязи;
         Строка.КлючСтроки = Выборка.КлючСтроки
      Иначе
         
         Для Каждого Строка из Дерево.Строки Цикл
            
            Если Строка.КлючСтроки = Выборка.КлючСвязи Тогда
               Строка1 = Строка.Строки.Добавить();
               Строка1.Номенклатура = Выборка.Номенклатура;
               Строка1.КлючСвязи = Выборка.КлючСвязи;
               Строка1.КлючСтроки = Выборка.КлючСтроки;
            Иначе
               
               Для Каждого Строка1 из Строка.строки Цикл
                  
                  Если Строка1.КлючСтроки = Выборка.КлючСвязи Тогда
                     Строка2 = Строка1.Строки.Добавить();
                     Строка2.Номенклатура = Выборка.Номенклатура;
                     Строка2.КлючСвязи = Выборка.КлючСвязи;
                     Строка2.КлючСтроки = Выборка.КлючСтроки;
                  Иначе
                     Для Каждого Строка2 из Строка1.строки Цикл
                        Если Строка2.КлючСтроки = Выборка.КлючСвязи Тогда
                           Строка3 = Строка2.Строки.Добавить();
                     Строка3.Номенклатура = Выборка.Номенклатура;
                     Строка3.КлючСвязи = Выборка.КлючСвязи;
                     Строка3.КлючСтроки = Выборка.КлючСтроки;
                  КонецЕсли;
                  КонецЦикла;

                  КонецЕсли ;
               КонецЦикла ;
            КонецЕсли;
         КонецЦикла ;
         
      КонецЕсли;
      


Но уровней много. Погуглил - Выход рекурсия. Но ни как не разберусь как ее сделать.Как можно реализовать Эту рекурсию.

[Vladimir_Sh]

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

[Пустовалов Артем]

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

Хочу попробывать рекурсивно.

[Vladimir_Sh]

Тогда что то подобное:

Код Выделить Развернуть

Процедура ОбходДереваЗначений(СтрокаДерева)
   
    Для Каждого Строка Из СтрокаДерева.Строки Цикл
       
         //Что то делаем
       
         ОбходДереваЗначений(Строка);

    КонецЦикла;

КонецПроцедуры

[DmitriyF]

Пустовалов Артем, а зациклиани не боишься

[Пустовалов Артем]

Пустовалов Артем, а зациклиани не боишься

А какие у тебя еще есть предложения?)

[Vladimir_Sh]

В моем варианте зацикливания не будет, но при большом уровне вложенности может не хватить стека вызовов(по-моему так называется) и платформа закроется без каких либо предупреждений/ошибок

[Пустовалов Артем]

Тогда что то подобное:

Код Выделить Развернуть

Процедура ОбходДереваЗначений(СтрокаДерева)
   
    Для Каждого Строка Из СтрокаДерева.Строки Цикл
       
         //Что то делаем
       
         ОбходДереваЗначений(Строка);

    КонецЦикла;

КонецПроцедуры

Не работает почему то Наверное я что то не так делаю) Вот мой код

Процедура ОбходДереваЗначений(Дерево,ВыборкаКлюча)
       
   Для Каждого Строка Из Дерево.Строки Цикл
      Если  Строка.КлючСтроки = ВыборкаКлюча.КлючСвязи Тогда
         Стр = Дерево.Строки.Добавить();
      
               Стр.Номенклатура = ВыборкаКлюча.Номенклатура;
               Стр.КлючСвязи = ВыборкаКлюча.КлючСвязи;
               Стр.КлючСтроки = ВыборкаКлюча.КлючСтроки;

       ОбходДереваЗначений(Строка,ВыборкаКлюча);
       КонецЕсли
   КонецЦикла;
КонецПроцедуры

Если засовывать туда строку то тут Для Каждого Строка Из СтрокаДерева.Строки Цикл Строка не определена

[Vladimir_Sh]

А что у Вас такое "ВыборкаКлюча"? При обходе я не вижу чтобы она изменялась. Предпологаю что это ТаблицаЗначений, если так то гуглите как преобразовать ТЗ в ДЗ в интернете очень много информации.

[Пустовалов Артем]

А что у Вас такое "ВыборкаКлюча"? При обходе я не вижу чтобы она изменялась. Предпологаю что это ТаблицаЗначений, если так то гуглите как преобразовать ТЗ в ДЗ в интернете очень много информации.

ВыборкаКлюча это выборка из запроса