@7OH #285 Доступность смены статуса для групп пользователей, пользова…

…теля, проекта
BlizD · Apr 30, 2024 · 936c002 · 936c002
1 parent 06f6e80
commit 936c002
Show file tree

Hide file tree

Showing 25 changed files with 1,387 additions and 44 deletions.
diff --git a/VERSIONS.md b/VERSIONS.md
@@ -2,20 +2,28 @@
 Что сделать дополнительно: 
 * Обновить в файле настроек сонара новую версию релиза sonar.projectVersion=1.0.5.ххх
 
-(В разработке) * #285 Доступность смены статуса для групп пользователей, пользователя, проекта. Спасибо @7OH 
 (В разработке) * #332 Отчет "Расшифровка часов с комментариями" 
 
 **Выпущена версия 2024.хх.хх.0 (Обновление от хх.хх.2024)**
 
 **Изменения**
 
+* #285 Доступность смены статуса для групп пользователей, пользователя, проекта (рис. 1). Спасибо @7OH
 * #305 Включить историю изменений (платформенную) для задач, спринтов, вопросы ответы, спринты, выпуск релиза, ввод факта по задачам, проекты. Спасибо @7OH
-* #327 Кнопка добавления факта работ прямо из канбан доски (рис. 1). Спасибо @7OH
+* #327 Кнопка добавления факта работ прямо из канбан доски (рис. 2). Спасибо @7OH
 * #329 Добавить отбор по полю Проект в настройках канбан доски. Спасибо @7OH
 * #329 Возможность видеть в отчете по задачам Проект. Спасибо @7OH
 * #335 Ошибка параметра сеанса узЗапретитьВводФактаДляОсновныхЗадач. Спасибо @7OH
 
-Рис. 1 Добавления факта работ прямо из канбан доски
+**Инструкции**
+* [Как настроить доступные смены статусов для задач](https://github.com/BlizD/Tasks/wiki/Как-настроить-доступные-смены-статусов-для-задач)
+* #338 Способ обхода, когда после обновления на с 1.0.5.хх до 2024.04.хх отключается система взаимодействия. Спасибо @serg33rus 
+[Инструкция](https://github.com/BlizD/Tasks/wiki/Способ-обхода,-когда-после-обновления-на-с-1.0.5.хх-до-2024.04.хх-отключается-система-взаимодействия)
+
+
+Рис. 1 Доступные смены статусов 
+![image](https://github.com/BlizD/Tasks/assets/10989306/b317065e-d058-4f53-ba23-ead331b76e0d)
+Рис. 2 Добавления факта работ прямо из канбан доски
 ![image](https://github.com/BlizD/Tasks/assets/10989306/c9127079-d28d-4524-a6b2-02ebc433e615)
 
 

diff --git a/src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl b/src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl
@@ -44,6 +44,13 @@
 
 	ЗаполнитьСтатусЗадачиЕслиОнНеЗаполнен(Отказ);
 
+	// [+] #285 Павлюков С.Ю. 2024-04-20
+	ПроверитьДоступностьСменыСтатуса(Статус, Отказ);
+	Если Отказ Тогда
+		Возврат;
+	КонецЕсли;
+	// [-] #285 Павлюков С.Ю. 2024-04-20
+
 	РезультатПроверкиWIPЛимит = ПроверитьWIPЛимит();
 	Если РезультатПроверкиWIPЛимит.ПревышенWIPЛимит Тогда
 		Отказ = Истина;
@@ -1643,3 +1650,23 @@
 
 КонецФункции
 //-ГЕНА
+
+// [+] #285 Павлюков С.Ю. 2024-04-20
+Процедура ПроверитьДоступностьСменыСтатуса(мСтатус, Отказ)
+
+	текущийСтатус = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Ссылка, "Статус");
+	Если текущийСтатус = мСтатус Тогда
+		Возврат;
+	КонецЕсли;
+
+	МассивЗадач = ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(Ссылка);
+	РегистрыСведений.узДоступностьСменыСтатусовЗадач.ОставитьЗадачиДляКоторыхДоступенНовыйСтатус(
+		МассивЗадач, мСтатус);
+
+	Если Не ЗначениеЗаполнено(МассивЗадач) Тогда
+		Отказ = Истина;
+	КонецЕсли;
+
+КонецПроцедуры
+// [-] #285 Павлюков С.Ю. 2024-04-20
+
diff --git a/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form.xml b/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form.xml
@@ -116,6 +116,9 @@
 									<EditMode>EnterOnInput</EditMode>
 									<ContextMenu name="СтатусКонтекстноеМеню" id="14"/>
 									<ExtendedTooltip name="СтатусРасширеннаяПодсказка" id="15"/>
+									<Events>
+										<Event name="OnChange">СтатусПриИзменении</Event>
+									</Events>
 								</InputField>
 								<InputField name="Код" id="1">
 									<DataPath>Объект.Code</DataPath>
@@ -1919,6 +1922,9 @@
 											<DataPath>Объект.Проект</DataPath>
 											<ContextMenu name="ПроектЗадачиКонтекстноеМеню" id="781"/>
 											<ExtendedTooltip name="ПроектЗадачиРасширеннаяПодсказка" id="782"/>
+											<Events>
+												<Event name="OnChange">ПроектЗадачиПриИзменении</Event>
+											</Events>
 										</InputField>
 										<InputField name="ОсновнаяЗадачаПроект" id="730">
 											<DataPath>Объект.ОсновнаяЗадача.Проект</DataPath>

diff --git a/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form/Module.bsl b/src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form/Module.bsl
@@ -497,6 +497,10 @@
 		Элементы.ПроектЗадачи.Видимость = Истина;
 	КонецЕсли;
 
+	// [+] #285 Павлюков С.Ю. 2024-04-14
+	ОбновитьДоступныйСписокСменыСтатуса();
+	// [-] #285 Павлюков С.Ю. 2024-04-14
+
 	Если Объект.ОформлениеТекста = ПредопределенноеЗначение("Перечисление.узОформлениеТекста.ФорматированныйТекст") Тогда
 		Элементы.ГруппаСтраницаФорматированныйТекст.Видимость = Истина;
 	ИначеЕсли Объект.ОформлениеТекста = ПредопределенноеЗначение("Перечисление.узОформлениеТекста.Markdown") Тогда
@@ -830,6 +834,47 @@
 
 КонецПроцедуры 
 
+// [+] #285 Павлюков С.Ю. 2024-04-14
+&НаСервере
+Процедура ОбновитьДоступныйСписокСменыСтатуса()
+
+	ПроектДляПроверки = Объект.Проект;
+	Если ЗначениеЗаполнено(Объект.ОсновнаяЗадача) Тогда  
+		ПроектДляПроверки = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ОсновнаяЗадача, "Проект");
+	КонецЕсли;
+
+	Если Не ЗначениеЗаполнено(ПроектДляПроверки) Тогда
+		Возврат;
+	КонецЕсли;
+
+	ОграничиватьСменуСтатусов = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ПроектДляПроверки, "ОграничиватьСменуСтатусов");
+	Если Не ОграничиватьСменуСтатусов = Истина Тогда
+		Элементы.Статус.РежимВыбораИзСписка = Ложь;
+		Возврат;
+	КонецЕсли;
+
+	массивСтатусов = РегистрыСведений.узДоступностьСменыСтатусовЗадач.ДоступныеДляСменыСтатусы(ПроектДляПроверки, Объект.Статус);
+	Если массивСтатусов.Найти(Объект.Статус) = Неопределено Тогда
+		массивСтатусов.Добавить(Объект.Статус);
+	КонецЕсли;
+	Элементы.Статус.РежимВыбораИзСписка = Истина;
+	Элементы.Статус.СписокВыбора.ЗагрузитьЗначения(массивСтатусов);
+
+КонецПроцедуры
+
+// [+] #285 Павлюков С.Ю. 2024-04-14
+&НаКлиенте
+Процедура СтатусПриИзменении(Элемент)
+	ОбновитьДоступныйСписокСменыСтатуса();
+КонецПроцедуры 
+
+// [+] #285 Павлюков С.Ю. 2024-04-14
+&НаКлиенте
+Процедура ПроектЗадачиПриИзменении(Элемент)
+	ОбновитьДоступныйСписокСменыСтатуса();
+КонецПроцедуры
+// [-] #285 Павлюков С.Ю. 2024-04-14
+
 #КонецОбласти
 
 #Область ОбработчикиСобытийЭлементовШапкиФормы

diff --git a/src/cf/Catalogs/узПроекты.xml b/src/cf/Catalogs/узПроекты.xml
@@ -264,6 +264,51 @@
 					<DataHistory>Use</DataHistory>
 				</Properties>
 			</Attribute>
+			<Attribute uuid="c2b742f1-e6e3-4aaa-8710-f6565778d511">
+				<Properties>
+					<Name>ОграничиватьСменуСтатусов</Name>
+					<Synonym>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>Ограничивать смену статусов</v8:content>
+						</v8:item>
+					</Synonym>
+					<Comment/>
+					<Type>
+						<v8:Type>xs:boolean</v8:Type>
+					</Type>
+					<PasswordMode>false</PasswordMode>
+					<Format/>
+					<EditFormat/>
+					<ToolTip>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>Если указано Да, тогда будут разрешены только следующие пары смены статусов</v8:content>
+						</v8:item>
+					</ToolTip>
+					<MarkNegatives>false</MarkNegatives>
+					<Mask/>
+					<MultiLine>false</MultiLine>
+					<ExtendedEdit>false</ExtendedEdit>
+					<MinValue xsi:nil="true"/>
+					<MaxValue xsi:nil="true"/>
+					<FillFromFillingValue>false</FillFromFillingValue>
+					<FillValue xsi:nil="true"/>
+					<FillChecking>DontCheck</FillChecking>
+					<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
+					<ChoiceParameterLinks/>
+					<ChoiceParameters/>
+					<QuickChoice>Auto</QuickChoice>
+					<CreateOnInput>Auto</CreateOnInput>
+					<ChoiceForm/>
+					<LinkByType/>
+					<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
+					<Use>ForItem</Use>
+					<Indexing>DontIndex</Indexing>
+					<FullTextSearch>Use</FullTextSearch>
+					<DataHistory>Use</DataHistory>
+				</Properties>
+			</Attribute>
 			<TabularSection uuid="3d75f3ab-e427-4aea-bdcc-152718d8b746">
 				<InternalInfo>
 					<xr:GeneratedType name="CatalogTabularSection.узПроекты.ПроектнаяКоманда" category="TabularSection">

diff --git a/src/cf/Catalogs/узПроекты/Forms/ФормаВыбора/Ext/Form.xml b/src/cf/Catalogs/узПроекты/Forms/ФормаВыбора/Ext/Form.xml
@@ -87,6 +87,12 @@
 					<ContextMenu name="ПрефиксКонтекстноеМеню" id="23"/>
 					<ExtendedTooltip name="ПрефиксРасширеннаяПодсказка" id="24"/>
 				</LabelField>
+				<CheckBoxField name="ОграничиватьСменуСтатусов" id="37">
+					<DataPath>Список.ОграничиватьСменуСтатусов</DataPath>
+					<CheckBoxType>Auto</CheckBoxType>
+					<ContextMenu name="ОграничиватьСменуСтатусовКонтекстноеМеню" id="38"/>
+					<ExtendedTooltip name="ОграничиватьСменуСтатусовРасширеннаяПодсказка" id="39"/>
+				</CheckBoxField>
 				<LabelField name="Комментарий" id="25">
 					<DataPath>Список.Комментарий</DataPath>
 					<ContextMenu name="КомментарийКонтекстноеМеню" id="26"/>

diff --git a/src/cf/Catalogs/узПроекты/Forms/ФормаСписка/Ext/Form.xml b/src/cf/Catalogs/узПроекты/Forms/ФормаСписка/Ext/Form.xml
@@ -93,6 +93,12 @@
 					<ContextMenu name="ОтветственныйКонтекстноеМеню" id="26"/>
 					<ExtendedTooltip name="ОтветственныйРасширеннаяПодсказка" id="27"/>
 				</LabelField>
+				<CheckBoxField name="ОграничиватьСменуСтатусов" id="36">
+					<DataPath>Список.ОграничиватьСменуСтатусов</DataPath>
+					<CheckBoxType>Auto</CheckBoxType>
+					<ContextMenu name="ОграничиватьСменуСтатусовКонтекстноеМеню" id="37"/>
+					<ExtendedTooltip name="ОграничиватьСменуСтатусовРасширеннаяПодсказка" id="38"/>
+				</CheckBoxField>
 				<LabelField name="Комментарий" id="22">
 					<DataPath>Список.Комментарий</DataPath>
 					<ContextMenu name="КомментарийКонтекстноеМеню" id="23"/>