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