Настройка доступа

[SW]

Здравствуйте. Есть такой вопрос, у меня есть документ, и есть авторизация на этот документ, т.е. уже созданный документ может редактировать только тот, кто его создал, процедурой

Процедура ПриОткрытии()
Если СокрЛП(ИмяПользователя()) <> СокрЛП(Автор) Тогда
Форма.ТолькоПросмотр(1);
....

а вот удалять может любой.
Можно ли как-то программно, в этом условии или в общем модуле документа запретить и удалять этот документ, если пользователь, не является его создателем?
Настройки доступа пользователей не совсем подходят.

[prog1c7.7]

глобальный модуль
предопределенная процедура
ПриУдаленииДокумента()
Если (Докум.Вид() = "Вашдокумент") и
(СокрЛП(ИмяПользователя()) <> СокрЛП(Автор))
тогда
Предупреждение("НЕ автор не суйся");
СтатусВозврата(0);
КонецЕсли;
КонецПроцедуры

[SW]

Спасибо. Но не могу разобраться с условием, он даже если автор совпадает с пользователем, все равно не дает его удалить, т.е. теперь документы вообще ни кем не удаляются. Уже перепробовал несколько вариантов и все равно.

[prog1c7.7]

(СокрЛП(Строка(ИмяПользователя())) <> СокрЛП(Строка("Вашдокумент".Автор)))

[prog1c7.7]

 и документ передай ему: ПриУдаленииДокумента(Докум)

а в условии будет
(СокрЛП(Строка(ИмяПользователя())) <> СокрЛП(Строка(Докум.Автор)))

[SW]

Спасибо еще раз. Теперь работает, а переменную я сразу передавал)