From b44cc7b3494ebce6075e0c982e25fa3b9a10f8a8 Mon Sep 17 00:00:00 2001
From: Anton Ivanov <iab@bk.ru>
Date: Sun, 16 Dec 2018 14:50:56 +0300
Subject: [PATCH] =?UTF-8?q?=D0=92=20=D1=82=D0=B5=D0=BA=D1=83=D1=89=D0=B8?=
=?UTF-8?q?=D0=B5=20=D0=B4=D0=B5=D0=BB=D0=B0=20=D0=B4=D0=BE=D0=B1=D0=B0?=
=?UTF-8?q?=D0=B2=D0=B8=D0=BB=20=D0=BA=D0=BD=D0=BE=D0=BF=D0=BA=D1=83=20"?=
=?UTF-8?q?=D0=9D=D0=B0=D1=81=D1=82=D1=80=D0=BE=D0=B9=D0=BA=D0=B8"=20?=
=?UTF-8?q?=D1=82=D1=83=D0=B4=D0=B0=20=D0=BF=D0=B5=D1=80=D0=B5=D0=BD=D0=B5?=
=?UTF-8?q?=D1=81=20=D0=BF=D1=80=D0=B8=D0=B7=D0=BD=D0=B0=D0=BA=20"=D0=90?=
=?UTF-8?q?=D0=B2=D1=82=D0=BE=D0=BC=D0=B0=D1=82=D0=B8=D1=87=D0=B5=D1=81?=
=?UTF-8?q?=D0=BA=D0=B8=20=D1=81=D0=BE=D1=85=D1=80=D0=B0=D0=BD=D1=8F=D1=82?=
=?UTF-8?q?=D1=8C=20=D1=82=D0=B5=D0=BA=D1=83=D1=89=D0=B8=D0=B5=20=D0=B4?=
=?UTF-8?q?=D0=B5=D0=BB=D0=B0=20(=D0=BA=D0=B0=D0=B6=D0=B4=D1=8B=D0=B5=2015?=
=?UTF-8?q?=20=D0=BC=D0=B8=D0=BD)"?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
---
src/cf/DataProcessors/узТекущиеДела.xml | 1 +
.../узТекущиеДела/Forms/Форма/Ext/Form.xml | 29 ++++++++++-----
.../Forms/Форма/Ext/Form/Module.bsl | 14 ++++++-
.../узТекущиеДела/Forms/ФормаНастройки.xml | 22 +++++++++++
.../Forms/ФормаНастройки/Ext/Form.xml | 37 +++++++++++++++++++
.../Forms/ФормаНастройки/Ext/Form/Module.bsl | 13 +++++++
6 files changed, 105 insertions(+), 11 deletions(-)
create mode 100644 src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки.xml
create mode 100644 src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки/Ext/Form.xml
create mode 100644 src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки/Ext/Form/Module.bsl
diff --git a/src/cf/DataProcessors/узТекущиеДела.xml b/src/cf/DataProcessors/узТекущиеДела.xml
index 242d6f796..2e1b7e4c5 100644
--- a/src/cf/DataProcessors/узТекущиеДела.xml
+++ b/src/cf/DataProcessors/узТекущиеДела.xml
@@ -846,6 +846,7 @@
</ChildObjects>
</TabularSection>
<Form>Форма</Form>
+ <Form>ФормаНастройки</Form>
<Command uuid="5db63bce-cf29-4131-a8c9-b946e30b226b">
<Properties>
<Name>КомандаОткрытьТекущиеДела</Name>
diff --git a/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form.xml b/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form.xml
index 83240b79c..e09108d80 100644
--- a/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form.xml
+++ b/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form.xml
@@ -81,6 +81,11 @@
<CommandName>Form.StandardCommand.CustomizeForm</CommandName>
<ExtendedTooltip name="ТЧТекущиеДелаИзменитьФормуРасширеннаяПодсказка" id="103"/>
</Button>
+ <Button name="ТЧТекущиеДелаКомандаНастройки" id="104">
+ <Type>CommandBarButton</Type>
+ <CommandName>Form.Command.КомандаНастройки</CommandName>
+ <ExtendedTooltip name="ТЧТекущиеДелаКомандаНастройкиРасширеннаяПодсказка" id="105"/>
+ </Button>
</ChildItems>
</AutoCommandBar>
<ExtendedTooltip name="ТЧТекущиеДелаРасширеннаяПодсказка" id="4"/>
@@ -289,15 +294,6 @@
<Event name="OnChange">ПоказыватьПозжеПриИзменении</Event>
</Events>
</CheckBoxField>
- <CheckBoxField name="АвтоматическиСохранятьТекущиеДела" id="104">
- <DataPath>Объект.АвтоматическиСохранятьТекущиеДела</DataPath>
- <CheckBoxType>Auto</CheckBoxType>
- <ContextMenu name="АвтоматическиСохранятьТекущиеДелаКонтекстноеМеню" id="105"/>
- <ExtendedTooltip name="АвтоматическиСохранятьТекущиеДелаРасширеннаяПодсказка" id="106"/>
- <Events>
- <Event name="OnChange">АвтоматическиСохранятьТекущиеДелаПриИзменении</Event>
- </Events>
- </CheckBoxField>
</ChildItems>
</UsualGroup>
</ChildItems>
@@ -512,5 +508,20 @@
</Picture>
<Action>КомандаСохранить</Action>
</Command>
+ <Command name="КомандаНастройки" id="8">
+ <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>
\ No newline at end of file
diff --git a/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form/Module.bsl b/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form/Module.bsl
index fa1d5ced2..702cd410d 100644
--- a/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form/Module.bsl
+++ b/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form/Module.bsl
@@ -1,4 +1,9 @@
+&НаКлиенте
+Процедура КомандаНастройки(Команда)
+ ОткрытьФорму("Обработка.узТекущиеДела.Форма.ФормаНастройки",,ЭтаФорма);
+КонецПроцедуры
+
&НаКлиенте
Процедура КомандаОбновить(Команда)
ОбновитьТекущиеДелаНаСервере();
@@ -302,9 +307,14 @@
&НаКлиенте
Процедура АвтоматическиСохранятьТекущиеДелаПриИзменении(Элемент)
+ ПрименитьНастройкиНаКлиенте();
+КонецПроцедуры
+
+&НаКлиенте
+Процедура ПрименитьНастройкиНаКлиенте() Экспорт
Если Объект.АвтоматическиСохранятьТекущиеДела Тогда
ПодключитьОбработчикОжидания("СохранитьТекущиеДелаНаКлиенте", 600);
Иначе
ОтключитьОбработчикОжидания("СохранитьТекущиеДелаНаКлиенте");
- Конецесли;
-КонецПроцедуры
+ Конецесли;
+КонецПроцедуры
diff --git a/src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки.xml b/src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки.xml
new file mode 100644
index 000000000..f35dc1542
--- /dev/null
+++ b/src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки.xml
@@ -0,0 +1,22 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:cmi="http://v8.1c.ru/8.2/managed-application/cmi" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xpr="http://v8.1c.ru/8.3/xcf/predef" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" version="2.2">
+ <Form uuid="33b8ec38-4f83-43b5-beed-0fbeaeaada8c">
+ <Properties>
+ <Name>ФормаНастройки</Name>
+ <Synonym>
+ <v8:item>
+ <v8:lang>ru</v8:lang>
+ <v8:content>Настройки "Текущих дел"</v8:content>
+ </v8:item>
+ </Synonym>
+ <Comment/>
+ <FormType>Managed</FormType>
+ <IncludeHelpInContents>false</IncludeHelpInContents>
+ <UsePurposes>
+ <v8:Value xsi:type="app:ApplicationUsePurpose">PersonalComputer</v8:Value>
+ <v8:Value xsi:type="app:ApplicationUsePurpose">MobileDevice</v8:Value>
+ </UsePurposes>
+ <ExtendedPresentation/>
+ </Properties>
+ </Form>
+</MetaDataObject>
\ No newline at end of file
diff --git a/src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки/Ext/Form.xml b/src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки/Ext/Form.xml
new file mode 100644
index 000000000..a080944b5
--- /dev/null
+++ b/src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки/Ext/Form.xml
@@ -0,0 +1,37 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Form xmlns="http://v8.1c.ru/8.3/xcf/logform" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:dcscor="http://v8.1c.ru/8.1/data-composition-system/core" xmlns:dcsset="http://v8.1c.ru/8.1/data-composition-system/settings" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" version="2.2">
+ <AutoCommandBar name="ФормаКоманднаяПанель" id="-1">
+ <Autofill>false</Autofill>
+ </AutoCommandBar>
+ <Events>
+ <Event name="OnOpen">ПриОткрытии</Event>
+ <Event name="OnCreateAtServer">ПриСозданииНаСервере</Event>
+ <Event name="OnClose">ПриЗакрытии</Event>
+ </Events>
+ <ChildItems>
+ <Button name="Закрыть" id="4">
+ <Type>UsualButton</Type>
+ <CommandName>Form.StandardCommand.Close</CommandName>
+ <ExtendedTooltip name="ЗакрытьРасширеннаяПодсказка" id="5"/>
+ </Button>
+ <CheckBoxField name="АвтоматическиСохранятьТекущиеДела" id="6">
+ <DataPath>АвтоматическиСохранятьТекущиеДела</DataPath>
+ <CheckBoxType>Auto</CheckBoxType>
+ <ContextMenu name="АвтоматическиСохранятьТекущиеДелаКонтекстноеМеню" id="7"/>
+ <ExtendedTooltip name="АвтоматическиСохранятьТекущиеДелаРасширеннаяПодсказка" id="8"/>
+ </CheckBoxField>
+ </ChildItems>
+ <Attributes>
+ <Attribute name="АвтоматическиСохранятьТекущиеДела" id="1">
+ <Title>
+ <v8:item>
+ <v8:lang>ru</v8:lang>
+ <v8:content>Автоматически сохранять текущие дела (каждые 15 мин)</v8:content>
+ </v8:item>
+ </Title>
+ <Type>
+ <v8:Type>xs:boolean</v8:Type>
+ </Type>
+ </Attribute>
+ </Attributes>
+</Form>
\ No newline at end of file
diff --git a/src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки/Ext/Form/Module.bsl b/src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки/Ext/Form/Module.bsl
new file mode 100644
index 000000000..8e653ca93
--- /dev/null
+++ b/src/cf/DataProcessors/узТекущиеДела/Forms/ФормаНастройки/Ext/Form/Module.bsl
@@ -0,0 +1,13 @@
+
+&НаКлиенте
+Процедура ПриЗакрытии()
+ ВладелецФормы.Объект.АвтоматическиСохранятьТекущиеДела = АвтоматическиСохранятьТекущиеДела;
+ ВладелецФормы.ПрименитьНастройкиНаКлиенте();
+КонецПроцедуры
+
+
+&НаКлиенте
+Процедура ПриОткрытии(Отказ)
+ АвтоматическиСохранятьТекущиеДела = ВладелецФормы.Объект.АвтоматическиСохранятьТекущиеДела;
+КонецПроцедуры
+