1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-01-22 05:31:17 +02:00
Code Issues Releases Activity

Преобразование OPI -> OInt (workflow)

Browse Source
This commit is contained in:
Vitaly the Alpaca 2024-04-01 07:08:20 +00:00 committed by Vitaly the Alpaca (bot)
parent 301b4f5705
commit 7d9915a096
2 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
OInt/core/Modules/OPI_Telegram.os
View File

@ -935,7 +935,7 @@
СтруктураПараметра = Новый Структура("keyboard,resize_keyboard", Строки, Истина); СтруктураПараметра = Новый Структура("keyboard,resize_keyboard", Строки, Истина);
КонецЕсли; КонецЕсли;
Клавиатура = OPI_Инструменты.JSONСтрокой(СтруктураПараметра); Клавиатура = OPI_Инструменты.JSONСтрокой(СтруктураПараметра, "СимволыВнеASCII"");
Возврат Клавиатура; Возврат Клавиатура;

12
OInt/tools/Modules/internal/Modules/OPI_Инструменты.os
View File

@ -233,10 +233,10 @@
Возврат ""; Возврат "";
КонецЕсли; КонецЕсли;
Текст = ?(ТипЗнч(Текст) = Тип("ДвоичныеДанные"), ПолучитьСтрокуИзДвоичныхДанных(Текст, "UTF-8"), Текст); Текст = ?(ТипЗнч(Текст) = Тип("ДвоичныеДанные"), ПолучитьСтрокуИзДвоичныхДанных(Текст), Текст);
ЧтениеJSON = Новый ЧтениеJSON; ЧтениеJSON = Новый ЧтениеJSON;
ЧтениеJSON.УстановитьСтроку(Текст); ЧтениеJSON.УстановитьСтроку();
Данные = ПрочитатьJSON(ЧтениеJSON, Истина, Неопределено, ФорматДатыJSON.ISO); Данные = ПрочитатьJSON(ЧтениеJSON, Истина, Неопределено, ФорматДатыJSON.ISO);
ЧтениеJSON.Закрыть(); ЧтениеJSON.Закрыть();
@ -245,12 +245,12 @@
КонецФункции КонецФункции
Функция JSONСтрокой(Знач Данные) Экспорт Функция JSONСтрокой(Знач Данные, Знач Экранирование = "Нет") Экспорт
ПараметрыJSON = Новый ПараметрыЗаписиJSON(ПереносСтрокJSON.Windows ПараметрыJSON = Новый ПараметрыЗаписиJSON(ПереносСтрокJSON.Windows
, " " , " "
, Истина , Истина
, ЭкранированиеСимволовJSON.СимволыВнеASCII , ЭкранированиеСимволовJSON[Экранирование]
, Ложь , Ложь
, Ложь , Ложь
, Ложь , Ложь
@ -446,7 +446,7 @@
Заголовки.Вставить("Accept-Charset" , "utf-8"); Заголовки.Вставить("Accept-Charset" , "utf-8");
Если ЗначениеЗаполнено(ТипДанных) Тогда Если ЗначениеЗаполнено(ТипДанных) Тогда
Заголовки.Вставить("Content-Type", ТипДанных + "; charset=utf-8"); Заголовки.Вставить("Content-Type", ТипДанных);
КонецЕсли; КонецЕсли;
Если ТипЗнч(ДопЗаголовки) = Тип("Соответствие") Тогда Если ТипЗнч(ДопЗаголовки) = Тип("Соответствие") Тогда
@ -507,7 +507,7 @@
КонецПопытки; КонецПопытки;
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры
Процедура УстановитьТелоЗапроса(Запрос, Знач Параметры, Знач JSON) Процедура УстановитьТелоЗапроса(Запрос, Знач Параметры, Знач JSON)