Здравствуйте
Создал экспортную процедуру (Все работает)запрещает редактирование документы до даты запрета редактирования, но когда на ее смотрю что не то. Можно сделать по корретней

Процедура ДатаЗапретаРедактированияПометки(ЭлементыФормы,Док,Дата,Отказ) Экспорт
   
   //Док=ЭлементыФормы.ЖурналДокументовСписок.ТекущиеДанные;
   Если Док.Дата <= КонецДня(Константы.ДатаЗапретаРедактирования.Получить()) Тогда
   
       Если Док.ПометкаУдаления = Ложь Тогда
           Предупреждение("Нельзя ОТМЕЧАТЬ НА УДАЛЕНИЕ документы с датой, более ранней, чем дата запрета редактирования документов!",5);
       Иначе
           Предупреждение("Нельзя ОТМЕНЯТЬ УДАЛЕНИЕ документов с датой, более ранней, чем дата запрета редактирования документов!",5);
       КонецЕсли;
       Отказ=Истина;
       
   КонецЕсли;
   
   
КонецПроцедуры

В журнале
Процедура ЖурналДокументовСписокПередУстановкойПометкиУдаления(Элемент,Отказ)
   Перем Дата;    
   Док=ЭлементыФормы.ЖурналДокументовСписок.ТекущиеДанные;
   РаботаСФормами.ДатаЗапретаРедактированияПометки(ЭлементыФормы,Док,Дата,Отказ);
КонецПроцедуры

Переделай конструкцию Если Иначе КонецЕсли в ? :)

зачем передается дата?

(0) все нормально здесь, разве что назвать процедуру можно по-понятней, например "ПроверитьПоДатеЗапретаРедактирования"

+(2) аналогично ЭлементыФормы

Зашел в док, перенес дату на текущую и удалил документ.

(2) Дату убрал все идет спасибо

(5) в форме документа штатно вроде нет изменения пометки

(4)Элементы формы убрал все идет Спасибо

(6)У тебя дыра в процедуре, см (5) а ты плюшками балуешся

Проверяй еще и Док.Ссылка.Дата

(10) Хорошо

Да и перезапись не помеченного на удаление будет с сообщением:
Нельзя ОТМЕНЯТЬ УДАЛЕНИЕ..... А никакой отмены удаления делать то и не будут

Вроде все, нет проще уже
СПАСИБО

(13)Проще может нет, но процедура не рабочая. Защита дырявая. Давай что получилось в результате.

Пометку удалять нельзя, а реквизиты менять можно? Бред.

(15)Там ничо низя, просто сообщения разные и ниочем

ВставкаВТекст = ?(Док.ПометкаУдаления, "ОТМЕЧАТЬ НА УДАЛЕНИЕ документы", "ОТМЕНЯТЬ УДАЛЕНИЕ документов");
ТекстСообщения = "Нельзя " + ВставкаВТекст + " с датой, более ранней, чем дата запрета редактирования документов!";
Отказ = Истина;
Предупреждение(ТекстСообщения);

+ Константы.ДатаЗапретаРедактирования.Получить() - лишний запрос к данным в течение сеанса - лучше-бы получить эту константу в начале сеанса и не мучить жесткий диск далее.

Я так понял автору нужна просто красивая процедура и все равно рабочая или нет.