1с как найти метаданные по имени

Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа.
Фредерик Брукс-младший

Содержание:

1.      Когда возникает необходимость проверить наличие реквизита 1С?

2.      Как можно получить метаданные объекта 1С?  

1.    Когда возникает необходимость проверить наличие реквизита 1С

Потребность проверки наличия реквизита обычно возникает при написании общих, универсальных процедур или функций, к примеру, когда необходимо выполнить ряд однообразных действий, проверить заполнение перед проведением, при этом реквизитный состав обрабатываемых объектов метаданных отличается незначительно (например, в документе, отражающем продажу товара, есть реквизит Склад, а в документе, отражающем перемещение товара – реквизиты Склад-отправитель и Склад-получатель).

В ряде типовых конфигураций 1С предлагается стандартная функция проверки наличия реквизита в объекте (расположена в модуле “ОбщегоНазначения”)

Функция ЕстьРеквизитОбъекта(ИмяРеквизита, МетаданныеОбъекта) Экспорт

            Возврат НЕ (МетаданныеОбъекта.Реквизиты.Найти(ИмяРеквизита) = Неопределено);

КонецФункции   

2. Как можно получить метаданные объекта 1С

Однако написать свою функцию также не представляет труда. В первую очередь необходимо получить метаданные объекта 1С одним из способов:

через функцию Метаданные() объекта

пример синтаксиса: СправочникСсылка.Метаданные()

                                    ДокументСсылка.Метаданные()

через свойство глобального контекста Метаданные

пример синтаксиса: Метаданные.Справочники.[ИмяСправочника]

                                    Метаданные.Документы.[ИмяДокумента]

Далее через свойство “Реквизиты” использовать функцию Найти(). В случае, если реквизит не найден, возвращается значение Неопределено.

Пример 1

Метаданные = Контрагент.Метаданные();

Если Метаданные.Реквизиты.Найти(«Ответственный») = Неопределено Тогда

            Возврат Ложь;

Иначе

            Возврат Истина;

КонецЕсли;

Пример 2

Функция ПолучитьОрганизацию(Контрагент, Пользователь)

            Если Метаданные.Справочники.Контрагенты.Реквизиты.Найти(«Организация») <> Неопределено Тогда

                        Возврат Контрагент.Организация;

            Иначе

                        Возврат Пользователь.Организация;

            КонецЕсли;

КонецФункции

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

Метаданные.Справочники.<ИмяСправочника>.ТабличныеЧасти.Реквизиты.Найти(<ИмяОбъектаПоиска>).

При обработке таблиц значений также возможно выполнить проверку существования колонки – в этом случае применяется метод Свойство(), с помощью которого, помимо основной функции – получения значения элемента по указанному имени, можно проверить, имеется ли указанного свойство.

Пример синтаксиса:

Если НЕ ТекущаяСтрока.Свойство(«Исключить») ИЛИ НЕ ТекущаяСтрока.Исключить Тогда

            ЗаполнитьЗначенияСвойств(ТаблицаЗагрузки.Добавить(); ТекущаяСтрока);

КонецЕсли;

Специалист компании ООО «Кодерлайн»

Кондренко Анна Сергеевна

Узнать тип объекта (справочник, документ, перечисление…), можно используя функцию «XMLТипЗнч».

//Если СоединениеС1С_.Справочники.ТипВсеСсылки().СодержитТип(СоединениеС1С_.ТипЗнч(Источник)) Тогда
    Если Найти(СоединениеС1С_.XMLТипЗнч(источник).TypeName,»CatalogRef»)>0 Тогда

       

        Вид = Источник.Метаданные().Имя;
        Если Вид=»Партнеры» Тогда
            Вид=»Контрагенты»;
        КонецЕсли;
        Если Источник.Пустая() Тогда
            Возврат Справочники[Вид].ПустаяСсылка();
        КонецЕсли;
        УиИст = СоединениеС1С_.string(Источник.УникальныйИдентификатор());
        Уи = Новый УникальныйИдентификатор(УиИст);
        Нашли = Справочники[Вид].ПолучитьСсылку(Уи);
        Если Найти(строка(Нашли),»<Объект не найден>»)>0 Тогда
            Сообщить_(«Не нашли в УТ:»+вид+»: «+Источник.Наименование);
        КонецЕсли;
        Возврат Нашли;
    //ИначеЕсли СоединениеС1С_.Перечисления.ТипВсеСсылки().СодержитТип(СоединениеС1С_.ТипЗнч(Источник)) Тогда    
    ИначеЕсли Найти(СоединениеС1С_.XMLТипЗнч(источник).TypeName,»EnumRef»)>0 Тогда
        ИмяПеречисления = Источник.Метаданные().Имя;
        НужныйИндекс = СоединениеС1С_.Перечисления[ИмяПеречисления].Индекс(Источник);
        ИмяЗначения = СоединениеС1С_.Метаданные.Перечисления[ИмяПеречисления].ЗначенияПеречисления.получить(НужныйИндекс).имя;

       
        Возврат Перечисления[ИмяПеречисления][ИмяЗначения];
    КонецЕсли;

DocumentRef - документ ссылка
DocumentObject - документ объект 
CharOfAccountsRef - план счетов