В начало

При записи константы

 

Процедура ПриЗаписиКонстанты (ИмяКонстанты, Значение)

   Если ИмяКонстанты = "ТекущийПрефикс" Тогда

      Если НазваниеНабораПрав () = "Продавец" Тогда

         Предупреждение ("У вас нет права менять префикс!", 2);

         СтатусВозврата (0);

      КонецЕсли;

   КонецЕсли;

КонецПроцедуры