helpf.pro
  Регистрация
Все категории » Метаданные Метаданные 
 0 
 
 
Распечатать

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

При разработке частенько нужно проверить наличие реквизита в документе или справочнике.

Ниже приведены функции позволяющие проверить наличие заданных реквизитов в объектах конфигурации:

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

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



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

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

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

Иначе

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

КонецЕсли; 



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

Для документа:

Код 1C v 8.х
 // Позволяет определить есть ли среди реквизитов шапки документа

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

//

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

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

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

//

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

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

//

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



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

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

Иначе

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

КонецЕсли; 



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

P.S. Посмотрите еще Полезные функции по работе с метаданными

Разместил:   Версии: | 8.x | 8.2 УП | 8.3 |  Дата:   Прочитано: 95531
 0 
 
 
Распечатать
Возможно, вас также заинтересует
17 правил для составления оптимального ЗАПРОСа к данным базы 1С  50
  Для формирования и выполнения запросов к таблицам базы данных в платформе 1С используется специальный объект языка программирования Запрос . Создается этот объект вызовом конструкции Новый Запрос . Запрос удобно использовать, когда требуется получ
1C: Enterprise Development Tools  52
  И вот случилось долгожданное: Вышел 1C: Enterprise Development Tools - это среда для разработки конфигурации в IDE Eclipse. С сайта 1С: « 1C:Enterprise Development Tools » – это инструмент нового поколения для разработчиков бизнес-приложений систем
1С 7.x : Как получить курсы валют с сайта НБУ http://www.bank.gov.ua/ за любую дату ?  6
  Функция ПолучитьТаблицуКурсовНБУ(ДатаКурса, Ежедневно = 1) // если в качестве второго параметра указать число отличное от 1 - получем валюты, которые котируются на ежемесячной основе Перем Reader, Url, Точки, HtmlTab, Строк, Р, НомСтроки, НомЯче
1С Предприятие что это?  12
  Что такое 1С? 1С — это фирма , у которой одно из направлений деятельности — разработка программного обеспечения для автоматизации бизнес-процессов предприятий. « 1С:Предприятие » - конкретный продукт, который выпускает компания 1С . Что такое
COM-подключение к базе 7.7 из 8.2 1С  7
 Если код выполняется на стороне клиента, то необходимо наличие базы 7.7 на локальной машине. Пример (На форме объекта присутствует реквизит Таблица(ТаблицаЗначений)): НаКлиенте Процедура Загрузки() ПутьКБазе=" D:ВашаБаза1с77" ; Пользователь=
Посмотреть все результаты поиска похожих
Комментарии
AndrewEv
09.07.2015 14:22Комментарий: 4
AndrewEv
 
МетаданныеОбъекта = Объект.Метаданные(); Возврат Не МетаданныеОбъекта.Реквизиты.Найти(ИмяРеквизита) = Неопределено;

[/pre]
AndrewEv
09.07.2015 14:21Комментарий: 3
AndrewEv

Вместо



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



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

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

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

Иначе

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

КонецЕсли; 



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



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

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



КонецФункции[/pre]
AndrewEv
09.07.2015 14:20Комментарий: 2
AndrewEv

Вместо



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



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

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

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

Иначе

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

КонецЕсли; 



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



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

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

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

Иначе

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

КонецЕсли; 



КонецФункции[/pre]
AndrewEv
09.07.2015 14:20Комментарий: 1
AndrewEv

Вместо



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



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

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

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

Иначе

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

КонецЕсли; 



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



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

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

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

Иначе

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

КонецЕсли; 



КонецФункции[/pre]
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.