Группы доступа партнеров / Модуль объекта

#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда

#Область ОбработчикиСобытий

Процедура ПередЗаписью(Отказ)

	Если ОбменДанными.Загрузка Тогда
		Возврат;
	КонецЕсли;

	ОбновлениеИнформационнойБазы.ПроверитьОбъектОбработан(ЭтотОбъект);

	Если НЕ ЭтоГруппа Тогда
		
		// Обработка реквизита для РЛС
		Если Не ЭтоНовый() Тогда
			ГруппаДоступа = Ссылка;
		ИначеЕсли ЗначениеЗаполнено(ПолучитьСсылкуНового()) Тогда
			ГруппаДоступа = ПолучитьСсылкуНового();
		Иначе
			ГруппаДоступа = Справочники.ГруппыДоступаПартнеров.ПолучитьСсылку();
			УстановитьСсылкуНового(ГруппаДоступа);
		КонецЕсли;
		
	КонецЕсли;
	
КонецПроцедуры

#КонецОбласти

#КонецЕсли