1c/bsl-parser
1
0
Fork 0
mirror of https://github.com/bia-technologies/bsl-parser.git synced 2024-11-27 08:20:55 +02:00
Code Issues Releases Activity

Merge branch 'feature/ONECICD-86' into feature/ONECICD-148

Browse Source
This commit is contained in:
aleksey.koryakin 2019-05-02 16:20:51 +03:00
commit 230897b3ec
3 changed files with 38 additions and 46 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/Классы/РазборКонфигурации1С.os
View File

@ -466,22 +466,13 @@
КонецЕсли;
Если СвойстваОписания.Состав.Количество() Тогда
Для Каждого ОбъектМетаданных Из СвойстваОписания.Состав Цикл
ЭтаПодсистема = ОписаниеПодсистем.Добавить();
ЭтаПодсистема.Имя = ПодсистемаИмя;
ЭтаПодсистема.ИмяКратко = СвойстваОписания.Наименование;
ЭтаПодсистема.Представление = ПодсистемаПредставление;
ЭтаПодсистема.ПредставлениеКратко = СвойстваОписания.Синоним;
ЭтаПодсистема.ПодсистемаОписание = СвойстваОписания.Комментарий;
ЭтаПодсистема.ОбъектМетаданных = ОбъектМетаданных;
ЭтаПодсистема.Визуальная = Визуальная;
ЭтаПодсистема.Родитель = Родитель;
КонецЦикла;
Состав = СвойстваОписания.Состав;
Иначе
Состав = Новый Массив();
Состав.Добавить(Неопределено);
КонецЕсли;
Для Каждого ОбъектМетаданных Из Состав Цикл
ЭтаПодсистема = ОписаниеПодсистем.Добавить();
ЭтаПодсистема.Имя = ПодсистемаИмя;
@ -489,11 +480,12 @@
ЭтаПодсистема.Представление = ПодсистемаПредставление;
ЭтаПодсистема.ПредставлениеКратко = СвойстваОписания.Синоним;
ЭтаПодсистема.ПодсистемаОписание = СвойстваОписания.Комментарий;
ЭтаПодсистема.ОбъектМетаданных = ОбъектМетаданных;
ЭтаПодсистема.Визуальная = Визуальная;
ЭтаПодсистема.Родитель = Родитель;
ЭтаПодсистема.Родитель = Родитель;
КонецЦикла;
КонецЕсли;
Для Каждого ФайлыВложеннойПодсистемы Из ФайлыПодсистемы.Вложенные Цикл
ПрочитатьПодсистему(ФайлыВложеннойПодсистемы, ОписаниеПодсистем, ПодсистемаИмя, ПодсистемаПредставление, Визуальная, ЭтаПодсистема)

6
src/Классы/СтруктураКаталоговКонфигурации.os
View File

@ -381,10 +381,10 @@
КонецПроцедуры
Процедура ПриСозданииОбъекта(пКаталогИсходников, пФорматВыгрузки = "Авто", пСоздаватьКаталоги = Ложь)
КаталогИсходников = пКаталогИсходников;
КаталогИсходников = пКаталогИсходников;
ФорматВыгрузки = пФорматВыгрузки;
СоздаватьКаталоги = пСоздаватьКаталоги = Истина;
СоздаватьКаталоги = пСоздаватьКаталоги;
Если ПустаяСтрока(ФорматВыгрузки) ИЛИ СтрСравнить(ФорматВыгрузки, "Авто") = 0 Тогда

50
src/ЧтениеМодулей/Модули/ТипМодуля.os
View File

@ -13,8 +13,8 @@
Перем МодульУправляемогоПриложения Экспорт;
Перем МодульВнешнегоСоединения Экспорт;
Перем СоответствиеИмениФайлаИТИпаМодуля;
Перем СоответствиеИмениРодителяИТИпаМодуля;
Перем СоответствиеИмениФайлаИТипаМодуля;
Перем СоответствиеИмениРодителяИТипаМодуля;
///////////////////////////////////////////////////////////////////////////////////////////////
@ -54,7 +54,7 @@
КонецЕсли;
ТипЭтогоМодуля = СоответствиеИмениРодителяИТИпаМодуля[Родитель];
ТипЭтогоМодуля = СоответствиеИмениРодителяИТипаМодуля[Родитель];
Иначе
@ -65,7 +65,7 @@
Иначе
ТипЭтогоМодуля = СоответствиеИмениФайлаИТИпаМодуля[ИмяБезРасширения];
ТипЭтогоМодуля = СоответствиеИмениФайлаИТипаМодуля[ИмяБезРасширения];
КонецЕсли;
@ -102,25 +102,25 @@
МодульУправляемогоПриложения = "МодульУправляемогоПриложения";
МодульВнешнегоСоединения = "МодульВнешнегоСоединения";
СоответствиеИмениФайлаИТИпаМодуля = Новый Соответствие();
СоответствиеИмениФайлаИТИпаМодуля.Вставить("CommandModule", МодульКоманды);
СоответствиеИмениФайлаИТИпаМодуля.Вставить("ManagedApplicationModule", МодульУправляемогоПриложения);
СоответствиеИмениФайлаИТИпаМодуля.Вставить("OrdinaryApplicationModule", МодульОбычногоПриложения);
СоответствиеИмениФайлаИТИпаМодуля.Вставить("SessionModule", МодульСеанса);
СоответствиеИмениФайлаИТИпаМодуля.Вставить("ExternalConnectionModule", МодульВнешнегоСоединения);
СоответствиеИмениФайлаИТИпаМодуля.Вставить("ManagerModule", МодульМенеджера);
СоответствиеИмениФайлаИТИпаМодуля.Вставить("ValueManagerModule", МодульМенеджера);
СоответствиеИмениФайлаИТИпаМодуля.Вставить("ObjectModule", МодульОбъекта);
СоответствиеИмениФайлаИТИпаМодуля.Вставить("RecordSetModule", МодульОбъекта);
СоответствиеИмениФайлаИТипаМодуля = Новый Соответствие();
СоответствиеИмениФайлаИТипаМодуля.Вставить("CommandModule", МодульКоманды);
СоответствиеИмениФайлаИТипаМодуля.Вставить("ManagedApplicationModule", МодульУправляемогоПриложения);
СоответствиеИмениФайлаИТипаМодуля.Вставить("OrdinaryApplicationModule", МодульОбычногоПриложения);
СоответствиеИмениФайлаИТипаМодуля.Вставить("SessionModule", МодульСеанса);
СоответствиеИмениФайлаИТипаМодуля.Вставить("ExternalConnectionModule", МодульВнешнегоСоединения);
СоответствиеИмениФайлаИТипаМодуля.Вставить("ManagerModule", МодульМенеджера);
СоответствиеИмениФайлаИТипаМодуля.Вставить("ValueManagerModule", МодульМенеджера);
СоответствиеИмениФайлаИТипаМодуля.Вставить("ObjectModule", МодульОбъекта);
СоответствиеИмениФайлаИТипаМодуля.Вставить("RecordSetModule", МодульОбъекта);
СоответствиеИмениРодителяИТИпаМодуля = Новый Соответствие();
СоответствиеИмениРодителяИТИпаМодуля.Вставить("CommonModules", ОбщийМодуль);
СоответствиеИмениРодителяИТИпаМодуля.Вставить("CommonModule", ОбщийМодуль);
СоответствиеИмениРодителяИТИпаМодуля.Вставить("WebServices", МодульОбъекта);
СоответствиеИмениРодителяИТИпаМодуля.Вставить("WebService", МодульОбъекта);
СоответствиеИмениРодителяИТИпаМодуля.Вставить("HTTPServices", МодульОбъекта);
СоответствиеИмениРодителяИТИпаМодуля.Вставить("HTTPService", МодульОбъекта);
СоответствиеИмениРодителяИТИпаМодуля.Вставить("Forms", МодульУправляемойФормы);
СоответствиеИмениРодителяИТИпаМодуля.Вставить("Form", МодульУправляемойФормы);
СоответствиеИмениРодителяИТИпаМодуля.Вставить("CommonForms", МодульУправляемойФормы);
СоответствиеИмениРодителяИТИпаМодуля.Вставить("CommonForm", МодульУправляемойФормы);
СоответствиеИмениРодителяИТипаМодуля = Новый Соответствие();
СоответствиеИмениРодителяИТипаМодуля.Вставить("CommonModules", ОбщийМодуль);
СоответствиеИмениРодителяИТипаМодуля.Вставить("CommonModule", ОбщийМодуль);
СоответствиеИмениРодителяИТипаМодуля.Вставить("WebServices", МодульОбъекта);
СоответствиеИмениРодителяИТипаМодуля.Вставить("WebService", МодульОбъекта);
СоответствиеИмениРодителяИТипаМодуля.Вставить("HTTPServices", МодульОбъекта);
СоответствиеИмениРодителяИТипаМодуля.Вставить("HTTPService", МодульОбъекта);
СоответствиеИмениРодителяИТипаМодуля.Вставить("Forms", МодульУправляемойФормы);
СоответствиеИмениРодителяИТипаМодуля.Вставить("Form", МодульУправляемойФормы);
СоответствиеИмениРодителяИТипаМодуля.Вставить("CommonForms", МодульУправляемойФормы);
СоответствиеИмениРодителяИТипаМодуля.Вставить("CommonForm", МодульУправляемойФормы);