1c/Tasks
1
0
Fork 0
mirror of https://github.com/BlizD/Tasks.git synced 2025-03-27 21:39:01 +02:00
Code Issues Releases Activity

#198 @milanse загрузка изменений из хранилища по TCP и загрузка изменений по расширениям

Browse Source
This commit is contained in:
Anton Ivanov 2020-05-23 11:08:47 +03:00
parent 3e55eb6a97
commit e804f27b33
6 changed files with 319 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -776,6 +776,185 @@ D:\Dev\Storage\
<DataHistory>Use</DataHistory>
</Properties>
</Attribute>
<Attribute uuid="feccd321-c869-4a93-a777-108c849f03f6">
<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>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Конфигурация является расширением</v8:content>
</v8:item>
</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>
<DataHistory>Use</DataHistory>
</Properties>
</Attribute>
<Attribute uuid="e56418d1-bc84-4f6d-aeeb-f7f065bf465a">
<Properties>
<Name>ИмяРасширения</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Имя расширения</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>xs:string</v8:Type>
<v8:StringQualifiers>
<v8:Length>150</v8:Length>
<v8:AllowedLength>Variable</v8:AllowedLength>
</v8:StringQualifiers>
</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:type="xs:string"/>
<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>
<DataHistory>Use</DataHistory>
</Properties>
</Attribute>
<Attribute uuid="39191590-b6dc-450e-b39e-95f2665f1212">
<Properties>
<Name>ОсновнаяКонфигурация</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Основная конфигурация</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>cfg:CatalogRef.узКонфигурации</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>
<DataHistory>Use</DataHistory>
</Properties>
</Attribute>
<Attribute uuid="8b83f13e-70df-428c-9a5b-5d770bcaf83e">
<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>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>БЛ=Файловая; БИ=Серверная</v8:content>
</v8:item>
</Format>
<EditFormat>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>БЛ=Файловая; БИ=Серверная</v8:content>
</v8:item>
</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>
<DataHistory>Use</DataHistory>
</Properties>
</Attribute>
<Form>ФормаЭлемента</Form>
<Form>ФормаСписка</Form>
</ChildObjects>

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

@ -27,6 +27,51 @@
</InputField>
</ChildItems>
</UsualGroup>
<UsualGroup name="ГруппаРасширение" id="128">
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Группа расширение</v8:content>
</v8:item>
</Title>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Группа расширение</v8:content>
</v8:item>
</ToolTip>
<Representation>None</Representation>
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="ГруппаРасширениеРасширеннаяПодсказка" id="129"/>
<ChildItems>
<CheckBoxField name="ЭтоРасширение" id="107">
<DataPath>Объект.ЭтоРасширение</DataPath>
<TitleLocation>Right</TitleLocation>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="ЭтоРасширениеКонтекстноеМеню" id="108"/>
<ExtendedTooltip name="ЭтоРасширениеРасширеннаяПодсказка" id="109"/>
</CheckBoxField>
<UsualGroup name="Группа1" id="133">
<Group>AlwaysHorizontal</Group>
<Representation>None</Representation>
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="Группа1РасширеннаяПодсказка" id="134"/>
<ChildItems>
<InputField name="ИмяРасширения" id="119">
<DataPath>Объект.ИмяРасширения</DataPath>
<ContextMenu name="ИмяРасширенияКонтекстноеМеню" id="120"/>
<ExtendedTooltip name="ИмяРасширенияРасширеннаяПодсказка" id="121"/>
</InputField>
<InputField name="ОсновнаяКонфигурация" id="130">
<DataPath>Объект.ОсновнаяКонфигурация</DataPath>
<ContextMenu name="ОсновнаяКонфигурацияКонтекстноеМеню" id="131"/>
<ExtendedTooltip name="ОсновнаяКонфигурацияРасширеннаяПодсказка" id="132"/>
</InputField>
</ChildItems>
</UsualGroup>
</ChildItems>
</UsualGroup>
<UsualGroup name="ГруппаНастройкиИспользованияЗагрузкиИзХранилища" id="84">
<ToolTip>
<v8:item>
@ -204,17 +249,37 @@
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="ГруппаПарметрыТранзитнойБазыРасширеннаяПодсказка" id="98"/>
<ChildItems>
<InputField name="КаталогТранзитнойБазы" id="36">
<DataPath>Объект.КаталогТранзитнойБазы</DataPath>
<TitleLocation>Top</TitleLocation>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<ChoiceButton>true</ChoiceButton>
<ContextMenu name="КаталогТранзитнойБазыКонтекстноеМеню" id="37"/>
<ExtendedTooltip name="КаталогТранзитнойБазыРасширеннаяПодсказка" id="38"/>
<Events>
<Event name="StartChoice">КаталогТранзитнойБазыНачалоВыбора</Event>
</Events>
</InputField>
<UsualGroup name="Группа4" id="117">
<Group>AlwaysHorizontal</Group>
<Representation>None</Representation>
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="Группа4РасширеннаяПодсказка" id="118"/>
<ChildItems>
<InputField name="СервернаяБаза" id="114">
<DataPath>Объект.ЭтоСервернаяБаза</DataPath>
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Размещение</v8:content>
</v8:item>
</Title>
<TitleLocation>Top</TitleLocation>
<ContextMenu name="СервернаяБазаКонтекстноеМеню" id="115"/>
<ExtendedTooltip name="СервернаяБазаРасширеннаяПодсказка" id="116"/>
</InputField>
<InputField name="КаталогТранзитнойБазы" id="36">
<DataPath>Объект.КаталогТранзитнойБазы</DataPath>
<TitleLocation>Top</TitleLocation>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<ChoiceButton>true</ChoiceButton>
<ContextMenu name="КаталогТранзитнойБазыКонтекстноеМеню" id="37"/>
<ExtendedTooltip name="КаталогТранзитнойБазыРасширеннаяПодсказка" id="38"/>
<Events>
<Event name="StartChoice">КаталогТранзитнойБазыНачалоВыбора</Event>
</Events>
</InputField>
</ChildItems>
</UsualGroup>
<InputField name="ПользовательТранзитнойБазы" id="39">
<DataPath>Объект.ПользовательТранзитнойБазы</DataPath>
<TitleLocation>Top</TitleLocation>

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

@ -107,7 +107,6 @@
Объект.КаталогХранилища = ВыбранныйКаталог[0];
КонецПроцедуры
&НаКлиенте
Процедура КаталогДляЗагрузкиИзмененийИзХранилщаНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
ДиалогВыбораФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога);

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

@ -430,13 +430,25 @@
ТекстКоманды = "";
ТекстКоманды = СоздатьКоманду(Конфигурация.Приложение1с);
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/F", Конфигурация.КаталогТранзитнойБазы);
//+ #198 milanse 2020-05-17
//ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/F", Конфигурация.КаталогТранзитнойБазы);
Если Конфигурация.ЭтоСервернаяБаза Тогда
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/S", Конфигурация.КаталогТранзитнойБазы);
Иначе
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/F", Конфигурация.КаталогТранзитнойБазы);
КонецЕсли;
//+ #198 milanse 2020-05-17
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/N", Конфигурация.ПользовательТранзитнойБазы);
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/P", Конфигурация.ПарольПользователяВТранзитнуюБазу);
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/ConfigurationRepositoryF", Конфигурация.КаталогХранилища);
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/ConfigurationRepositoryN", Конфигурация.ПользовательХранилища);
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/ConfigurationRepositoryP", Конфигурация.ПарольПользователяВХранилище);
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/ConfigurationRepositoryReport", ФайлВыгрузкиИзменений);
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "/ConfigurationRepositoryReport", ФайлВыгрузкиИзменений);
//+ #198 milanse 2020-05-17
Если Конфигурация.ЭтоРасширение Тогда
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "-Extension", Конфигурация.ИмяРасширения);
КонецЕсли;
//+ #198 milanse 2020-05-17
Если ЗначениеЗаполнено(ВерсияС) Тогда
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "-NBegin", Формат(ВерсияС, "ЧН=; ЧГ=0"));
КонецЕсли;
@ -742,4 +754,4 @@
мМассивПользователейКомуОтправлятьСистемныеУведомления = Справочники.узКонстанты.ПолучитьМассивЗначенийКонстанты("СписокПользователейКомуОтправлятьСистемныеУведомления"
,Тип("СправочникСсылка.Пользователи"),,Ложь,Истина); //+ #97 Дзеса Ігор последний параметр Ложь изменен на Истина
,Тип("СправочникСсылка.Пользователи"),,Ложь,Истина); //+ #97 Дзеса Ігор последний параметр Ложь изменен на Истина

29
src/cf/Documents/узВыпускРелиза/Forms/ФормаДокумента/Ext/Form.xml
View File

@ -201,6 +201,12 @@
<ContextMenu name="ТЧИзмененныеОбъектыИдентификаторОбъектаМетаданныхПолноеИмяМетаданныхКонтекстноеМеню" id="158"/>
<ExtendedTooltip name="ТЧИзмененныеОбъектыИдентификаторОбъектаМетаданныхПолноеИмяМетаданныхРасширеннаяПодсказка" id="159"/>
</InputField>
<InputField name="ТЧИзмененныеОбъектыКонфигурация" id="215">
<DataPath>ТЧИзмененныеОбъекты.Конфигурация</DataPath>
<EditMode>EnterOnInput</EditMode>
<ContextMenu name="ТЧИзмененныеОбъектыКонфигурацияКонтекстноеМеню" id="216"/>
<ExtendedTooltip name="ТЧИзмененныеОбъектыКонфигурацияРасширеннаяПодсказка" id="217"/>
</InputField>
</ChildItems>
</Table>
</ChildItems>
@ -423,6 +429,18 @@
<Event name="OnChange">ИсторияХранилищаПометкаПриИзменении</Event>
</Events>
</CheckBoxField>
<LabelField name="ИсторияХранилищаЗаписьИсторииХранилищаВладелец" id="209">
<DataPath>Объект.ИсторияХранилища.ЗаписьИсторииХранилища.Owner</DataPath>
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Конфигурация</v8:content>
</v8:item>
</Title>
<EditMode>EnterOnInput</EditMode>
<ContextMenu name="ИсторияХранилищаЗаписьИсторииХранилищаВладелецКонтекстноеМеню" id="210"/>
<ExtendedTooltip name="ИсторияХранилищаЗаписьИсторииХранилищаВладелецРасширеннаяПодсказка" id="211"/>
</LabelField>
<LabelField name="ИсторияХранилищаЗаписьИсторииХранилищаВерсия" id="117">
<DataPath>Объект.ИсторияХранилища.ЗаписьИсторииХранилища.Версия</DataPath>
<EditMode>EnterOnInput</EditMode>
@ -601,6 +619,17 @@
</v8:NumberQualifiers>
</Type>
</Column>
<Column name="Конфигурация" id="3">
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Конфигурация</v8:content>
</v8:item>
</Title>
<Type>
<v8:Type>cfg:CatalogRef.узКонфигурации</v8:Type>
</Type>
</Column>
</Columns>
</Attribute>
<Attribute name="ФорматированныйТекст" id="5">

24
src/cf/Documents/узВыпускРелиза/Forms/ФормаДокумента/Ext/Form/Module.bsl
View File

@ -103,13 +103,17 @@
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| узИсторияКонфигураций.Ссылка,
| узИсторияКонфигураций.Задача
| узИсторияКонфигураций.Ссылка КАК Ссылка,
| узИсторияКонфигураций.Задача КАК Задача
|ИЗ
| Справочник.узИсторияКонфигураций КАК узИсторияКонфигураций
|ГДЕ
| узИсторияКонфигураций.Задача В(&МассивЗадач)
| И узИсторияКонфигураций.Владелец = &Конфигурация
//+ #198 milanse 2020-05-17
//| И узИсторияКонфигураций.Владелец = &Конфигурация
| И (узИсторияКонфигураций.Владелец = &Конфигурация
| ИЛИ узИсторияКонфигураций.Владелец.ОсновнаяКонфигурация = &Конфигурация)
//+ #198 milanse 2020-05-17
|
|УПОРЯДОЧИТЬ ПО
| узИсторияКонфигураций.ДатаВерсии";
@ -310,6 +314,9 @@
ВТИзмененныеОбъекты.Свернуть("ИдентификаторОбъектаМетаданных");
ВТИзмененныеОбъекты.Колонки.Добавить("Порядок");
//+ #198 milanse 2020-05-17
ВТИзмененныеОбъекты.Колонки.Добавить("Конфигурация");
//+ #198 milanse 2020-05-17
Для каждого СтрокаВТИзмененныеОбъекты из ВТИзмененныеОбъекты цикл
пПолноеИмяМетаданных = СтрокаВТИзмененныеОбъекты.ИдентификаторОбъектаМетаданных.ПолноеИмяМетаданных;
@ -317,15 +324,24 @@
пПорядок = ПолучитьПорядокДляПолноеИмяМетаданных(пПолноеИмяМетаданных);
СтрокаВТИзмененныеОбъекты.Порядок = пПорядок + пПолноеИмяМетаданных;
//+ #198 milanse 2020-05-17
СтрокаВТИзмененныеОбъекты.Конфигурация = СтрокаВТИзмененныеОбъекты.ИдентификаторОбъектаМетаданных.Владелец;
//+ #198 milanse 2020-05-17
Конеццикла;
ВТИзмененныеОбъекты.Сортировать("Порядок");
//+ #198 milanse 2020-05-17
//ВТИзмененныеОбъекты.Сортировать("Порядок");
ВТИзмененныеОбъекты.Сортировать("Конфигурация,Порядок");
//+ #198 milanse 2020-05-17
НС = 1;
Для каждого СтрокаВТИзмененныеОбъекты из ВТИзмененныеОбъекты цикл
СтрокаТЧИзмененныеОбъекты = ТЧИзмененныеОбъекты.Добавить();
СтрокаТЧИзмененныеОбъекты.НомерСтроки = НС;
СтрокаТЧИзмененныеОбъекты.ИдентификаторОбъектаМетаданных = СтрокаВТИзмененныеОбъекты.ИдентификаторОбъектаМетаданных;
//+ #198 milanse 2020-05-17
СтрокаТЧИзмененныеОбъекты.Конфигурация = СтрокаВТИзмененныеОбъекты.Конфигурация;
//- #198 milanse 2020-05-17
НС = НС + 1;
Конеццикла;
КонецПроцедуры