Skip to content

Commit

Permalink
Merge branch 'release/1.2'
Browse files Browse the repository at this point in the history
  • Loading branch information
bia-tech committed Apr 1, 2020
2 parents 1e35846 + 1602e21 commit f72d601
Show file tree
Hide file tree
Showing 7 changed files with 154 additions and 80 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -16,8 +16,8 @@
| -------------- | --------------- | ------------------- | --------------------- |
| Наименование | Name | | true |
| Синоним | Synonym | МногоязычнаяСтрока | true |
| Комментарий | Comment | МногоязычнаяСтрока | false |
| Принадлежность | ObjectBelonging | | true |
| Комментарий | Comment | | false |
| Принадлежность | ObjectBelonging | | true |

## Реквизиты Configuration

Expand Down Expand Up @@ -88,25 +88,26 @@

## Реквизиты Subsystem

| Наименование | Реквизит | МетодПреобразования | ТипЗначения |
| --------------------------- | ------------------------- | ------------------- | ----------- |
| ВключатьВКомандныйИнтерфейс | IncludeInCommandInterface | ЗначениеБулево | |
| ВключатьВСодержимоеСправки | IncludeHelpInContents | ЗначениеБулево | |
| Пояснение | Explanation | МногоязычнаяСтрока | |
| Состав | Content | СоставПодсистемы | Массив |
| Наименование | Реквизит | МетодПреобразования | ТипЗначения | ЗначениеПоУмолчанию |
| --------------------------- | ------------------------- | ------------------- | ----------- | ------------------- |
| ВключатьВКомандныйИнтерфейс | IncludeInCommandInterface | ЗначениеБулево | Булево | false |
| ВключатьВСодержимоеСправки | IncludeHelpInContents | ЗначениеБулево | Булево | false |
| Пояснение | Explanation | МногоязычнаяСтрока | | |
| Состав | Content | СоставПодсистемы | Массив | |


## Реквизиты CommonModule

| Наименование | Реквизит | МетодПреобразования | ЗначениеПоУмолчанию |
| ----------------------- | ------------------------- | ------------------- | ------------------- |
| Глобальный | Global | ЗначениеБулево | false |
| Клиент | ClientManagedApplication | ЗначениеБулево | false |
| КлиентОбычноеПриложение | ClientOrdinaryApplication | ЗначениеБулево | false |
| Сервер | Server | ЗначениеБулево | true |
| ВнешнееСоединение | ExternalConnection | ЗначениеБулево | false |
| ВызовСервера | ServerCall | ЗначениеБулево | false |
| Привилегированный | Privileged | ЗначениеБулево | false |
| ПовторноеИспользование | ReturnValuesReuse | | DontUse |
| Наименование | Реквизит | МетодПреобразования | ТипЗначения | ЗначениеПоУмолчанию |
| ----------------------- | ------------------------- | ------------------- | ----------- | ------------------- |
| Глобальный | Global | ЗначениеБулево | Булево | false |
| Клиент | ClientManagedApplication | ЗначениеБулево | Булево | false |
| КлиентОбычноеПриложение | ClientOrdinaryApplication | ЗначениеБулево | Булево | false |
| Сервер | Server | ЗначениеБулево | Булево | true |
| ВнешнееСоединение | ExternalConnection | ЗначениеБулево | Булево | false |
| ВызовСервера | ServerCall | ЗначениеБулево | Булево | false |
| Привилегированный | Privileged | ЗначениеБулево | Булево | false |
| ПовторноеИспользование | ReturnValuesReuse | | | DontUse |

## Реквизиты Constant

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -29,16 +29,12 @@
Функция ТаблицаОписанияОбъектовКонфигурации() Экспорт

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

Для каждого Реквизит Из РеквизитыОписанияОбъектовКонфигурации() Цикл

ОбъектыКонфигурации.Колонки.Добавить(Реквизит);

КонецЦикла;

Возврат ОбъектыКонфигурации;

КонецФункции
Expand All @@ -59,14 +55,12 @@
Функция ТаблицаОписанияМодулей() Экспорт

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

Для каждого Реквизит Из РеквизитыМодуляКонфигурации() Цикл

МодулиКонфигурации.Колонки.Добавить(Реквизит);

КонецЦикла;

Возврат МодулиКонфигурации;

Expand Down Expand Up @@ -101,6 +95,41 @@

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

Функция РеквизитыМодуляКонфигурации() Экспорт

Реквизиты = Новый Массив();

Реквизиты.Добавить("ТипМодуля");
Реквизиты.Добавить("Родитель");
Реквизиты.Добавить("ПутьКФайлу");
Реквизиты.Добавить("НаборБлоков");
Реквизиты.Добавить("Содержимое");
Реквизиты.Добавить("РодительФорма");
Реквизиты.Добавить("РодительКоманда");
Реквизиты.Добавить("ОписаниеМодуля");

Возврат Реквизиты;

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

Функция РеквизитыОписанияОбъектовКонфигурации() Экспорт

Реквизиты = Новый Массив();

Реквизиты.Добавить("Наименование");
Реквизиты.Добавить("Тип");
Реквизиты.Добавить("ПолноеНаименование");
Реквизиты.Добавить("ПутьКФайлу");
Реквизиты.Добавить("ПутьККаталогу");
Реквизиты.Добавить("Подсистемы");
Реквизиты.Добавить("Описание");
Реквизиты.Добавить("Родитель");
Реквизиты.Добавить("Конфигурация");

Возврат Реквизиты;

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

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

// Создает пустышку описания объекта
Expand Down Expand Up @@ -135,12 +164,14 @@

Для Каждого Описание Из ОписаниеОбъекта.Свойства Цикл

Если ОписаниеОбъекта.ЕстьЗначенияПоУмолчанию Тогда
Значение = ?(ОписаниеОбъекта.ЕстьЗначенияПоУмолчанию, Описание.ЗначениеПоУмолчанию, "");

Если ЗначениеЗаполнено(Описание.ТипЗначения) И НЕ ПустаяСтрока(Значение) Тогда

Данные.Вставить(Описание.Наименование, Описание.ЗначениеПоУмолчанию);
Данные.Вставить(Описание.Наименование, (Новый ОписаниеТипов(Описание.ТипЗначения)).ПривестиЗначение(Значение));

ИначеЕсли ЗначениеЗаполнено(Описание.ТипЗначения) Тогда

Данные.Вставить(Описание.Наименование, Новый(Описание.ТипЗначения));

Иначе
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -108,22 +108,23 @@
//
Процедура ПрочитатьСодержимоеМодуля(СтрокаМодуль) Экспорт

Файл = Новый ТекстовыйДокумент;
Файл.Прочитать(СтрокаМодуль.ПутьКФайлу, КодировкаТекста.UTF8NoBOM);

СодержимоеМодуля = ЧтениеМодулей.ПрочитатьМодуль(Файл, СтрокаМодуль);
СодержимоеМодуля = ЧтениеМодулей.ПрочитатьМодуль(СтрокаМодуль.ПутьКФайлу, СтрокаМодуль);
СтрокаМодуль.Содержимое = СодержимоеМодуля.Содержимое;
СтрокаМодуль.НаборБлоков = СодержимоеМодуля.БлокиМодуля;

Если СтрокаМодуль.ТипМодуля = ТипыМодуля.ОбщийМодуль Тогда

Если СтрокаМодуль.Родитель.Описание = Неопределено Тогда
Если СтрокаМодуль.Родитель <> Неопределено Тогда

Если СтрокаМодуль.Родитель.Описание = Неопределено Тогда

ПрочитатьОписание(СтрокаМодуль.Родитель);

ПрочитатьОписание(СтрокаМодуль.Родитель);
КонецЕсли;

СтрокаМодуль.ОписаниеМодуля.Вставить("Глобальный", СтрокаМодуль.Родитель.Описание.Глобальный);

КонецЕсли;

СтрокаМодуль.ОписаниеМодуля.Вставить("Глобальный", СтрокаМодуль.Родитель.Описание.Глобальный);

КонецЕсли;

Expand All @@ -135,6 +136,8 @@

Функция ПрочитатьОписаниеКонфигурации(ПараметрыЧтения)

// Выполняет чтение объектов первого уровня, вложенные объекты не читаются

ОписаниеКонфигурации = ПараметрыЧтения.ОписаниеКонфигурации;
СтруктураКаталогов = ПараметрыЧтения.СтруктураКаталогов;

Expand Down Expand Up @@ -335,11 +338,24 @@
ЭтаПодсистема.ИмяКратко = СвойстваОписания.Наименование;
ЭтаПодсистема.Представление = ПредставлениеПодсистемы;
ЭтаПодсистема.ПредставлениеКратко = СвойстваОписания.Синоним;
ЭтаПодсистема.ПодсистемаОписание = СвойстваОписания.Комментарий;
ЭтаПодсистема.ОбъектМетаданных = ОбъектМетаданных;
ЭтаПодсистема.Визуальная = Визуальная;
ЭтаПодсистема.Родитель = РодительскаяПодсистема;

Описание = "";
Если ЗначениеЗаполнено(СвойстваОписания.Комментарий) Тогда
Описание = СвойстваОписания.Комментарий;
КонецЕсли;
Если ЗначениеЗаполнено(СвойстваОписания.Пояснение) Тогда
Если ПустаяСтрока(Описание) Тогда
Описание = СвойстваОписания.Пояснение;
Иначе
Описание = Описание + Символы.ПС + Символы.ПС + СвойстваОписания.Пояснение;
КонецЕсли;
КонецЕсли;

ЭтаПодсистема.ПодсистемаОписание = Описание;

КонецЦикла;

Для Каждого ПолноеИмяПодсистемы Из СвойстваОписания.Подчиненные Цикл
Expand Down
Loading

0 comments on commit f72d601

Please sign in to comment.