1
0
mirror of https://github.com/BlizD/Tasks.git synced 2025-03-19 21:07:53 +02:00

//+ №371 Иванов А.Б. 2018-07-23

Изменения от Семёна Павлюкова  https://infostart.ru/profile/102644/
1. Открытие канбан доски при старте программы - опционально. Настройка в пользователе.
This commit is contained in:
Anton Ivanov 2018-07-23 16:03:15 +03:00
parent 1ad82527a1
commit 256e85086d
4 changed files with 62 additions and 0 deletions

View File

@ -1164,6 +1164,45 @@
<FullTextSearch>Use</FullTextSearch>
</Properties>
</Attribute>
<Attribute uuid="c021d8ff-8f4d-4904-b2d1-95b85d5d2750">
<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>
<TabularSection uuid="245f870e-a53a-4d86-aa0a-c0c7709b8acb">
<InternalInfo>
<xr:GeneratedType name="CatalogTabularSection.Пользователи.ДополнительныеРеквизиты" category="TabularSection">

View File

@ -447,6 +447,13 @@ Click "Write" to sort out the problem and not to show the warning message.</v8:c
<ContextMenu name="узОткрыватьСправочникЗадачиПриНачалеРаботыСистемыКонтекстноеМеню" id="352"/>
<ExtendedTooltip name="узОткрыватьСправочникЗадачиПриНачалеРаботыСистемыРасширеннаяПодсказка" id="353"/>
</CheckBoxField>
<CheckBoxField name="узОткрыватьКанбанДоскуПриНачалеРаботыСистемы" id="365">
<DataPath>Объект.узОткрыватьКанбанДоскуПриНачалеРаботыСистемы</DataPath>
<TitleLocation>Right</TitleLocation>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="узОткрыватьКанбанДоскуПриНачалеРаботыСистемыКонтекстноеМеню" id="366"/>
<ExtendedTooltip name="узОткрыватьКанбанДоскуПриНачалеРаботыСистемыРасширеннаяПодсказка" id="367"/>
</CheckBoxField>
<InputField name="узПользовательХранилища" id="354">
<DataPath>Объект.узПользовательХранилища</DataPath>
<ContextMenu name="узПользовательХранилищаКонтекстноеМеню" id="355"/>

View File

@ -191,6 +191,11 @@
Возврат пТекущийПользователь.узОткрыватьСправочникЗадачиПриНачалеРаботыСистемы;
КонецФункции
Функция узОткрыватьКанбанДоскуПриНачалеРаботыСистемы() Экспорт
пТекущийПользователь = Пользователи.ТекущийПользователь();
Возврат пТекущийПользователь.узОткрыватьКанбанДоскуПриНачалеРаботыСистемы;
КонецФункции
// Производит запись в служебных регистр информации о наличии заметки по предмету.
//
// Параметры совпадают с параметрами обработчика при записи у элемента справочника.

View File

@ -38,6 +38,9 @@
// Конец СтандартныеПодсистемы
узОткрытьСправочникЗадачи();
узОткрытьКанбанДоску();
КонецПроцедуры
Процедура узОткрытьСправочникЗадачи()
@ -49,6 +52,14 @@
Конецесли;
КонецПроцедуры
Процедура узОткрытьКанбанДоску()
Если ПараметрыПриложения.Количество() = 1 Тогда //ЭтоНачальноеЗаполнениеДанных
Возврат;
Конецесли;
Если узОбщийМодульСервер.узОткрыватьКанбанДоскуПриНачалеРаботыСистемы() Тогда
ОткрытьФорму("Обработка.узКанбанДоска.Форма.ФормаДинамическая");
Конецесли;
КонецПроцедуры
Процедура ПередЗавершениемРаботыСистемы(Отказ)