Skip to content

Commit

Permalink
Merge pull request #100 from ivanov660/#96_поддерживаемые_версии
Browse files Browse the repository at this point in the history
#96 поддерживаемые версии
  • Loading branch information
ivanov660 authored Nov 8, 2020
2 parents c9a8f02 + 31221ca commit 32bbf62
Show file tree
Hide file tree
Showing 42 changed files with 4,020 additions and 7,107 deletions.
Binary file not shown.
Original file line number Diff line number Diff line change
@@ -0,0 +1,17 @@
<?xml version="1.0" encoding="UTF-8"?>
<Settings xmlns="http://v8.1c.ru/8.1/data-composition-system/settings" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:dcscor="http://v8.1c.ru/8.1/data-composition-system/core">
<filter>
<viewMode>Normal</viewMode>
<userSettingID>dfcece9d-5077-440b-b6b3-45a5cb4538eb</userSettingID>
</filter>
<order>
<viewMode>Normal</viewMode>
<userSettingID>88619765-ccb3-46c6-ac52-38e9c992ebd4</userSettingID>
</order>
<conditionalAppearance>
<viewMode>Normal</viewMode>
<userSettingID>b75fecce-942b-4aed-abc9-e6a02e460fb3</userSettingID>
</conditionalAppearance>
<itemsViewMode>Normal</itemsViewMode>
<itemsUserSettingID>911b6018-f537-43e8-a417-da56b22f9aec</itemsUserSettingID>
</Settings>
Original file line number Diff line number Diff line change
@@ -0,0 +1,17 @@
<?xml version="1.0" encoding="UTF-8"?>
<Settings xmlns="http://v8.1c.ru/8.1/data-composition-system/settings" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:dcscor="http://v8.1c.ru/8.1/data-composition-system/core">
<filter>
<viewMode>Normal</viewMode>
<userSettingID>dfcece9d-5077-440b-b6b3-45a5cb4538eb</userSettingID>
</filter>
<order>
<viewMode>Normal</viewMode>
<userSettingID>88619765-ccb3-46c6-ac52-38e9c992ebd4</userSettingID>
</order>
<conditionalAppearance>
<viewMode>Normal</viewMode>
<userSettingID>b75fecce-942b-4aed-abc9-e6a02e460fb3</userSettingID>
</conditionalAppearance>
<itemsViewMode>Normal</itemsViewMode>
<itemsUserSettingID>911b6018-f537-43e8-a417-da56b22f9aec</itemsUserSettingID>
</Settings>

Large diffs are not rendered by default.

Large diffs are not rendered by default.

Original file line number Diff line number Diff line change
@@ -0,0 +1,59 @@
#Область ДополнительныеОбработки

Функция СведенияОВнешнейОбработке() Экспорт

МассивНазначений = Новый Массив;

ПараметрыРегистрации = Новый Структура;
ПараметрыРегистрации.Вставить("Вид", "ДополнительнаяОбработка");
ПараметрыРегистрации.Вставить("Назначение", МассивНазначений);
ПараметрыРегистрации.Вставить("Наименование", "Перемещение результатов тестов между проверками");
ПараметрыРегистрации.Вставить("Версия", "2020.10.30");
ПараметрыРегистрации.Вставить("БезопасныйРежим", Ложь);
ПараметрыРегистрации.Вставить("Информация", ИнформацияПоИсторииИзменений());
ПараметрыРегистрации.Вставить("ВерсияБСП", "1.2.1.4");
ТаблицаКоманд = ПолучитьТаблицуКоманд();
ДобавитьКоманду(ТаблицаКоманд,
"Перемещение результатов тестов между проверками",
"ПеренестиИсправитьРезультатыТестов",
"ОткрытиеФормы",
Истина,
);
ПараметрыРегистрации.Вставить("Команды", ТаблицаКоманд);

Возврат ПараметрыРегистрации;

КонецФункции

Функция ПолучитьТаблицуКоманд()

Команды = Новый ТаблицаЗначений;
Команды.Колонки.Добавить("Представление", Новый ОписаниеТипов("Строка"));
Команды.Колонки.Добавить("Идентификатор", Новый ОписаниеТипов("Строка"));
Команды.Колонки.Добавить("Использование", Новый ОписаниеТипов("Строка"));
Команды.Колонки.Добавить("ПоказыватьОповещение", Новый ОписаниеТипов("Булево"));
Команды.Колонки.Добавить("Модификатор", Новый ОписаниеТипов("Строка"));
Команды.Колонки.Добавить("Описание", Новый ОписаниеТипов("Строка"));

Возврат Команды;

КонецФункции

Процедура ДобавитьКоманду(ТаблицаКоманд, Представление, Идентификатор, Использование, ПоказыватьОповещение = Ложь, Модификатор = "",Описание = "")

НоваяКоманда = ТаблицаКоманд.Добавить();
НоваяКоманда.Представление = Представление;
НоваяКоманда.Идентификатор = Идентификатор;
НоваяКоманда.Использование = Использование;
НоваяКоманда.ПоказыватьОповещение = ПоказыватьОповещение;
НоваяКоманда.Модификатор = Модификатор;
НоваяКоманда.Описание = Описание;

КонецПроцедуры

Функция ИнформацияПоИсторииИзменений()
Возврат
" Обработка предназначена для перемещения результатов тестов между проверками/ объединению тестов внутри проверок.";
КонецФункции

#КонецОбласти
Original file line number Diff line number Diff line change
@@ -0,0 +1,22 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:ExternalDataProcessor xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="5c4fa497-0703-47e2-b150-082b222f79a0">
<producedTypes>
<objectType typeId="f45b8f5c-b998-4af8-b0f6-464bcaf9dfd3" valueTypeId="063dff1d-154a-4881-88cd-6f200193d292"/>
</producedTypes>
<name>ПеренестиИсправитьРезультатыТестов</name>
<synonym>
<key>ru</key>
<value>Перенести исправить результаты тестов</value>
</synonym>
<containedObjects classId="c3831ec8-d8d5-4f93-8a22-f9bfae07327f" objectId="8910a7c1-958d-442e-837c-2dcffcf6ba3b"/>
<defaultForm>ExternalDataProcessor.ПеренестиИсправитьРезультатыТестов.Form.Форма</defaultForm>
<forms uuid="66d75465-9abf-4d94-b370-001ff69e1631">
<name>Форма</name>
<synonym>
<key>ru</key>
<value>Форма</value>
</synonym>
<usePurposes>PersonalComputer</usePurposes>
<usePurposes>MobileDevice</usePurposes>
</forms>
</mdclass:ExternalDataProcessor>
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
#Область РаботаСПеременными

Функция УдалитьЗначениеПеременной(Знач Задание,Знач ИмяПеременной) Экспорт
Возврат ПланировщикЗаданийСервер.УдалитьЗначениеПеременной(Задание,ИмяПеременной);
Функция УдалитьЗначениеПеременной(Знач Задание,Знач ИмяПеременной,Знач Ключ=Неопределено) Экспорт
Возврат ПланировщикЗаданийСервер.УдалитьЗначениеПеременной(Задание,ИмяПеременной,Ключ);
КонецФункции

Функция УстановитьЗначениеПеременной(Знач Задание,Знач ИмяПеременной,Знач ЗначениеПеременной,Знач Ключ=Неопределено) Экспорт
Expand All @@ -20,8 +20,16 @@
Возврат ПланировщикЗаданийСервер.УстановитьЗначениеПользовательскойПеременной(Задание,ИмяПеременной,ЗначениеПеременной,Ключ);
КонецФункции

Функция УдалитьЗначениеПользовательскойПеременной(Знач Задание,Знач ИмяПеременной) Экспорт
Возврат ПланировщикЗаданийСервер.УдалитьЗначениеПользовательскойПеременной(Задание,ИмяПеременной);
Функция УдалитьЗначениеПользовательскойПеременной(Знач Задание,Знач ИмяПеременной,Знач Ключ=Неопределено) Экспорт
Возврат ПланировщикЗаданийСервер.УдалитьЗначениеПользовательскойПеременной(Задание,ИмяПеременной,Ключ);
КонецФункции

#КонецОбласти

#Область РаботаПараметрыПользователя

Функция ПолучитьДанныеПодключенияПользователяПоКлючу(Знач Ключ,Знач ИмяПараметра=Неопределено) Экспорт
Возврат ПланировщикЗаданийСервер.ПолучитьДанныеПодключенияПользователяПоКлючу(Ключ,ИмяПараметра);
КонецФункции

#КонецОбласти
Original file line number Diff line number Diff line change
Expand Up @@ -1756,11 +1756,12 @@

#Область РаботаСПеременными

Функция УдалитьЗначениеПеременной(Знач Задание,Знач ИмяПеременной) Экспорт
Функция УдалитьЗначениеПеременной(Знач Задание,Знач ИмяПеременной,Знач Ключ=Неопределено) Экспорт

Попытка
МенеджерЗаписи = РегистрыСведений.ПеременныеЗаданий.СоздатьМенеджерЗаписи();
МенеджерЗаписи.Задание = Задание;
МенеджерЗаписи.Ключ = Ключ;
МенеджерЗаписи.ИмяПеременной = ИмяПеременной;
МенеджерЗаписи.Удалить();
Исключение
Expand Down Expand Up @@ -1819,11 +1820,12 @@
Возврат ЗначениеПеременной;
КонецФункции

Функция УдалитьЗначениеПользовательскойПеременной(Знач Задание,Знач ИмяПеременной) Экспорт
Функция УдалитьЗначениеПользовательскойПеременной(Знач Задание,Знач ИмяПеременной,Знач Ключ=Неопределено) Экспорт

Попытка
МенеджерЗаписи = РегистрыСведений.ПользовательскиеПеременныеЗаданий.СоздатьМенеджерЗаписи();
МенеджерЗаписи.Задание = Задание;
МенеджерЗаписи.Ключ = Ключ;
МенеджерЗаписи.ИмяПеременной = ИмяПеременной;
МенеджерЗаписи.Удалить();
Исключение
Expand Down Expand Up @@ -1882,4 +1884,57 @@
Возврат ЗначениеПеременной;
КонецФункции

#КонецОбласти

#Область ПолучитьДанныеПодключения

Функция ПолучитьДанныеПодключенияПользователяПоКлючу(Знач Ключ,Знач ИмяПараметра=Неопределено) Экспорт

СтруктураДанных = Новый Структура("ИмяПараметра,НомерПорта,Пароль1С,Пользователь1С,СтрокаПодключения,ДополнительныеОпцииЗапуска,ЭтоФайловаяБаза,ЭтоНеПредприятие1С,БазаНеУказана,ПользовательНеУказан","","","","","","",Ложь,Ложь,Ложь,Ложь);

Запрос = новый Запрос;
Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 1
| ВЫБОР
| КОГДА Пользователь = ЗНАЧЕНИЕ(Справочник.ПользователиБаз1С.ПустаяСсылка)
| ТОГДА Т.База.Пароль1С
| ИНАЧЕ Т.Пользователь.Пароль
| КОНЕЦ КАК Пароль1С,
| ВЫБОР
| КОГДА Пользователь = ЗНАЧЕНИЕ(Справочник.ПользователиБаз1С.ПустаяСсылка)
| ТОГДА Т.База.Пользователь1С
| ИНАЧЕ Пользователь.Имя
| КОНЕЦ КАК Пользователь1С,
| Т.База.ФайловаяБаза как ЭтоФайловаяБаза,
| ЛОЖЬ КАК ЭтоНеПредприятие1С,
| Т.База.СтрокаПодключенияКИБ как СтрокаПодключения,
| Т.База.ДопПараметрыКоманднойСтроки КАК ДополнительныеОпцииЗапуска,
| Т.ИмяПараметра как ИмяПараметра,
| Т.НомерПорта как НомерПорта,
| Пользователь = ЗНАЧЕНИЕ(Справочник.ПользователиБаз1С.ПустаяСсылка) как ПользовательНеУказан,
| База = ЗНАЧЕНИЕ(Справочник.Базы1С.ПустаяСсылка) как БазаНеУказана
|ИЗ
| РегистрСведений.СвязиПользователейБаз1С КАК Т
|ГДЕ
| ВЫРАЗИТЬ(Т.Ключ КАК СТРОКА(150)) = &Ключ
| И ВЫБОР
| КОГДА ВЫРАЗИТЬ(&УсловиеИмяПараметра КАК БУЛЕВО) = ИСТИНА
| ТОГДА ВЫРАЗИТЬ(&ИмяПараметра КАК СТРОКА(150)) = Т.ИмяПараметра
| ИНАЧЕ ИСТИНА
| КОНЕЦ";
Запрос.УстановитьПараметр("Ключ",Ключ);
Запрос.УстановитьПараметр("УсловиеИмяПараметра",НЕ (ИмяПараметра=Неопределено));
Запрос.УстановитьПараметр("ИмяПараметра",ИмяПараметра);

Выборка = Запрос.Выполнить().Выбрать();

Если Выборка.Следующий() Тогда
ЗаполнитьЗначенияСвойств(СтруктураДанных, Выборка);
Иначе
СтруктураДанных = Неопределено;
КонецЕсли;

Возврат СтруктураДанных;

КонецФункции

#КонецОбласти
3 changes: 1 addition & 2 deletions TestingTool_3-0/src/Configuration/Configuration.mdo
Original file line number Diff line number Diff line change
Expand Up @@ -18,7 +18,7 @@
<usePurposes>PersonalComputer</usePurposes>
<scriptVariant>Russian</scriptVariant>
<vendor>ivanov660</vendor>
<version>3.20.07.02</version>
<version>3.20.11.07</version>
<updateCatalogAddress>https://github.com/ivanov660/TestingTool-3</updateCatalogAddress>
<defaultSearchForm>CommonForm.ФормаПоиска</defaultSearchForm>
<mainSectionPicture/>
Expand Down Expand Up @@ -305,7 +305,6 @@
<reports>Report.ОтчетПоИерархииРезультатовТестированияПоПроверкам</reports>
<dataProcessors>DataProcessor.ПолнотекстовыйПоискВДанных</dataProcessors>
<dataProcessors>DataProcessor.РегламентныеИФоновыеЗадания</dataProcessors>
<dataProcessors>DataProcessor.КонсольЗаданий</dataProcessors>
<dataProcessors>DataProcessor.ОсновноеРабочееМестоПользователя</dataProcessors>
<dataProcessors>DataProcessor.УправлениеСпискомПроцессовОСWindows</dataProcessors>
<dataProcessors>DataProcessor.УстановкаКомпактногоИнтерфейсаТакси</dataProcessors>
Expand Down
Loading

0 comments on commit 32bbf62

Please sign in to comment.