-
Notifications
You must be signed in to change notification settings - Fork 7
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
- Loading branch information
1 parent
76e0f74
commit 67e5eba
Showing
1 changed file
with
113 additions
and
0 deletions.
There are no files selected for viewing
113 changes: 113 additions & 0 deletions
113
src/cfe/YAXUnit/CommonModules/ОМ_ПредопределенныеЗначения/Ext/Module.bsl
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,113 @@ | ||
#Область СлужебныйПрограммныйИнтерфейс | ||
|
||
Процедура ИсполняемыеСценарии() Экспорт | ||
|
||
ЮТТесты | ||
.ДобавитьТестовыйНабор("Инициализация предопределенных элементов") | ||
.ДобавитьТест("Тест_ИнициализацияИзПодсистемыПредопределенных") | ||
.СПараметрами("ПланВидовХарактеристик.пбп_ПредопределенныеЗначения") | ||
.СПараметрами("Справочник.пбп_НастройкиИнтеграции") | ||
.ДобавитьТест("Тест_ИнициализацияНеИзПодсистемыПредопределенных") // не относится к подсистеме предопределенных | ||
.СПараметрами("Справочник.пбп_НастройкиОтбораОбъектов") | ||
.СПараметрами("Справочник.пбп_ПользовательскиеФункции") | ||
.ДобавитьТестовыйНабор("Доп. параметры обработки предопределенных элементов") | ||
.ДобавитьТест("Тест_ДопПараметрыОбработкиКорректныеДанные") | ||
.ДобавитьТест("Тест_ДопПараметрыОбработкиПустаяТаблица") | ||
.ДобавитьТест("Тест_МенеджерНеИзПодсистемыПредопределенных") // не относится к подсистеме предопределенных | ||
.СПараметрами("Справочник.пбп_НастройкиОтбораОбъектов") | ||
.СПараметрами("Справочник.пбп_ПользовательскиеФункции") | ||
.ДобавитьТест("Тест_МенеджерРавенНеопределено") | ||
; | ||
|
||
КонецПроцедуры | ||
|
||
Процедура Тест_ИнициализацияИзПодсистемыПредопределенных(ИмяОбъекта) Экспорт | ||
|
||
Менеджер = пбп_Переадресация.МенеджерОбъектаПоПолномуИмени(ИмяОбъекта); | ||
|
||
Результат = пбп_ПредопределенныеЗначения.ИнициализироватьПредопределенныеЗначения(Менеджер); | ||
|
||
ЮТест.ОжидаетЧто(ТипЗнч(Результат)).Равно(Тип("ТаблицаЗначений")); | ||
|
||
КонецПроцедуры | ||
|
||
Процедура Тест_ИнициализацияНеИзПодсистемыПредопределенных(ИмяОбъекта) Экспорт | ||
|
||
Менеджер = пбп_Переадресация.МенеджерОбъектаПоПолномуИмени(ИмяОбъекта); | ||
|
||
Результат = пбп_ПредопределенныеЗначения.ИнициализироватьПредопределенныеЗначения(Менеджер); | ||
|
||
ЮТест.ОжидаетЧто(ТипЗнч(Результат)).Равно(Тип("ТаблицаЗначений")); | ||
ЮТест.ОжидаетЧто(Результат.Количество()).Равно(0); | ||
|
||
КонецПроцедуры | ||
|
||
Процедура Тест_ДопПараметрыОбработкиКорректныеДанные() Экспорт | ||
|
||
МенеджерОбъекта = пбп_Переадресация.МенеджерОбъектаПоПолномуИмени("ПланВидовХарактеристик.пбп_ПредопределенныеЗначения"); | ||
|
||
Таблица = пбп_ПредопределенныеЗначенияПереопределяемый.ТаблицаПредопределенныхЭлементов(МенеджерОбъекта); | ||
|
||
ПроверкаРезультатовОбработкиПредопределенных(МенеджерОбъекта, Таблица); | ||
|
||
КонецПроцедуры | ||
|
||
Процедура Тест_ДопПараметрыОбработкиПустаяТаблица() Экспорт | ||
|
||
МенеджерОбъекта = пбп_Переадресация.МенеджерОбъектаПоПолномуИмени("ПланВидовХарактеристик.пбп_ПредопределенныеЗначения"); | ||
|
||
Таблица = Новый ТаблицаЗначений; | ||
|
||
ПроверкаРезультатовОбработкиПредопределенных(МенеджерОбъекта, Таблица); | ||
|
||
КонецПроцедуры | ||
|
||
Процедура Тест_МенеджерНеИзПодсистемыПредопределенных(ИмяОбъекта) Экспорт | ||
|
||
МенеджерОбъекта = пбп_Переадресация.МенеджерОбъектаПоПолномуИмени(ИмяОбъекта); | ||
|
||
Таблица = Новый ТаблицаЗначений; | ||
|
||
ПроверкаРезультатовОбработкиПредопределенных(МенеджерОбъекта, Таблица, Ложь); | ||
|
||
КонецПроцедуры | ||
|
||
Процедура Тест_МенеджерРавенНеопределено() Экспорт | ||
|
||
МенеджерОбъекта = Неопределено; | ||
|
||
Таблица = Новый ТаблицаЗначений; | ||
|
||
ПроверкаРезультатовОбработкиПредопределенных(МенеджерОбъекта, Таблица, Ложь); | ||
|
||
КонецПроцедуры | ||
|
||
#КонецОбласти | ||
|
||
#Область СлужебныеПроцедурыИФункции | ||
|
||
Процедура ПроверкаРезультатовОбработкиПредопределенных(МенеджерОбъекта, Таблица, МенеджерИзПодсистемы = Истина) | ||
|
||
Результат = пбп_ПредопределенныеЗначения.ДопПараметрыОбработкиПредопределенныхЭлементов(Таблица, МенеджерОбъекта); | ||
|
||
ЮТест.ОжидаетЧто(ТипЗнч(Результат)).Равно(Тип("Структура")); | ||
|
||
ЮТест.ОжидаетЧто(Результат) | ||
.ИмеетСвойство("Менеджер") | ||
.ИмеетСвойство("ПолноеИмя") | ||
.ИмеетСвойство("Иерархический") | ||
.ИмеетСвойство("КлючиХешаЭлемент") | ||
.ИмеетСвойство("КлючиХешаГруппа"); | ||
|
||
ЮТест.ОжидаетЧто(ТипЗнч(Результат.ПолноеИмя)).Равно(Тип("Строка")); | ||
ЮТест.ОжидаетЧто(ТипЗнч(Результат.Иерархический)).Равно(Тип("Булево")); | ||
ЮТест.ОжидаетЧто(ТипЗнч(Результат.КлючиХешаЭлемент)).Равно(Тип("Структура")); | ||
ЮТест.ОжидаетЧто(ТипЗнч(Результат.КлючиХешаГруппа)).Равно(Тип("Структура")); | ||
Если МенеджерИзПодсистемы И ЗначениеЗаполнено(Таблица.Колонки) Тогда | ||
ЮТест.ОжидаетЧто(ЗначениеЗаполнено(Результат.КлючиХешаЭлемент)).Равно(Истина); | ||
ЮТест.ОжидаетЧто(ЗначениеЗаполнено(Результат.КлючиХешаГруппа)).Равно(Истина); | ||
КонецЕсли; | ||
|
||
КонецПроцедуры | ||
|
||
#КонецОбласти |