Попытка 
	УстановитьМонопольныйРежим(Истина); 
Исключение 
	Предупреждение("К базе подключены пользователи. Монопольный режим установить невозможно!", 7); 
КонецПопытки; 
Если МонопольныйРежим() Тогда 
	Сообщить("Монопольный режим установлен"); 
КонецЕсли; 
УстановитьМонопольныйРежим(Ложь);