1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2026-05-22 10:05:29 +02:00

Main build (Jenkins)

This commit is contained in:
Vitaly the Alpaca (bot)
2024-10-15 11:42:28 +03:00
parent 7c8e80469e
commit b0d38a9a69
5 changed files with 5134 additions and 5082 deletions
+5022 -5022
View File
File diff suppressed because it is too large Load Diff
@@ -2051,17 +2051,43 @@ Procedure WriteCLICall(Val Library, Val Method, Val Options)
EndIf;
OptionsArray = New Array;
FindJSON = False;
For Each Option In Options Do
If TypeOf(Option.Value) = Type("Structure")
Or TypeOf(Option.Value) = Type("Map") Then
FindJSON = True;
EndIf;
CurrentOption = FormOption(Option.Value, Option.Key);
OptionsArray.Add(CurrentOption);
EndDo;
Start = "oint ";
If FindJSON Then
Information = "JSON data can also be passed as a path to a .json file";
StartBat = ":: " + Information + Chars.LF + Chars.LF + Start;
StartBash = "# " + Information + Chars.LF + Chars.LF + Start;
Else
StartBat = Start;
StartBash = Start;
EndIf;
BatSeparator = " ^" + Chars.LF + " ";
BashSeparator = " \" + Chars.LF + " ";
BatString = "oint " + Library + " " + Method + BatSeparator + StrConcat(OptionsArray, BatSeparator);
BashString = "oint " + Library + " " + Method + BashSeparator + StrConcat(OptionsArray, BashSeparator);
BatString = StartBat + Library + " " + Method + BatSeparator + StrConcat(OptionsArray, BatSeparator);
BashString = StartBash + Library + " " + Method + BashSeparator + StrConcat(OptionsArray, BashSeparator);
GetBinaryDataFromString(BatString).Write(MethodCatalog + "/bat.txt");
GetBinaryDataFromString(BashString).Write(MethodCatalog + "/bash.txt");
@@ -2051,17 +2051,43 @@ Procedure WriteCLICall(Val Library, Val Method, Val Options)
EndIf;
OptionsArray = New Array;
FindJSON = False;
For Each Option In Options Do
If TypeOf(Option.Value) = Type("Structure")
Or TypeOf(Option.Value) = Type("Map") Then
FindJSON = True;
EndIf;
CurrentOption = FormOption(Option.Value, Option.Key);
OptionsArray.Add(CurrentOption);
EndDo;
Start = "oint ";
If FindJSON Then
Information = "JSON data can also be passed as a path to a .json file";
StartBat = ":: " + Information + Chars.LF + Chars.LF + Start;
StartBash = "# " + Information + Chars.LF + Chars.LF + Start;
Else
StartBat = Start;
StartBash = Start;
EndIf;
BatSeparator = " ^" + Chars.LF + " ";
BashSeparator = " \" + Chars.LF + " ";
BatString = "oint " + Library + " " + Method + BatSeparator + StrConcat(OptionsArray, BatSeparator);
BashString = "oint " + Library + " " + Method + BashSeparator + StrConcat(OptionsArray, BashSeparator);
BatString = StartBat + Library + " " + Method + BatSeparator + StrConcat(OptionsArray, BatSeparator);
BashString = StartBash + Library + " " + Method + BashSeparator + StrConcat(OptionsArray, BashSeparator);
GetBinaryDataFromString(BatString).Write(MethodCatalog + "/bat.txt");
GetBinaryDataFromString(BashString).Write(MethodCatalog + "/bash.txt");
@@ -1857,9 +1857,9 @@
КонецФункции
Функция ПолучитьОбщийМодуль(Знач Имя)
Модуль = Вычислить(Имя);
Возврат Модуль;
КонецФункции
@@ -2051,38 +2051,38 @@
КонецЕсли;
МассивОпций = Новый Массив;
ЕстьJSON = Ложь;
ЕстьJSON = Ложь;
Для Каждого Опция Из Опции Цикл
Если ТипЗнч(Опция.Значение) = Тип("Структура")
Или ТипЗнч(Опция.Значение) = Тип("Соответствие") Тогда
ЕстьJSON = Истина;
КонецЕсли;
Если ТипЗнч(Опция.Значение) = Тип("Структура")
Или ТипЗнч(Опция.Значение) = Тип("Соответствие") Тогда
ЕстьJSON = Истина;
КонецЕсли;
ТекущаяОпция = ОформитьОпцию(Опция.Значение, Опция.Ключ);
МассивОпций.Добавить(ТекущаяОпция);
КонецЦикла;
Начало = "oint ";
Если ЕстьJSON Тогда
Информация = "JSON данные также могут быть переданны как путь к файлу .json";
НачалоBat = ":: " + Информация + Символы.ПС + Символы.ПС + Начало;
НачалоBash = "# " + Информация + Символы.ПС + Символы.ПС + Начало;
Иначе
НачалоBat = Начало;
НачалоBash = Начало;
КонецЕсли;
Начало = "oint ";
Если ЕстьJSON Тогда
Информация = "JSON данные также могут быть переданны как путь к файлу .json";
НачалоBat = ":: " + Информация + Символы.ПС + Символы.ПС + Начало;
НачалоBash = "# " + Информация + Символы.ПС + Символы.ПС + Начало;
Иначе
НачалоBat = Начало;
НачалоBash = Начало;
КонецЕсли;
РазделительBat = " ^" + Символы.ПС + " ";
РазделительBash = " \" + Символы.ПС + " ";
@@ -2051,38 +2051,38 @@
КонецЕсли;
МассивОпций = Новый Массив;
ЕстьJSON = Ложь;
ЕстьJSON = Ложь;
Для Каждого Опция Из Опции Цикл
Если ТипЗнч(Опция.Значение) = Тип("Структура")
Или ТипЗнч(Опция.Значение) = Тип("Соответствие") Тогда
ЕстьJSON = Истина;
КонецЕсли;
Если ТипЗнч(Опция.Значение) = Тип("Структура")
Или ТипЗнч(Опция.Значение) = Тип("Соответствие") Тогда
ЕстьJSON = Истина;
КонецЕсли;
ТекущаяОпция = ОформитьОпцию(Опция.Значение, Опция.Ключ);
МассивОпций.Добавить(ТекущаяОпция);
КонецЦикла;
Начало = "oint ";
Если ЕстьJSON Тогда
Информация = "JSON данные также могут быть переданны как путь к файлу .json";
НачалоBat = ":: " + Информация + Символы.ПС + Символы.ПС + Начало;
НачалоBash = "# " + Информация + Символы.ПС + Символы.ПС + Начало;
Иначе
НачалоBat = Начало;
НачалоBash = Начало;
КонецЕсли;
Начало = "oint ";
Если ЕстьJSON Тогда
Информация = "JSON данные также могут быть переданны как путь к файлу .json";
НачалоBat = ":: " + Информация + Символы.ПС + Символы.ПС + Начало;
НачалоBash = "# " + Информация + Символы.ПС + Символы.ПС + Начало;
Иначе
НачалоBat = Начало;
НачалоBash = Начало;
КонецЕсли;
РазделительBat = " ^" + Символы.ПС + " ";
РазделительBash = " \" + Символы.ПС + " ";