Всем доброго времени суток.

Нужно сделать следующее:
На форме документа есть реквизит тип Булево (по умолчанию стоит Ложь)
Когда определенный пользователь переведет значение в Истина, то должно произойти следующее (в 1С я еще разбираюсь не очень):

&НаКлиенте
Процедура ПередЗаписью(Отказ)
   Если Объект.Статус = Истина Тогда
       Роль(Отказ);
   КонецЕсли;
     Объект.СуммаДокумента = Объект.Заказ.Итог("Сумма");
КонецПроцедуры

&НаСервере
Функция Роль (Отказ) Экспорт
   Если НЕ РольДоступна("ПолныеПрава") Тогда
       Записать(Отказ);
   КонецЕсли;
   Если НЕ РольДоступна("Администратор") Тогда
       Записать(Отказ);
   КонецЕсли;
КонецФункции

Подскажите где и что я делаю не так
Заранее спасибо.

Разобрался. Спасибо мне.

(0) пожалуйста. Обращайтесь еще.

(1) вот всегда бы так было....

тут мне одному показалось, что документ запишут все, кроме администратора?

(4) ну да, пиши кто хочет )))

Вообще-то документ запишут Только Админ (Это запись директора), а ПолныеПрава - это моя запись. Кто не верит - может проверить.

(6) я верю, но у меня вопрос

директору приятно, что он Одмин и держит на коленях пользователя с ПолныеПрава?

+ (7) в (0) блестящий образчик г-кода, так к сведению

(6) вы вчитайтесь

Если НЕ РольДоступна("ПолныеПрава") Тогда

то есть все у кого не полные права, все запишут.

(9) Причём 2 раза :)))

Сорри. Забыл выложить отредактированную версию кода.
Вот как работает.
&НаКлиенте
Процедура ПередЗаписью(Отказ, ПараметрыЗаписи)
   Если Объект.Статус = Истина Тогда
       Роль(Отказ, ПараметрыЗаписи);
   КонецЕсли;
     Объект.СуммаДокумента = Объект.Заказ.Итог("Сумма");
КонецПроцедуры

&НаСервере
Функция Роль (Отказ, ПараметрыЗаписи) Экспорт
   Если НЕ РольДоступна("ПолныеПрава") Тогда
       Отказ = Истина;
       Сообщить("Изменение документов в закрытом периоде запрещено. Обратитесь к руководству.");
   КонецЕсли;
КонецФункции

(11) Какая красноречивая функция - "Роль". Всем заодно сразу понятно, что именно она делает.

За эту базу с нуля босс платит гроши вот и я и делаю на эти гроши.