Как запретить снимать и ставить пометку на удаление, если установлен запрет на изменение данных периода в который попадает документ по данной организации.
События такого нет, начальник сказал смотреть событие перед записью, но там тоже ничего не нашел. Что то где то натыкался что можно через роли?
Куда копать?
1С:Предприятие 8.2 (8.2.13.219)
омплексная автоматизация, редакция 1.1 (1.1.9.1)

Это изменение.

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

суть в том, что если документ не проведен, хоть и стоит запрет редактирования система все равно позволяет ставить и снимать галочку на удаление.

(2) если не проведен дает

(3) Правила покажи

(0) начальник прав

(5) это глде?)

(0) В типовой это сделано через подписку на событие - смотри её.

ПередЗаписью

Отказ = НЕ ПериодДоступен И Объект.ПометкаУдаления <> Ссылка.ПометкаУдаления;

(9) не угорайте) что тут объект?

я не могу понять, как это работает (((

(11) В ПередЗаписью объекта сравнивается записываемое значение ПометкиУдаления с тем, что хранится в базе(у ссылки).

видимо чего то не так (
Если ЭтотОбъект.ПометкаУдаления <> Ссылка.ПометкаУдаления тогда
         Сообщить("Работает");
   КонецЕсли;

Что не так?

(13) ну не срабатывает(

(15) А где ты этот код написал?

(15) весь код процедуры покажи + картинку подписки

ну для проверки просто в процедуру перед записью

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

   ОчиститьНенужныеТабличныеЧасти();

   // Проверка заполнения единицы измерения мест и количества мест
   ОбработкаТабличныхЧастей.ПриЗаписиПроверитьЕдиницуИзмеренияМест(Товары);
   ОбработкаТабличныхЧастей.ПриЗаписиПроверитьЕдиницуИзмеренияМест(Оборудование);
   
   ОбработкаТабличныхЧастей.ПриЗаписиПроверитьСтавкуНДС(ЭтотОбъект, Товары);
   ОбработкаТабличныхЧастей.ПриЗаписиПроверитьСтавкуНДС(ЭтотОбъект, Услуги);
   ОбработкаТабличныхЧастей.ПриЗаписиПроверитьСтавкуНДС(ЭтотОбъект, Оборудование);
   ОбработкаТабличныхЧастей.ПриЗаписиПроверитьСтавкуНДС(ЭтотОбъект, ОбъектыСтроительства);

   // Посчитать суммы документа и записать ее в соответствующий реквизит шапки для показа в журналах
   СуммаДокумента = УчетНДС.ПолучитьСуммуДокументаСНДС(ЭтотОбъект);

   УчетНДС.СинхронизацияПометкиНаУдалениеУСчетаФактуры(ЭтотОбъект, "СчетФактураПолученный");

   // Заполнить склад и ордер в табличных частях
   СкладИзШапки    =  (Не мУказаниеСкладовВТЧ) И (ВидПоступления <> Перечисления.ВидыПоступленияТоваров.ПоОрдеру);

   УправлениеЗаказами.ЗаполнитьЗаказПоставщикуВТЧ(ВидОперации,ЭтотОбъект, "Поступление");
   //при поступлении в переработку все товары должны быть зарезервированы под заказ из шапки
   Если ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.ВПереработку и ЗначениеЗаполнено(Сделка) Тогда
       Для каждого СтрокаТЧ из Товары цикл
           СтрокаТЧ.Заказ = Сделка;
       КонецЦикла;
   КонецЕсли;

   ОбработкаТабличныхЧастей.ЗаполнитьСкладИОрдерВСтрокахТабЧасти(ЭтотОбъект, Товары,         СкладИзШапки);
   ОбработкаТабличныхЧастей.ЗаполнитьСкладИОрдерВСтрокахТабЧасти(ЭтотОбъект, ВозвратнаяТара, СкладИзШапки);
   ОбработкаТабличныхЧастей.ЗаполнитьСкладИОрдерВСтрокахТабЧасти(ЭтотОбъект, Оборудование,   СкладИзШапки);
   
   Если Не мУказаниеПроектовВТабличнойЧастиДокументов Тогда
       УправлениеПроектами.ЗаполнитьПроектВСтрокахТабЧасти(ЭтотОбъект, Услуги);
   КонецЕсли;

   // Удаление неиспользуемых строк табличной части "Серийные номера".
   УчетСерийныхНомеров.УдалитьНеиспользуемыеСтрокиПодчиненнойТЧ(ЭтотОбъект, мПараметрыСвязиСтрокТЧ, "Товары");

   УчетНДС.ПроверитьСоответствиеРеквизитовСчетаФактуры(ЭтотОбъект, "СчетФактураПолученный");
   
   // Заполним субконто затрат
   СчетаУчетаВДокументах.ЗаполнитьСубконтоТабличнойЧасти("Услуги", ЭтотОбъект, ОтражатьВБухгалтерскомУчете, ОтражатьВНалоговомУчете);
   
   мУдалятьДвижения = НЕ ЭтоНовый();
   
   Отказ =  ЭтотОбъект.ПометкаУдаления <> Ссылка.ПометкаУдаления;   //НЕ ПериодДоступен И
   
   Если ЭтотОбъект.ПометкаУдаления <> Ссылка.ПометкаУдаления тогда
         Сообщить("Работает");
   КонецЕсли;
КонецПроцедуры // ПередЗаписью

(17) картинку чего ? (((

(18) Как определил, что не работает?

(20) есть документ помеченный на удаление, я снимал и ставил, сообщение не вышло (

Документ «Счет-фактура выданный С000000795 от 04.01.2011 0:00:00» помечен на удаление.
У документа «Счет-фактура выданный С000000795 от 04.01.2011 0:00:00» снята пометка на удаление.

блин

вот я предурок

а нет.
ничего нет(

ребят помогите

Может я и ошибаюсь, но настораживает:
(18)>> ....."СчетФактураПолученный"....
(22)>> Счет-фактура выданный

ну меня тоже

сек

ну вообще это документ реализация товаров и услуг

(30) А помечаешь/снимаешь какой?

я идиот. спасибо

Только вот теперь как мне получить ссылку на редактируемый документ в общем модуле?

(33) в подписке?

(33) Ссылка - это реквизит объекта. Если объект есть, есть и ссылка.
ЭтотОбъект.ПометкаУдаления <> Ссылка.ПометкаУдаления

равносильно:

ЭтотОбъект.ПометкаУдаления <> ЭтотОбъект.Ссылка.ПометкаУдаления

Спасибо

получается в ссылке данные после записи обновляются? или как почему так что реквизит документа не равен ссылке на него ...?

косяк теперь, то что при открытии он позволяет сохранять изменения непроведенного документа (
спасайте

(38) а раньше не позволял?

разобрался спасибо, а свойство формы Только Просмотр можно установить только передОткрытием?
В подписи на событие не отлавливается это событие (