1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-01-12 04:34:10 +02:00

Мелкие правки по Календарь, тестам и VK

This commit is contained in:
Anton 2024-02-25 12:54:31 +03:00
parent fd7253bdee
commit bce1a51d1c
5 changed files with 35 additions and 18 deletions

View File

@ -468,7 +468,9 @@
Дата1 = ОписаниеСобытия["ДатаОкончания"];
Вложения = ОписаниеСобытия["МассивURLФайловВложений"];
Вложения = ПреобразоватьВложения(Вложения);
Уведомления = ?(ОписаниеСобытия["ОтправлятьУведомления"] = Неопределено, Ложь, ОписаниеСобытия["ОтправлятьУведомления"]);
Уведомления = ?(ОписаниеСобытия["ОтправлятьУведомления"] = Неопределено
, Ложь
, ОписаниеСобытия["ОтправлятьУведомления"]);
Параметры = Новый Структура;
Параметры.Вставить("summary" , ОписаниеСобытия["Заголовок"]);

View File

@ -111,4 +111,5 @@
Возврат СтрСоединить(МассивРазрешений, " ");
КонецФункции
#КонецОбласти

View File

@ -1621,7 +1621,8 @@
КонецФункции
Процедура ЗаполнитьПараметрыЗагрузкиФото(Знач Метод, Знач Ответ, Параметры)
Response = "response";
Способ = Метод["Способ"];
СтандартныйСпособ = 1;
НовыйСпособ = 2;
@ -1631,7 +1632,6 @@
Hash = "hash";
Serv = "server";
Aid = "aid";
Response = "response";
Фото = Метод["Фото"];
СерверФото = OPI_Инструменты.ЧислоВСтроку(Ответ[Serv]);

View File

@ -126,23 +126,11 @@
Если ТипКоллекции = Тип("Соответствие") Или ТипКоллекции = Тип("Структура") Тогда
Для Каждого ЭлементКоллекции Из Коллекция Цикл
Если Не ЭлементКоллекции.Значение = Неопределено И Не ЭлементКоллекции.Значение = NULL Тогда
ВыходнаяКоллекция.Вставить(ЭлементКоллекции.Ключ, ЭлементКоллекции.Значение);
КонецЕсли;
КонецЦикла;
УдалитьПустыеКлючиЗначения(Коллекция, ВыходнаяКоллекция);
ИначеЕсли ТипКоллекции = Тип("Массив") Тогда
Для Каждого ЭлементКоллекции Из Коллекция Цикл
Если Не ЭлементКоллекции = Неопределено И Не ЭлементКоллекции = NULL Тогда
ВыходнаяКоллекция.Добавить(ЭлементКоллекции);
КонецЕсли;
КонецЦикла;
УдалитьПустыеЭлементыМассива(Коллекция, ВыходнаяКоллекция);
Иначе
@ -484,6 +472,30 @@
КонецПроцедуры
Процедура УдалитьПустыеКлючиЗначения(Знач Коллекция, ВыходнаяКоллекция)
Для Каждого ЭлементКоллекции Из Коллекция Цикл
Если Не ЭлементКоллекции.Значение = Неопределено И Не ЭлементКоллекции.Значение = NULL Тогда
ВыходнаяКоллекция.Вставить(ЭлементКоллекции.Ключ, ЭлементКоллекции.Значение);
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Процедура УдалитьПустыеЭлементыМассива(Знач Коллекция, ВыходнаяКоллекция)
Для Каждого ЭлементКоллекции Из Коллекция Цикл
Если Не ЭлементКоллекции = Неопределено И Не ЭлементКоллекции = NULL Тогда
ВыходнаяКоллекция.Добавить(ЭлементКоллекции);
КонецЕсли;
КонецЦикла;
КонецПроцедуры
#Область GZip
// Описание структур см. здесь https://pkware.cachefly.net/webdocs/casestudies/APPNOTE.TXT

View File

@ -1670,8 +1670,10 @@
.Свойство(Summary).Равно(Наименование)
.Свойство(Description).Равно(Описание)
.Свойство(UID).ИмеетТип(ТипСтрока).Заполнено();
СоответствиеСобытия = Новый Соответствие;
СоответствиеСобытия.Вставить("Описание", ОписаниеИзм);
Результат = OPI_GoogleCalendar.ИзменитьСобытие(Токен, Календарь, СоответствиеСобытия, Событие);
ЮТест.ОжидаетЧто(Результат)