1
0
mirror of https://github.com/BlizD/Tasks.git synced 2025-01-28 03:57:18 +02:00

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

1. Изменил имя реквизита "ОсновнаяКонфигурация" на "РасширениеДляКонфигурации"
2. Реквизиты "ИмяРасширения", "РасширенияДляКонфигурации" сделал, чтобы показывалось, только если стоит "ЭтоРасширения" = Да;
3. Изменил текст пояснения для "Это расширения" теперь текст: "Если установлен признак, то требуется заполнить "Имя расширения" и "Основную конфигурацию""
4. Добавил на форму элемента динамический список "Расширения", в нем отображаются расширения для указанной Конфигурации.
This commit is contained in:
Anton Ivanov 2020-05-23 11:38:07 +03:00
parent e804f27b33
commit 8a60a4cac9
5 changed files with 241 additions and 91 deletions

View File

@ -795,7 +795,7 @@ D:\Dev\Storage\
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Конфигурация является расширением</v8:content>
<v8:content>Если установлен признак, то требуется заполнить "Имя расширения" и "Основную конфигурацию"</v8:content>
</v8:item>
</ToolTip>
<MarkNegatives>false</MarkNegatives>
@ -867,11 +867,11 @@ D:\Dev\Storage\
</Attribute>
<Attribute uuid="39191590-b6dc-450e-b39e-95f2665f1212">
<Properties>
<Name>ОсновнаяКонфигурация</Name>
<Name>РасширениеДляКонфигурации</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Основная конфигурация</v8:content>
<v8:content>Расширение для конфигурации</v8:content>
</v8:item>
</Synonym>
<Comment/>

View File

@ -1,6 +1,7 @@

Процедура ПередЗаписью(Отказ)
ПроверитьРеквизиты(Отказ);
Если Отказ Тогда
Возврат;
Конецесли;
@ -39,6 +40,15 @@
КонецЕсли;
// --- 79Vlad 10.10.2018
//+ #198 Иванов А.Б. 2020-05-23
Если ЭтоРасширение Тогда
МассивПроверяемыхРеквизитов.Добавить("ИмяРасширения");
МассивПроверяемыхРеквизитов.Добавить("РасширениеДляКонфигурации");
Конецесли;
//- #198 Иванов А.Б. 2020-05-23
МассивПроверяемыхРеквизитов.Добавить("КаталогХранилища");
Конецесли;

View File

@ -27,6 +27,59 @@
</InputField>
</ChildItems>
</UsualGroup>
<UsualGroup name="ГруппаВыгрузкиФайлаЛистаЗадач" id="102">
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Группа выгрузки файла листа задач</v8:content>
</v8:item>
</ToolTip>
<HorizontalStretch>true</HorizontalStretch>
<Group>Horizontal</Group>
<Representation>None</Representation>
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="ГруппаВыгрузкиФайлаЛистаЗадачРасширеннаяПодсказка" id="103"/>
<ChildItems>
<InputField name="КаталогДляВыгрузкиФайлаЛистаЗадач" id="89">
<DataPath>Объект.КаталогДляВыгрузкиФайлаЛистаЗадач</DataPath>
<TitleLocation>Top</TitleLocation>
<ChoiceButton>true</ChoiceButton>
<ContextMenu name="КаталогДляВыгрузкиФайлаЛистаЗадачКонтекстноеМеню" id="90"/>
<ExtendedTooltip name="КаталогДляВыгрузкиФайлаЛистаЗадачРасширеннаяПодсказка" id="91"/>
<Events>
<Event name="StartChoice">КаталогДляВыгрузкиФайлаЛистаЗадачНачалоВыбора</Event>
</Events>
</InputField>
<CheckBoxField name="узФормироватьФайлСОтборомПоКонфигурации" id="99">
<DataPath>Объект.узФормироватьФайлСОтборомПоКонфигурации</DataPath>
<TitleLocation>Right</TitleLocation>
<TitleHeight>1</TitleHeight>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<GroupHorizontalAlign>Left</GroupHorizontalAlign>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="узФормироватьФайлСОтборомПоКонфигурацииКонтекстноеМеню" id="100"/>
<ExtendedTooltip name="узФормироватьФайлСОтборомПоКонфигурацииРасширеннаяПодсказка" id="101"/>
</CheckBoxField>
</ChildItems>
</UsualGroup>
<UsualGroup name="Группа7" id="156">
<Representation>None</Representation>
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="Группа7РасширеннаяПодсказка" id="157"/>
<ChildItems>
<CheckBoxField name="ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозитория" id="86">
<DataPath>Объект.ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозитория</DataPath>
<TitleLocation>Right</TitleLocation>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозиторияКонтекстноеМеню" id="87"/>
<ExtendedTooltip name="ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозиторияРасширеннаяПодсказка" id="88"/>
<Events>
<Event name="OnChange">ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозиторияПриИзменении</Event>
</Events>
</CheckBoxField>
</ChildItems>
</UsualGroup>
<UsualGroup name="ГруппаРасширение" id="128">
<Title>
<v8:item>
@ -51,6 +104,9 @@
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="ЭтоРасширениеКонтекстноеМеню" id="108"/>
<ExtendedTooltip name="ЭтоРасширениеРасширеннаяПодсказка" id="109"/>
<Events>
<Event name="OnChange">ЭтоРасширениеПриИзменении</Event>
</Events>
</CheckBoxField>
<UsualGroup name="Группа1" id="133">
<Group>AlwaysHorizontal</Group>
@ -64,7 +120,7 @@
<ExtendedTooltip name="ИмяРасширенияРасширеннаяПодсказка" id="121"/>
</InputField>
<InputField name="ОсновнаяКонфигурация" id="130">
<DataPath>Объект.ОсновнаяКонфигурация</DataPath>
<DataPath>Объект.РасширениеДляКонфигурации</DataPath>
<ContextMenu name="ОсновнаяКонфигурацияКонтекстноеМеню" id="131"/>
<ExtendedTooltip name="ОсновнаяКонфигурацияРасширеннаяПодсказка" id="132"/>
</InputField>
@ -72,60 +128,6 @@
</UsualGroup>
</ChildItems>
</UsualGroup>
<UsualGroup name="ГруппаНастройкиИспользованияЗагрузкиИзХранилища" id="84">
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Группа настройки использования загрузки из хранилища</v8:content>
</v8:item>
</ToolTip>
<Representation>None</Representation>
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="ГруппаНастройкиИспользованияЗагрузкиИзХранилищаРасширеннаяПодсказка" id="85"/>
<ChildItems>
<CheckBoxField name="ПолучатьИзмененияИзХранилища" id="10">
<DataPath>Объект.ПолучатьИзмененияИзХранилища</DataPath>
<TitleLocation>Right</TitleLocation>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<EditMode>EnterOnInput</EditMode>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="ПолучатьИзмененияИзХранилищаКонтекстноеМеню" id="11"/>
<ExtendedTooltip name="ПолучатьИзмененияИзХранилищаРасширеннаяПодсказка" id="12"/>
<Events>
<Event name="OnChange">ПолучатьИзмененияИзХранилищаПриИзменении</Event>
</Events>
</CheckBoxField>
<CheckBoxField name="ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилища" id="74">
<DataPath>Объект.ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилища</DataPath>
<TitleLocation>Right</TitleLocation>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилищаКонтекстноеМеню" id="75"/>
<ExtendedTooltip name="ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилищаРасширеннаяПодсказка" id="76"/>
<Events>
<Event name="OnChange">ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилищаПриИзменении</Event>
</Events>
</CheckBoxField>
<CheckBoxField name="РазрешеныКомментарииБезЗадач" id="104">
<DataPath>Объект.РазрешеныКомментарииБезЗадач</DataPath>
<TitleLocation>Right</TitleLocation>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Если отметка НЕ установлена - то каждая версия хранилища должна иметь привязку к номеру задачи в формате "#НомерЗадачи"</v8:content>
</v8:item>
<v8:item>
<v8:lang>en</v8:lang>
<v8:content>If the mark is NOT set, then each version of the repository must be linked to the task number in the format "#TaskNumber"</v8:content>
</v8:item>
</ToolTip>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="РазрешеныКомментарииБезЗадачКонтекстноеМеню" id="105"/>
<ExtendedTooltip name="РазрешеныКомментарииБезЗадачРасширеннаяПодсказка" id="106"/>
</CheckBoxField>
</ChildItems>
</UsualGroup>
<UsualGroup name="ГруппаНастройкиДляПолученияИзмененийИзХранилища" id="60">
<Title>
<v8:item>
@ -376,52 +378,125 @@
</UsualGroup>
</ChildItems>
</UsualGroup>
<CheckBoxField name="ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозитория" id="86">
<DataPath>Объект.ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозитория</DataPath>
<TitleLocation>Right</TitleLocation>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозиторияКонтекстноеМеню" id="87"/>
<ExtendedTooltip name="ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозиторияРасширеннаяПодсказка" id="88"/>
<Events>
<Event name="OnChange">ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозиторияПриИзменении</Event>
</Events>
</CheckBoxField>
<UsualGroup name="ГруппаВыгрузкиФайлаЛистаЗадач" id="102">
<UsualGroup name="ГруппаНастройкиИспользованияЗагрузкиИзХранилища" id="84">
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Группа выгрузки файла листа задач</v8:content>
<v8:content>Группа настройки использования загрузки из хранилища</v8:content>
</v8:item>
</ToolTip>
<HorizontalStretch>true</HorizontalStretch>
<Group>Horizontal</Group>
<Group>Vertical</Group>
<Representation>None</Representation>
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="ГруппаВыгрузкиФайлаЛистаЗадачРасширеннаяПодсказка" id="103"/>
<ExtendedTooltip name="ГруппаНастройкиИспользованияЗагрузкиИзХранилищаРасширеннаяПодсказка" id="85"/>
<ChildItems>
<InputField name="КаталогДляВыгрузкиФайлаЛистаЗадач" id="89">
<DataPath>Объект.КаталогДляВыгрузкиФайлаЛистаЗадач</DataPath>
<TitleLocation>Top</TitleLocation>
<ChoiceButton>true</ChoiceButton>
<ContextMenu name="КаталогДляВыгрузкиФайлаЛистаЗадачКонтекстноеМеню" id="90"/>
<ExtendedTooltip name="КаталогДляВыгрузкиФайлаЛистаЗадачРасширеннаяПодсказка" id="91"/>
<Events>
<Event name="StartChoice">КаталогДляВыгрузкиФайлаЛистаЗадачНачалоВыбора</Event>
</Events>
</InputField>
<CheckBoxField name="узФормироватьФайлСОтборомПоКонфигурации" id="99">
<DataPath>Объект.узФормироватьФайлСОтборомПоКонфигурации</DataPath>
<CheckBoxField name="ПолучатьИзмененияИзХранилища" id="10">
<DataPath>Объект.ПолучатьИзмененияИзХранилища</DataPath>
<TitleLocation>Right</TitleLocation>
<TitleHeight>1</TitleHeight>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<GroupHorizontalAlign>Left</GroupHorizontalAlign>
<EditMode>EnterOnInput</EditMode>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="узФормироватьФайлСОтборомПоКонфигурацииКонтекстноеМеню" id="100"/>
<ExtendedTooltip name="узФормироватьФайлСОтборомПоКонфигурацииРасширеннаяПодсказка" id="101"/>
<ContextMenu name="ПолучатьИзмененияИзХранилищаКонтекстноеМеню" id="11"/>
<ExtendedTooltip name="ПолучатьИзмененияИзХранилищаРасширеннаяПодсказка" id="12"/>
<Events>
<Event name="OnChange">ПолучатьИзмененияИзХранилищаПриИзменении</Event>
</Events>
</CheckBoxField>
<CheckBoxField name="ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилища" id="74">
<DataPath>Объект.ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилища</DataPath>
<TitleLocation>Right</TitleLocation>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилищаКонтекстноеМеню" id="75"/>
<ExtendedTooltip name="ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилищаРасширеннаяПодсказка" id="76"/>
<Events>
<Event name="OnChange">ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилищаПриИзменении</Event>
</Events>
</CheckBoxField>
<CheckBoxField name="РазрешеныКомментарииБезЗадач" id="104">
<DataPath>Объект.РазрешеныКомментарииБезЗадач</DataPath>
<TitleLocation>Right</TitleLocation>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Если отметка НЕ установлена - то каждая версия хранилища должна иметь привязку к номеру задачи в формате "#НомерЗадачи"</v8:content>
</v8:item>
<v8:item>
<v8:lang>en</v8:lang>
<v8:content>If the mark is NOT set, then each version of the repository must be linked to the task number in the format "#TaskNumber"</v8:content>
</v8:item>
</ToolTip>
<ToolTipRepresentation>Button</ToolTipRepresentation>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="РазрешеныКомментарииБезЗадачКонтекстноеМеню" id="105"/>
<ExtendedTooltip name="РазрешеныКомментарииБезЗадачРасширеннаяПодсказка" id="106"/>
</CheckBoxField>
</ChildItems>
</UsualGroup>
<Table name="Расширения" id="135">
<Representation>List</Representation>
<HeightInTableRows>3</HeightInTableRows>
<UseAlternationRowColor>true</UseAlternationRowColor>
<VerticalStretch>false</VerticalStretch>
<EnableStartDrag>true</EnableStartDrag>
<EnableDrag>true</EnableDrag>
<DataPath>Расширения</DataPath>
<RowPictureDataPath>Расширения.DefaultPicture</RowPictureDataPath>
<AutoRefresh>false</AutoRefresh>
<AutoRefreshPeriod>60</AutoRefreshPeriod>
<Period>
<v8:variant xsi:type="v8:StandardPeriodVariant">Custom</v8:variant>
<v8:startDate>0001-01-01T00:00:00</v8:startDate>
<v8:endDate>0001-01-01T00:00:00</v8:endDate>
</Period>
<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
<RestoreCurrentRow>false</RestoreCurrentRow>
<TopLevelParent xsi:nil="true"/>
<ShowRoot>true</ShowRoot>
<AllowRootChoice>false</AllowRootChoice>
<UpdateOnDataChange>Auto</UpdateOnDataChange>
<ContextMenu name="РасширенияКонтекстноеМеню" id="136"/>
<AutoCommandBar name="РасширенияКоманднаяПанель" id="137">
<Autofill>false</Autofill>
</AutoCommandBar>
<ExtendedTooltip name="РасширенияРасширеннаяПодсказка" id="138"/>
<SearchStringAddition name="РасширенияСтрокаПоиска" id="139">
<AdditionSource>
<Item>Расширения</Item>
<Type>SearchStringRepresentation</Type>
</AdditionSource>
<ContextMenu name="РасширенияСтрокаПоискаКонтекстноеМеню" id="140"/>
<ExtendedTooltip name="РасширенияСтрокаПоискаРасширеннаяПодсказка" id="141"/>
</SearchStringAddition>
<ViewStatusAddition name="РасширенияСостояниеПросмотра" id="142">
<AdditionSource>
<Item>Расширения</Item>
<Type>ViewStatusRepresentation</Type>
</AdditionSource>
<ContextMenu name="РасширенияСостояниеПросмотраКонтекстноеМеню" id="143"/>
<ExtendedTooltip name="РасширенияСостояниеПросмотраРасширеннаяПодсказка" id="144"/>
</ViewStatusAddition>
<SearchControlAddition name="РасширенияУправлениеПоиском" id="145">
<AdditionSource>
<Item>Расширения</Item>
<Type>SearchControl</Type>
</AdditionSource>
<ContextMenu name="РасширенияУправлениеПоискомКонтекстноеМеню" id="146"/>
<ExtendedTooltip name="РасширенияУправлениеПоискомРасширеннаяПодсказка" id="147"/>
</SearchControlAddition>
<ChildItems>
<LabelField name="РасширенияРасширение" id="151">
<DataPath>Расширения.Расширение</DataPath>
<ContextMenu name="РасширенияРасширениеКонтекстноеМеню" id="152"/>
<ExtendedTooltip name="РасширенияРасширениеРасширеннаяПодсказка" id="153"/>
</LabelField>
<LabelField name="РасширенияИмяРасширения" id="148">
<DataPath>Расширения.ИмяРасширения</DataPath>
<ContextMenu name="РасширенияИмяРасширенияКонтекстноеМеню" id="149"/>
<ExtendedTooltip name="РасширенияИмяРасширенияРасширеннаяПодсказка" id="150"/>
</LabelField>
</ChildItems>
</Table>
</ChildItems>
<Attributes>
<Attribute name="Объект" id="1">
@ -431,6 +506,47 @@
<MainAttribute>true</MainAttribute>
<SavedData>true</SavedData>
</Attribute>
<Attribute name="Расширения" id="2">
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Расширения</v8:content>
</v8:item>
</Title>
<Type>
<v8:Type>cfg:DynamicList</v8:Type>
</Type>
<Settings xsi:type="DynamicList">
<ManualQuery>true</ManualQuery>
<DynamicDataRead>false</DynamicDataRead>
<QueryText>ВЫБРАТЬ
узКонфигурации.Ссылка КАК Расширение,
узКонфигурации.ИмяРасширения КАК ИмяРасширения
ИЗ
Справочник.узКонфигурации КАК узКонфигурации
ГДЕ
узКонфигурации.ЭтоРасширение
И узКонфигурации.РасширениеДляКонфигурации = &amp;РасширениеДляКонфигурации
И НЕ узКонфигурации.ЭтоГруппа</QueryText>
<MainTable>Catalog.узКонфигурации</MainTable>
<ListSettings>
<dcsset:filter>
<dcsset:viewMode>Normal</dcsset:viewMode>
<dcsset:userSettingID>dfcece9d-5077-440b-b6b3-45a5cb4538eb</dcsset:userSettingID>
</dcsset:filter>
<dcsset:order>
<dcsset:viewMode>Normal</dcsset:viewMode>
<dcsset:userSettingID>88619765-ccb3-46c6-ac52-38e9c992ebd4</dcsset:userSettingID>
</dcsset:order>
<dcsset:conditionalAppearance>
<dcsset:viewMode>Normal</dcsset:viewMode>
<dcsset:userSettingID>b75fecce-942b-4aed-abc9-e6a02e460fb3</dcsset:userSettingID>
</dcsset:conditionalAppearance>
<dcsset:itemsViewMode>Normal</dcsset:itemsViewMode>
<dcsset:itemsUserSettingID>911b6018-f537-43e8-a417-da56b22f9aec</dcsset:itemsUserSettingID>
</ListSettings>
</Settings>
</Attribute>
</Attributes>
<Commands>
<Command name="КомандаСоздатьVBSФайлДляПланировщикаЗаданий" id="1">

View File

@ -1,6 +1,12 @@

&НаКлиенте
Процедура ЭтоРасширениеПриИзменении(Элемент)
УстановитьВидимостьДоступность();
КонецПроцедуры
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Расширения.Параметры.УстановитьЗначениеПараметра("РасширениеДляКонфигурации",Объект.Ссылка);
УстановитьВидимостьДоступность();
КонецПроцедуры
@ -18,6 +24,13 @@
// +++ #124 79Vlad 10.10.2018
Элементы.узФормироватьФайлСОтборомПоКонфигурации.Видимость = Ложь;
// --- #124 79Vlad 10.10.2018
//+ #198 Иванов А.Б. 2020-05-23
Элементы.ИмяРасширения.Видимость = Ложь;
Элементы.ОсновнаяКонфигурация.Видимость = Ложь;
Элементы.Расширения.Видимость = Ложь;
//- #198 Иванов А.Б. 2020-05-23
Если Объект.ПолучатьИзмененияИзХранилища Тогда
Элементы.ГруппаНастройкиДляПолученияИзмененийИзХранилища.Видимость = Истина;
Элементы.ИспользоватьАльтернативнуюЗагрузкуДанныхИзХранилища.Видимость = Истина;
@ -31,6 +44,17 @@
Конецесли;
Конецесли;
//+ #198 Иванов А.Б. 2020-05-23
Если Объект.ЭтоРасширение Тогда
Элементы.ИмяРасширения.Видимость = Истина;
Элементы.ОсновнаяКонфигурация.Видимость = Истина;
Иначе
Элементы.Расширения.Видимость = Истина;
Конецесли;
//- #198 Иванов А.Б. 2020-05-23
Если Объект.ФормироватьФайлЛистЗадачВКаталогеЛокальногоРепозитория Тогда
Элементы.КаталогДляВыгрузкиФайлаЛистаЗадач.Видимость = Истина;
// +++ #124 79Vlad 10.10.2018

View File

@ -112,7 +112,7 @@
//+ #198 milanse 2020-05-17
//| И узИсторияКонфигураций.Владелец = &Конфигурация
| И (узИсторияКонфигураций.Владелец = &Конфигурация
| ИЛИ узИсторияКонфигураций.Владелец.ОсновнаяКонфигурация = &Конфигурация)
| ИЛИ узИсторияКонфигураций.Владелец.РасширениеДляКонфигурации = &Конфигурация)
//+ #198 milanse 2020-05-17
|
|УПОРЯДОЧИТЬ ПО