diff --git a/src/cf/DataProcessors/узКанбанДоска.xml b/src/cf/DataProcessors/узКанбанДоска.xml
index 097f1dea7..f66dbfdbe 100644
--- a/src/cf/DataProcessors/узКанбанДоска.xml
+++ b/src/cf/DataProcessors/узКанбанДоска.xml
@@ -138,7 +138,8 @@
Показывать 3 строку в карточке задачи:
* § - есть файлы по задаче;
* ✉ - есть письма по задаче;
-* заказчик.
+* заказчик.
+* 2/3- чеклиста
false
@@ -740,6 +741,128 @@
Auto
+
+
+ ЧекЛистВыполнено
+
+
+ ru
+ Чек лист выполнено
+
+
+
+
+ xs:decimal
+
+ 10
+ 0
+ Any
+
+
+ false
+
+
+
+ false
+
+ false
+ false
+
+
+ false
+
+ DontCheck
+ Items
+
+
+ Auto
+ Auto
+
+
+ Auto
+
+
+
+
+ ЧекЛистВсего
+
+
+ ru
+ Чек лист всего
+
+
+
+
+ xs:decimal
+
+ 10
+ 0
+ Any
+
+
+ false
+
+
+
+ false
+
+ false
+ false
+
+
+ false
+
+ DontCheck
+ Items
+
+
+ Auto
+ Auto
+
+
+ Auto
+
+
+
+
+ ЧекЛистВыполнение
+
+
+ ru
+ Чек лист выполнение
+
+
+
+
+ xs:string
+
+ 20
+ Variable
+
+
+ false
+
+
+
+ false
+
+ false
+ false
+
+
+ false
+
+ DontCheck
+ Items
+
+
+ Auto
+ Auto
+
+
+ Auto
+
+
diff --git a/src/cf/DataProcessors/узКанбанДоска/Ext/ObjectModule.bsl b/src/cf/DataProcessors/узКанбанДоска/Ext/ObjectModule.bsl
index 1cf62a66b..66a7039b7 100644
--- a/src/cf/DataProcessors/узКанбанДоска/Ext/ObjectModule.bsl
+++ b/src/cf/DataProcessors/узКанбанДоска/Ext/ObjectModule.bsl
@@ -4,8 +4,17 @@
пНастройкиКомпоновщика = ПолучитьИзВременногоХранилища(АдресВременногоХранилища);
ТЗЗадачи = ПолучитьТЗЗадачи(пНастройкиКомпоновщика);
+ ЕстьКолонкаЧекЛистВыполнено = ТЗЗадачи.Колонки.Найти("ЧекЛистВыполнено") <> Неопределено;
+ ТЗЗадачи.Колонки.Добавить("ЧекЛистВыполнение",Новый ОписаниеТипов("Строка"));
+
Для каждого СтрокаТЗЗадачи из ТЗЗадачи цикл
СтрокаТЗЗадачи.ОсновнаяЗадачаПредставление = СокрЛП(СтрокаТЗЗадачи.ОсновнаяЗадачаПредставление);
+ Если ЕстьКолонкаЧекЛистВыполнено
+ И ЗначениеЗаполнено(СтрокаТЗЗадачи.ЧекЛистВыполнено)
+ И ЗначениеЗаполнено(СтрокаТЗЗадачи.ЧекЛистВсего) Тогда
+ СтрокаТЗЗадачи.ЧекЛистВыполнение = "" + СтрокаТЗЗадачи.ЧекЛистВыполнено
+ + "/" + СтрокаТЗЗадачи.ЧекЛистВсего;
+ Конецесли;
Конеццикла;
ТЧЗадачи.Загрузить(ТЗЗадачи);
КонецПроцедуры
diff --git a/src/cf/DataProcessors/узКанбанДоска/Forms/ФормаДинамическая/Ext/Form/Module.bsl b/src/cf/DataProcessors/узКанбанДоска/Forms/ФормаДинамическая/Ext/Form/Module.bsl
index d5503af58..3a5233af8 100644
--- a/src/cf/DataProcessors/узКанбанДоска/Forms/ФормаДинамическая/Ext/Form/Module.bsl
+++ b/src/cf/DataProcessors/узКанбанДоска/Forms/ФормаДинамическая/Ext/Form/Module.bsl
@@ -383,6 +383,19 @@
пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи.ПутьКДанным = "Объект.ТЧЗадачи.КороткоеИмяЗаказчик";
пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи.Ширина = 3;
+ //+ #58 Дзеса Ігор (capitoshko)
+ //// ****** Поле формы "Процент выполнения согласно чек - листу" ***********
+ пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи = пЭлементыФормы.Вставить(
+ ИменаЭлементов.ИмяПоляЧекЛистВыполнение,
+ Тип("ПолеФормы"),
+ пЭлементКарточкаЗадачи_НижняяЧасть3Строка,
+ );
+
+ пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи.Вид = ВидПоляФормы.ПолеВвода;
+ пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи.ПутьКДанным = "Объект.ТЧЗадачи.ЧекЛистВыполнение";
+ пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи.Ширина = 5;
+ //- #58 Дзеса Ігор (capitoshko)
+
Конецесли;
////Павлюков - конец
@@ -420,6 +433,10 @@
ИмяПоляЕстьПисьмаВКарточкеЗадачи = ИмяКолонки + "_ТЧЗадачи_НижняяЧасть3Строка_ЕстьПисьма";
ИмяПоляЗаказчикВКарточкеЗадачи = ИмяКолонки +"_ТЧЗадачи_НижняяЧасть3Строка_Заказчик";
+ //+ #58 Дзеса Ігор (capitoshko)
+ ИмяПоляЧекЛистВыполнение = ИмяКолонки +"_ТЧЗадачи_НижняяЧасть3Строка_ЧекЛистВыполнение";
+ //- #58 Дзеса Ігор (capitoshko)
+
РезультатФункции = Новый Структура();
РезультатФункции.Вставить("ИмяГруппыКолонки",ИмяГруппыКолонки);
РезультатФункции.Вставить("ИмяТЧЗадачи",ИмяТЧЗадачи);
@@ -444,6 +461,10 @@
РезультатФункции.Вставить("ИмяПоляОсновнаяЗадачаПредставлениеВКарточкеЗадачи",ИмяПоляОсновнаяЗадачаПредставлениеВКарточкеЗадачи);
РезультатФункции.Вставить("ИмяПоляЗаказчикВКарточкеЗадачи",ИмяПоляЗаказчикВКарточкеЗадачи);
РезультатФункции.Вставить("ИмяПоляНомерЗадачиПредставлениеВКарточкеЗадачи",ИмяПоляНомерЗадачиПредставлениеВКарточкеЗадачи);
+
+ //+ #58 Дзеса Ігор (capitoshko)
+ РезультатФункции.Вставить("ИмяПоляЧекЛистВыполнение",ИмяПоляЧекЛистВыполнение);
+ //- #58 Дзеса Ігор (capitoshko)
Возврат РезультатФункции;
КонецФункции
diff --git a/src/cf/DataProcessors/узКанбанДоска/Templates/СхемаКомпоновкиДанных/Ext/Template.xml b/src/cf/DataProcessors/узКанбанДоска/Templates/СхемаКомпоновкиДанных/Ext/Template.xml
index bb5d2542d..6c43d5fd0 100644
--- a/src/cf/DataProcessors/узКанбанДоска/Templates/СхемаКомпоновкиДанных/Ext/Template.xml
+++ b/src/cf/DataProcessors/узКанбанДоска/Templates/СхемаКомпоновкиДанных/Ext/Template.xml
@@ -186,6 +186,26 @@
+
+ ЧекЛистВсего
+ ЧекЛистВсего
+
+ <v8:item>
+ <v8:lang>ru</v8:lang>
+ <v8:content>Чек лист всего</v8:content>
+ </v8:item>
+
+
+
+ ЧекЛистВыполнено
+ ЧекЛистВыполнено
+
+ <v8:item>
+ <v8:lang>ru</v8:lang>
+ <v8:content>Чек лист выполнено</v8:content>
+ </v8:item>
+
+
ИсточникДанных1
ВЫБРАТЬ
узНаблюдателиЗаЗадачами.Задача КАК Задача
@@ -198,6 +218,29 @@
ТОГДА узНаблюдателиЗаЗадачами.Пользователь = &Наблюдатель
ИНАЧЕ ИСТИНА
КОНЕЦ
+
+ИНДЕКСИРОВАТЬ ПО
+ Задача
+;
+
+////////////////////////////////////////////////////////////////////////////////
+ВЫБРАТЬ
+ узЗадачиКомментарии.Ссылка КАК Ссылка,
+ СУММА(ВЫБОР
+ КОГДА узЗадачиКомментарии.Выполнено
+ ТОГДА 1
+ ИНАЧЕ 0
+ КОНЕЦ) КАК Выполнено,
+ КОЛИЧЕСТВО(РАЗЛИЧНЫЕ узЗадачиКомментарии.НомерСтроки) КАК Всего
+ПОМЕСТИТЬ ВТЧекЛист
+ИЗ
+ Справочник.узЗадачи.Комментарии КАК узЗадачиКомментарии
+
+СГРУППИРОВАТЬ ПО
+ узЗадачиКомментарии.Ссылка
+
+ИНДЕКСИРОВАТЬ ПО
+ Ссылка
;
////////////////////////////////////////////////////////////////////////////////
@@ -352,14 +395,18 @@
ТОГДА ""
ИНАЧЕ "✉"
КОНЕЦ КАК ЕстьПисьма,
- ВТРезультат.Заказчик,
- ВТРезультат.Заказчик.узКороткоеИмя КАК КороткоеИмяЗаказчик
+ ВТРезультат.Заказчик КАК Заказчик,
+ ВТРезультат.Заказчик.узКороткоеИмя КАК КороткоеИмяЗаказчик,
+ ЕСТЬNULL(ВТЧекЛист.Выполнено, 0) КАК ЧекЛистВыполнено,
+ ЕСТЬNULL(ВТЧекЛист.Всего, 0) КАК ЧекЛистВсего
ИЗ
ВТРезультат КАК ВТРезультат
ЛЕВОЕ СОЕДИНЕНИЕ ВТЗадачиСФайлами КАК ВТЗадачиСФайлами
ПО ВТРезультат.Задача = ВТЗадачиСФайлами.Задача
ЛЕВОЕ СОЕДИНЕНИЕ ВТЗадачиСПисьмами КАК ВТЗадачиСПисьмами
- ПО ВТРезультат.Задача = ВТЗадачиСПисьмами.Задача
+ ПО ВТРезультат.Задача = ВТЗадачиСПисьмами.Задача
+ ЛЕВОЕ СОЕДИНЕНИЕ ВТЧекЛист КАК ВТЧекЛист
+ ПО ВТРезультат.Задача = ВТЧекЛист.Ссылка
НомерЗадачиПредставление
@@ -483,6 +530,12 @@
КороткоеИмяЗаказчик
+
+ ЧекЛистВсего
+
+
+ ЧекЛистВыполнено
+