From bca6a1e47fbb11208a6bc88481835f53c4b791dd Mon Sep 17 00:00:00 2001 From: Anton Ivanov Date: Sat, 11 Jul 2020 09:02:50 +0300 Subject: [PATCH] =?UTF-8?q?=D0=A0=D0=B0=D0=B7=D1=80=D0=B5=D1=88=D0=B5?= =?UTF-8?q?=D0=BD=D0=B8=D0=B5=20=D0=BA=D0=BE=D0=BD=D1=84=D0=BB=D0=B8=D0=BA?= =?UTF-8?q?=D1=82=D0=B0=20=D0=B4=D0=BB=D1=8F=20=D1=81=D0=BB=D0=B8=D1=8F?= =?UTF-8?q?=D0=BD=D0=B8=D1=8F?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../узКанбанДоска/Ext/ObjectModule.bsl | 88 ++++++++++++------- 1 file changed, 54 insertions(+), 34 deletions(-) diff --git a/src/cf/DataProcessors/узКанбанДоска/Ext/ObjectModule.bsl b/src/cf/DataProcessors/узКанбанДоска/Ext/ObjectModule.bsl index 4f29ef2d9..079d160a3 100644 --- a/src/cf/DataProcessors/узКанбанДоска/Ext/ObjectModule.bsl +++ b/src/cf/DataProcessors/узКанбанДоска/Ext/ObjectModule.bsl @@ -40,33 +40,6 @@ ИсполняемыеНастройки = НастройкиКомпоновщика; - СписокВыбранныхСтатусов = Новый СписокЗначений; - Для каждого СтрокаТЧНастройкиКолонок из ТЧНастройкиКолонок цикл - Если НЕ СтрокаТЧНастройкиКолонок.Видимость Тогда - Продолжить; - Конецесли; - СписокВыбранныхСтатусов.Добавить(СтрокаТЧНастройкиКолонок.Статус); - Конеццикла; - - ЗначениеПараметра = ИсполняемыеНастройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("Наблюдатель")); - Если ЗначениеПараметра <> Неопределено Тогда - ЗначениеПараметра.Использование = Истина; - ЗначениеПараметра.Значение = Наблюдатель; - Конецесли; - - ЗначениеПараметра = ИсполняемыеНастройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("ИспользоватьОтборПоНаблюдателю")); - Если ЗначениеПараметра <> Неопределено Тогда - ЗначениеПараметра.Значение = ЗначениеЗаполнено(Наблюдатель); - ЗначениеПараметра.Использование=Истина; - Конецесли; - - ЗначениеПараметра = ИсполняемыеНастройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("ТекущаяДата")); - Если ЗначениеПараметра <> Неопределено Тогда - ЗначениеПараметра.Значение = ТекущаяДатаСеанса(); - ЗначениеПараметра.Использование=Истина; - Конецесли; - - МассивВыбранныхСтатусовКолонок = Новый Массив(); Для каждого СтрокаТЧНастройкиКолонок из ТЧНастройкиКолонок цикл Если НЕ СтрокаТЧНастройкиКолонок.Видимость Тогда @@ -75,23 +48,70 @@ МассивВыбранныхСтатусовКолонок.Добавить(СтрокаТЧНастройкиКолонок.Статус); Конеццикла; - ЗначениеПараметра = ИсполняемыеНастройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("МассивВыбранныхСтатусовКолонок")); - Если ЗначениеПараметра <> Неопределено Тогда - ЗначениеПараметра.Значение = МассивВыбранныхСтатусовКолонок; - ЗначениеПараметра.Использование=Истина; - Конецесли; + // + #225 Урянский Д. 2020-07-06 + Обработки.узКанбанДоска.УстановитьПараметр(ИсполняемыеНастройки, + "Наблюдатель", Наблюдатель); + + Обработки.узКанбанДоска.УстановитьПараметр(ИсполняемыеНастройки, + "ИспользоватьОтборПоНаблюдателю", Истина, ЗначениеЗаполнено(Наблюдатель)); + + Обработки.узКанбанДоска.УстановитьПараметр(ИсполняемыеНастройки, + "ТекущаяДата", ТекущаяДатаСеанса()); + + Обработки.узКанбанДоска.УстановитьПараметр(ИсполняемыеНастройки, + "МассивВыбранныхСтатусовКолонок", МассивВыбранныхСтатусовКолонок); + + ИсполняемыеНастройки.Выбор.Элементы.Очистить(); + + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "Задача"); + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "ЗадачаПредставление"); + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "Статус"); + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "КороткоеИмя"); + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "ОсновнаяЗадача"); + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "ОсновнаяЗадачаПредставление"); + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "НомерЗадачиПредставление"); + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "ЦветДляЗадачиЧисло"); + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "ИзмененЦветПоУмолчанию"); + + Если Показывать3СтрокуВКарточкеЗадачи Тогда + + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "КороткоеИмяЗаказчик", + ПоказыватьЗаказчика); + + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "КоличествоПисем", + ОтображениеПисемПоЗадачам = Перечисления.узОтображениеПисемПоЗадачамНаДоске.ЗначениеИКартинка); + + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "ЕстьПисьма", + ОтображениеПисемПоЗадачам = Перечисления.узОтображениеПисемПоЗадачамНаДоске.Картинка); + + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "КоличествоФайлов", + ОтображениеФайловЗадач = Перечисления.узОтображениеФайловЗадачНаДоске.ЗначениеИКартинка); + + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "ЕстьФайлы", + ОтображениеФайловЗадач = Перечисления.узОтображениеФайловЗадачНаДоске.Картинка); + + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "ЧекЛистВыполнение", + ОтображениеЧеклистаЗадач = Перечисления.узОтображениеЧеклистаЗадачНаДоске.Дробь); + + Обработки.узКанбанДоска.ДобавитьВыбранноеПоле(ИсполняемыеНастройки, "ЧекЛистВыполнениеПроцент", + ОтображениеЧеклистаЗадач = Перечисления.узОтображениеЧеклистаЗадачНаДоске.Процент); + + КонецЕсли; + // - #225 Урянский Д. 2020-07-06 КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных; МакетКомпоновкиДанных = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанныхКонсоли, ИсполняемыеНастройки,,,Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений")); ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных; ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений; - ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновкиДанных); + // + #225 Урянский Д. 2020-07-06 + ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновкиДанных, , , Истина); + // - #225 Урянский Д. 2020-07-06 ПроцессорВывода.УстановитьОбъект(ТЗЗадачи); ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных); Возврат ТЗЗадачи; -КонецФункции +КонецФункции Процедура СменитьСтатусЗадачи(ДопПараметры) Экспорт НовыйСтатус = ДопПараметры.НовыйСтатус;