diff --git a/src/cf/Catalogs/узКонфигурации.xml b/src/cf/Catalogs/узКонфигурации.xml index 9dcdd2e92..c69471f19 100644 --- a/src/cf/Catalogs/узКонфигурации.xml +++ b/src/cf/Catalogs/узКонфигурации.xml @@ -666,6 +666,45 @@ Use + + + РазрешеныКомментарииБезЗадач + + + ru + Разрешены комментарии без задач + + + + + xs:boolean + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + ForItem + DontIndex + Use + +
ФормаЭлемента
ФормаСписка
diff --git a/src/cf/Catalogs/узКонфигурации/Forms/ФормаЭлемента/Ext/Form.xml b/src/cf/Catalogs/узКонфигурации/Forms/ФормаЭлемента/Ext/Form.xml index 7bc596829..5aa4c4ab0 100644 --- a/src/cf/Catalogs/узКонфигурации/Forms/ФормаЭлемента/Ext/Form.xml +++ b/src/cf/Catalogs/узКонфигурации/Forms/ФормаЭлемента/Ext/Form.xml @@ -73,6 +73,18 @@ false + + Объект.РазрешеныКомментарииБезЗадач + Tumbler + + + ru + БЛ=Нет; БИ=Да + + + + + None false diff --git a/src/cf/DataProcessors/узЗагрузкаИзмененийИзХранилища/Ext/ObjectModule.bsl b/src/cf/DataProcessors/узЗагрузкаИзмененийИзХранилища/Ext/ObjectModule.bsl index 407445510..a03a5cd1a 100644 --- a/src/cf/DataProcessors/узЗагрузкаИзмененийИзХранилища/Ext/ObjectModule.bsl +++ b/src/cf/DataProcessors/узЗагрузкаИзмененийИзХранилища/Ext/ObjectModule.bsl @@ -17,11 +17,14 @@ СтрокаТЗИсторияХранилища.Пользователь = ПолучитьПользователя(СтрокаТЗИсторияХранилища); СтрокаТЗИсторияХранилища.Задача = ПолучитьЗадачу(СтрокаТЗИсторияХранилища); - Если НЕ ЗначениеЗаполнено(СтрокаТЗИсторияХранилища.Задача) Тогда + Если НЕ ЗначениеЗаполнено(СтрокаТЗИсторияХранилища.Задача) + И НЕ Конфигурация.РазрешеныКомментарииБезЗадач Тогда + узОбщийМодульСервер.узСообщить("Ошибка! не заполнена задача в комментарии хранилища, загрузка прервана",76); РезультатФункции = Новый Структура(); РезультатФункции.Вставить("ТабДокОтчет",ТабДокИсторияХранилища); Возврат РезультатФункции; + Конецесли; Для каждого СтрокаТЗИзмененныеОбъекты из СтрокаТЗИсторияХранилища.ТЗИзмененныеОбъекты цикл @@ -594,7 +597,11 @@ | Конфигурация ["+Конфигурация+"] | ПользовательХранилища ["+СтрокаТЗИсторияХранилища.ПользовательХранилища+"] | Комментарий ["+СтрокаТЗИсторияХранилища.Комментарий+"]"; - + + Сообщение = Новый СообщениеПользователю; + Сообщение.Текст = "" + пТекстПисьма; + Сообщение.Сообщить(); + ДопПараметры = Новый Структура(); ДопПараметры.Вставить("ВажностьЗадачи",Перечисления.ВариантыВажностиЗадачи.Высокая); ДопПараметры.Вставить("ТекстПисьма",пТекстПисьма);