Пример рекурсии в 1с #393320

Хочется посмотреть на пример рекурсии на встроенном языке 1с, только какой-нибудь реально используемый.

А что не получается?

Рекурсия - зло:)

Обработка СтруктураПодчиненности, например

А чем рекурсия на языке 1С отличается от бычной рекурсии?

Рекурсия - божестввенна (с)

Нет просто интересно, а в типовых ее нет.

а как же ?

Есть. Например в ТиС это обработка ДеревоДокументов...

В ПУБе тоже есть при расчете затрат

ПОчему зло? Нет, ну в том смысле как это реализуется именно с использованием языка самого. Беру свои слова назад

ЕСли руки кривые, то и вызов оператор присваивания - зло...

в отчетах бывает, например для обработки неопределенного уровня результата запроса

А какая разница, на каком языке?

Ага, практически в любом типовом отчете... ПечатьСтроки вроде, рекурсивно вызывается...

Спасибо, буду смотреть... А в каких случаях ее вообще стоит применять?

Ухты сколько любителей рекурсии. Агрессивных и пряморуких

для обхода дерева

когда количестви итерраций ограничено разумными пределами, но заранее не извесно

а вообще - для расчета факториала и числа фибоначчи, это в любом учебнике написано!

Ясно спасибо!

именно как в Иначе при порядка 10 тыс вызовов 1ска свалится почти наверняка. Проходил.

а для зацикленого дерева? это самые распространенные грабли, по этому пользоваться нужно с осторожностью

Зацикленное дерево - это не дерево :-)

а ты не цикли дерево :) у меня считается "задача про рюкзак" применительно к складским ячейкам через рекурсию

"куст - это совокупность веток и листьев, торчащих из одного места"©армия

Присоединяйся к клубу криворуких:)

например анализ стека выполнения макроса VB, вроде раскладываеться в дерево, ан далеко не всегда... у меня специальный анализаитор для подстановки шаблонов сделан, для определения зацикливания рекурсии.

+1 это граф...

Йа давно его президент

как ты стек вызовов умудрился зациклить? Или тебе тоже в клуб? :-))

Пипец в типовых нет. Ага. В каждом отчете.

тссс... народ просто ни разу не видел ВывестиГруппировку :)

легко.... а в клубе я уже был - выгнали за криворукость :)

решение задачи рюкзака - обсуждалосб здесь активно...

отчеты в Бюджетке 7-ке... например ОСВ по счету !!!

В ТиС вывод группировок почти в каждом отчете

Рекурсия смертельна для тех, кто любит глобальные переменные использовать.

пример можно...

и где тут по-твоему рекурсия?

тфу ну вот тебе из ТиС:

- только не горячись! спокойно!.. :)

просил пример для поста , т.е. глобальные переменными

Видимо самое простое это получение полного наименование чего либо (со всеми вышестоящими группами).

ПолноеНаименование Синтаксис: ПолноеНаименование Назначение: Возвращает строку, содержащую полное наименование выбранного элемента справочника со всеми вышестоящими уровнями, разделенными символом /.

Для выборки с заранее неизвестным количество субконто используется часто

Это элементарный пример, возможно будет нужен, если к примеру в именах групп встречаются знаки /, можно заменить на свой разделитель. Я подобное использовал при обмене - раскручивал иерархию справочников для сохранения всего дерева.

так а где пример рекурсии с глобальными переменными!

???

по определению рекурсии - глобальные переменные там нафиг не нужны, они могут использоваться, но на сам факт выполнения рекурсии никоим образом не влияют...

если голбальные переменные использовать в внутри рекурсии и менять их... или еще  что-нибудь через них замутить... но это пример криворукой рекурсии

"Чтобы понять рекурсию, надо понять рекурсию" (С)

Вот пример рекурсии. Не из типовой конфы.

1. это работать-то будет? 2. а зачем СтатусВозврата в непредопределенной процедуре?

вот пример рекурсии тоже из нетиповой:

Работать-то будет... Но за такую рекурсию отстреливать надо.

И такую рекурсию - тоже не стоит использовать.

1.Обработка досталось по наследству и все работает))). 2.не знаю... Можно убрать, только лень корректировать.

Автор никогда, слышишь, никогда не используй рекурсию!

Вот пример при переносе данных через OLE с текущей иерархией

-->

что там работать не будет? Перенесли справочник с сотрудниками более 3000 чел, все как по маслу

Из 77

Со всей иерархией

рекурсия - это красиво, как и слово так и код, но только если код красивый.

1. Много отвратительного кода - работает. От этого он не перестаёт быть отвратительным. Глупый совет. В использование рекурсии - весьма разумно. В использование рекурсии несколько противоестественно.

Так, заинтриговали... Что можно изменить в процедуре .

почему?

самое красивое использование рекурсии в - не нужно использовать 5 вложенных циклов!

В используется так называемая "хвостовая рекурсия" - то есть, рекурсивный вызов является последним исполняемым оператором рекурсивной процедуры. Рекурсивная процедура с хвостовой рекурсией: Процедура Рек(Знач Х) Процедура Нерек(Знач Х) При этом Нерек потребляет меньше памяти, работает быстрее, а выглядит ничуть не сложнее, чем Рек. Хорошие оптимизирующие компиляторы отлавливают случаи хвостовой рекурсии и сами преобразуют их в циклы. 1С не является (в данном вопросе) хорошим оптимизирующим компилятором. В рекурсия является "хвостовой" - то есть, является _более туманным_ (с точки зрения чтения) и _медленнее работающим_ эквивалентом цикла.

Факториал - другой (по сравнению с ) вид рекурсии, преобразуемый в цикл. _В 1С_ использование цикла _для таких случаев_ - проще и эффективнее (подчёркнутое - существенно). Недавно на этом форуме всплывал дурацкий пример с числами Фибоначчи, где _неправильное_ использование рекурсии повышало время вычислений с N до N*N.

А как в таком случае добиться, чтобы пользователь, к примеру ввел 9 знаков, а не меньше?

Пока ВвестиСтроку(Сумма,"Введите БИК",9,0,0)=1 Цикл

ну так получается использование допускается... правда не для больших чисел!

Можно и так, только на скорость не влияет)))

влияет на использование оперативной памяти!

Влияет. И на скорость, и на объём занимаемой памяти. Помедитируй над тем, что происходит при рекурсивном вызове, а что происходит при переходе к следующему шагу цикла.

Очень часто приходится мне на практике пользоваться рекурсией: перенос данных между конфами, разузлование спецификаций в производстве и пр. Примеры те же, что и для паскаля.

Найду человека, который быстро набивает текст и посмотрю...

Я не спорю, что будет. И я "за" рекурсию. Двумя руками. Но - применение рекурсии, как и любого другого средства, далеко не всегда целесообразно.

Любой человек набивает текст слишком медленно. Сгенерируй _большой_ файл, замени ВвестиСтроку на чтение из файла - и замерь время.

Вот на чтения из файла я никогда не буду пользоваться рекурсией.

чего его искать... можно итак понять - если использовать и постояно делать "ошибкци", т.е. вызывать рекурсию, то стек вызова будет с каждым разом увеличиваться !!! а вот - не будет!

А чем отличается ввод с клавиатуры от чтения из файла?

я думаю, что её использование должно быть в умелых руках!

Понятно объяснил... Спорить не буду... Но все же пользователю достаточно ошибится три раза. Не думаю, что пользователь ошибется 100 раз и более.

Смотря для чего...

- dblbvj yt dbltk ytjdys[ gjkmpjdfntktq!

В данном случае - разницы нет.

- видимо не видел нервных полльзователей

Ладно, всем спасибо! Сегодня я стал умнее чуть-чуть...