Skip to content

Commit fcb0081

Browse files
committed
фикс: Восстановление работы с форматом конфигуратора
1 parent dbfe3ae commit fcb0081

File tree

2 files changed

+33
-6
lines changed

2 files changed

+33
-6
lines changed

src/Классы/edtExport.os

Lines changed: 32 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -8,7 +8,6 @@
88
Перем _ВыгружатьОшибкиОбъектов;
99
Перем _ИспользоватьОтносительныеПути;
1010

11-
Перем КаталогИсходниковПоПроекту;
1211
Перем ГенераторПутейПоПроекту;
1312

1413
Процедура ОписаниеКоманды(Команда) Экспорт
@@ -91,6 +90,13 @@
9190
стрКаталоги = СтрЗаменить(ПутьККаталогуИсходников, ";", ",");
9291
каталоги = СтрРазделить(стрКаталоги, ",");
9392

93+
Если каталоги.Количество() = 0 Тогда
94+
95+
_лог.Ошибка("Каталог исходников SRC не указан. Продолжение невозможно.");
96+
ЗавершитьРаботу(1);
97+
98+
КонецЕсли;
99+
94100
КаталогИсходниковПоПроекту = Новый Соответствие;
95101

96102
Для Каждого цКаталог Из каталоги Цикл
@@ -117,7 +123,9 @@
117123
Если КаталогИсходниковПоПроекту.Количество() = 0 Тогда
118124

119125
_лог.Ошибка("Не удалось заполнить соответствие проектов исходникам для SRC = <%1>", ПутьККаталогуИсходников);
120-
ЗавершитьРаботу(1);
126+
_лог.Ошибка("Возможно используется формат конфигуратора. Будет использован единый каталог: <%1>", каталоги[0]);
127+
128+
КаталогИсходниковПоПроекту.Вставить("", каталоги[0]);
121129

122130
КонецЕсли;
123131

@@ -337,9 +345,11 @@
337345

338346
таблицаРезультатов.Колонки.Добавить("Путь");
339347

340-
Для каждого цСтрока Из таблицаРезультатов Цикл
348+
Для Каждого цСтрока Из таблицаРезультатов Цикл
341349

342-
цСтрока.Путь = ГенераторПутейПоПроекту[цСтрока.Проект].Путь(цСтрока.Метаданные);
350+
генераторПутей = ГенераторПутейПоИмениПроекта(цСтрока.Проект);
351+
352+
цСтрока.Путь = генераторПутей.Путь(цСтрока.Метаданные);
343353

344354
Если Не ПроверитьПуть(цСтрока.Путь, цСтрока.Метаданные) Тогда
345355

@@ -371,6 +381,21 @@
371381

372382
КонецПроцедуры
373383

384+
Функция ГенераторПутейПоИмениПроекта(Знач ИмяПроекта)
385+
386+
генераторПутей = ГенераторПутейПоПроекту[ИмяПроекта];
387+
388+
Если генераторПутей = Неопределено Тогда
389+
390+
генераторПутей = ГенераторПутейПоПроекту[""];
391+
ГенераторПутейПоПроекту.Вставить(имяПроекта, генераторПутей);
392+
393+
КонецЕсли;
394+
395+
Возврат генераторПутей;
396+
397+
КонецФункции
398+
374399
#Область ПереопределениеИдентификаторов
375400

376401
Процедура ПереопределитьИдентификаторыПравил(таблицаРезультатов)
@@ -537,7 +562,9 @@
537562

538563
Функция ПутьКМетаданнымСуществует(Знач Проект, Знач пМетаданные)
539564

540-
Путь = ГенераторПутейПоПроекту[Проект].Путь(пМетаданные);
565+
генераторПутей = ГенераторПутейПоИмениПроекта(Проект);
566+
567+
Путь = генераторПутей.Путь(пМетаданные);
541568

542569
Возврат ПроверитьПуть(Путь, пМетаданные, Ложь);
543570

src/Модули/ОПриложении.os

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,7 @@
99

1010
Функция Версия() Экспорт
1111

12-
Возврат "1.10.1";
12+
Возврат "1.10.2";
1313

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

0 commit comments

Comments
 (0)