v7: Рекурсивная функция #635038

Есть вот такая функция, которая проверяет наличие строки в таблице значений и возвращает 1 в случае нахождения Так вот, эта функция возвращает не то, что должна. Например: нашлась строка с заданными реквизитами и функция должна вернуть 1, но если смотреть в отладчике, то сначала действительно возвращается 1, а вот потом рекурсия возвращается на предыдущий шаг и берет и возвращает 0. Че за х..ня не пойму ни как. Может сталкивался кто-нибудь с такой засадой

как вызываешь ее?

А зачем рекурсия?

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

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

не иначе

но ведь она у тебя ничего и не возвращает. Юморист. До пятницы еще несколько минут.

чувствуешь?

Если ты про "продолжить", то после этого идет вывод строки в отчет в цикле, а я вывод этой строки пропускаю.

он про не возвращает, но тебе и на это там наплевать

*баный стыд... а не код. Как ты это говно читаешь?

Как правильно возвращать результат в рекурсивной функции в 1С?

Да это форум перековеркал. А код большей частью из ТиС типового

чему то присвоить. Переменной какой нибудь. АП то у тебя функция выполняется просто так, результат куда-то в небо передаешь.

правильно возвращать значение по умолчанию вне условий, а затем ещё и проверять что вернули

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

Вот так сделал. Один фиг тоже самое Функция НайтиЗначениеВТаблице(ТЗ, Номенклатура, Серия, ЦенаПрод, НомерСтроки)

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

Кому ты вернул результат? И убери рекурсию - за неё тут расстрелять нужно даже за работающую.

но лучше разбег, стена, конец карьеры

Бл.. генитально

(20 Спасибо дружище

А без рекурсии получается громоздкий код, а с рекурсией красота

не вижу там громоздкости

Где там?

в умозрительно трансформированном коде

Изобрази, если не сложно

один малюсенький цикл

Очень надеюсь что тема - шутка.

ну....

поверь на слово

Замени-ка ты эту рекурсию на массив (стэк) - прерви поиск, где тебе надо и всё пучком. Этот способ гораздо гибче.

А в сабже замени это НайтиЗначениеВТаблице(ТЗ, Номенклатура, Серия, ЦенаПрод, НомерСтроки+1); Возврат НайтиЗначениеВТаблице(ТЗ, Номенклатура, Серия, ЦенаПрод, НомерСтроки+1); Неудивительно, что она 0 возвращает

Тоже не понял, почему бы просто не перебрать в цикле ТЗ до момента позиционирования на записи удовлетворяющей условию

Да, слов нет. Вот твой "громоздкий код"

В рекурсии конечно великая сила, но в данном случае - из пушки по воробьям.

Работает очень медленно по сравнению с моим вариантом. Лобовое решение, но не оптимальное

Оно не может работать медленнее, потому как ПолучитьСтроку работает быстрее, чем ПолучитьСтрокуПоНомеру Функции в в принципе нерабочая, т.к. нет проверки на выход из диапазона строк (НомерСтроки > ТЗ.КоличествоСтрок) Почитайте какие-нибудь книжки по программированию.

Я бы использовал в таком случае "ИндексированнуюТаблицу". Условия вида: (ТЗ.СерияНоменклатуры = Серия) и (ТЗ.ЦенаПрод = ЦенаПрод) фильтруется на ура. Условие (ТЗ.ДатаПартии - ДатаПоступления) < 0 обрабатывать перебором по отфильтрованной ТЗ.

А Вы попробуйте сравнить. ПолучитьСтроку работает с выборкой всей таблицы, и пока доберешься до нужной строки можешь перебрать почти всю таблицу. А найтиЗначение и потом ПолучитьСтрокуПоНомеру позиционирует сразу на нужную строку в таблице. Иногда лучше жевать, чем говорить

если действительно нужна скорость, то индексы в ТЗ спасут

если надо высокую скорость, то можно и посложней методы применить. Например сортировка + дихотомический поиск. Ну или сразу ИТ.

Согласен, но код сложнее будет, т. к. придется сначала таблицу "переколбасить", а по производительности меня вариант с рекурсией вполне устроил.

Код будет сложнее всего 1 раз. Есть же такая штука, "повторное использование кода". Например:

//Вариант 1 Для каждого СтрокаТЗ из ТЗ Цикл  ... Действительно "Иногда лучше жевать". И не мучай больше бедный стек вызовов, без особой нужды.

Вы не правы, Ваш вариант медленнее! Это что касается ПолучитьСтрокуи ПолучитьСтрокуПоНомеру Еще различия могут быть что сравнение по номенклатуре вынесено у Вас в отдельное условие и проверка напр. (ТЗ.ДатаПартии - ДатаПоступления) < 0) для большинства строк вообще не выполняется, Но в моём варианте условия тоже можно легко разделить.

Ах тыж 7ка)

Кто-нибудь знает, 1С проверяет сложные условия полностью или по сокращенной схеме?

полность.

7.7 проверяет условие целиком, 8.х - по сокращенной. Это один из пунктов, почему меня подташнивает от 7.7

Чего спорить-то? Изначально сделал по Вашему варианту. Меня не устроила скорость работы отчета. Поэтому и начал извращаться.

Такое ощущение, что для большинства присутствующих - рекурсия что-то злое и неправильное. Лучше 100500 строк дополнительного кода написать, чтобы потом никто не разобрался, как оно работает

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

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

Глупости

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

см. как раз мой случай, проверка нескольких строк

Там в цикле проверка идет. Запрос в цикле не айс гонять

"Там в цикле проверка идет. Запрос в цикле не айс гонять" Твою ветку уже поместили сюда: Хочешь стать героем дня?