1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2024-11-28 09:08:38 +02:00

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

This commit is contained in:
Vitaly the Alpaca 2024-06-21 20:37:00 +00:00 committed by Vitaly the Alpaca (bot)
parent 20eb4be074
commit 9bb404d076
7 changed files with 4283 additions and 3965 deletions

File diff suppressed because it is too large Load Diff

View File

@ -1409,7 +1409,7 @@ EndFunction
//
// Returns:
// Map Of KeyAndValue - Serialized JSON response from VK
Function AddProductToSelection(Val ProductsArray, Val Selection, Val Parameters = "") Export
Function AddProductToCollection(Val ProductsArray, Val Selection, Val Parameters = "") Export
OPI_TypeConversion.GetCollection(ProductsArray);
OPI_TypeConversion.GetLine(Selection);
@ -1922,7 +1922,7 @@ Function ProductManagement(Val ProductDescription, Val ProductID = "", Val Selec
EndIf;
If ValueIsFilled(Selection) And ValueIsFilled(ProductID) Then
AddProductToSelection(ProductID, Selection, Parameters_);
AddProductToCollection(ProductID, Selection, Parameters_);
EndIf;
Return Response;

View File

@ -501,111 +501,20 @@ Procedure VKAPI_GetProductCategories() Export
EndProcedure
Procedure VKAPI_CreateProductSelection() Export
Parameters = GetVKParameters();
TypeMap = Type("Map");
TypeNumber = Type("Number");
Response_ = "response";
Image = OPI_TestDataRetrieval.GetBinary("Picture");
TFN = GetTempFileName("png");
Image.Write(TFN);
TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Picture", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Picture2", TestParameters);
Result = OPI_VK.CreateProductCollection("Test album"
, Image
, True
, False
, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateProductCollection");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип(TypeMap);
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]["albums_count"]).ИмеетТип(TypeNumber).Заполнено();
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]["market_album_id"]).ИмеетТип(TypeNumber).Заполнено();
SelectionID = Result[Response_]["market_album_id"];
Result = OPI_VK.EditProductCollection("EditedCollection", SelectionID, , , , Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "EditProductCollection");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип(TypeMap);
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]).ИмеетТип(TypeNumber).Равно(1);
ImageArray = New Array;
ImageArray.Add(OPI_TestDataRetrieval.GetBinary("Picture"));
ImageArray.Add(OPI_TestDataRetrieval.GetBinary("Picture2"));
Product = New Map();
Product.Insert("Name" , "TestProduct");
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("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, SelectionID, Parameters); // Adding product
OPI_TestDataRetrieval.WriteLog(Result, "AddProduct");
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип(TypeMap);
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]["market_item_id"]).ИмеетТип(TypeNumber).Заполнено();
ProductID = Result[Response_]["market_item_id"];
Product = New Map;
Product.Insert("Name", "EditedTestProduct");
Result = OPI_VK.EditProduct(ProductID, Product, , Parameters); // Change product
OPI_TestDataRetrieval.WriteLog(Result, "EditProduct");
Check_VKTrue(Result);
Result = OPI_VK.AddProductToSelection(ProductID, SelectionID, Parameters); // Adding in selection
OPI_TestDataRetrieval.WriteLog(Result, "AddProductToSelection");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип(TypeMap);
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]).ИмеетТип(TypeNumber).Заполнено();
Result = OPI_VK.RemoveProductFromSelection(ProductID, SelectionID, Parameters); // Deletes from selections
OPI_TestDataRetrieval.WriteLog(Result, "RemoveProductFromSelection");
OPI_Tools.Pause(5);
Check_VKTrue(Result);
Result = OPI_VK.DeleteProduct(ProductID, Parameters); // Deletion product
OPI_TestDataRetrieval.WriteLog(Result, "DeleteProduct");
OPI_Tools.Pause(5);
Check_VKTrue(Result);
Result = OPI_VK.DeleteSelection(SelectionID, Parameters); // Removal selections
OPI_TestDataRetrieval.WriteLog(Result, "DeleteSelection");
OPI_Tools.Pause(5);
Check_VKTrue(Result);
CreateProductCollection(TestParameters);
EditProductCollection(TestParameters);
VK_AddProduct(TestParameters);
VK_EditProduct(TestParameters);
VK_AddProductToCollection(TestParameters);
VK_RemoveProductFromCollection(TestParameters);
VK_DeleteProduct(TestParameters);
VK_DeleteCollection(TestParameters);
DeleteFiles(TFN);
OPI_Tools.Pause(5);
EndProcedure
@ -3622,13 +3531,28 @@ Procedure Check_VKAd(Val Result)
EndProcedure
Procedure Check_VKMessage(Val Result)
Procedure Check_VKNumber(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
OPI_TestDataRetrieval.ExpectsThat(Result["response"]).ИмеетТип("Number").Заполнено();
EndProcedure
Procedure Check_VKCollection(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
OPI_TestDataRetrieval.ExpectsThat(Result["response"]["albums_count"]).ИмеетТип("Number").Заполнено();
OPI_TestDataRetrieval.ExpectsThat(Result["response"]["market_album_id"]).ИмеетТип("Number").Заполнено();
EndProcedure
Procedure Check_VKProduct(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
OPI_TestDataRetrieval.ExpectsThat(Result["response"]["market_item_id"]).ИмеетТип("Number").Заполнено();
EndProcedure
Procedure Check_GKObject(Val Result, Val Name, Val Description)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
@ -5137,7 +5061,7 @@ Procedure VK_WriteMessage(FunctionParameters)
OPI_TestDataRetrieval.WriteLog(Result, "WriteMessage", "VK");
Check_VKMessage(Result);
Check_VKNumber(Result);
EndProcedure
@ -5149,12 +5073,194 @@ Procedure VK_GetProductCategoryList(FunctionParameters)
// END
OPI_TestDataRetrieval.WriteLog(Result, "GetProductCategoryList");
OPI_TestDataRetrieval.WriteLog(Result, "GetProductCategoryList", "VK");
Check_Map(Result);
EndProcedure
Procedure CreateProductCollection(FunctionParameters)
Parameters = GetVKParameters();
Name = "TestCollection";
Image = FunctionParameters["Picture"];
Main = True;
Hidden = False;
Result = OPI_VK.CreateProductCollection(Name
, Image
, Main
, Hidden
, Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "CreateProductCollection", "VK");
Check_VKCollection(Result);
OPI_Tools.Pause(5);
SelectionID = Result["response"]["market_album_id"];
OPI_TestDataRetrieval.WriteParameter("VK_MarketAlbumID", SelectionID);
FunctionParameters.Insert("VK_MarketAlbumID", SelectionID);
EndProcedure
Procedure EditProductCollection(FunctionParameters)
Parameters = GetVKParameters();
Name = "EditedCollection";
Selection = FunctionParameters["VK_MarketAlbumID"];
Result = OPI_VK.EditProductCollection(Name, Selection, , , , Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "EditProductCollection", "VK");
Check_VKTrue(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_AddProduct(FunctionParameters)
Parameters = GetVKParameters();
Image1 = FunctionParameters["Picture"]; // URL, Path to file or binary Data
Image2 = FunctionParameters["Picture2"]; // URL, Path to file or binary Data
Selection = FunctionParameters["VK_MarketAlbumID"];
ImageArray = New Array;
ImageArray.Add(Image1);
ImageArray.Add(Image2);
ProductDescription = New Map();
ProductDescription.Insert("Name" , "TestProduct");
ProductDescription.Insert("Description" , "Product description");
ProductDescription.Insert("Category" , "20173");
ProductDescription.Insert("Price" , 1);
ProductDescription.Insert("OldPrice" , 15);
ProductDescription.Insert("MainPhoto" , Image1);
ProductDescription.Insert("URL" , "https://github.com/Bayselonarrend/OpenIntegrations");
ProductDescription.Insert("AdditionalPhotos" , ImageArray);
ProductDescription.Insert("MainInGroup" , True);
ProductDescription.Insert("Width" , 20);
ProductDescription.Insert("Height" , 30);
ProductDescription.Insert("Depth" , 40);
ProductDescription.Insert("Weight" , 100);
ProductDescription.Insert("SKU" , "12345");
ProductDescription.Insert("AvailableBalance" , "10");
Result = OPI_VK.AddProduct(ProductDescription, Selection, Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "AddProduct", "VK");
Check_VKProduct(Result);
ProductID = Result["response"]["market_item_id"];
OPI_TestDataRetrieval.WriteParameter("VK_MarketItemID", ProductID);
FunctionParameters.Insert("VK_MarketItemID", ProductID);
EndProcedure
Procedure VK_EditProduct(FunctionParameters)
Parameters = GetVKParameters();
Product = FunctionParameters["VK_MarketItemID"];
ProductDescription = New Map;
ProductDescription.Insert("Name", "EditedTestProduct");
Result = OPI_VK.EditProduct(Product, ProductDescription, , Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "EditProduct", "VK");
Check_VKTrue(Result);
EndProcedure
Procedure VK_AddProductToCollection(FunctionParameters)
Parameters = GetVKParameters();
Product = FunctionParameters["VK_MarketItemID"];
Selection = FunctionParameters["VK_MarketAlbumID"];
Result = OPI_VK.AddProductToCollection(Product, Selection, Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "AddProductToCollection", "VK");
Check_VKNumber(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_RemoveProductFromCollection(FunctionParameters)
Parameters = GetVKParameters();
Product = FunctionParameters["VK_MarketItemID"];
Selection = FunctionParameters["VK_MarketAlbumID"];
Result = OPI_VK.RemoveProductFromSelection(Product, Selection, Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "RemoveProductFromSelection", "VK");
Check_VKTrue(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_DeleteProduct(FunctionParameters)
Parameters = GetVKParameters();
Product = FunctionParameters["VK_MarketItemID"];
Result = OPI_VK.DeleteProduct(Product, Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "DeleteProduct", "VK");
Check_VKTrue(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_DeleteCollection(FunctionParameters)
Parameters = GetVKParameters();
Selection = FunctionParameters["VK_MarketAlbumID"];
Result = OPI_VK.DeleteSelection(Selection, Parameters);
// END
OPI_TestDataRetrieval.WriteLog(Result, "DeleteSelection", "VK");
Check_VKTrue(Result);
OPI_Tools.Pause(5);
EndProcedure
#EndRegion
#Region Dropbox

View File

@ -501,111 +501,20 @@ Procedure VKAPI_GetProductCategories() Export
EndProcedure
Procedure VKAPI_CreateProductSelection() Export
Parameters = GetVKParameters();
TypeMap = Type("Map");
TypeNumber = Type("Number");
Response_ = "response";
Image = OPI_TestDataRetrieval.GetBinary("Picture");
TFN = GetTempFileName("png");
Image.Write(TFN);
TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Picture", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Picture2", TestParameters);
Result = OPI_VK.CreateProductCollection("Test album"
, Image
, True
, False
, Parameters);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateProductCollection");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип(TypeMap);
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]["albums_count"]).ИмеетТип(TypeNumber).Заполнено();
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]["market_album_id"]).ИмеетТип(TypeNumber).Заполнено();
SelectionID = Result[Response_]["market_album_id"];
Result = OPI_VK.EditProductCollection("EditedCollection", SelectionID, , , , Parameters);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "EditProductCollection");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип(TypeMap);
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]).ИмеетТип(TypeNumber).Равно(1);
ImageArray = New Array;
ImageArray.Add(OPI_TestDataRetrieval.GetBinary("Picture"));
ImageArray.Add(OPI_TestDataRetrieval.GetBinary("Picture2"));
Product = New Map();
Product.Insert("Name" , "TestProduct");
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("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, SelectionID, Parameters); // Adding product
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "AddProduct");
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип(TypeMap);
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]["market_item_id"]).ИмеетТип(TypeNumber).Заполнено();
ProductID = Result[Response_]["market_item_id"];
Product = New Map;
Product.Insert("Name", "EditedTestProduct");
Result = OPI_VK.EditProduct(ProductID, Product, , Parameters); // Change product
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "EditProduct");
Check_VKTrue(Result);
Result = OPI_VK.AddProductToSelection(ProductID, SelectionID, Parameters); // Adding in selection
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "AddProductToCollection");
OPI_Tools.Pause(5);
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип(TypeMap);
OPI_TestDataRetrieval.ExpectsThat(Result[Response_]).ИмеетТип(TypeNumber).Заполнено();
Result = OPI_VK.RemoveProductFromSelection(ProductID, SelectionID, Parameters); // Deletes from selections
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "RemoveProductFromCollection");
OPI_Tools.Pause(5);
Check_VKTrue(Result);
Result = OPI_VK.DeleteProduct(ProductID, Parameters); // Deletion product
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeleteProduct");
OPI_Tools.Pause(5);
Check_VKTrue(Result);
Result = OPI_VK.DeleteSelection(SelectionID, Parameters); // Removal selections
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeleteCollection");
OPI_Tools.Pause(5);
Check_VKTrue(Result);
CreateProductCollection(TestParameters);
EditProductCollection(TestParameters);
VK_AddProduct(TestParameters);
VK_EditProduct(TestParameters);
VK_AddProductToCollection(TestParameters);
VK_RemoveProductFromCollection(TestParameters);
VK_DeleteProduct(TestParameters);
VK_DeleteCollection(TestParameters);
DeleteFiles(TFN);
OPI_Tools.Pause(5);
EndProcedure
@ -3622,13 +3531,28 @@ Procedure Check_VKAd(Val Result)
EndProcedure
Procedure Check_VKMessage(Val Result)
Procedure Check_VKNumber(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
OPI_TestDataRetrieval.ExpectsThat(Result["response"]).ИмеетТип("Number").Заполнено();
EndProcedure
Procedure Check_VKCollection(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
OPI_TestDataRetrieval.ExpectsThat(Result["response"]["albums_count"]).ИмеетТип("Number").Заполнено();
OPI_TestDataRetrieval.ExpectsThat(Result["response"]["market_album_id"]).ИмеетТип("Number").Заполнено();
EndProcedure
Procedure Check_VKProduct(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
OPI_TestDataRetrieval.ExpectsThat(Result["response"]["market_item_id"]).ИмеетТип("Number").Заполнено();
EndProcedure
Procedure Check_GKObject(Val Result, Val Name, Val Description)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Map");
@ -5137,7 +5061,7 @@ Procedure VK_WriteMessage(FunctionParameters)
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "SendMessage", "VK");
Check_VKMessage(Result);
Check_VKNumber(Result);
EndProcedure
@ -5149,12 +5073,194 @@ Procedure VK_GetProductCategoryList(FunctionParameters)
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetProductCategoryList");
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetProductCategoryList", "VK");
Check_Map(Result);
EndProcedure
Procedure CreateProductCollection(FunctionParameters)
Parameters = GetVKParameters();
Name = "TestCollection";
Image = FunctionParameters["Picture"];
Main = True;
Hidden = False;
Result = OPI_VK.CreateProductCollection(Name
, Image
, Main
, Hidden
, Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateProductCollection", "VK");
Check_VKCollection(Result);
OPI_Tools.Pause(5);
SelectionID = Result["response"]["market_album_id"];
OPI_TestDataRetrieval.WriteParameter("VK_MarketAlbumID", SelectionID);
FunctionParameters.Insert("VK_MarketAlbumID", SelectionID);
EndProcedure
Procedure EditProductCollection(FunctionParameters)
Parameters = GetVKParameters();
Name = "EditedCollection";
Selection = FunctionParameters["VK_MarketAlbumID"];
Result = OPI_VK.EditProductCollection(Name, Selection, , , , Parameters);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "EditProductCollection", "VK");
Check_VKTrue(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_AddProduct(FunctionParameters)
Parameters = GetVKParameters();
Image1 = FunctionParameters["Picture"]; // URL, Path to file or binary Data
Image2 = FunctionParameters["Picture2"]; // URL, Path to file or binary Data
Selection = FunctionParameters["VK_MarketAlbumID"];
ImageArray = New Array;
ImageArray.Add(Image1);
ImageArray.Add(Image2);
ProductDescription = New Map();
ProductDescription.Insert("Name" , "TestProduct");
ProductDescription.Insert("Description" , "Product description");
ProductDescription.Insert("Category" , "20173");
ProductDescription.Insert("Price" , 1);
ProductDescription.Insert("OldPrice" , 15);
ProductDescription.Insert("MainPhoto" , Image1);
ProductDescription.Insert("URL" , "https://github.com/Bayselonarrend/OpenIntegrations");
ProductDescription.Insert("AdditionalPhotos" , ImageArray);
ProductDescription.Insert("MainInGroup" , True);
ProductDescription.Insert("Width" , 20);
ProductDescription.Insert("Height" , 30);
ProductDescription.Insert("Depth" , 40);
ProductDescription.Insert("Weight" , 100);
ProductDescription.Insert("SKU" , "12345");
ProductDescription.Insert("AvailableBalance" , "10");
Result = OPI_VK.AddProduct(ProductDescription, Selection, Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "AddProduct", "VK");
Check_VKProduct(Result);
ProductID = Result["response"]["market_item_id"];
OPI_TestDataRetrieval.WriteParameter("VK_MarketItemID", ProductID);
FunctionParameters.Insert("VK_MarketItemID", ProductID);
EndProcedure
Procedure VK_EditProduct(FunctionParameters)
Parameters = GetVKParameters();
Product = FunctionParameters["VK_MarketItemID"];
ProductDescription = New Map;
ProductDescription.Insert("Name", "EditedTestProduct");
Result = OPI_VK.EditProduct(Product, ProductDescription, , Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "EditProduct", "VK");
Check_VKTrue(Result);
EndProcedure
Procedure VK_AddProductToCollection(FunctionParameters)
Parameters = GetVKParameters();
Product = FunctionParameters["VK_MarketItemID"];
Selection = FunctionParameters["VK_MarketAlbumID"];
Result = OPI_VK.AddProductToCollection(Product, Selection, Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "AddProductToCollection", "VK");
Check_VKNumber(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_RemoveProductFromCollection(FunctionParameters)
Parameters = GetVKParameters();
Product = FunctionParameters["VK_MarketItemID"];
Selection = FunctionParameters["VK_MarketAlbumID"];
Result = OPI_VK.RemoveProductFromSelection(Product, Selection, Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "RemoveProductFromCollection", "VK");
Check_VKTrue(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_DeleteProduct(FunctionParameters)
Parameters = GetVKParameters();
Product = FunctionParameters["VK_MarketItemID"];
Result = OPI_VK.DeleteProduct(Product, Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeleteProduct", "VK");
Check_VKTrue(Result);
OPI_Tools.Pause(5);
EndProcedure
Procedure VK_DeleteCollection(FunctionParameters)
Parameters = GetVKParameters();
Selection = FunctionParameters["VK_MarketAlbumID"];
Result = OPI_VK.DeleteSelection(Selection, Parameters);
// END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeleteCollection", "VK");
Check_VKTrue(Result);
OPI_Tools.Pause(5);
EndProcedure
#EndRegion
#Region Dropbox

View File

@ -1409,7 +1409,7 @@ EndFunction
//
// Returns:
// Map Of KeyAndValue - Serialized JSON response from VK
Function AddProductToSelection(Val ProductsArray, Val Selection, Val Parameters = "") Export
Function AddProductToCollection(Val ProductsArray, Val Selection, Val Parameters = "") Export
OPI_TypeConversion.GetCollection(ProductsArray);
OPI_TypeConversion.GetLine(Selection);
@ -1922,7 +1922,7 @@ Function ProductManagement(Val ProductDescription, Val ProductID = "", Val Selec
EndIf;
If ValueIsFilled(Selection) And ValueIsFilled(ProductID) Then
AddProductToSelection(ProductID, Selection, Parameters_);
AddProductToCollection(ProductID, Selection, Parameters_);
EndIf;
Return Response;

View File

@ -1607,8 +1607,8 @@
NewLine = CompositionTable.Add();
NewLine.Библиотека = "vk";
NewLine.Модуль = "OPI_VK";
NewLine.Метод = "AddProductToSelection";
NewLine.МетодПоиска = "ADDPRODUCTTOSELECTION";
NewLine.Метод = "AddProductToCollection";
NewLine.МетодПоиска = "ADDPRODUCTTOCOLLECTION";
NewLine.Параметр = "--items";
NewLine.Описание = "Array of products or product";
NewLine.Область = "Product selection management";
@ -1627,8 +1627,8 @@
NewLine = CompositionTable.Add();
NewLine.Библиотека = "vk";
NewLine.Модуль = "OPI_VK";
NewLine.Метод = "AddProductToSelection";
NewLine.МетодПоиска = "ADDPRODUCTTOSELECTION";
NewLine.Метод = "AddProductToCollection";
NewLine.МетодПоиска = "ADDPRODUCTTOCOLLECTION";
NewLine.Параметр = "--sel";
NewLine.Описание = "Selection ID";
NewLine.Область = "Product selection management";
@ -1637,8 +1637,8 @@
NewLine = CompositionTable.Add();
NewLine.Библиотека = "vk";
NewLine.Модуль = "OPI_VK";
NewLine.Метод = "AddProductToSelection";
NewLine.МетодПоиска = "ADDPRODUCTTOSELECTION";
NewLine.Метод = "AddProductToCollection";
NewLine.МетодПоиска = "ADDPRODUCTTOCOLLECTION";
NewLine.Параметр = "--auth";
NewLine.Описание = "Authorization JSON or path to .json (optional, def. val. - Empty)";
NewLine.Область = "Product selection management";

View File

@ -501,111 +501,20 @@
КонецПроцедуры
Процедура ВК_СоздатьТоварПодборку() Экспорт
Параметры = ПолучитьПараметрыВК();
ТипСоответствие = Тип("Соответствие");
ТипЧисло = Тип("Число");
Response_ = "response";
Картинка = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture");
ИВФ = ПолучитьИмяВременногоФайла("png");
Картинка.Записать(ИВФ);
ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture2", ПараметрыТеста);
Результат = OPI_VK.СоздатьПодборкуТоваров("Test album"
, Картинка
, Истина
, Ложь
, Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьПодборкуТоваров");
OPI_Инструменты.Пауза(5);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип(ТипСоответствие);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат[Response_]["albums_count"]).ИмеетТип(ТипЧисло).Заполнено();
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат[Response_]["market_album_id"]).ИмеетТип(ТипЧисло).Заполнено();
ИДПодборки = Результат[Response_]["market_album_id"];
Результат = OPI_VK.ИзменитьПодборкуТоваров("Измененная подборка", ИДПодборки, , , , Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьПодборкуТоваров");
OPI_Инструменты.Пауза(5);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип(ТипСоответствие);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат[Response_]).ИмеетТип(ТипЧисло).Равно(1);
МассивКартинок = Новый Массив;
МассивКартинок.Добавить(OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture"));
МассивКартинок.Добавить(OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture2"));
Товар = Новый Соответствие();
Товар.Вставить("Имя" , "Тестовый товар");
Товар.Вставить("Описание" , "Описание товара");
Товар.Вставить("Категория" , "20173");
Товар.Вставить("Цена" , 1);
Товар.Вставить("СтараяЦена" , 15);
Товар.Вставить("ОсновноеФото" , Картинка);
Товар.Вставить("URL" , "https://github.com/Bayselonarrend/OpenIntegrations");
Товар.Вставить("ДополнительныеФото" , МассивКартинок);
Товар.Вставить("ГлавныйВГруппе" , Истина);
Товар.Вставить("Ширина" , 20);
Товар.Вставить("Высота" , 30);
Товар.Вставить("Глубина" , 40);
Товар.Вставить("Вес" , 100);
Товар.Вставить("SKU" , "12345");
Товар.Вставить("ДоступныйОстаток" , "10");
Результат = OPI_VK.ДобавитьТовар(Товар, ИДПодборки, Параметры); // Добавление товара
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ДобавитьТовар");
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип(ТипСоответствие);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат[Response_]["market_item_id"]).ИмеетТип(ТипЧисло).Заполнено();
ИДТовара = Результат[Response_]["market_item_id"];
Товар = Новый Соответствие;
Товар.Вставить("Имя", "Тестовый товар измененный");
Результат = OPI_VK.ИзменитьТовар(ИДТовара, Товар, , Параметры); // Изменение товара
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьТовар");
Проверка_ВКИстина(Результат);
Результат = OPI_VK.ДобавитьТоварВПодборку(ИДТовара, ИДПодборки, Параметры); // Добавление в подборку
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ДобавитьТоварВПодборку");
OPI_Инструменты.Пауза(5);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип(ТипСоответствие);
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат[Response_]).ИмеетТип(ТипЧисло).Заполнено();
Результат = OPI_VK.УдалитьТоварИзПодборки(ИДТовара, ИДПодборки, Параметры); // Удаляет из подборки
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьТоварИзПодборки");
OPI_Инструменты.Пауза(5);
Проверка_ВКИстина(Результат);
Результат = OPI_VK.УдалитьТовар(ИДТовара, Параметры); // Удаление товара
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьТовар");
OPI_Инструменты.Пауза(5);
Проверка_ВКИстина(Результат);
Результат = OPI_VK.УдалитьПодборку(ИДПодборки, Параметры); // Уадление подборки
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьПодборку");
OPI_Инструменты.Пауза(5);
Проверка_ВКИстина(Результат);
VK_СоздатьПодборкуТоваров(ПараметрыТеста);
VK_ИзменитьПодборкуТоваров(ПараметрыТеста);
VK_ДобавитьТовар(ПараметрыТеста);
VK_ИзменитьТовар(ПараметрыТеста);
VK_ДобавитьТоварВПодборку(ПараметрыТеста);
VK_УдалитьТоварИзПодборки(ПараметрыТеста);
VK_УдалитьТовар(ПараметрыТеста);
VK_УдалитьПодборку(ПараметрыТеста);
УдалитьФайлы(ИВФ);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
@ -3622,13 +3531,28 @@
КонецПроцедуры
Процедура Проверка_ВКСообщение(Знач Результат)
Процедура Проверка_ВКЧисло(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие");
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["response"]).ИмеетТип("Число").Заполнено();
КонецПроцедуры
Процедура Проверка_ВКПодборка(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие");
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["response"]["albums_count"]).ИмеетТип("Число").Заполнено();
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["response"]["market_album_id"]).ИмеетТип("Число").Заполнено();
КонецПроцедуры
Процедура Проверка_ВКТовар(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие");
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["response"]["market_item_id"]).ИмеетТип("Число").Заполнено();
КонецПроцедуры
Процедура Проверка_ГКОбъект(Знач Результат, Знач Наименование, Знач Описание)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие");
@ -5137,7 +5061,7 @@
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "НаписатьСообщение", "VK");
Проверка_ВКСообщение(Результат);
Проверка_ВКЧисло(Результат);
КонецПроцедуры
@ -5149,12 +5073,194 @@
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокКатегорийТоваров");
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокКатегорийТоваров", "VK");
Проверка_Соответствие(Результат);
КонецПроцедуры
Процедура VK_СоздатьПодборкуТоваров(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Название = "Тестовая подборка";
Картинка = ПараметрыФункции["Picture"];
Основная = Истина;
Скрытая = Ложь;
Результат = OPI_VK.СоздатьПодборкуТоваров(Название
, Картинка
, Основная
, Скрытая
, Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьПодборкуТоваров", "VK");
Проверка_ВКПодборка(Результат);
OPI_Инструменты.Пауза(5);
ИДПодборки = Результат["response"]["market_album_id"];
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("VK_MarketAlbumID", ИДПодборки);
ПараметрыФункции.Вставить("VK_MarketAlbumID", ИДПодборки);
КонецПроцедуры
Процедура VK_ИзменитьПодборкуТоваров(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Название = "Измененная подборка";
Подборка = ПараметрыФункции["VK_MarketAlbumID"];
Результат = OPI_VK.ИзменитьПодборкуТоваров(Название, Подборка, , , , Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьПодборкуТоваров", "VK");
Проверка_ВКИстина(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
Процедура VK_ДобавитьТовар(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Картинка1 = ПараметрыФункции["Picture"]; // URL, Путь к файлу или двоичные данные
Картинка2 = ПараметрыФункции["Picture2"]; // URL, Путь к файлу или двоичные данные
Подборка = ПараметрыФункции["VK_MarketAlbumID"];
МассивКартинок = Новый Массив;
МассивКартинок.Добавить(Картинка1);
МассивКартинок.Добавить(Картинка2);
ОписаниеТовара = Новый Соответствие();
ОписаниеТовара.Вставить("Имя" , "Тестовый товар");
ОписаниеТовара.Вставить("Описание" , "Описание товара");
ОписаниеТовара.Вставить("Категория" , "20173");
ОписаниеТовара.Вставить("Цена" , 1);
ОписаниеТовара.Вставить("СтараяЦена" , 15);
ОписаниеТовара.Вставить("ОсновноеФото" , Картинка1);
ОписаниеТовара.Вставить("URL" , "https://github.com/Bayselonarrend/OpenIntegrations");
ОписаниеТовара.Вставить("ДополнительныеФото" , МассивКартинок);
ОписаниеТовара.Вставить("ГлавныйВГруппе" , Истина);
ОписаниеТовара.Вставить("Ширина" , 20);
ОписаниеТовара.Вставить("Высота" , 30);
ОписаниеТовара.Вставить("Глубина" , 40);
ОписаниеТовара.Вставить("Вес" , 100);
ОписаниеТовара.Вставить("SKU" , "12345");
ОписаниеТовара.Вставить("ДоступныйОстаток" , "10");
Результат = OPI_VK.ДобавитьТовар(ОписаниеТовара, Подборка, Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ДобавитьТовар", "VK");
Проверка_ВКТовар(Результат);
ИДТовара = Результат["response"]["market_item_id"];
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("VK_MarketItemID", ИДТовара);
ПараметрыФункции.Вставить("VK_MarketItemID", ИДТовара);
КонецПроцедуры
Процедура VK_ИзменитьТовар(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Товар = ПараметрыФункции["VK_MarketItemID"];
ОписаниеТовара = Новый Соответствие;
ОписаниеТовара.Вставить("Имя", "Тестовый товар измененный");
Результат = OPI_VK.ИзменитьТовар(Товар, ОписаниеТовара, , Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьТовар", "VK");
Проверка_ВКИстина(Результат);
КонецПроцедуры
Процедура VK_ДобавитьТоварВПодборку(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Товар = ПараметрыФункции["VK_MarketItemID"];
Подборка = ПараметрыФункции["VK_MarketAlbumID"];
Результат = OPI_VK.ДобавитьТоварВПодборку(Товар, Подборка, Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ДобавитьТоварВПодборку", "VK");
Проверка_ВКЧисло(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
Процедура VK_УдалитьТоварИзПодборки(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Товар = ПараметрыФункции["VK_MarketItemID"];
Подборка = ПараметрыФункции["VK_MarketAlbumID"];
Результат = OPI_VK.УдалитьТоварИзПодборки(Товар, Подборка, Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьТоварИзПодборки", "VK");
Проверка_ВКИстина(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
Процедура VK_УдалитьТовар(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Товар = ПараметрыФункции["VK_MarketItemID"];
Результат = OPI_VK.УдалитьТовар(Товар, Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьТовар", "VK");
Проверка_ВКИстина(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
Процедура VK_УдалитьПодборку(ПараметрыФункции)
Параметры = ПолучитьПараметрыВК();
Подборка = ПараметрыФункции["VK_MarketAlbumID"];
Результат = OPI_VK.УдалитьПодборку(Подборка, Параметры);
// END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьПодборку", "VK");
Проверка_ВКИстина(Результат);
OPI_Инструменты.Пауза(5);
КонецПроцедуры
#КонецОбласти
#Область Dropbox