1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2024-12-12 11:15:07 +02:00
OpenIntegrations/ci/os/internal/Modules/МетодыВерсионирования.os

49 lines
2.1 KiB
Plaintext
Raw Normal View History

#Область СлужебныйПрограммныйИнтерфейс
Процедура ОбновитьНомераВерсий(Знач ПутьPackagedef, Знач Версия) Экспорт
Признак = ".Версия(""";
Packagedef = Новый ТекстовыйДокумент();
Packagedef.Прочитать(ПутьPackagedef);
Для Н = 1 По Packagedef.КоличествоСтрок() Цикл
ТекущаяСтрока = СокрЛП(Packagedef.ПолучитьСтроку(Н));
Если СтрНайти(ТекущаяСтрока, Признак) Тогда
Packagedef.ЗаменитьСтроку(Н, " .Версия(""" + Версия + """)");
Packagedef.Записать(ПутьPackagedef);
Возврат;
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Процедура ОбновитьLibConfig(Знач СоответствиеКовертации, Знач ПутьПакета) Экспорт
Документ = Новый ТекстовыйДокумент();
Документ.ДобавитьСтроку("<package-def>");
Макет = " <module name=""%1"" file=""%2""/>";
Для Каждого Модуль Из СоответствиеКовертации Цикл
ТекущийМодуль = Модуль.Значение;
ФайлМодуля = Новый Файл(ТекущийМодуль);
ПутьМодуля = СтрЗаменить(ТекущийМодуль, ПутьПакета, "");
Бибилотека = ФайлМодуля.ИмяБезРасширения;
Если Бибилотека = "OPI_Тесты" Тогда
Продолжить;
КонецЕсли;
ТекущаяСтрока = СтрШаблон(Макет, Бибилотека, СокрЛП(ПутьМодуля));
Документ.ДобавитьСтроку(ТекущаяСтрока);
КонецЦикла;
Документ.ДобавитьСтроку("</package-def>");
Документ.Записать(ПутьПакета + "lib.config");
КонецПроцедуры
#КонецОбласти