Процедура ПриУстановкеИнтервала (ДатаНач, ДатаКон)
Если НазваниеНабораПрав () = "Продавец" Тогда
Предупреждение ("У вас нет права изменять интервал журнала!", 2);
СтатусВозврата (0);
КонецЕсли;
КонецПроцедуры