Skip to content

Instantly share code, notes, and snippets.

Show Gist options
  • Save anonymous/e5b86515ddd72b4eee1554a4476c0a20 to your computer and use it in GitHub Desktop.
Save anonymous/e5b86515ddd72b4eee1554a4476c0a20 to your computer and use it in GitHub Desktop.
Выгрузить дерево значений в таблицу значений 1с

Выгрузить дерево значений в таблицу значений 1с


Выгрузить дерево значений в таблицу значений 1с



Пример преобразования дерева значений в таблицу значений и обратно в 1Cv8
1С 8.x : Преобразование дерева значений в таблицу значений и обратно
Преобразование дерева значений в таблицу значений и обратно


























Задача по преобразованию дерева значений в таблицу значений встречается не так чтобы часто, но тем не менее встречается и я привожу в этой статье свое решение этой задачи. Две дополнительные колонки в таблице значений нужны для обратного преобразования, если оно не требуется то и колонки не нужны. Работу приведенного выше кода можно посмотреть в маленькой обработке. И спасибо автору, мне пригодилось. Программирование Язык 1С Глобальный контекст Типы данных Платформа Хитрости Обзоры Разное Поиск. Дерево значений в таблицу значений Дано: ГУИД ; КонецЕсли; КонецЦикла; КонецПроцедуры. ПреобразоватьВТЗРекурсия тДерево , тТаблица , Новый УникальныйИдентификатор "" ;. ЗначениеВРеквизитФормы тТаблица , "Таблица" ;. ЗначениеВРеквизитФормы тДерево , "Дерево" ;. Процедура ПреобразоватьВТЗРекурсия тДерево , тТаблица , ГУИД. Для Каждого тСтр Из тДерево. ПреобразоватьВТЗРекурсия тСтр , тТаблица , нСтр. Колонка2; ПреобразоватьВДЗРекурсия нСтр, тТаблица, тСтр. ГУИД ; КонецЦикла; КонецПроцедуры. ПреобразоватьВДЗРекурсия тДерево , тТаблица , Новый УникальныйИдентификатор "" ;. Процедура ПреобразоватьВДЗРекурсия тДерево , тТаблица , ГУИД. Для Каждого тСтр Из тМассив Цикл. ПреобразоватьВДЗРекурсия нСтр , тТаблица , тСтр. Похожие материалы Работа с деревом значений в 1С Отбор в таблице значений Как программно добавить колонку в табличную часть управляемой формы Звук в 1С 8 Проверка ИНН и генератор ИНН в 1С. Отбор в таблице значений. Работа с деревом значений в 1С. Оставить комментарий Отменить ответ. Карта сайта О блоге.


Дерево значений в таблицу значений или в табличную часть и обратно


Предприятие Работа Wiki Книга знаний Каталог разработок Вход. Предлагаю процедуры перевода дерева значений в таблицу значений и обратно: ТипЗначения ; КонецЦикла ; КонецЕсли ; Для Каждого СтрокаДерева Из Дерево. Строки Цикл ЗаполнитьЗначенияСвойств Таблица. Добавить , СтрокаТаблицы ; Иначе ЗаполнитьЗначенияСвойств СтрокаГруппировки. Добавить , СтрокаТаблицы ; КонецЕсли ; КонецЦикла ; Возврат Дерево. Уж и не знаю, что бы мы без тебя делали А я уже всю неделю этот код пишу, ломаю голову, а тут на тебе Отпечатай, вставь в рамочку и Нормальный код из серии "простые приёмы разработки". Любой выложенный код почему-то воспринимается как вызов себе любимому. Скопировать ; почему просто не вернуть дерево??? Я не претендую на идеальный код, просто долго мучался с этими деревьями. Скопировать - нужно было для моей задачи, а потом, после переработки процедур просто забыл поправить. Текст поставляется как говорится как есть. Вообще говоря у меня целый модуль разрабатываю отраслевое решение , может быть кому-нибудь и пригодится. КлючСтроки ; ПолучитьНовыйКлючСтрокиДерева СтрокаДерева, СписокКлючей ; СписокКлючей. Добавить ; СкопироватьПодчиненныеСтроки НоваяСтрока, СтрокаПереноса ; ЗаполнитьЗначенияСвойств НоваяСтрока, СтрокаПереноса ; НоваяСтрока. КлючСтроки; КонецЦикла ; Для Каждого СтрокаДерева Из МассивСтрок Цикл Если СтрокаДерева. Удалить СтрокаДерева ; Иначе СтрокаДерева. Строки Цикл Если НЕ СтрокаДерева. Строки Цикл Если СтрокаДерева. Авторасчет Тогда Если НЕ СтрокаДерева. НумерацияЭлементов Тогда ПеренумероватьЭлементыДерева ДеревоЗначений, кНомерПозиции. НумерацияЭлементовСквозная Тогда ПеренумероватьЭлементыДереваСквозная ДеревоЗначений, кНомерПозиции. НумерацияГрупп Тогда ПеренумероватьГруппыДерева ДеревоЗначений, кНомерПозиции. НумерацияГруппИЭлементов Тогда ПеренумероватьГруппыИЭлементыДереваВИерархии ДеревоЗначений, кНомерПозиции. Имя, ВсеУровни ; КонецЕсли ; КонецПроцедуры. А то есть тут у нас один Есть подозрение, что это твой давно потеряный брат: Не знаю кто это. Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть. Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере. Ветка сдана в архив. Но вы можете создать новую ветку и вам обязательно ответят! Каждый час на Волшебном форуме бывает более человек. Такое сокровище и бесплатно? Для "vmv" Может поделишься кодом? Список тем форума Обновить ветку.


Ru словарь англо русский
Правила перевода фамилий с русского на английский
Перспективный план по фгос музыкального руководителя доу
Найти деталь по каталогу
Когда можно исповедаться и причаститься
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment