Как проверить наличие реквизита в справочнике 1с

Содержание:

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Пример 1

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

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

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

Иначе

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

КонецЕсли;

Пример 2

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

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

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

            Иначе

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

            КонецЕсли;

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

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

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

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

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

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

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

КонецЕсли;

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

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

1С 8.3 : Функции ЕстьРеквизитДокумента и ЕстьРеквизитОбъекта

 // Позволяет определить есть ли среди реквизитов шапки Объекта реквизит с переданным именем.

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


МетаданныеОбъекта = Объект.Метаданные();

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

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

Иначе

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

КонецЕсли; 


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

 // Позволяет определить есть ли среди реквизитов шапки документа

// реквизит с переданным именем.

//

// Параметры: 

//  ИмяРеквизита - строковое имя искомого реквизита, 

//  МетаданныеДокумента - объект описания метаданных документа, среди реквизитов которого производится поиск.

//

// Возвращаемое значение:

//  Истина - нашли реквизит с таким именем, Ложь - не нашли.

//

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


Если МетаданныеДокумента.Реквизиты.Найти(ИмяРеквизита) = Неопределено Тогда

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

Иначе

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

КонецЕсли; 


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

03.09.14 — 10:02

Народ, подскажите как проверить существование реквизита у документа. Не его заполнение, а именно существование

1 — 03.09.14 — 10:05

Если Документ.Метаданные().Реквизиты.Найти(ИмяРеквизита) = Неопределено Тогда

Сообщить(«Нету»);

КонецЕсли;

2 — 03.09.14 — 10:09

(1) ага, а если метаданных нету

(0) через Попытка — наверняка

3 — 03.09.14 — 10:12

(2) т.е. как нету ? ))

4 — 03.09.14 — 10:16

(3) ну ты че с будуна внешней обработкой в нету конфу не тыкал?

в пустой тоже запускается

5 — 03.09.14 — 10:18

(4) всё равно есть метаданные у документа, хоть обработкой тыкай, хоть чем.

6 — 03.09.14 — 10:18

(4)В не той конфе пошлет лесом через ошибку и это будет правильно и соразмерно:-)

7 — 03.09.14 — 10:20

(4) ну если с фанатизмом, то версию еще конфы при открытии проверить да? ))

8 — 03.09.14 — 10:21

9 — 03.09.14 — 10:23

(2) Попытка — ЗЛО

10 — 03.09.14 — 10:25

11 — 03.09.14 — 10:28

12 — 03.09.14 — 10:30

(10) >>у справочника «Код»

а зачем его искать?

13 — 03.09.14 — 10:32

(9) если проверять наличие каждого объекта метаданных в процессе обращения — супер мега универсальная обработка получится. года через два тестирования

14 — 03.09.14 — 10:33

15 — 03.09.14 — 10:34

(14) ну и проверяй длину кода отдельно

да несколько не однообразно, ну что делать

16 — 03.09.14 — 10:34

(12) или например общие реквизиты у документов, угадай где они

17 — 03.09.14 — 10:34

(13) ты просто не знаешь какое зло эта «попытка»

18 — 03.09.14 — 10:34

(12) его может не быть

19 — 03.09.14 — 10:36

(15) ты не понял, его физически в таблице нет, колонки нет! и запрос вылетет с ошибкой

20 — 03.09.14 — 10:52

(17) И какое ж зло это — попытка? Не поясните?

21 — 03.09.14 — 10:57

Я кстати тоже подумал над попыткой. -почему мегазло???

22 — 03.09.14 — 10:59

23 — 03.09.14 — 11:01

24 — 03.09.14 — 11:17

(20)(21) вы теряете ошибку, все проходит «хорошо», но результат может быть плачевен

25 — 03.09.14 — 11:20

(22) (24) ну это смотря где пытаться проверять

в приначалеработысистемы или в приоткрытии, если внешняя обработка — ничего не будет

26 — 03.09.14 — 11:25

+ флажок один раз зарядил — и работай себе не хочу

а про метаданные в 150-ти местах вставлять — это каждый тормоз может

27 — 03.09.14 — 11:28

(24) Например?

28 — 03.09.14 — 11:46

(10) Речь про документ вообще-то, а не про задачу и не про справочник

29 — 03.09.14 — 11:48

(8) Вообще-то в таких случаях сначала делается проверка на существование вида документа, а уже потом его реквизитов.

30 — 03.09.14 — 11:50

+(10) адресата у задачи и код у справочника надо искать через СтандартныеРеквизиты

31 — 03.09.14 — 11:54

(30) У стандартных реквизитов НЕТ метода «НАЙТИ» — только перебором, либо через «заполнитьЗначенияСвойств», либо через попытку

32 — 03.09.14 — 11:57

33 — 03.09.14 — 11:57

(24) Конструкцией, позволяющей отработать ошибку, вы умудряетесь её потерять?? Вспоминается анекдот: а где шары металлические? — один сломал, второй про..терял.

34 — 03.09.14 — 11:59

Конечно, это сугубое ИМХО. Я считаю при хорошей архитектуре решения не должна вставать необходимость выяснения наличия реквизитов.

35 — 03.09.14 — 12:03

(34) имело место быть на больших кусках, вложенных в Попытка

36 — 03.09.14 — 12:03

(22) (23) — осилил, но так и не понял, зачем к серьёзному вопросу ссылки на ламерские топики?

(24) +1

Попытка хороша, когда в блоке «Исключение» вызывается исключение.

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

Войти или зарегистрироваться

Метаданные 1С – это список справочников, документов, их реквизитов и прочего, составляющего конфигурацию. Список метаданных 1С правится программистов в конфигураторе в окне конфигурации.

Из программы на языке 1С доступен список метаданных 1С и их свойства.

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

Рассмотрим, как работать с метаданными 1С конфигурации из языка 1С.

Метаданные 1С конфигурации

Глобальная переменная Метаданные дает доступ к метаданным 1С всей конфигурации (т.е. к «корню» конфигурации). Далее через точку можно обращаться к «коллекциям» — документы, справочники и т.п., чтобы выйти на конкретный справочник или документ, у которых соответственно есть «коллекции» реквизиты, табличные части и т.п. – все, как в конфигураторе, в дереве конфигурации.

Пример – создадим список всех документов конфигурации для того, чтобы пользователь мог выбрать нужный документ из списка:
спДокументовКонфигурации = Новый СписокЗначений(); //сюда будем сохранять список

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

Метаданные 1С объекта

Большинство объектов 1С, сохраняемых в базе данных (справочники, документы и т.д.) представлены ссылками и объектами (подробнее см. «Ссылки и объекты»).

У ссылок и объектов есть метод .Метаданные(), который позволяет выйти на метаданные 1С этого объекта.

Пример – проверка на наличие реквизитов с типом «Справочник.Организация» в документе и обнуление значения этих реквизитов:
//ДокументОбъект - документ, полученный на изменение или создание
//аналогичным образом можно работать со ссылками, например: ДокументСсылка = Документ.ИмяДокумента.ПустаяСсылка().Метаданные()
ДокументОбъект = Документы.ПоступлениеТоваров.СоздатьДокумент();

//цикл по табличным частям
Для каждого ТабЧасть из ДокументОбъект.Метаданные().ТабличныеЧасти Цикл
     //в табличной части тоже реквизиты (колонки таб.части)
     Для каждого Реквизит из ТабЧасть.Реквизиты Цикл
          //здесь аналогично
          мТипов = Реквизит.Тип.Типы();
          Для каждого Тип из мТипов Цикл
               Если Тип = Тип("СправочникСсылка.Организации") Тогда
                    //так как это таб.часть, то мы должны пройтись по всем строкам этой тач. части
                    Для каждого Строка из ДокументОбъект[ТабЧасть.Имя] Цикл
                         Строка[Реквизит.Имя] = Неопределено;
                    КонецЦикла;
               КонецЕсли;
          КонецЦикла;
     КонецЦикла;
КонецЦикла;