|
8 | 8 | Перем _ВыгружатьОшибкиОбъектов; |
9 | 9 | Перем _ИспользоватьОтносительныеПути; |
10 | 10 |
|
11 | | -Перем КаталогИсходниковПоПроекту; |
12 | 11 | Перем ГенераторПутейПоПроекту; |
13 | 12 |
|
14 | 13 | Процедура ОписаниеКоманды(Команда) Экспорт |
|
91 | 90 | стрКаталоги = СтрЗаменить(ПутьККаталогуИсходников, ";", ","); |
92 | 91 | каталоги = СтрРазделить(стрКаталоги, ","); |
93 | 92 |
|
| 93 | + Если каталоги.Количество() = 0 Тогда |
| 94 | + |
| 95 | + _лог.Ошибка("Каталог исходников SRC не указан. Продолжение невозможно."); |
| 96 | + ЗавершитьРаботу(1); |
| 97 | + |
| 98 | + КонецЕсли; |
| 99 | + |
94 | 100 | КаталогИсходниковПоПроекту = Новый Соответствие; |
95 | 101 |
|
96 | 102 | Для Каждого цКаталог Из каталоги Цикл |
|
117 | 123 | Если КаталогИсходниковПоПроекту.Количество() = 0 Тогда |
118 | 124 |
|
119 | 125 | _лог.Ошибка("Не удалось заполнить соответствие проектов исходникам для SRC = <%1>", ПутьККаталогуИсходников); |
120 | | - ЗавершитьРаботу(1); |
| 126 | + _лог.Ошибка("Возможно используется формат конфигуратора. Будет использован единый каталог: <%1>", каталоги[0]); |
| 127 | + |
| 128 | + КаталогИсходниковПоПроекту.Вставить("", каталоги[0]); |
121 | 129 |
|
122 | 130 | КонецЕсли; |
123 | 131 |
|
|
337 | 345 |
|
338 | 346 | таблицаРезультатов.Колонки.Добавить("Путь"); |
339 | 347 |
|
340 | | - Для каждого цСтрока Из таблицаРезультатов Цикл |
| 348 | + Для Каждого цСтрока Из таблицаРезультатов Цикл |
341 | 349 |
|
342 | | - цСтрока.Путь = ГенераторПутейПоПроекту[цСтрока.Проект].Путь(цСтрока.Метаданные); |
| 350 | + генераторПутей = ГенераторПутейПоИмениПроекта(цСтрока.Проект); |
| 351 | + |
| 352 | + цСтрока.Путь = генераторПутей.Путь(цСтрока.Метаданные); |
343 | 353 |
|
344 | 354 | Если Не ПроверитьПуть(цСтрока.Путь, цСтрока.Метаданные) Тогда |
345 | 355 |
|
|
371 | 381 |
|
372 | 382 | КонецПроцедуры |
373 | 383 |
|
| 384 | +Функция ГенераторПутейПоИмениПроекта(Знач ИмяПроекта) |
| 385 | + |
| 386 | + генераторПутей = ГенераторПутейПоПроекту[ИмяПроекта]; |
| 387 | + |
| 388 | + Если генераторПутей = Неопределено Тогда |
| 389 | + |
| 390 | + генераторПутей = ГенераторПутейПоПроекту[""]; |
| 391 | + ГенераторПутейПоПроекту.Вставить(имяПроекта, генераторПутей); |
| 392 | + |
| 393 | + КонецЕсли; |
| 394 | + |
| 395 | + Возврат генераторПутей; |
| 396 | + |
| 397 | +КонецФункции |
| 398 | + |
374 | 399 | #Область ПереопределениеИдентификаторов |
375 | 400 |
|
376 | 401 | Процедура ПереопределитьИдентификаторыПравил(таблицаРезультатов) |
|
537 | 562 |
|
538 | 563 | Функция ПутьКМетаданнымСуществует(Знач Проект, Знач пМетаданные) |
539 | 564 |
|
540 | | - Путь = ГенераторПутейПоПроекту[Проект].Путь(пМетаданные); |
| 565 | + генераторПутей = ГенераторПутейПоИмениПроекта(Проект); |
| 566 | + |
| 567 | + Путь = генераторПутей.Путь(пМетаданные); |
541 | 568 |
|
542 | 569 | Возврат ПроверитьПуть(Путь, пМетаданные, Ложь); |
543 | 570 |
|
|
0 commit comments