Примеры работы с общими реквизитами

Примеры работы с общими реквизитами на языке программирования 1С:Предприятие. Примеры позволяют быстро разобраться в вопросе и использовать код в своих разработках

Получение значения общего реквизита
// Чтение реквизита
Процедура ЧтениеРеквизита()
Реквизит = Справочники.Контрагенты.ОбщиеРеквизиты.НайтиПоКоду(«ИНН»);
Если Реквизит <> Неопределено Тогда
Сообщить(Реквизит.ПолноеНаименование);
КонецЕсли;
КонецПроцедуры

Запись значения общего реквизита
// Запись реквизита
Процедура ЗаписьРеквизита()
Реквизит = Справочники.Контрагенты.ОбщиеРеквизиты.НайтиПоКоду(«ИНН»);
Если Реквизит <> Неопределено Тогда
Реквизит.ПолноеНаименование = «ООО ‘Название контрагента'»;
Реквизит.Записать();
КонецЕсли;
КонецПроцедуры

Получение всех общих реквизитов справочника
// Получение списка реквизитов
Процедура ПолучениеРеквизитов()
СписокРеквизитов = Справочники.Контрагенты.ОбщиеРеквизиты.ПолучитьСписок();
Для Каждого Реквизит Из СписокРеквизитов Цикл
Сообщить(Реквизит.Код + » » + Реквизит.Наименование);
КонецЦикла;
КонецПроцедуры

Редактирование общего реквизита справочника
// Редактирование реквизита
Процедура РедактироватьРеквизит()
Реквизит = Справочники.Контрагенты.ОбщиеРеквизиты.НайтиПоКоду(«ИНН»);
Если Реквизит <> Неопределено Тогда
Реквизит.Наименование = «Новый контрагент»;
Реквизит.Комментарий = «Изменено пользователем»;
Реквизит.Записать();
КонецЕсли;
КонецПроцедуры

Получение списка общих реквизитов документа
// Получение реквизитов документа
Процедура ПолучениеРеквизитовДокумента()
НаборРеквизитов = Документы.ПоступлениеТоваровУслуг.ОбщиеРеквизиты.ПолучитьСписок();
Для Каждого Реквизит Из НаборРеквизитов Цикл
Сообщить(Реквизит.Код + » » + Реквизит.Наименование);
КонецЦикла;
КонецПроцедуры

Создание нового общего реквизита
// Создание реквизита
Процедура СозданиеРеквизита()
Реквизит = Справочники.Контрагенты.ОбщиеРеквизиты.Создать();
Реквизит.Код = «НовыйКод»;
Реквизит.Наименование = «Новый реквизит»;
Реквизит.ПолноеНаименование = «Описание реквизита»;
Реквизит.Комментарий = «Комментарий к реквизиту»;
Реквизит.Записать();
КонецПроцедуры

Поделиться с друзьями
Smirnov code
Добавить комментарий