1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-08-10 22:41:43 +02:00
Code Issues Releases Activity

Фикс замен УП в CLI

Browse Source
This commit is contained in:
Anton Titovets
2025-07-12 20:01:49 +03:00
parent 184f2ea2a5
commit 3e2c11ff57
4 changed files with 9 additions and 41 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
ci/os/internal/Modules/МетодыCLI.os vendored
View File

@@ -177,11 +177,10 @@
|
|КонецФункции
|
|Функция СформироватьСтрокуВызоваМетода(Знач ПереданныеПараметры, Знач Команда, Знач Метод, Знач ИмяТекущегоОбъекта = """") Экспорт
|Функция СформироватьСтрокуВызоваМетода(Знач ПереданныеПараметры, Знач Команда, Знач Метод) Экспорт
|
| Модуль = ПолучитьСоответствиеКомандМодулей().Получить(Команда);
| ОбъектИндекса = ПолучитьИнформациюИндекса(Команда);
| ИмяТекущегоОбъекта = ?(ЗначениеЗаполнено(ИмяТекущегоОбъекта), ИмяТекущегоОбъекта + ""."", """");
|
| Если Не ЗначениеЗаполнено(Модуль) Тогда
| Возврат Новый Структура(""Ошибка,Результат"", Истина, ""Команда"");
@@ -217,8 +216,7 @@
| Если ТребуетсяОбработкаУправляющихПоследовательностей(ИмяПараметра, ЗначениеПараметра) Тогда
| ТекстВыполнения = ТекстВыполнения
| + Символы.ПС
| + ИмяТекущегоОбъекта
| + ""ЗаменитьУправляющиеПоследовательности("" + ИмяПараметра + "");"";
| + ""OPI_Инструменты.ЗаменитьУправляющиеПоследовательности("" + ИмяПараметра + "");"";
| КонецЕсли;
|
| СтрокаВызова = СтрокаВызова + ИмяПараметра + "", "";
@@ -267,34 +265,6 @@
| И Не ИмяПараметра = ""Параметр_out"";
|
|КонецФункции
|
|Процедура ЗаменитьУправляющиеПоследовательности(Текст) Экспорт
|
| Текст = Строка(Текст);
|
| СоответствиеСимволов = ПолучитьСоответствиеУправляющихПоследовательностей();
|
| Для Каждого Символ Из СоответствиеСимволов Цикл
|
| Текст = СтрЗаменить(Текст, Символ.Ключ, Символ.Значение);
| Текст = СтрЗаменить(Текст, ""\"" + Символ.Значение, Символ.Ключ);
|
| КонецЦикла;
|
|КонецПроцедуры
|
|Функция ПолучитьСоответствиеУправляющихПоследовательностей()
|
| СоответствиеСимволов = Новый Соответствие;
|
| СоответствиеСимволов.Вставить(""\n"" , Символы.ПС);
| СоответствиеСимволов.Вставить(""\r"" , Символы.ВК);
| СоответствиеСимволов.Вставить(""\f"" , Символы.ПФ);
| СоответствиеСимволов.Вставить(""\v"" , Символы.ВТаб);
|
| Возврат СоответствиеСимволов;
|
|КонецФункции
|");
КонецПроцедуры

4
src/ru/OPI/src/CommonModules/OPI_ПолучениеДанныхТестов/Module.bsl
View File

@@ -578,9 +578,9 @@
Если OPI_Инструменты.ЭтоWindows() Тогда
Если OPI_Инструменты.ЭтоOneScript() Тогда
Oint = "oint";
Иначе
Oint = """C:\Program Files (x86)\OInt\bin\oint.bat""";
Иначе
Oint = """C:\Program Files\OneScript\bin\oint.bat""";
КонецЕсли;
Иначе

2
src/ru/cli/core/Classes/app.os
View File

@@ -135,7 +135,7 @@
Справка.ВывестиСправкуПоПараметрам(ПараметрыМетода);
КонецЕсли;
СтруктураВыполнения = ОбъектОПИ.СформироватьСтрокуВызоваМетода(Параметры, Команда, Метод, "ОбъектОПИ");
СтруктураВыполнения = ОбъектОПИ.СформироватьСтрокуВызоваМетода(Параметры, Команда, Метод);
Если СтруктураВыполнения["Ошибка"] Тогда
Справка.ВывестиСообщениеИсключения(СтруктураВыполнения["Результат"], ФайлВывода);

10
src/ru/cli/data/Classes/LibraryComposition.os
View File

@@ -119,11 +119,10 @@
КонецФункции
Функция СформироватьСтрокуВызоваМетода(Знач ПереданныеПараметры, Знач Команда, Знач Метод, Знач ИмяТекущегоОбъекта = "") Экспорт
Функция СформироватьСтрокуВызоваМетода(Знач ПереданныеПараметры, Знач Команда, Знач Метод) Экспорт
Модуль = ПолучитьСоответствиеКомандМодулей().Получить(Команда);
ОбъектИндекса = ПолучитьИнформациюИндекса(Команда);
ИмяТекущегоОбъекта = ?(ЗначениеЗаполнено(ИмяТекущегоОбъекта), ИмяТекущегоОбъекта + ".", "");
Если Не ЗначениеЗаполнено(Модуль) Тогда
Возврат Новый Структура("Ошибка,Результат", Истина, "Команда");
@@ -159,8 +158,7 @@
Если ТребуетсяОбработкаУправляющихПоследовательностей(ИмяПараметра, ЗначениеПараметра) Тогда
ТекстВыполнения = ТекстВыполнения
+ Символы.ПС
+ ИмяТекущегоОбъекта
+ "ЗаменитьУправляющиеПоследовательности(" + ИмяПараметра + ");";
+ "OPI_Инструменты.ЗаменитьУправляющиеПоследовательности(" + ИмяПараметра + ");";
КонецЕсли;
СтрокаВызова = СтрокаВызова + ИмяПараметра + ", ";
@@ -260,8 +258,8 @@ Function GetFullComposition() Export
Return ПолучитьПолныйСостав();
EndFunction
Function FormMethodCallString(Val PassedParameters, Val Command, Val Method, Val CurrentObjectName = "") Export
Return СформироватьСтрокуВызоваМетода(PassedParameters, Command, Method, CurrentObjectName);
Function FormMethodCallString(Val PassedParameters, Val Command, Val Method) Export
Return СформироватьСтрокуВызоваМетода(PassedParameters, Command, Method);
EndFunction
Procedure CompleteCompositionCache(Val Library, Val ParametersTable, Command = "") Export