1
0
mirror of https://github.com/DoublesunRUS/devscripts.git synced 2026-06-20 01:16:55 +02:00

Интеграция / Развертывание

This commit is contained in:
Капралов Александр
2021-03-02 10:24:08 +03:00
parent 49af82812a
commit 50f5a8d53b
+58 -28
View File
@@ -13,7 +13,7 @@
*
******************************************************************************/
конст ВЕРСИЯ_EDT = "2020.6"
конст ВЕРСИЯ_EDT = "2020.6.2"
конст ИМЯ_КАТАЛОГА_ПРИКЛАДНОЙ_СБОРКИ = "build/bin"
конст ИМЯ_КАТАЛОГА_ТЕСТОВОЙ_СБОРКИ = "build/util"
@@ -1690,7 +1690,7 @@
метод ОшибкаEDT(строкаДанных: Строка): ОписаниеОшибкиEDT|Неопределено
знч массивДанных = строкаДанных.Разделить("\т", Истина)
если массивДанных[4].Пусто()
если массивДанных[4].Пусто() или не массивДанных[4].НачинаетсяС("строка")
возврат Неопределено
;
@@ -1746,56 +1746,86 @@
пер объектМетаданных = массивОбъекта[0]
выбор объектМетаданных
когда "Конфигурация"
объектМетаданных = "Configuration"
когда "ОбщийМодуль"
объектМетаданных = "CommonModules"
когда "ОбщаяФорма"
объектМетаданных = "CommonForms"
когда "РегистрБухгалтерии"
объектМетаданных = "AccountingRegisters"
когда "РегистрНакопления"
объектМетаданных = "AccumulationRegisters"
когда "БизнесПроцесс"
объектМетаданных = "BusinessProcesses"
когда "РегистрРасчета"
объектМетаданных = "CalculationRegisters"
когда "Справочник"
объектМетаданных = "Catalogs"
когда "Документ"
объектМетаданных = "Documents"
когда "ПланВидовХарактеристик"
объектМетаданных = "ChartsOfCharacteristicTypes"
когда "ПланСчетов"
объектМетаданных = "ChartsOfAccounts"
когда "ПланВидовРасчета"
объектМетаданных = "ChartsOfCalculationTypes"
когда "ЖурналДокумента"
объектМетаданных = "DocumentJournals"
когда "Отчет"
объектМетаданных = "Reports"
когда "ПланВидовХарактеристик"
объектМетаданных = "ChartsOfCharacteristicTypes"
когда "ГруппаКоманд"
объектМетаданных = "CommandGroups"
когда "ОбщаяКоманда"
объектМетаданных = "CommonCommands"
когда "ОбщаяФорма"
объектМетаданных = "CommonForms"
когда "ОбщийМодуль"
объектМетаданных = "CommonModules"
когда "Конфигурация"
объектМетаданных = "Configuration"
когда "Константа"
объектМетаданных = "Constants"
когда "Обработка"
объектМетаданных = "DataProcessors"
когда "ЖурналДокумента"
объектМетаданных = "DocumentJournals"
когда "Документ"
объектМетаданных = "Documents"
когда "Перечисление"
объектМетаданных = "Enums"
когда "ПодпискаНаСобытие"
объектМетаданных = "EventSubscriptions"
когда "ПланОбмена"
объектМетаданных = "ExchangePlans"
когда "КритерийОтбора"
объектМетаданных = "FilterCriteria"
когда "HTTPСервис"
объектМетаданных = "HTTPServices"
когда "РегистрСведений"
объектМетаданных = "InformationRegisters"
когда "РегистрНакопления"
объектМетаданных = "AccumulationRegisters"
когда "РегистрБухгалтерии"
объектМетаданных = "AccountingRegisters"
когда "РегистрРасчета"
объектМетаданных = "CalculationRegisters"
когда "Отчет"
объектМетаданных = "Reports"
когда "ХранилищеНастроек"
объектМетаданных = "SettingsStorages"
когда "Задача"
объектМетаданных = "Tasks"
когда "WebСервис"
объектМетаданных = "WebServices"
когда "WSСсылка"
объектМетаданных = "WSReferences"
иначе
выбросить новый ИсключениеНедопустимоеСостояние("Неизвестный объект метаданных %{описаниеОшибки.объект}")
;
пер имяМодуля = массивОбъекта[массивОбъекта.Размер() - 1]
выбор имяМодуля
когда "Модуль"
имяМодуля = "Module"
когда "МодульОбъекта"
имяМодуля = "ObjectModule"
когда "МодульМенеджера"
имяМодуля = "ManagerModule"
когда "МодульКоманды"
имяМодуля = "CommandModule"
когда "МодульУправляемогоПриложения"
имяМодуля = "ManagedApplicationModule"
когда "МодульМенеджера"
имяМодуля = "ManagerModule"
когда "Модуль"
имяМодуля = "Module"
когда "МодульОбъекта"
имяМодуля = "ObjectModule"
когда "МодульОбычногоПриложения"
имяМодуля = "OrdinaryApplicationModule"
когда "МодульНабораЗаписей"
имяМодуля = "RecordSetModule"
когда "МодульСеанса"
имяМодуля = "SessionModule"
когда "МодульМенеджераЗначения"
имяМодуля = "ValueManagerModule"
иначе
выбросить новый ИсключениеНедопустимоеСостояние("Неизвестный модуль %{описаниеОшибки.объект}")
;