From d6f5e8e6c039c75c2ecf3208ee969a4b16fc19ff Mon Sep 17 00:00:00 2001 From: Anton Ivanov Date: Wed, 1 Jul 2020 08:58:11 +0300 Subject: [PATCH] =?UTF-8?q?=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=B8=D0=BB=20?= =?UTF-8?q?=D0=B2=20=D1=81=D0=BE=D0=B1=D1=8B=D1=82=D0=B8=D1=8F=20=D0=9F?= =?UTF-8?q?=D1=80=D0=B8=D0=97=D0=B0=D0=BF=D0=B8=D1=81=D0=B8=20=D0=B8=20?= =?UTF-8?q?=D0=9F=D0=B5=D1=80=D0=B5=D0=B4=D0=97=D0=B0=D0=BF=D0=B8=D1=81?= =?UTF-8?q?=D1=8C=D1=8E=20=D0=BF=D1=80=D0=BE=D0=B2=D0=B5=D1=80=D0=BA=D1=83?= =?UTF-8?q?=20=D0=9E=D0=B1=D0=BC=D0=B5=D0=BD=D0=94=D0=B0=D0=BD=D0=BD=D1=8B?= =?UTF-8?q?=D0=BC=D0=B8.=D0=97=D0=B0=D0=B3=D1=80=D1=83=D0=B7=D0=BA=D0=B0.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/cf/Catalogs/узВопросыОтветы/Ext/ObjectModule.bsl | 11 ++++++++++- .../узИсторияКонфигураций/Ext/ObjectModule.bsl | 10 ++++++++++ src/cf/Catalogs/узКонтрагенты/Ext/ObjectModule.bsl | 6 ++++++ src/cf/Catalogs/узКонфигурации/Ext/ObjectModule.bsl | 6 ++++++ src/cf/Catalogs/узСпринты/Ext/ObjectModule.bsl | 8 ++++++++ src/cf/Catalogs/узСтатусыЗадачи/Ext/ObjectModule.bsl | 9 +++++++++ src/cf/Catalogs/узТекущиеДела/Ext/ObjectModule.bsl | 5 +++++ src/cf/Documents/узВыпускРелиза/Ext/ObjectModule.bsl | 10 ++++++++++ 8 files changed, 64 insertions(+), 1 deletion(-) diff --git a/src/cf/Catalogs/узВопросыОтветы/Ext/ObjectModule.bsl b/src/cf/Catalogs/узВопросыОтветы/Ext/ObjectModule.bsl index 54f5d3ade..c57b84dc9 100644 --- a/src/cf/Catalogs/узВопросыОтветы/Ext/ObjectModule.bsl +++ b/src/cf/Catalogs/узВопросыОтветы/Ext/ObjectModule.bsl @@ -6,6 +6,11 @@ КонецПроцедуры Процедура ПередЗаписью(Отказ) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + ДатаПоследнегоИзменения = ТекущаяДатаСеанса(); ТЗСобытия = ПолучитьТЗСобытия(); @@ -32,11 +37,15 @@ КонецФункции Процедура ПриЗаписи(Отказ) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + Если ДополнительныеСвойства.Свойство("узЭтоОбработка") Тогда Возврат; Конецесли; - РегистрацияАктивностиПользователя(ДополнительныеСвойства.ТЗСобытия,Отказ); ДополнительныеСвойства.Удалить("ТЗСобытия"); diff --git a/src/cf/Catalogs/узИсторияКонфигураций/Ext/ObjectModule.bsl b/src/cf/Catalogs/узИсторияКонфигураций/Ext/ObjectModule.bsl index b42b303bd..a37e39e35 100644 --- a/src/cf/Catalogs/узИсторияКонфигураций/Ext/ObjectModule.bsl +++ b/src/cf/Catalogs/узИсторияКонфигураций/Ext/ObjectModule.bsl @@ -1,5 +1,10 @@  Процедура ПриЗаписи(Отказ) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + СформироватьЗаписиВРС_узИсторияХранилища(Отказ); РегистрацияАктивностиПользователя(Отказ); @@ -43,6 +48,11 @@ КонецПроцедуры Процедура ПередЗаписью(Отказ) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + Если НЕ ЗначениеЗаполнено(Наименование) Тогда Наименование = Справочники.узИсторияКонфигураций.ПолучитьНаименование(Версия,ДатаВерсии); Конецесли; diff --git a/src/cf/Catalogs/узКонтрагенты/Ext/ObjectModule.bsl b/src/cf/Catalogs/узКонтрагенты/Ext/ObjectModule.bsl index 9266135ac..6389521d9 100644 --- a/src/cf/Catalogs/узКонтрагенты/Ext/ObjectModule.bsl +++ b/src/cf/Catalogs/узКонтрагенты/Ext/ObjectModule.bsl @@ -1,6 +1,12 @@  Процедура ПередЗаписью(Отказ) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + Если НЕ ЗначениеЗаполнено(узКороткоеИмя) Тогда узКороткоеИмя = Наименование; Конецесли; + КонецПроцедуры diff --git a/src/cf/Catalogs/узКонфигурации/Ext/ObjectModule.bsl b/src/cf/Catalogs/узКонфигурации/Ext/ObjectModule.bsl index 8671eea92..e7ddd9641 100644 --- a/src/cf/Catalogs/узКонфигурации/Ext/ObjectModule.bsl +++ b/src/cf/Catalogs/узКонфигурации/Ext/ObjectModule.bsl @@ -1,10 +1,16 @@  Процедура ПередЗаписью(Отказ) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + ПроверитьРеквизиты(Отказ); Если Отказ Тогда Возврат; Конецесли; + КонецПроцедуры Процедура ПроверитьРеквизиты(Отказ) diff --git a/src/cf/Catalogs/узСпринты/Ext/ObjectModule.bsl b/src/cf/Catalogs/узСпринты/Ext/ObjectModule.bsl index 8e7680827..a4eac284d 100644 --- a/src/cf/Catalogs/узСпринты/Ext/ObjectModule.bsl +++ b/src/cf/Catalogs/узСпринты/Ext/ObjectModule.bsl @@ -1,6 +1,10 @@  Процедура ПриЗаписи(Отказ) + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + ОчиститьЗаписи_узСпринтыЗадач_ПоЭтомуСпринту(Отказ); СформироватьЗапись_узСпринтыЗадач(Отказ); @@ -83,6 +87,10 @@ Процедура ПередЗаписью(Отказ) + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + ЗаполнитьДатуНачала(); КонецПроцедуры diff --git a/src/cf/Catalogs/узСтатусыЗадачи/Ext/ObjectModule.bsl b/src/cf/Catalogs/узСтатусыЗадачи/Ext/ObjectModule.bsl index 863010be2..bd4c0edb9 100644 --- a/src/cf/Catalogs/узСтатусыЗадачи/Ext/ObjectModule.bsl +++ b/src/cf/Catalogs/узСтатусыЗадачи/Ext/ObjectModule.bsl @@ -1,6 +1,10 @@  Процедура ПриЗаписи(Отказ) + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + ИзменитьУПодчиненныхЭлементовРеквизиты(); КонецПроцедуры @@ -49,6 +53,11 @@ КонецПроцедуры Процедура ПередЗаписью(Отказ) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + Если ЭтотОбъект.Уровень() > 1 Тогда ВызватьИсключение "Ошибка! в данный момент не реализовано использования больше 2 уровней вложенности элементов"; //В канбан доске заголовки надо получать рекурсией diff --git a/src/cf/Catalogs/узТекущиеДела/Ext/ObjectModule.bsl b/src/cf/Catalogs/узТекущиеДела/Ext/ObjectModule.bsl index e289df171..fdd237755 100644 --- a/src/cf/Catalogs/узТекущиеДела/Ext/ObjectModule.bsl +++ b/src/cf/Catalogs/узТекущиеДела/Ext/ObjectModule.bsl @@ -1,5 +1,10 @@  Процедура ПередЗаписью(Отказ) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + ЗаполнитьТекстСодержанияСтарое(Отказ); КонецПроцедуры diff --git a/src/cf/Documents/узВыпускРелиза/Ext/ObjectModule.bsl b/src/cf/Documents/узВыпускРелиза/Ext/ObjectModule.bsl index a43d79e11..1e1b86c77 100644 --- a/src/cf/Documents/узВыпускРелиза/Ext/ObjectModule.bsl +++ b/src/cf/Documents/узВыпускРелиза/Ext/ObjectModule.bsl @@ -1,5 +1,10 @@  Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + ОчиститьСвязанныеТЧ(); СформироватьСписокЗадач(); @@ -61,6 +66,11 @@ КонецФункции Процедура ПриЗаписи(Отказ) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + Если ДополнительныеСвойства.Свойство("узЭтоОбработка") Тогда Возврат; Конецесли;