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

#39, Управление задачами, Иванов Создание задач из канбан доски с учетом отборов

This commit is contained in:
Anton Ivanov 2016-10-03 17:45:17 +03:00
parent 91d32f64f5
commit 06d8bd5a6d
3 changed files with 14 additions and 3 deletions

View File

@ -1,6 +1,6 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "УправлениеЗадачами"; Описание.Имя = "УправлениеЗадачами";
Описание.Версия = "1.0.0.005"; Описание.Версия = "1.0.0.006";
// Требуется библиотека стандартных подсистем. // Требуется библиотека стандартных подсистем.
Описание.ТребуемыеПодсистемы.Добавить("СтандартныеПодсистемы"); Описание.ТребуемыеПодсистемы.Добавить("СтандартныеПодсистемы");
КонецПроцедуры КонецПроцедуры

View File

@ -49,7 +49,7 @@
<xr:Item xsi:type="xr:MDObjectRef">Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</xr:Item> <xr:Item xsi:type="xr:MDObjectRef">Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</xr:Item>
</DefaultRoles> </DefaultRoles>
<Vendor>Управление задачами</Vendor> <Vendor>Управление задачами</Vendor>
<Version>1.0.0.005</Version> <Version>1.0.0.006</Version>
<UpdateCatalogAddress/> <UpdateCatalogAddress/>
<IncludeHelpInContents>false</IncludeHelpInContents> <IncludeHelpInContents>false</IncludeHelpInContents>
<UseManagedFormInOrdinaryApplication>false</UseManagedFormInOrdinaryApplication> <UseManagedFormInOrdinaryApplication>false</UseManagedFormInOrdinaryApplication>

View File

@ -131,7 +131,18 @@
пСтатус = Элемент.ОтборСтрок.Статус; пСтатус = Элемент.ОтборСтрок.Статус;
ПараметрыНовойЗадачи = Новый Структура(); ПараметрыНовойЗадачи = Новый Структура();
ПараметрыНовойЗадачи.Вставить("Статус",пСтатус); ПараметрыНовойЗадачи.Вставить("Статус",пСтатус);
ЭлементыОтбора = КомпоновщикНастроекКомпоновкиДанных.Настройки.Отбор.Элементы;
Для каждого ЭлементОтбора из ЭлементыОтбора цикл
Если НЕ ЭлементОтбора.Использование Тогда
Продолжить;
Конецесли;
Если ЭлементОтбора.ВидСравнения <> ВидСравненияКомпоновкиДанных.Равно Тогда
Продолжить;
Конецесли;
Если ТипЗнч(ЭлементОтбора) = Тип("ЭлементОтбораКомпоновкиДанных") Тогда
ПараметрыНовойЗадачи.Вставить("" + ЭлементОтбора.ЛевоеЗначение,ЭлементОтбора.ПравоеЗначение);
Конецесли;
Конеццикла;
ДопПараметры = Новый Структура(); ДопПараметры = Новый Структура();
ДопПараметры.Вставить("ТребоватьЗаполнитьРодителя",Истина); ДопПараметры.Вставить("ТребоватьЗаполнитьРодителя",Истина);
ДопПараметры.Вставить("ПараметрыНовойЗадачи",ПараметрыНовойЗадачи); ДопПараметры.Вставить("ПараметрыНовойЗадачи",ПараметрыНовойЗадачи);