Преобразование Структуры в Дерево значений и Дерева значений в Структуру. Управляемые формы

10.02.23

Разработка - Инструментарий разработчика

Достаточно много информации о том, как заполнить дерево значений из структуры, массива, и прочих входящих данных. А вот как дерево значений преобразовать обратно, не найти. Решил исправить этот недочёт. Держите велосипед.

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование	Скачано	Купить файл	По подписке PRO
Структура в Дерево значений, Дерево значений в Структуру: .epf 9,07Kb 12	12	1 850 руб. Купить	1 SM Скачать

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

Храню настройки в структуре. И для их быстрого просмотра, а также для внесения мелких правок, не прибегая к форме настроек, изобрёл небольшую обработку.

Всё запилено в рекурсии.

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

Обработка является кодовой базой, для своего проекта. Кодил на платформе: 8.3.21.1393, код будет работать на любой платформе с управляемыми формами.

Пример кода, собирающего структуру по дереву значений.

#Область ДеревоВСтруктуру

//Дерево в структуру



&НаСервере
Процедура ПреобразоватьТаблицуВСтруктуру()
	ДеревоЗначений = РеквизитФормыВЗначение("Параметры");
	ВхДанные = ДеревоВСтруктуру(ДеревоЗначений);
	НастройкиЗаписать(ВхДанные);
КонецПроцедуры

&НаСервере
Функция ДобавитьЗапистьВПараметры(РезультатПараметры, СтрокаДЗ)
	ДобавленоВМассив = Ложь;
	Если		СтрокаДЗ.ТипЗначения = "Массив" Тогда
		Если ТипЗнч(РезультатПараметры) = Тип("Массив") Тогда
			РезультатПараметры.Добавить(Новый Массив);
			ДобавленоВМассив = Истина;
		Иначе
			РезультатПараметры.Вставить(СтрокаДЗ.Имя, Новый Массив);
		КонецЕсли;
	ИначеЕсли	СтрокаДЗ.ТипЗначения = "Структура" Тогда
		Если ТипЗнч(РезультатПараметры) = Тип("Массив") Тогда
			РезультатПараметры.Добавить(Новый Структура);
			ДобавленоВМассив = Истина;
		Иначе
			РезультатПараметры.Вставить(СтрокаДЗ.Имя, Новый Структура);
		КонецЕсли;
	ИначеЕсли	СтрокаДЗ.ТипЗначения = "Соответствие" Тогда
		Если ТипЗнч(РезультатПараметры) = Тип("Массив") Тогда
			РезультатПараметры.Добавить(Новый Соответствие);
			ДобавленоВМассив = Истина;
		Иначе
			РезультатПараметры.Вставить(СтрокаДЗ.Имя, Новый Соответствие);
		КонецЕсли;
	Иначе
		Если СтрокаДЗ.Родитель <> Неопределено И СтрокаДЗ.Родитель.ТипЗначения = "Массив" Тогда
			РезультатПараметры.Добавить(СтрокаДЗ.Значение);
			ДобавленоВМассив = Истина;
		Иначе
			РезультатПараметры.Вставить(СтрокаДЗ.Имя, СтрокаДЗ.Значение);
		КонецЕсли;
	КонецЕсли;
	Если ДобавленоВМассив Тогда
		УказательНаОбъектВСтруктуре = РезультатПараметры[РезультатПараметры.Количество()-1];
	Иначе
		УказательНаОбъектВСтруктуре = РезультатПараметры[СтрокаДЗ.Имя];
	КонецЕсли;
	Возврат УказательНаОбъектВСтруктуре;
КонецФункции

&НаСервере
Процедура ОбработатьВложенныеСтроки(УказательНаОбъектВСтруктуре, СтрокаДЗ)
	Если СтрокаДЗ.Строки.Количество() > 0 Тогда
		Для Каждого Подстрока Из СтрокаДЗ.Строки Цикл
			Если		СтрокаДЗ.ТипЗначения = "Массив" Тогда
				УказательНаПодОбъектВСтруктуре = ДобавитьЗапистьВПараметры(УказательНаОбъектВСтруктуре, Подстрока);
				ОбработатьВложенныеСтроки(УказательНаПодОбъектВСтруктуре, Подстрока);
			ИначеЕсли		СтрокаДЗ.ТипЗначения = "Структура"
						ИЛИ СтрокаДЗ.ТипЗначения = "Соответствие" Тогда
				УказательНаПодОбъектВСтруктуре = ДобавитьЗапистьВПараметры(УказательНаОбъектВСтруктуре, Подстрока);
				ОбработатьВложенныеСтроки(УказательНаПодОбъектВСтруктуре, Подстрока);
			КонецЕсли;
		КонецЦикла;
	КонецЕсли;
КонецПроцедуры

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


#КонецОбласти

Вступайте в нашу телеграмм-группу Инфостарт

Дерево значений ДеревоЗначений Преобразовать значение в дерево значений Преобразовать массив в Дерево значений Преобразовать Структуру в Дерево значений Конвертация Дерева значения в массив Конвертация Дерева значения в структуру.

+3 –

См. также

Infostart Toolkit: Инструменты для разработчика 1С:8.3

Инструментарий разработчика Роли и права Запросы СКД Программист Руководитель проекта 1С v8.3 Управляемые формы Запросы Система компоновки данных Платные (руб)

Инструменты для разработчиков 1С 8.3: Infostart Toolkit. Автоматизация и ускорение разработки на управляемых формах. Легкость работы с 1С.

15500 руб.

02.09.2020 225696 1224 415

1071

Database Compression Tool: Инструмент для свертки и сжатия баз данных 1С

Инструментарий разработчика Чистка данных Свертка базы Инструменты администратора БД Системный администратор Программист Руководитель проекта 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Россия Платные (руб)

Инструмент представляет собой обработку для проведения свёртки или обрезки баз данных. Работает на ЛЮБЫХ конфигурациях (УТ, БП, ERP, УНФ, КА и т.д.). Поддерживаются серверные и файловые базы, управляемые и обычные формы. Может выполнять свертку одновременно в несколько потоков. А так же автоматически, без непосредственного участия пользователя. Решение в Реестре отечественного ПО

14400 руб.

20.08.2024 47977 268 138

243

Вайб-кодинг в 1С = Infostart MCP серверы

Инструментарий разработчика Нейросети Платные (руб)

Первые попытки разработки на 1С с использованием больших языковых моделей (LLM) могут разочаровать. LLMки сильно галлюцинируют, потому что не знают устройства конфигураций 1С, не знают нюансов синтаксиса. Но если дать им подсказки с помощью MCP, то результат получается кардинально лучше. Далее в публикации: MCP для поиска по метаданым 1С, справке синтакс-помошника и проверки синтаксиса.

9900 руб.

25.08.2025 22077 56 9

Infostart PrintWizard (конструктор печатных форм)

Пакетная печать Печатные формы Инструментарий разработчика Программист 1С v8.3 Запросы 1С:Зарплата и кадры бюджетного учреждения 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Библиотека стандартных подсистем Платные (руб)

Расширение для создания и редактирования печатных форм в системе 1С:Предприятие 8.3. Благодаря конструктору можно значительно снизить затраты времени на разработку печатных форм, повысить качество и прозрачность разработки, а также навести порядок в многообразии корпоративных печатных форм.

22200 руб.

06.10.2023 29194 77 30

104

Infostart DataFormWizard: Управление данными и формами в 1С 8.3

Инструменты администратора БД Инструментарий разработчика Роли и права Программист 1С v8.3 1C:Бухгалтерия Россия Платные (руб)

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

16000 руб.

10.11.2023 20630 84 42

OneDebugger - инструмент для отладки кода в 1С без использования конфигуратора

Инструментарий разработчика Программист 1С v8.3 Платные (руб)

Инструмент для написания и отладки кода в режиме «1С:Предприятие». Представляет собой консоль кода с возможностью пошаговой отладки, просмотра значений переменных любых типов, использования процедур и функций, просмотра стека вызовов, вычисления произвольных выражений на встроенном языке в контексте точки останова, синтаксического контроля и остановки по ошибке. В консоли используется удобный редактор кода с подсветкой, контекстной подсказкой, возможностью вызова конструкторов запроса и форматной строки.

9500 руб.

17.05.2024 41201 151 57

190

SALE! %

PowerTools: Инструменты администратора 1С 8.3

Инструментарий разработчика Инструменты администратора БД Системный администратор Программист Бизнес-аналитик 1С v8.3 Управляемые формы 1C:ERP 1С:УТ 1С:ДО 1С:Бухгалтерия 3.0 1С:ERP. Управление холдингом 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 1С:Управление торговлей 11 Россия Платные (руб)

Универсальный инструмент программиста для администрирования конфигураций. Сборник наиболее часто используемых обработок под единым интерфейсом.

~~6000~~ 4800 руб.

14.01.2013 205044 1204 0

952

Многопоточность в 1С. Универсальный "Менеджер потоков"

Инструментарий разработчика Программист 1С v8.3 1C:Бухгалтерия Россия Платные (руб)

Восстановление партий или взаиморасчетов, расчет зарплаты, пакетное формирование документов или отчетов - теперь все это стало доступнее. * Есть желание повысить скорость работы медленных алгоритмов! Но... * Нет времени думать о реализации многопоточности? * о запуске и остановке потоков? * о поддержании потоков в рабочем состоянии? * о передаче данных в потоки и как получить ответ из потока? * об организации последовательности? Тогда ЭТО - то что надо!!!

6000 руб.

07.02.2018 109484 250 100

314