1
0
mirror of https://github.com/BlizD/Tasks.git synced 2025-02-05 13:14:54 +02:00

#86 Поправил команды "Добавить/Убрать из спринта" с учетом изменения хранения задач в спринте.

#108 @capitoshko Добавить настройки 3 строки карточки задачи
This commit is contained in:
Anton Ivanov 2018-10-05 12:51:25 +03:00
parent b9b4ef762c
commit 9eb24dda38
2 changed files with 60 additions and 4 deletions

View File

@ -1,6 +1,5 @@
Функция ПолучитьТекущийСпринт() Экспорт
Функция ПолучитьСпринтКоторыйНеЗавершен() Экспорт
Только1АктивныйСпринт = Ложь;
пСпринт = Неопределено;
ТекстОшибки = Неопределено;
@ -41,4 +40,45 @@
РезультатФункции.Вставить("ТекстОшибки",ТекстОшибки);
Возврат РезультатФункции;
КонецФункции
Функция ПолучитьТекущийСпринтДляЗадачи(НаДату,ЗадачаСсылка) Экспорт
Перем пТекущийСпринт;
Если НЕ ЗначениеЗаполнено(ЗадачаСсылка) Тогда
Возврат пТекущийСпринт;
Конецесли;
МассивЗадач = Новый Массив();
МассивЗадач.Добавить(ЗадачаСсылка);
ТЗТекущиеСпринтыДляЗадач = ПолучитьТЗТекущиеСпринтыДляЗадач(НаДату,МассивЗадач);
Если ТЗТекущиеСпринтыДляЗадач.Количество() = 1 Тогда
СтрокаТЗТекущиеСпринтыДляЗадач = ТЗТекущиеСпринтыДляЗадач[0];
пТекущийСпринт = СтрокаТЗТекущиеСпринтыДляЗадач.Спринт;
ИначеЕсли ТЗТекущиеСпринтыДляЗадач.Количество() > 1 Тогда
ВызватьИсключение "Ошибка! Нашли более 1 спринта для задачи ["+ЗадачаСсылка+"]";
Конецесли;
Возврат пТекущийСпринт;
КонецФункции
Функция ПолучитьТЗТекущиеСпринтыДляЗадач(НаДату,МассивЗадач) Экспорт
Перем ТЗТекущиеСпринтыДляЗадач;
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| узСпринтыЗадачСрезПоследних.Задача,
| узСпринтыЗадачСрезПоследних.Спринт
|ИЗ
| РегистрСведений.узСпринтыЗадач.СрезПоследних(&НаДату, Задача В(&МассивЗадач)) КАК узСпринтыЗадачСрезПоследних
|";
Запрос.УстановитьПараметр("МассивЗадач",МассивЗадач);
Запрос.УстановитьПараметр("НаДату",НаДату);
ТЗТекущиеСпринтыДляЗадач = Запрос.Выполнить().Выгрузить();
Возврат ТЗТекущиеСпринтыДляЗадач;
КонецФункции

View File

@ -6,6 +6,10 @@
ТЗЗадачи = ПолучитьТЗЗадачи(пНастройкиКомпоновщика);
ЕстьКолонкаЧекЛистВыполнено = ТЗЗадачи.Колонки.Найти("ЧекЛистВыполнено") <> Неопределено;
ТЗЗадачи.Колонки.Добавить("ЧекЛистВыполнение",Новый ОписаниеТипов("Строка"));
//+ #108 Дзеса Ігор (capitoshko) 05.10.2018
ТЗЗадачи.Колонки.Добавить("ЧекЛистВыполнениеПроцент",Новый ОписаниеТипов("Строка"));
ЕстьКолонкаЧекЛистВыполненоПроцент = ТЗЗадачи.Колонки.Найти("ЧекЛистВыполнениеПроцент") <> Неопределено;
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
Для каждого СтрокаТЗЗадачи из ТЗЗадачи цикл
СтрокаТЗЗадачи.ОсновнаяЗадачаПредставление = СокрЛП(СтрокаТЗЗадачи.ОсновнаяЗадачаПредставление);
@ -13,8 +17,16 @@
И ЗначениеЗаполнено(СтрокаТЗЗадачи.ЧекЛистВыполнено)
И ЗначениеЗаполнено(СтрокаТЗЗадачи.ЧекЛистВсего) Тогда
СтрокаТЗЗадачи.ЧекЛистВыполнение = "" + СтрокаТЗЗадачи.ЧекЛистВыполнено
+ "/" + СтрокаТЗЗадачи.ЧекЛистВсего;
+ "/" + СтрокаТЗЗадачи.ЧекЛистВсего;
Конецесли;
//+ #108 Дзеса Ігор (capitoshko) 05.10.2018
Если ЕстьКолонкаЧекЛистВыполненоПроцент
И ЗначениеЗаполнено(СтрокаТЗЗадачи.ЧекЛистВыполнено)
И ЗначениеЗаполнено(СтрокаТЗЗадачи.ЧекЛистВсего) Тогда
ЧекЛистВыполнениеПроцент = СтрокаТЗЗадачи.ЧекЛистВыполнено/СтрокаТЗЗадачи.ЧекЛистВсего * 100;
СтрокаТЗЗадачи.ЧекЛистВыполнениеПроцент = Формат(ЧекЛистВыполнениеПроцент, "ЧГ=0") + " %";
Конецесли;
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
Конеццикла;
ТЧЗадачи.Загрузить(ТЗЗадачи);
КонецПроцедуры
@ -92,6 +104,10 @@
Процедура ЗаполнитьТЧНастройкиКолонок() Экспорт
//+ #106 Дзеса Ігор (capitoshko)
ТЧНастройкиКолонок.Очистить();
//- #106 Дзеса Ігор (capitoshko)
пРодитель = ПредопределенноеЗначение("Справочник.узСтатусыЗадачи.ПустаяСсылка");
ЗагрузитьПодчиненныеЭлементы(пРодитель);