From 23f7048571447e75889aab060552556af3d33b51 Mon Sep 17 00:00:00 2001 From: Anton Ivanov Date: Sun, 28 Oct 2018 11:03:39 +0300 Subject: [PATCH] =?UTF-8?q?@79vlad=20=D0=B2=20=D0=B7=D0=B0=D0=B4=D0=B0?= =?UTF-8?q?=D1=87=D0=B0=D1=85=20=D0=BD=D0=B0=20=D0=B7=D0=B0=D0=BA=D0=BB?= =?UTF-8?q?=D0=B0=D0=B4=D0=BA=D0=B5=20"=D0=A3=D1=87=D0=B5=D1=82=20=D0=B2?= =?UTF-8?q?=D1=80=D0=B5=D0=BC=D0=B5=D0=BD=D0=B8"=20=D0=BD=D0=B5=20=D0=BE?= =?UTF-8?q?=D1=82=D0=BE=D0=B1=D1=80=D0=B0=D0=B6=D0=B0=D1=8E=D1=82=D1=81?= =?UTF-8?q?=D1=8F=20=D0=BF=D1=80=D0=B8=D0=BC=D0=B5=D1=87=D0=B0=D0=BD=D0=B8?= =?UTF-8?q?=D1=8F=20=D0=B8=D1=81=D0=BF=D0=BE=D0=BB=D0=BD=D0=B8=D1=82=D0=B5?= =?UTF-8?q?=D0=BB=D1=8F?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../AccumulationRegisters/узФактПоЗадачам.xml | 40 ++++++++++++++ .../узЗадачи/Forms/ФормаЭлемента/Ext/Form.xml | 8 ++- .../узВводФактаПоЗадаче/Ext/ObjectModule.bsl | 12 +++-- .../Forms/ФормаДокументаВводСЗадачи/Ext/Form.xml | 8 +++ .../Forms/ФормаДокументаВводСЗадачи/Ext/Form/Module.bsl | 52 +++++++++++++++++++ 5 files changed, 115 insertions(+), 5 deletions(-) diff --git a/src/cf/AccumulationRegisters/узФактПоЗадачам.xml b/src/cf/AccumulationRegisters/узФактПоЗадачам.xml index bef9c47fa..2ed845537 100644 --- a/src/cf/AccumulationRegisters/узФактПоЗадачам.xml +++ b/src/cf/AccumulationRegisters/узФактПоЗадачам.xml @@ -269,6 +269,46 @@ Use + + + Примечание + + + ru + Примечание + + + + + xs:string + + 500 + Variable + + + false + + + + false + + false + false + + + DontCheck + Items + + + Auto + Auto + + + Auto + DontIndex + Use + + Задача diff --git a/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form.xml b/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form.xml index 7b32dbbc6..a1ae0619f 100644 --- a/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form.xml +++ b/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form.xml @@ -1369,6 +1369,11 @@ + + ФактическиеЧасы.Примечание + + + @@ -2310,7 +2315,8 @@ РегистрНакопленияузФактПоЗадачам.Факт, РегистрНакопленияузФактПоЗадачам.ДатаНачала, РегистрНакопленияузФактПоЗадачам.ДатаОкончания, - РегистрНакопленияузФактПоЗадачам.Задача + РегистрНакопленияузФактПоЗадачам.Задача, + РегистрНакопленияузФактПоЗадачам.Примечание ИЗ РегистрНакопления.узФактПоЗадачам КАК РегистрНакопленияузФактПоЗадачам ГДЕ diff --git a/src/cf/Documents/узВводФактаПоЗадаче/Ext/ObjectModule.bsl b/src/cf/Documents/узВводФактаПоЗадаче/Ext/ObjectModule.bsl index e3733415f..3e75212e5 100644 --- a/src/cf/Documents/узВводФактаПоЗадаче/Ext/ObjectModule.bsl +++ b/src/cf/Documents/узВводФактаПоЗадаче/Ext/ObjectModule.bsl @@ -3,17 +3,21 @@ НаборЗаписей = Движения.узФактПоЗадачам; НаборЗаписей.Записывать = Истина; - + Для каждого СтрокаДанные из Данные цикл Запись = НаборЗаписей.Добавить(); Запись.Период = Дата; Запись.Задача = Задача; Запись.Исполнитель = Исполнитель; - Запись.Спринт = СтрокаДанные.Спринт; + Запись.Спринт = СтрокаДанные.Спринт; Запись.ДатаНачала = СтрокаДанные.ДатаНачала; Запись.ДатаОкончания = СтрокаДанные.ДатаОкончания; + // +++ 79Vlad 25.10.2018 + Запись.Примечание = СокрЛП(СтрокаДанные.Примечание); + // --- 79Vlad 25.10.2018 + Запись.Факт = СтрокаДанные.Факт; Конеццикла; @@ -28,7 +32,7 @@ Отказ = Истина; СообщениеОшибки = Новый СообщениеПользователю(); - СообщениеОшибки.Текст = "Для задачи - проекта нет озможности ввода данных о факте работ!"; + СообщениеОшибки.Текст = "Для задачи - проекта нет возможности ввода данных о факте работ!"; СообщениеОшибки.Поле = Ссылка; СообщениеОшибки.ПутьКДанным = "Объект.Задача"; СообщениеОшибки.Сообщить(); @@ -38,7 +42,7 @@ Если Справочники.узЗадачи.ЗадачаБезПодчененнойИерархии(Задача) Тогда Отказ = Истина; СообщениеОшибки = Новый СообщениеПользователю(); - СообщениеОшибки.Текст = "Для задачи, которая имеет подчененные задачи, нет озможности ввода данных о факте работ!"; + СообщениеОшибки.Текст = "Для задачи, которая имеет подчиненные задачи, нет возможности ввода данных о факте работ!"; СообщениеОшибки.Поле = Ссылка; СообщениеОшибки.ПутьКДанным = "Объект.Задача"; СообщениеОшибки.Сообщить(); diff --git a/src/cf/Documents/узВводФактаПоЗадаче/Forms/ФормаДокументаВводСЗадачи/Ext/Form.xml b/src/cf/Documents/узВводФактаПоЗадаче/Forms/ФормаДокументаВводСЗадачи/Ext/Form.xml index 51b49bf58..229151f61 100644 --- a/src/cf/Documents/узВводФактаПоЗадаче/Forms/ФормаДокументаВводСЗадачи/Ext/Form.xml +++ b/src/cf/Documents/узВводФактаПоЗадаче/Forms/ФормаДокументаВводСЗадачи/Ext/Form.xml @@ -100,13 +100,21 @@ ДатаНачала + true + + ДатаНачалаОткрытие + ДатаОкончания + true + + ДатаОкончанияОткрытие + diff --git a/src/cf/Documents/узВводФактаПоЗадаче/Forms/ФормаДокументаВводСЗадачи/Ext/Form/Module.bsl b/src/cf/Documents/узВводФактаПоЗадаче/Forms/ФормаДокументаВводСЗадачи/Ext/Form/Module.bsl index 741dac17f..9953872b0 100644 --- a/src/cf/Documents/узВводФактаПоЗадаче/Forms/ФормаДокументаВводСЗадачи/Ext/Form/Module.bsl +++ b/src/cf/Documents/узВводФактаПоЗадаче/Forms/ФормаДокументаВводСЗадачи/Ext/Form/Module.bsl @@ -52,3 +52,55 @@ Процедура ПослеЗаписи(ПараметрыЗаписи) Оповестить("узВводФактаПоЗадачеЗаписан"); КонецПроцедуры + +// +++ 79Vlad 25.10.2018 +&НаКлиенте +Процедура ДатаНачалаОткрытие(Элемент, СтандартнаяОбработка) + СтандартнаяОбработка = Ложь; + ДатаНачала = НачалоМинуты(ТекущаяДата()); + Если НЕ ЗначениеЗаполнено(ДатаОкончания) + ИЛИ ДатаНачала > ДатаОкончания Тогда + ДатаОкончания = ПолучитьДатаОкончания(ДатаНачала); + Конецесли; + ИзменитьЧасыФактДляСтроки(); + +КонецПроцедуры +// --- 79Vlad 25.10.2018 + +// +++ 79Vlad 25.10.2018 +&НаКлиенте +Функция ПолучитьДатаОкончания(ОтДаты) + пДатаОкончания = НачалоМинуты(КонецМинуты(ОтДаты)+1); + Возврат пДатаОкончания; +КонецФункции +// --- 79Vlad 25.10.2018 + +// +++ 79Vlad 25.10.2018 +&НаКлиенте +Функция ПолучитьКоличествоЧасовПоРазностиДат(ДатаНач, ДатаКон) + Часов = 0; + + Если ДатаКон > ДатаНач Тогда + Часов = (ДатаКон - ДатаНач) / 3600; + КонецЕсли; + + Возврат Часов; +КонецФункции +// --- 79Vlad 25.10.2018 + +// +++ 79Vlad 25.10.2018 +&НаКлиенте +Процедура ИзменитьЧасыФактДляСтроки() + Факт = ПолучитьКоличествоЧасовПоРазностиДат(ДатаНачала, ДатаОкончания); +КонецПроцедуры +// --- 79Vlad 25.10.2018 + +// +++ 79Vlad 25.10.2018 +&НаКлиенте +Процедура ДатаОкончанияОткрытие(Элемент, СтандартнаяОбработка) + СтандартнаяОбработка = Ложь; + + ДатаОкончания = ПолучитьДатаОкончания(ТекущаяДата()); + ИзменитьЧасыФактДляСтроки(); +КонецПроцедуры +// --- 79Vlad 25.10.2018