1
0
mirror of https://github.com/BlizD/Tasks.git synced 2025-01-14 03:20:16 +02:00

Добавлен ключ -GroupByComment при выгрузке изменений из хранилища.

Добавлена команда "Получить команду" в обработку "Загрузка изменений из хранилища".
This commit is contained in:
Anton Ivanov 2017-06-20 10:49:13 +03:00
parent 8c6cd0f9c5
commit 98bc63d043
3 changed files with 41 additions and 0 deletions

View File

@ -289,6 +289,8 @@
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "-NEnd", Формат(ВерсияПо, "ЧН=; ЧГ=0"));
КонецЕсли;
ДобавитьВКомандуКлючЗначение(ТекстКоманды, "-GroupByComment");
РезультатФункции = Новый Структура();
РезультатФункции.Вставить("ТекстКоманды",ТекстКоманды);
РезультатФункции.Вставить("ФайлВыгрузкиИзменений",ФайлВыгрузкиИзменений);
@ -662,6 +664,12 @@
Возврат СтрНайти(НРЕГ(ЗначениеЯчейки),НРЕГ(ПодстрокаПоиска))>0;
КонецФункции
Функция ПолучитьТекстКоманды() Экспорт
НастройкиЗапускаКонфигуратора = ПолучитьНастройкиЗапускаКонфигуратора();
ТекстКоманды = НастройкиЗапускаКонфигуратора.ТекстКоманды;
Сообщить(ТекстКоманды);
Конецфункции
мМассивПользователейКомуОтправлятьСистемныеУведомления = Справочники.узКонстанты.ПолучитьМассивЗначенийКонстанты("СписокПользователейКомуОтправлятьСистемныеУведомления"
,Тип("СправочникСсылка.Пользователи"),,Ложь,Ложь);

View File

@ -9,6 +9,11 @@
<CommandName>Form.Command.КомандаЗагрузитьИзмененияИзХранилища</CommandName>
<ExtendedTooltip name="КомандаЗагрузитьИзмененияИзХранилищаРасширеннаяПодсказка" id="19"/>
</Button>
<Button name="ФормаПолучитьКоманду" id="23">
<Type>CommandBarButton</Type>
<CommandName>Form.Command.ПолучитьКоманду</CommandName>
<ExtendedTooltip name="ФормаПолучитьКомандуРасширеннаяПодсказка" id="24"/>
</Button>
</ChildItems>
</AutoCommandBar>
<Events>
@ -80,5 +85,20 @@
</ToolTip>
<Action>КомандаЗагрузитьИзмененияИзХранилища</Action>
</Command>
<Command name="ПолучитьКоманду" id="2">
<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>
<Action>ПолучитьКоманду</Action>
</Command>
</Commands>
</Form>

View File

@ -79,3 +79,16 @@
Объект.ВерсияС = ПолучитьПоследнююЗагруженнуюВерсиюНаСервере();
КонецПроцедуры
&НаСервере
Процедура ПолучитьКомандуНаСервере()
пОбъект = РеквизитФормыВЗначение("Объект");
пОбъект.ПолучитьТекстКоманды();
КонецПроцедуры
&НаКлиенте
Процедура ПолучитьКоманду(Команда)
ПолучитьКомандуНаСервере();
КонецПроцедуры