#88 Сделать признак, который бы позволял указывать комментарии без задач (Загрузка изменений из хранилища)

src/cf/Catalogs/узКонфигурации.xml

@@ -666,6 +666,45 @@
 					<FullTextSearch>Use</FullTextSearch>
 				</Properties>
 			</Attribute>
+			<Attribute uuid="13d5932c-967e-4ddc-abc9-6ad6699aa2e5">
+				<Properties>
+					<Name>РазрешеныКомментарииБезЗадач</Name>
+					<Synonym>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>Разрешены комментарии без задач</v8:content>
+						</v8:item>
+					</Synonym>
+					<Comment/>
+					<Type>
+						<v8:Type>xs:boolean</v8:Type>
+					</Type>
+					<PasswordMode>false</PasswordMode>
+					<Format/>
+					<EditFormat/>
+					<ToolTip/>
+					<MarkNegatives>false</MarkNegatives>
+					<Mask/>
+					<MultiLine>false</MultiLine>
+					<ExtendedEdit>false</ExtendedEdit>
+					<MinValue xsi:nil="true"/>
+					<MaxValue xsi:nil="true"/>
+					<FillFromFillingValue>false</FillFromFillingValue>
+					<FillValue xsi:nil="true"/>
+					<FillChecking>DontCheck</FillChecking>
+					<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
+					<ChoiceParameterLinks/>
+					<ChoiceParameters/>
+					<QuickChoice>Auto</QuickChoice>
+					<CreateOnInput>Auto</CreateOnInput>
+					<ChoiceForm/>
+					<LinkByType/>
+					<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
+					<Use>ForItem</Use>
+					<Indexing>DontIndex</Indexing>
+					<FullTextSearch>Use</FullTextSearch>
+				</Properties>
+			</Attribute>
 			<Form>ФормаЭлемента</Form>
 			<Form>ФормаСписка</Form>
 		</ChildObjects>

src/cf/Catalogs/узКонфигурации/Forms/ФормаЭлемента/Ext/Form.xml

@@ -73,6 +73,18 @@
 			<ShowTitle>false</ShowTitle>
 			<ExtendedTooltip name="ГруппаНастройкиДляПолученияИзмененийИзХранилищаРасширеннаяПодсказка" id="61"/>
 			<ChildItems>
+				<CheckBoxField name="РазрешеныКомментарииБезЗадач" id="92">
+					<DataPath>Объект.РазрешеныКомментарииБезЗадач</DataPath>
+					<CheckBoxType>Tumbler</CheckBoxType>
+					<EditFormat>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>БЛ=Нет; БИ=Да</v8:content>
+						</v8:item>
+					</EditFormat>
+					<ContextMenu name="РазрешеныКомментарииБезЗадачКонтекстноеМеню" id="93"/>
+					<ExtendedTooltip name="РазрешеныКомментарииБезЗадачРасширеннаяПодсказка" id="94"/>
+				</CheckBoxField>
 				<UsualGroup name="Группа8" id="82">
 					<Representation>None</Representation>
 					<ShowTitle>false</ShowTitle>

src/cf/DataProcessors/узЗагрузкаИзмененийИзХранилища/Ext/ObjectModule.bsl

@@ -17,11 +17,14 @@
 		СтрокаТЗИсторияХранилища.Пользователь = ПолучитьПользователя(СтрокаТЗИсторияХранилища);
 		СтрокаТЗИсторияХранилища.Задача = ПолучитьЗадачу(СтрокаТЗИсторияХранилища);
 		
-		Если НЕ ЗначениеЗаполнено(СтрокаТЗИсторияХранилища.Задача) Тогда
+		Если НЕ ЗначениеЗаполнено(СтрокаТЗИсторияХранилища.Задача) 
+			И НЕ Конфигурация.РазрешеныКомментарииБезЗадач Тогда
+			
 			узОбщийМодульСервер.узСообщить("Ошибка! не заполнена задача в комментарии хранилища, загрузка прервана",76);
 			РезультатФункции = Новый Структура();
 			РезультатФункции.Вставить("ТабДокОтчет",ТабДокИсторияХранилища);
 			Возврат РезультатФункции;
+			
 		Конецесли;
 		
 		Для каждого СтрокаТЗИзмененныеОбъекты из СтрокаТЗИсторияХранилища.ТЗИзмененныеОбъекты цикл
@@ -595,6 +598,10 @@
 		| ПользовательХранилища ["+СтрокаТЗИсторияХранилища.ПользовательХранилища+"]
 		| Комментарий ["+СтрокаТЗИсторияХранилища.Комментарий+"]";	
 		
+	Сообщение = Новый СообщениеПользователю;
+	Сообщение.Текст = "" + пТекстПисьма;
+	Сообщение.Сообщить();	
+		
 	ДопПараметры = Новый Структура();
 	ДопПараметры.Вставить("ВажностьЗадачи",Перечисления.ВариантыВажностиЗадачи.Высокая);
 	ДопПараметры.Вставить("ТекстПисьма",пТекстПисьма);