1c/Tasks
1
0
Fork 0
mirror of https://github.com/BlizD/Tasks.git synced 2025-01-28 03:57:18 +02:00
Code Issues Releases Activity

№110 При переносе ветки задач в корень, то основная задача не меняетя у подчиненных задач

Browse Source
This commit is contained in:
Anton Ivanov 2017-01-04 17:52:48 +03:00
parent 797a9b607c
commit 5ea8442332
1 changed files with 42 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl
View File

@ -18,6 +18,10 @@
ЕстьПодчиненныеЗадачи = пЕстьПодчиненныеЗадачи;
Конецесли;
Если пЕстьПодчиненныеЗадачи Тогда
ИзменитьОсновнуюЗадачуДляВсехПодчиненныхЗадач();
Конецесли;
НовыйРодитель = Родитель;
Если ЗначениеЗаполнено(НовыйРодитель)
И НЕ НовыйРодитель.ЕстьПодчиненныеЗадачи Тогда
@ -605,4 +609,42 @@
ДополнительныеСвойства.Удалить("СобытияВИстории");
КонецПроцедуры
Процедура ИзменитьОсновнуюЗадачуДляВсехПодчиненныхЗадач()
Если ЭтоНовый() Тогда
Возврат;
Конецесли;
Если НЕ ЗначениеЗаполнено(ОсновнаяЗадача) Тогда
Возврат;
КонецЕсли;
Запрос = Новый Запрос("
|ВЫБРАТЬ
| узЗадачи.Ссылка
|ИЗ
| Справочник.узЗадачи КАК узЗадачи
|ГДЕ
| узЗадачи.Ссылка В ИЕРАРХИИ(&Задача)
| И узЗадачи.Ссылка <> &Задача
| И узЗадачи.ОсновнаяЗадача <> &ОсновнаяЗадача
|");
Запрос.УстановитьПараметр("Задача", Ссылка);
Запрос.УстановитьПараметр("ОсновнаяЗадача", ОсновнаяЗадача);
РезультатЗапроса = Запрос.Выполнить();
Если РезультатЗапроса.Пустой() Тогда
Возврат;
Конецесли;
Выборка = РезультатЗапроса.Выбрать();
Пока Выборка.Следующий() Цикл
СпрОбъект = Выборка.Ссылка.ПолучитьОбъект();
#Если Тромбон тогда
СпрОбъект = Справочники.узЗадачи.СоздатьЭлемент();
#Конецесли
СпрОбъект.ОсновнаяЗадача = ОсновнаяЗадача;
СпрОбъект.ДополнительныеСвойства.Вставить("узЭтоОбработка",Истина);
СпрОбъект.Записать();
Конеццикла;
КонецПроцедуры