1c/Tasks
1
0
Fork 0
mirror of https://github.com/BlizD/Tasks.git synced 2025-03-19 21:07:53 +02:00
Code Issues Releases Activity

При проведении документа узВводФактаПоЗадаче спринт брать из табличной части

Browse Source
This commit is contained in:
Anton Ivanov 2018-10-14 18:25:44 +03:00
parent 91f0bdb397
commit ba74732394
3 changed files with 38 additions and 6 deletions
src/cf
CommonModules/узОбновлениеИнформационнойБазы/Ext
Module.bsl
Configuration.xml
Documents/узВводФактаПоЗадаче/Ext
ObjectModule.bsl

36
src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl

@ -1,6 +1,6 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "УправлениеЗадачами";
Описание.Версия = "1.0.4.018";
Описание.Версия = "1.0.4.019";
// Требуется библиотека стандартных подсистем.
Описание.ТребуемыеПодсистемы.Добавить("СтандартныеПодсистемы");
КонецПроцедуры
@ -190,6 +190,13 @@
Обработчик.Комментарий = "Обновление на версию 1.0.4.014";
//- #104 Дзеса Ігор (capitoshko) 08.10.2018
Обработчик = Обработчики.Добавить();
Обработчик.Версия = "1.0.4.019";
Обработчик.НачальноеЗаполнение = Ложь;
Обработчик.Процедура = "узОбновлениеИнформационнойБазы.ОбновлениеНаВерсию_1_0_4_019";
Обработчик.ОбщиеДанные = Истина;
Обработчик.Комментарий = "Обновление на версию 1.0.4.019";
КонецПроцедуры
Процедура ПередОбновлениемИнформационнойБазы() Экспорт
КонецПроцедуры
@ -702,6 +709,33 @@
КонецПроцедуры
Процедура ОбновлениеНаВерсию_1_0_4_019() Экспорт
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| узВводФактаПоЗадаче.Ссылка
|ИЗ
| Документ.узВводФактаПоЗадаче КАК узВводФактаПоЗадаче
|ГДЕ
| узВводФактаПоЗадаче.Проведен
|
|УПОРЯДОЧИТЬ ПО
| узВводФактаПоЗадаче.Дата";
РезультатЗапроса = Запрос.Выполнить();
Если РезультатЗапроса.Пустой() Тогда
Возврат;
Конецесли;
Выборка = РезультатЗапроса.Выбрать();
Пока Выборка.Следующий() Цикл
ДокОбъект = Выборка.Ссылка.ПолучитьОбъект();
ДокОбъект.Записать(РежимЗаписиДокумента.Проведение);
КонецЦикла;
КонецПроцедуры
Процедура ПереносУчетаВремениВОтдельныйРегистр()
Запрос = Новый Запрос;

2
src/cf/Configuration.xml

@ -49,7 +49,7 @@
<xr:Item xsi:type="xr:MDObjectRef">Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</xr:Item>
</DefaultRoles>
<Vendor>Управление задачами</Vendor>
<Version>1.0.4.018</Version>
<Version>1.0.4.019</Version>
<UpdateCatalogAddress/>
<IncludeHelpInContents>false</IncludeHelpInContents>
<UseManagedFormInOrdinaryApplication>false</UseManagedFormInOrdinaryApplication>

6
src/cf/Documents/узВводФактаПоЗадаче/Ext/ObjectModule.bsl

@ -3,16 +3,14 @@
НаборЗаписей = Движения.узФактПоЗадачам;
НаборЗаписей.Записывать = Истина;
ТекущийСпринтДляЗадачи = Справочники.узСпринты.ПолучитьТекущийСпринтДляЗадачи(КонецДня(Дата),Задача);
Для каждого СтрокаДанные из Данные цикл
Запись = НаборЗаписей.Добавить();
Запись.Период = Дата;
Запись.Задача = Задача;
Запись.Исполнитель = Исполнитель;
Запись.Спринт = ТекущийСпринтДляЗадачи;
Запись.Спринт = СтрокаДанные.Спринт;
Запись.ДатаНачала = СтрокаДанные.ДатаНачала;
Запись.ДатаОкончания = СтрокаДанные.ДатаОкончания;