1
0
mirror of https://github.com/BlizD/Tasks.git synced 2025-01-14 03:20:16 +02:00

#5 Внес правки в фичу "УчетВремениПоЗадачам"

This commit is contained in:
Буслов Дмитрий 2016-12-25 19:04:08 +10:00
parent 93164a9044
commit 23695a88f6
5 changed files with 46 additions and 34 deletions

View File

@ -54,18 +54,26 @@
// Процедура выполняется перед началом каждого сценария
Процедура ПередНачаломСценария() Экспорт
СостояниеVanessaBehavior = Ванесса.ПолучитьСостояниеVanessaBehavior();
ИмяСценария = СостояниеVanessaBehavior.ТекущийСценарий.Имя;
ИмяСценария = СостояниеVanessaBehavior.ТекущийСценарий.Имя;
ПредставлениеСправочника = "узЗадачи";
Если ИмяСценария = "Проверка вывода ""ЧасыПлан"", ""ЧасыФакт"", ""ЧасыКОплате"" в отчете ""узОтчетПоЗадачам""" Тогда
ПредставлениеСправочника = "узЗадачи";
СоздатьЭлементСправочникаСНаименованиеНаСервере(ПредставлениеСправочника, "ЭтоТестоваяЗадача");
ЭлементСправочника = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , "ЭтоТестоваяЗадача",,ИСТИНА);
СоздатьЭлементСправочникаСНаименованиеНаСервере(ПредставлениеСправочника, "ЭтоОсновнаяТестоваяЗадача");
ОсновнаяЗадача = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , "ЭтоОсновнаяТестоваяЗадача",,ИСТИНА);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, "ЧасыПлан" , 10);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, "ЧасыФакт" , 15);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, "ЧасыКОплате" , 10);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, "ПоказыватьВОтчетахИКанбанДоске", ИСТИНА);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, "ДатаСоздания", Дата(2016,12,19,23,17,58));
УстановитьЗначениеРеквизитаСправочника(ОсновнаяЗадача, "ПоказыватьВОтчетахИКанбанДоске", ИСТИНА);
СоздатьЭлементСправочникаСНаименованиеНаСервере(ПредставлениеСправочника, "ЭтоТестоваяЗадача");
Задача = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , "ЭтоТестоваяЗадача",,ИСТИНА);
УстановитьЗначениеРеквизитаСправочника(Задача, "Код" , 9999999);
УстановитьЗначениеРеквизитаСправочника(Задача, "ЧасыПлан" , 10);
УстановитьЗначениеРеквизитаСправочника(Задача, "ЧасыФакт" , 15);
УстановитьЗначениеРеквизитаСправочника(Задача, "ЧасыКОплате" , 10);
УстановитьЗначениеРеквизитаСправочника(Задача, "ПоказыватьВОтчетахИКанбанДоске", ИСТИНА);
УстановитьЗначениеРеквизитаСправочника(Задача, "ДатаСоздания" , Дата(2016,12,19,23,17,58));
УстановитьЗначениеРеквизитаСправочника(Задача, "Родитель" , ОсновнаяЗадача);
КонецЕсли;
КонецПроцедуры
@ -73,13 +81,11 @@
&НаКлиенте
// Процедура выполняется перед окончанием каждого сценария
Процедура ПередОкончаниемСценария() Экспорт
СостояниеVanessaBehavior = Ванесса.ПолучитьСостояниеVanessaBehavior();
ИмяСценария = СостояниеVanessaBehavior.ТекущийСценарий.Имя;
Если ИмяСценария = "Проверка вывода ""ЧасыПлан"", ""ЧасыФакт"", ""ЧасыКОплате"" в отчете ""узОтчетПоЗадачам""" Тогда
ПредставлениеСправочника = "узЗадачи";
ЭлементСправочника = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , "ЭтоТестоваяЗадача",,ИСТИНА);
утвУдалитьЭлементСправочника(ПредставлениеСправочника, ЭлементСправочника);
КонецЕсли;
ПредставлениеСправочника = "узЗадачи";
ЭлементСправочника = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , "ЭтоТестоваяЗадача");
утвУдалитьЭлементСправочника(ПредставлениеСправочника, ЭлементСправочника);
ЭлементСправочника = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , "ЭтоОсновнаяТестоваяЗадача");
утвУдалитьЭлементСправочника(ПредставлениеСправочника, ЭлементСправочника);
КонецПроцедуры
///////////////////////////////////////////////////

View File

@ -1 +1 @@
Form\Форма\Форма.bsl-->70e297e0-e8a2-43bf-8be1-62e408f610a1.0 (46, 352)
Form\Форма\Форма.bsl-->70e297e0-e8a2-43bf-8be1-62e408f610a1.0 (46, 358)

View File

@ -99,18 +99,26 @@
// Процедура выполняется перед началом каждого сценария
Процедура ПередНачаломСценария() Экспорт
СостояниеVanessaBehavior = Ванесса.ПолучитьСостояниеVanessaBehavior();
ИмяСценария = СостояниеVanessaBehavior.ТекущийСценарий.Имя;
ИмяСценария = СостояниеVanessaBehavior.ТекущийСценарий.Имя;
ПредставлениеСправочника = ""узЗадачи"";
Если ИмяСценария = ""Проверка вывода """"ЧасыПлан"""", """"ЧасыФакт"""", """"ЧасыКОплате"""" в отчете """"узОтчетПоЗадачам"""""" Тогда
ПредставлениеСправочника = ""узЗадачи"";
СоздатьЭлементСправочникаСНаименованиеНаСервере(ПредставлениеСправочника, ""ЭтоТестоваяЗадача"");
ЭлементСправочника = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , ""ЭтоТестоваяЗадача"",,ИСТИНА);
СоздатьЭлементСправочникаСНаименованиеНаСервере(ПредставлениеСправочника, ""ЭтоОсновнаяТестоваяЗадача"");
ОсновнаяЗадача = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , ""ЭтоОсновнаяТестоваяЗадача"",,ИСТИНА);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, ""ЧасыПлан"" , 10);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, ""ЧасыФакт"" , 15);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, ""ЧасыКОплате"" , 10);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, ""ПоказыватьВОтчетахИКанбанДоске"", ИСТИНА);
УстановитьЗначениеРеквизитаСправочника(ЭлементСправочника, ""ДатаСоздания"", Дата(2016,12,19,23,17,58));
УстановитьЗначениеРеквизитаСправочника(ОсновнаяЗадача, ""ПоказыватьВОтчетахИКанбанДоске"", ИСТИНА);
СоздатьЭлементСправочникаСНаименованиеНаСервере(ПредставлениеСправочника, ""ЭтоТестоваяЗадача"");
Задача = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , ""ЭтоТестоваяЗадача"",,ИСТИНА);
УстановитьЗначениеРеквизитаСправочника(Задача, ""Код"" , 9999999);
УстановитьЗначениеРеквизитаСправочника(Задача, ""ЧасыПлан"" , 10);
УстановитьЗначениеРеквизитаСправочника(Задача, ""ЧасыФакт"" , 15);
УстановитьЗначениеРеквизитаСправочника(Задача, ""ЧасыКОплате"" , 10);
УстановитьЗначениеРеквизитаСправочника(Задача, ""ПоказыватьВОтчетахИКанбанДоске"", ИСТИНА);
УстановитьЗначениеРеквизитаСправочника(Задача, ""ДатаСоздания"" , Дата(2016,12,19,23,17,58));
УстановитьЗначениеРеквизитаСправочника(Задача, ""Родитель"" , ОсновнаяЗадача);
КонецЕсли;
КонецПроцедуры
@ -118,13 +126,11 @@
&НаКлиенте
// Процедура выполняется перед окончанием каждого сценария
Процедура ПередОкончаниемСценария() Экспорт
СостояниеVanessaBehavior = Ванесса.ПолучитьСостояниеVanessaBehavior();
ИмяСценария = СостояниеVanessaBehavior.ТекущийСценарий.Имя;
Если ИмяСценария = ""Проверка вывода """"ЧасыПлан"""", """"ЧасыФакт"""", """"ЧасыКОплате"""" в отчете """"узОтчетПоЗадачам"""""" Тогда
ПредставлениеСправочника = ""узЗадачи"";
ЭлементСправочника = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , ""ЭтоТестоваяЗадача"",,ИСТИНА);
утвУдалитьЭлементСправочника(ПредставлениеСправочника, ЭлементСправочника);
КонецЕсли;
ПредставлениеСправочника = ""узЗадачи"";
ЭлементСправочника = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , ""ЭтоТестоваяЗадача"");
утвУдалитьЭлементСправочника(ПредставлениеСправочника, ЭлементСправочника);
ЭлементСправочника = утвПолучитьЭлементГруппуСправочника(ПредставлениеСправочника, , ""ЭтоОсновнаяТестоваяЗадача"");
утвУдалитьЭлементСправочника(ПредставлениеСправочника, ЭлементСправочника);
КонецПроцедуры
///////////////////////////////////////////////////

View File

@ -1 +1 @@
{1,9,"",89284c42-6724-489f-9883-8cce3cdee355,"70e297e0-e8a2-43bf-8be1-62e408f610a1",19274f22-568a-49ae-a271-765d28360fb7,"70e297e0-e8a2-43bf-8be1-62e408f610a1.0",843b3a2d-c1ff-47e4-aa84-43df6dc181ce,"79a499cc-1782-4a2f-abe7-61ea4d49fd5a",44a02535-75a1-49ac-8561-a6f8e79d21fc,"8aa13ab8-188a-4f59-be4f-031aa5450c90.0",e28145f0-8f5a-4469-9fe5-b1f86fb512b6,"copyinfo",f4280c28-6d59-4663-b398-2ca787dbe4e1,"root",2ab6fa56-2bd9-4b8a-a4a3-cb36f5e9c57a,"version",de9dccc6-294c-4f90-b39c-190e99bc12e3,"versions",1e059ce0-49ee-4b2d-8fae-e3def6d77a80}
{1,9,"",45d71b5d-c2b0-404b-b3b8-4aa50e42711d,"70e297e0-e8a2-43bf-8be1-62e408f610a1",5c00cad6-02b2-401d-aa5d-5e35352e879e,"70e297e0-e8a2-43bf-8be1-62e408f610a1.0",1d52e238-bb7d-4a4f-949a-bab6d80df683,"79a499cc-1782-4a2f-abe7-61ea4d49fd5a",61d7acf0-04a1-4a2a-9ec7-53c5a389ff29,"8aa13ab8-188a-4f59-be4f-031aa5450c90.0",e28145f0-8f5a-4469-9fe5-b1f86fb512b6,"copyinfo",0f1a0b97-f510-42ad-b310-1b32fc77315c,"root",ac78f5bf-ed46-4ef4-b75c-a1862b5ccef3,"version",0cd0d383-96b8-4843-9b33-bef4e049380b,"versions",6f01f24c-f3a1-4415-9f39-13da34b2b3d8}