1c/yaxunit
1
0
Fork 0
mirror of https://github.com/bia-technologies/yaxunit.git synced 2025-03-17 20:48:01 +02:00
Code Issues Releases Activity

Merge pull request #72 from bia-technologies/feature/69

Browse Source 
Создание тестовых записей в регистрах сведений
This commit is contained in:
Koryakin Aleksey 2023-05-05 00:58:43 +03:00 committed by GitHub
commit cf65eb8e94
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 29 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
exts/yaxunit/src/CommonModules/ЮТТестовыеДанныеВызовСервера/Module.bsl
View File

@ -97,6 +97,7 @@
Менеджер = ЮТОбщий.Менеджер(Менеджер); Менеджер = ЮТОбщий.Менеджер(Менеджер);
ОписаниеОбъектаМетаданных = ЮТМетаданные.ОписаниеОбъектМетаданных(ТипЗнч(Менеджер)); ОписаниеОбъектаМетаданных = ЮТМетаданные.ОписаниеОбъектМетаданных(ТипЗнч(Менеджер));
ЭтоСсылочный = ОписаниеОбъектаМетаданных.ОписаниеТипа.Ссылочный;
Объект = СоздатьОбъект(Менеджер, ОписаниеОбъектаМетаданных.ОписаниеТипа); Объект = СоздатьОбъект(Менеджер, ОписаниеОбъектаМетаданных.ОписаниеТипа);
ЗаполнитьЗначенияСвойств(Объект, Данные); ЗаполнитьЗначенияСвойств(Объект, Данные);
@ -129,12 +130,21 @@
ЗаполнитьБазовыеРеквизиты(Объект, ОписаниеОбъектаМетаданных); ЗаполнитьБазовыеРеквизиты(Объект, ОписаниеОбъектаМетаданных);
Если ЭтоСсылочный Тогда
ЮТОбщий.ОбъединитьВСтруктуру(Объект.ДополнительныеСвойства, ПараметрыЗаписи.ДополнительныеСвойства); ЮТОбщий.ОбъединитьВСтруктуру(Объект.ДополнительныеСвойства, ПараметрыЗаписи.ДополнительныеСвойства);
КонецЕсли;
РежимЗаписи = ?(СтрСравнить(ОписаниеОбъектаМетаданных.ОписаниеТипа.Имя, "Документ") = 0, ПараметрыЗаписи.РежимЗаписи, Неопределено); РежимЗаписи = ?(СтрСравнить(ОписаниеОбъектаМетаданных.ОписаниеТипа.Имя, "Документ") = 0, ПараметрыЗаписи.РежимЗаписи, Неопределено);
ЗаписатьОбъект(Объект, ПараметрыЗаписи.ОбменДаннымиЗагрузка, РежимЗаписи); ЗаписатьОбъект(Объект, ПараметрыЗаписи.ОбменДаннымиЗагрузка, РежимЗаписи);
Возврат ?(ВернутьОбъект, Объект, Объект.Ссылка); Если ВернутьОбъект Тогда
Возврат Объект;
ИначеЕсли ЭтоСсылочный Тогда
Возврат Объект.Ссылка;
Иначе
ЮТОбщий.СообщитьПользователю("Я пока не умею возвращать ключи регистра");
Возврат Неопределено;
КонецЕсли;
КонецФункции КонецФункции
@ -211,6 +221,8 @@
Результат = Менеджер.СоздатьУзел(); Результат = Менеджер.СоздатьУзел();
ИначеЕсли ОписаниеТипа.Конструктор = "СоздатьНаборЗаписей" Тогда ИначеЕсли ОписаниеТипа.Конструктор = "СоздатьНаборЗаписей" Тогда
Результат = Менеджер.СоздатьНаборЗаписей(); Результат = Менеджер.СоздатьНаборЗаписей();
ИначеЕсли ОписаниеТипа.Конструктор = "СоздатьМенеджерЗаписи" Тогда
Результат = Менеджер.СоздатьМенеджерЗаписи();
ИначеЕсли ОписаниеТипа.Конструктор = "СоздатьБизнесПроцесс" Тогда ИначеЕсли ОписаниеТипа.Конструктор = "СоздатьБизнесПроцесс" Тогда
Результат = Менеджер.СоздатьБизнесПроцесс(); Результат = Менеджер.СоздатьБизнесПроцесс();
ИначеЕсли ОписаниеТипа.Конструктор = "СоздатьЗадачу" Тогда ИначеЕсли ОписаниеТипа.Конструктор = "СоздатьЗадачу" Тогда

10
exts/yaxunit/src/CommonTemplates/ЮТОписаниеМетаданных/Template.txt
View File

@ -1,16 +1,16 @@
# Описание свойств метаданных # Описание свойств метаданных
| Имя | ИмяКоллекции | Конструктор | Группы | Ссылочный | Реквизиты | Измерения | Ресурсы | РеквизитыАдресации | ТабличныеЧасти | | Имя | ИмяКоллекции | Конструктор | Группы | Ссылочный | Реквизиты | Измерения | Ресурсы | РеквизитыАдресации | ТабличныеЧасти |
|------------------------|-------------------------|----------------------|--------|-----------|-----------|-----------|---------|--------------------|----------------| |------------------------|-------------------------|-----------------------|--------|-----------|-----------|-----------|---------|--------------------|----------------|
| Справочник | Справочники | СоздатьЭлемент | + | + | + | | | | + | | Справочник | Справочники | СоздатьЭлемент | + | + | + | | | | + |
| Документ | Документы | СоздатьДокумент | | + | + | | | | + | | Документ | Документы | СоздатьДокумент | | + | + | | | | + |
| ПланВидовХарактеристик | ПланыВидовХарактеристик | СоздатьЭлемент | + | + | + | | | | + | | ПланВидовХарактеристик | ПланыВидовХарактеристик | СоздатьЭлемент | + | + | + | | | | + |
| ПланСчетов | ПланыСчетов | СоздатьСчет | | + | + | | | | + | | ПланСчетов | ПланыСчетов | СоздатьСчет | | + | + | | | | + |
| ПланВидовРасчета | ПланыВидовРасчета | СоздатьВидРасчета | | + | + | | | | + | | ПланВидовРасчета | ПланыВидовРасчета | СоздатьВидРасчета | | + | + | | | | + |
| ПланОбмена | ПланыОбмена | СоздатьУзел | | + | + | | | | + | | ПланОбмена | ПланыОбмена | СоздатьУзел | | + | + | | | | + |
| РегистрСведений | РегистрыСведений | СоздатьНаборЗаписей | | | + | + | + | | | | РегистрСведений | РегистрыСведений | СоздатьМенеджерЗаписи | | | + | + | + | | |
| РегистрНакопления | РегистрыНакопления | СоздатьНаборЗаписей | | | + | + | + | | | | РегистрНакопления | РегистрыНакопления | | | | + | + | + | | |
| РегистрБухгалтерии | РегистрыБухгалтерии | СоздатьНаборЗаписей | | | + | + | + | | | | РегистрБухгалтерии | РегистрыБухгалтерии | | | | + | + | + | | |
| РегистрРасчета | РегистрыРасчета | СоздатьНаборЗаписей | | | + | + | + | | | | РегистрРасчета | РегистрыРасчета | | | | + | + | + | | |
| БизнесПроцесс | БизнесПроцессы | СоздатьБизнесПроцесс | | + | + | | | | + | | БизнесПроцесс | БизнесПроцессы | СоздатьБизнесПроцесс | | + | + | | | | + |
| Задача | Задачи | СоздатьЗадачу | | + | + | | | + | + | | Задача | Задачи | СоздатьЗадачу | | + | + | | | + | + |