1С 8.3 Имена свойств объекта метаданных
Данные > Примеры кода 1С > 1С 8.3 Описание типов
Перейти в раздел примеры кода 1С 8.3:
Имена свойств объекта метаданны в 1С 8.3:
// Имена свойств объекта метаданных.
// Источник: https://github.com/SeiOkami/CollectionMethodsOneS/issues/70
//
// Параметры:
// ОбъектМетаданныхИлиПолноеИмя - ОбъектМетаданных, Строка - Объект метаданных
// ПроверяемыеСвойства - Строка - Имена свойств через ","
//
// Возвращаемое значение:
// Массив из Строка
Функция ИменаСвойствОбъектаМетаданных(Знач ОбъектМетаданныхИлиПолноеИмя, Знач ПроверяемыеСвойства = "") Экспорт
Если ТипЗнч(ОбъектМетаданныхИлиПолноеИмя) = Тип("Строка") Тогда
ОбъектМетаданных = Метаданные.НайтиПоПолномуИмени(ОбъектМетаданныхИлиПолноеИмя);
Иначе
ОбъектМетаданных = ОбъектМетаданныхИлиПолноеИмя; // ОбъектМетаданных
КонецЕсли;
Если ПустаяСтрока(ПроверяемыеСвойства) Тогда
ПроверяемыеСвойства = "Измерения,Ресурсы,Реквизиты,СтандартныеРеквизиты,ТабличныеЧасти";
КонецЕсли;
ИменаСвойств = Новый Массив; // Массив из Строка
КоллекцииСвойств = Новый Структура(ПроверяемыеСвойства);
ЗаполнитьЗначенияСвойств(КоллекцииСвойств, ОбъектМетаданных);
Для Каждого КлючИЗначение Из КоллекцииСвойств Цикл
КоллекцияСвойств = КлючИЗначение.Значение;
Если КоллекцияСвойств <> Неопределено Тогда
Для Каждого ТекущееСвойство Из КоллекцияСвойств Цикл // ОбъектМетаданных
ИменаСвойств.Добавить(ТекущееСвойство.Имя);
КонецЦикла;
КонецЕсли;
КонецЦикла;
Возврат ИменаСвойств;
КонецФункции
// MIT License
// Copyright (c) 2024 SeiOkami
//
// Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files
// (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify,
// merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
// The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
// Источник: https://github.com/SeiOkami/CollectionMethodsOneS/issues/70
//
// Параметры:
// ОбъектМетаданныхИлиПолноеИмя - ОбъектМетаданных, Строка - Объект метаданных
// ПроверяемыеСвойства - Строка - Имена свойств через ","
//
// Возвращаемое значение:
// Массив из Строка
Функция ИменаСвойствОбъектаМетаданных(Знач ОбъектМетаданныхИлиПолноеИмя, Знач ПроверяемыеСвойства = "") Экспорт
Если ТипЗнч(ОбъектМетаданныхИлиПолноеИмя) = Тип("Строка") Тогда
ОбъектМетаданных = Метаданные.НайтиПоПолномуИмени(ОбъектМетаданныхИлиПолноеИмя);
Иначе
ОбъектМетаданных = ОбъектМетаданныхИлиПолноеИмя; // ОбъектМетаданных
КонецЕсли;
Если ПустаяСтрока(ПроверяемыеСвойства) Тогда
ПроверяемыеСвойства = "Измерения,Ресурсы,Реквизиты,СтандартныеРеквизиты,ТабличныеЧасти";
КонецЕсли;
ИменаСвойств = Новый Массив; // Массив из Строка
КоллекцииСвойств = Новый Структура(ПроверяемыеСвойства);
ЗаполнитьЗначенияСвойств(КоллекцииСвойств, ОбъектМетаданных);
Для Каждого КлючИЗначение Из КоллекцииСвойств Цикл
КоллекцияСвойств = КлючИЗначение.Значение;
Если КоллекцияСвойств <> Неопределено Тогда
Для Каждого ТекущееСвойство Из КоллекцияСвойств Цикл // ОбъектМетаданных
ИменаСвойств.Добавить(ТекущееСвойство.Имя);
КонецЦикла;
КонецЕсли;
КонецЦикла;
Возврат ИменаСвойств;
КонецФункции
// MIT License
// Copyright (c) 2024 SeiOkami
//
// Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files
// (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify,
// merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
// The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
0
комментарии
____________________
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник