Main build (Jenkins)

src/en/OInt/tools/Modules/OPI_TestDataRetrieval.os

@@ -578,9 +578,9 @@ Function ExecuteTestCLI(Val Library, Val Method, Val Options, Val Record = True)
     If OPI_Tools.IsWindows() Then
 
         If OPI_Tools.IsOneScript() Then
-            Oint = "oint";
-        Else
             Oint = """C:\Program Files (x86)\OInt\bin\oint.bat""";
+        Else
+            Oint = """C:\Program Files\OneScript\bin\oint.bat""";
         EndIf;
 
     Else

src/en/OPI/src/CommonModules/OPI_TestDataRetrieval/Module.bsl

@@ -578,9 +578,9 @@ Function ExecuteTestCLI(Val Library, Val Method, Val Options, Val Record = True)
     If OPI_Tools.IsWindows() Then
 
         If OPI_Tools.IsOneScript() Then
-            Oint = "oint";
-        Else
             Oint = """C:\Program Files (x86)\OInt\bin\oint.bat""";
+        Else
+            Oint = """C:\Program Files\OneScript\bin\oint.bat""";
         EndIf;
 
     Else

src/en/cli/core/Classes/app.os

@@ -135,7 +135,7 @@ Function GetProcessingResult(Val Command, Val Parameters)
 		Help.DisplayParameterHelp(MethodParameters);
 	EndIf;
 
-	ExecutionStructure = OPIObject.FormMethodCallString(Parameters, Command, Method, "OPIObject");
+	ExecutionStructure = OPIObject.FormMethodCallString(Parameters, Command, Method);
 
 	If ExecutionStructure["Error"] Then
 		Help.DisplayExceptionMessage(ExecutionStructure["Result"], OutputFile);

src/en/cli/data/Classes/LibraryComposition.os

@@ -119,11 +119,10 @@ Function GetFullComposition() Export
 
 EndFunction
 
-Function FormMethodCallString(Val PassedParameters, Val Command, Val Method, Val CurrentObjectName = "") Export
+Function FormMethodCallString(Val PassedParameters, Val Command, Val Method) Export
 
     Module             = GetCommandModuleMapping().Get(Command);
     IndexObject      = GetIndexData(Command);
-    CurrentObjectName = ?(ValueIsFilled(CurrentObjectName), CurrentObjectName + ".", "");
     
     If Not ValueIsFilled(Module) Then
         Return New Structure("Error,Result", True, "Command");
@@ -159,8 +158,7 @@ Function FormMethodCallString(Val PassedParameters, Val Command, Val Method, Val
             If RequiresProcessingOfEscapeSequences(ParameterName, ParameterValue) Then
                 ExecutionText = ExecutionText 
                     + Chars.LF 
-                    + CurrentObjectName
-                    + "ReplaceEscapeSequences(" + ParameterName + ");";
+                    + "OPI_Tools.ReplaceEscapeSequences(" + ParameterName + ");";
             EndIf;
 
             CallString = CallString + ParameterName + ", ";
@@ -210,34 +208,6 @@ Function RequiresProcessingOfEscapeSequences(Val ParameterName, Val ParameterVal
 
 EndFunction
 
-Procedure ReplaceEscapeSequences(Text) Export
-
-    Text = String(Text);
-
-    CharacterMapping = GetEscapeSequencesMap();
-
-    For Each Symbol In CharacterMapping Do
-
-        Text = StrReplace(Text, Symbol.Key, Symbol.Value);
-        Text = StrReplace(Text, "\" + Symbol.Value, Symbol.Key);
-
-    EndDo;
-
-EndProcedure
-
-Function GetEscapeSequencesMap()
-
-    CharacterMapping = New Map;
-
-    CharacterMapping.Insert("\n"  , Chars.LF);
-    CharacterMapping.Insert("\r"  , Chars.CR);
-    CharacterMapping.Insert("\f"  , Chars.FF);
-    CharacterMapping.Insert("\v"  , Chars.VTab);
-
-    Return CharacterMapping;
-
-EndFunction
-
 #Region Alternate
 
 Procedure ИнициализироватьОсновныеСписки() Export
@@ -260,16 +230,12 @@ Function ПолучитьПолныйСостав() Export
 	Return GetFullComposition();
 EndFunction
 
-Function СформироватьСтрокуВызоваМетода(Val ПереданныеПараметры, Val Команда, Val Метод, Val ИмяТекущегоОбъекта = "") Export
-	Return FormMethodCallString(ПереданныеПараметры, Команда, Метод, ИмяТекущегоОбъекта);
+Function СформироватьСтрокуВызоваМетода(Val ПереданныеПараметры, Val Команда, Val Метод) Export
+	Return FormMethodCallString(ПереданныеПараметры, Команда, Метод);
 EndFunction
 
 Procedure ДополнитьКэшСостава(Val Библиотека, Val ТаблицаПараметров, Команда = "") Export
 	CompleteCompositionCache(Библиотека, ТаблицаПараметров, Команда);
 EndProcedure
 
-Procedure ЗаменитьУправляющиеПоследовательности(Текст) Export
-	ReplaceEscapeSequences(Текст);
-EndProcedure
-
 #EndRegion

src/ru/OInt/tools/Modules/OPI_ПолучениеДанныхТестов.os

@@ -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""";
         КонецЕсли;
 
     Иначе

src/ru/cli/data/Classes/LibraryComposition.os

@@ -208,34 +208,6 @@
 
 КонецФункции
 
-Процедура ЗаменитьУправляющиеПоследовательности(Текст) Экспорт
-
-    Текст = Строка(Текст);
-
-    СоответствиеСимволов = ПолучитьСоответствиеУправляющихПоследовательностей();
-
-    Для Каждого Символ Из СоответствиеСимволов Цикл
-
-        Текст = СтрЗаменить(Текст, Символ.Ключ, Символ.Значение);
-        Текст = СтрЗаменить(Текст, "\" + Символ.Значение, Символ.Ключ);
-
-    КонецЦикла;
-
-КонецПроцедуры
-
-Функция ПолучитьСоответствиеУправляющихПоследовательностей()
-
-    СоответствиеСимволов = Новый Соответствие;
-
-    СоответствиеСимволов.Вставить("\n"  , Символы.ПС);
-    СоответствиеСимволов.Вставить("\r"  , Символы.ВК);
-    СоответствиеСимволов.Вставить("\f"  , Символы.ПФ);
-    СоответствиеСимволов.Вставить("\v"  , Символы.ВТаб);
-
-    Возврат СоответствиеСимволов;
-
-КонецФункции
-
 #Region Alternate
 
 Procedure InitializeCommonLists() Export
@@ -266,8 +238,4 @@ Procedure CompleteCompositionCache(Val Library, Val ParametersTable, Command = "
 	ДополнитьКэшСостава(Library, ParametersTable, Command);
 EndProcedure
 
-Procedure ReplaceEscapeSequences(Text) Export
-	ЗаменитьУправляющиеПоследовательности(Text);
-EndProcedure
-
 #EndRegion