1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-01-14 04:35:49 +02:00

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

This commit is contained in:
Vitaly the Alpaca 2024-06-22 11:30:17 +00:00 committed by Vitaly the Alpaca (bot)
parent fc53174f59
commit cef84c13aa
4 changed files with 3970 additions and 3967 deletions

File diff suppressed because it is too large Load Diff

View File

@ -545,124 +545,42 @@ EndProcedure
Procedure VKAPI_GetProductList() Export
Parameters = GetVKParameters();
Image = OPI_TestDataRetrieval.GetBinary("Picture");
TestParameters = New Structure;
ImageArray = New Array;
ImageArray.Add(Image);
Product = New Map();
Product.Insert("Name" , "TestProduct2");
Product.Insert("Description" , "Product description");
Product.Insert("Category" , "20173");
Product.Insert("Price" , 1);
Product.Insert("OldPrice" , 15);
Product.Insert("MainPhoto" , Image);
Product.Insert("URL" , "https://github.com/Bayselonarrend/OpenIntegrations");
Product.Insert("AdditionalPhotos" , ImageArray);
Product.Insert("MainInGroup" , True);
Product.Insert("GroupNumber" , Undefined);
Product.Insert("Width" , 20);
Product.Insert("Height" , 30);
Product.Insert("Depth" , 40);
Product.Insert("Weight" , 100);
Product.Insert("SKU" , 12345);
Product.Insert("AvailableBalance" , "10");
Result = OPI_VK.AddProduct(Product, , Parameters);
ProductID = Result["response"]["market_item_id"];
OPI_Tools.Pause(5);
Result = OPI_VK.GetProductList(, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "GetProductList");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result)
.ИмеетТип("Array").Заполнено();
OPI_VK.DeleteProduct(ProductID, Parameters);
OPI_Tools.Pause(5);
VK_GetProductList(TestParameters);
EndProcedure
Procedure VKAPI_GetSelectionList() Export
Parameters = GetVKParameters();
Image = OPI_TestDataRetrieval.GetBinary("Picture");
Result = OPI_VK.CreateProductCollection("TestCollection"
, Image
, True
, False
, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateProductCollection");
SelectionID = Result["response"]["market_album_id"];
Result = OPI_VK.GetSelectionList(Parameters);
TestParameters = New Structure;
OPI_TestDataRetrieval.WriteLog(Result, "GetSelectionList");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result)
.ИмеетТип("Array").Заполнено();
OPI_VK.DeleteSelection(SelectionID, Parameters);
OPI_Tools.Pause(5);
VK_GetSelectionList(TestParameters);
EndProcedure
Procedure VKAPI_GetPropertyList() Export
Parameters = GetVKParameters();
Result = OPI_VK.GetPropertyList(Parameters);
TestParameters = New Structure;
OPI_TestDataRetrieval.WriteLog(Result, "GetPropertyList");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result)
.ИмеетТип("Array").Заполнено();
OPI_Tools.Pause(5);
VK_GetPropertyList(TestParameters);
EndProcedure
Procedure VKAPI_GetOrderList() Export
Parameters = GetVKParameters();
Result = OPI_VK.GetOrderList(Parameters);
TestParameters = New Structure;
OPI_TestDataRetrieval.WriteLog(Result, "GetOrderList");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result)
.ИмеетТип("Array").Заполнено();
OPI_Tools.Pause(5);
VK_GetOrderList(TestParameters);
EndProcedure
Procedure VKAPI_UploadVideo() Export
Parameters = GetVKParameters();
Video = OPI_TestDataRetrieval.GetParameter("Video");
Name = "NewVideo";
Description = "Video description";
TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Video", TestParameters);
Result = OPI_VK.UploadVideoToServer(Video, Name, Description, , Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "UploadVideoToServer");
OPI_TestDataRetrieval.ExpectsThat(Result["video_id"]).Заполнено();
OPI_TestDataRetrieval.ExpectsThat(Result["video_hash"]).Заполнено();
OPI_Tools.Pause(5);
VK_UploadVideoToServer(TestParameters);
EndProcedure
@ -3444,6 +3362,13 @@ Procedure Check_VKProductsGroup(Val Result)
EndProcedure
Procedure Check_VKVideo(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result["video_id"]).Заполнено();
OPI_TestDataRetrieval.ExpectsThat(Result["video_hash"]).Заполнено();
EndProcedure
Procedure Check_GKObject(Val Result, Val Name, Val Description)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
@ -5388,6 +5313,82 @@ Procedure VK_DeleteProductProperty(FunctionParameters)
EndProcedure
Procedure VK_GetProductList(FunctionParameters)
Parameters = GetVKParameters();
Result = OPI_VK.GetProductList(, Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "GetProductList", "VK");
Check_Array(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_GetSelectionList(FunctionParameters)
Parameters = GetVKParameters();
Result = OPI_VK.GetSelectionList(Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "GetSelectionList", "VK");
Check_Array(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_GetPropertyList(FunctionParameters)
Parameters = GetVKParameters();
Result = OPI_VK.GetPropertyList(Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "GetPropertyList", "VK");
Check_Array(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_GetOrderList(FunctionParameters)
Parameters = GetVKParameters();
Result = OPI_VK.GetOrderList(Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "GetOrderList", "VK");
Check_Array(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_UploadVideoToServer(FunctionParameters)
Parameters = GetVKParameters();
Video = FunctionParameters["Video"];
Name = "NewVideo";
Description = "Video description";
Result = OPI_VK.UploadVideoToServer(Video, Name, Description, , Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "UploadVideoToServer", "VK");
Check_VKVideo(Result);
OPI_Tools.Pause(5);
EndProcedure
#EndRegion
#Region Dropbox

View File

@ -545,124 +545,42 @@ EndProcedure
Procedure VKAPI_GetProductList() Export
Parameters = GetVKParameters();
Image = OPI_TestDataRetrieval.GetBinary("Picture");
TestParameters = New Structure;
ImageArray = New Array;
ImageArray.Add(Image);
Product = New Map();
Product.Insert("Name" , "TestProduct2");
Product.Insert("Description" , "Product description");
Product.Insert("Category" , "20173");
Product.Insert("Price" , 1);
Product.Insert("OldPrice" , 15);
Product.Insert("MainPhoto" , Image);
Product.Insert("URL" , "https://github.com/Bayselonarrend/OpenIntegrations");
Product.Insert("AdditionalPhotos" , ImageArray);
Product.Insert("MainInGroup" , True);
Product.Insert("GroupNumber" , Undefined);
Product.Insert("Width" , 20);
Product.Insert("Height" , 30);
Product.Insert("Depth" , 40);
Product.Insert("Weight" , 100);
Product.Insert("SKU" , 12345);
Product.Insert("AvailableBalance" , "10");
Result = OPI_VK.AddProduct(Product, , Parameters);
ProductID = Result["response"]["market_item_id"];
OPI_Tools.Pause(5);
Result = OPI_VK.GetProductList(, Parameters);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetProductList");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result)
.ИмеетТип("Array").Заполнено();
OPI_VK.DeleteProduct(ProductID, Parameters);
OPI_Tools.Pause(5);
VK_GetProductList(TestParameters);
EndProcedure
Procedure VKAPI_GetSelectionList() Export
Parameters = GetVKParameters();
Image = OPI_TestDataRetrieval.GetBinary("Picture");
Result = OPI_VK.CreateProductCollection("TestCollection"
, Image
, True
, False
, Parameters);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateProductCollection");
SelectionID = Result["response"]["market_album_id"];
Result = OPI_VK.GetSelectionList(Parameters);
TestParameters = New Structure;
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetCollectionList");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result)
.ИмеетТип("Array").Заполнено();
OPI_VK.DeleteSelection(SelectionID, Parameters);
OPI_Tools.Pause(5);
VK_GetSelectionList(TestParameters);
EndProcedure
Procedure VKAPI_GetPropertyList() Export
Parameters = GetVKParameters();
Result = OPI_VK.GetPropertyList(Parameters);
TestParameters = New Structure;
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetPropertyList");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result)
.ИмеетТип("Array").Заполнено();
OPI_Tools.Pause(5);
VK_GetPropertyList(TestParameters);
EndProcedure
Procedure VKAPI_GetOrderList() Export
Parameters = GetVKParameters();
Result = OPI_VK.GetOrderList(Parameters);
TestParameters = New Structure;
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetOrderList");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result)
.ИмеетТип("Array").Заполнено();
OPI_Tools.Pause(5);
VK_GetOrderList(TestParameters);
EndProcedure
Procedure VKAPI_UploadVideo() Export
Parameters = GetVKParameters();
Video = OPI_TestDataRetrieval.GetParameter("Video");
Name = "NewVideo";
Description = "Video description";
TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Video", TestParameters);
Result = OPI_VK.UploadVideoToServer(Video, Name, Description, , Parameters);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "UploadVideoToServer");
OPI_TestDataRetrieval.ExpectsThat(Result["video_id"]).Заполнено();
OPI_TestDataRetrieval.ExpectsThat(Result["video_hash"]).Заполнено();
OPI_Tools.Pause(5);
VK_UploadVideoToServer(TestParameters);
EndProcedure
@ -3444,6 +3362,13 @@ Procedure Check_VKProductsGroup(Val Result)
EndProcedure
Procedure Check_VKVideo(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result["video_id"]).Заполнено();
OPI_TestDataRetrieval.ExpectsThat(Result["video_hash"]).Заполнено();
EndProcedure
Procedure Check_GKObject(Val Result, Val Name, Val Description)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
@ -5388,6 +5313,82 @@ Procedure VK_DeleteProductProperty(FunctionParameters)
EndProcedure
Procedure VK_GetProductList(FunctionParameters)
Parameters = GetVKParameters();
Result = OPI_VK.GetProductList(, Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetProductList", "VK");
Check_Array(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_GetSelectionList(FunctionParameters)
Parameters = GetVKParameters();
Result = OPI_VK.GetSelectionList(Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetCollectionList", "VK");
Check_Array(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_GetPropertyList(FunctionParameters)
Parameters = GetVKParameters();
Result = OPI_VK.GetPropertyList(Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetPropertyList", "VK");
Check_Array(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_GetOrderList(FunctionParameters)
Parameters = GetVKParameters();
Result = OPI_VK.GetOrderList(Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetOrderList", "VK");
Check_Array(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_UploadVideoToServer(FunctionParameters)
Parameters = GetVKParameters();
Video = FunctionParameters["Video"];
Name = "NewVideo";
Description = "Video description";
Result = OPI_VK.UploadVideoToServer(Video, Name, Description, , Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "UploadVideoToServer", "VK");
Check_VKVideo(Result);
OPI_Tools.Pause(5);
EndProcedure
#EndRegion
#Region Dropbox

View File

@ -545,124 +545,42 @@
Процедура ВК_ПолучитьСписокТоваров() Экспорт
Параметры = ПолучитьПараметрыВК();
Картинка = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture");
ПараметрыТеста = Новый Структура;
МассивКартинок = Новый Массив;
МассивКартинок.Добавить(Картинка);
Товар = Новый Соответствие();
Товар.Вставить("Имя" , "Тестовый товар 2");
Товар.Вставить("Описание" , "Описание товара");
Товар.Вставить("Категория" , "20173");
Товар.Вставить("Цена" , 1);
Товар.Вставить("СтараяЦена" , 15);
Товар.Вставить("ОсновноеФото" , Картинка);
Товар.Вставить("URL" , "https://github.com/Bayselonarrend/OpenIntegrations");
Товар.Вставить("ДополнительныеФото" , МассивКартинок);
Товар.Вставить("ГлавныйВГруппе" , Истина);
Товар.Вставить("НомерГруппы" , Неопределено);
Товар.Вставить("Ширина" , 20);
Товар.Вставить("Высота" , 30);
Товар.Вставить("Глубина" , 40);
Товар.Вставить("Вес" , 100);
Товар.Вставить("SKU" , 12345);
Товар.Вставить("ДоступныйОстаток" , "10");
Результат = OPI_VK.ДобавитьТовар(Товар, , Параметры);
ИДТовара = Результат["response"]["market_item_id"];
OPI_Инструменты.Пауза(5);
Результат = OPI_VK.ПолучитьСписокТоваров(, Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокТоваров");
OPI_Инструменты.Пауза(5);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат)
.ИмеетТип("Массив").Заполнено();
OPI_VK.УдалитьТовар(ИДТовара, Параметры);
OPI_Инструменты.Пауза(5);
VK_ПолучитьСписокТоваров(ПараметрыТеста);
КонецПроцедуры
Процедура ВК_ПолучитьСписокПодборок() Экспорт
Параметры = ПолучитьПараметрыВК();
Картинка = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture");
Результат = OPI_VK.СоздатьПодборкуТоваров("Тестовая подборка"
, Картинка
, Истина
, Ложь
, Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьПодборкуТоваров");
ИДПодборки = Результат["response"]["market_album_id"];
Результат = OPI_VK.ПолучитьСписокПодборок(Параметры);
ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокПодборок");
OPI_Инструменты.Пауза(5);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат)
.ИмеетТип("Массив").Заполнено();
OPI_VK.УдалитьПодборку(ИДПодборки, Параметры);
OPI_Инструменты.Пауза(5);
VK_ПолучитьСписокПодборок(ПараметрыТеста);
КонецПроцедуры
Процедура ВК_ПолучитьСписокСвойств() Экспорт
Параметры = ПолучитьПараметрыВК();
Результат = OPI_VK.ПолучитьСписокСвойств(Параметры);
ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокСвойств");
OPI_Инструменты.Пауза(5);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат)
.ИмеетТип("Массив").Заполнено();
OPI_Инструменты.Пауза(5);
VK_ПолучитьСписокСвойств(ПараметрыТеста);
КонецПроцедуры
Процедура ВК_ПолучитьСписокЗаказов() Экспорт
Параметры = ПолучитьПараметрыВК();
Результат = OPI_VK.ПолучитьСписокЗаказов(Параметры);
ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокЗаказов");
OPI_Инструменты.Пауза(5);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат)
.ИмеетТип("Массив").Заполнено();
OPI_Инструменты.Пауза(5);
VK_ПолучитьСписокЗаказов(ПараметрыТеста);
КонецПроцедуры
Процедура ВК_ЗагрузитьВидео() Экспорт
Параметры = ПолучитьПараметрыВК();
Видео = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Video");
Наименование = "Новое видео";
Описание = "Описание видео";
ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Video", ПараметрыТеста);
Результат = OPI_VK.ЗагрузитьВидеоНаСервер(Видео, Наименование, Описание, , Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗагрузитьВидеоНаСервер");
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["video_id"]).Заполнено();
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["video_hash"]).Заполнено();
OPI_Инструменты.Пауза(5);
VK_ЗагрузитьВидеоНаСервер(ПараметрыТеста);
КонецПроцедуры
@ -3444,6 +3362,13 @@
КонецПроцедуры
Процедура Проверка_ВКВидео(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["video_id"]).Заполнено();
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["video_hash"]).Заполнено();
КонецПроцедуры
Процедура Проверка_ГКОбъект(Знач Результат, Знач Наименование, Знач Описание)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие");
@ -5388,6 +5313,82 @@
КонецПроцедуры
Процедура VK_ПолучитьСписокТоваров(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Результат = OPI_VK.ПолучитьСписокТоваров(, Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокТоваров", "VK");
Проверка_Массив(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
Процедура VK_ПолучитьСписокПодборок(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Результат = OPI_VK.ПолучитьСписокПодборок(Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокПодборок", "VK");
Проверка_Массив(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
Процедура VK_ПолучитьСписокСвойств(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Результат = OPI_VK.ПолучитьСписокСвойств(Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокСвойств", "VK");
Проверка_Массив(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
Процедура VK_ПолучитьСписокЗаказов(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Результат = OPI_VK.ПолучитьСписокЗаказов(Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокЗаказов", "VK");
Проверка_Массив(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
Процедура VK_ЗагрузитьВидеоНаСервер(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Видео = ПараметрыФункции["Video"];
Наименование = "Новое видео";
Описание = "Описание видео";
Результат = OPI_VK.ЗагрузитьВидеоНаСервер(Видео, Наименование, Описание, , Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗагрузитьВидеоНаСервер", "VK");
Проверка_ВКВидео(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
#КонецОбласти
#Область Dropbox