Доработка тестов ВК

src/ru/OPI/src/CommonModules/OPI_Тесты/Module.bsl

@@ -545,124 +545,42 @@
 
 Процедура ВК_ПолучитьСписокТоваров() Экспорт
  
-    Параметры = ПолучитьПараметрыВК();
+    ПараметрыТеста = Новый Структура;
-    Картинка  = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture"); 
     
-    МассивКартинок = Новый Массив;
+    VK_ПолучитьСписокТоваров(ПараметрыТеста);
-    МассивКартинок.Добавить(Картинка);
-    
-    Товар = Новый Соответствие();
-    Товар.Вставить("Имя"                , "Тестовый товар 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.ПолучитьСписокТоваров(, Параметры);
-    
-    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокТоваров");
-    
-    OPI_Инструменты.Пауза(5);
-    
-    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат) 
-        .ИмеетТип("Массив").Заполнено();
-              
-    OPI_VK.УдалитьТовар(ИДТовара, Параметры);
-    
-    OPI_Инструменты.Пауза(5);
     
 КонецПроцедуры
 
 Процедура ВК_ПолучитьСписокПодборок() Экспорт
      
-    Параметры = ПолучитьПараметрыВК();
+    ПараметрыТеста = Новый Структура;
-    Картинка  = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture");    
-    Результат = OPI_VK.СоздатьПодборкуТоваров("Тестовая подборка"
-        , Картинка
-        , Истина
-        , Ложь
-        , Параметры); 
     
-    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьПодборкуТоваров");
+    VK_ПолучитьСписокПодборок(ПараметрыТеста);
-       
-    ИДПодборки = Результат["response"]["market_album_id"];      
-    Результат  = OPI_VK.ПолучитьСписокПодборок(Параметры);
-    
-    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокПодборок");
-    
-    OPI_Инструменты.Пауза(5);
-    
-    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат) 
-        .ИмеетТип("Массив").Заполнено();
-        
-    OPI_VK.УдалитьПодборку(ИДПодборки, Параметры); 
-    
-    OPI_Инструменты.Пауза(5);
     
 КонецПроцедуры
 
 Процедура ВК_ПолучитьСписокСвойств() Экспорт
  
-    Параметры  = ПолучитьПараметрыВК();
+    ПараметрыТеста = Новый Структура;
-    Результат  = OPI_VK.ПолучитьСписокСвойств(Параметры);
     
-    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокСвойств");
+    VK_ПолучитьСписокСвойств(ПараметрыТеста);
-    
-    OPI_Инструменты.Пауза(5);
-    
-    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат) 
-        .ИмеетТип("Массив").Заполнено();
-        
-    OPI_Инструменты.Пауза(5);
 
 КонецПроцедуры
 
 Процедура ВК_ПолучитьСписокЗаказов() Экспорт
  
-    Параметры  = ПолучитьПараметрыВК();
+    ПараметрыТеста = Новый Структура;
-    Результат  = OPI_VK.ПолучитьСписокЗаказов(Параметры);
     
-    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокЗаказов");
+    VK_ПолучитьСписокЗаказов(ПараметрыТеста);
-    
-    OPI_Инструменты.Пауза(5);
-    
-    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат) 
-        .ИмеетТип("Массив").Заполнено();
-        
-    OPI_Инструменты.Пауза(5);
     
 КонецПроцедуры
 
 Процедура ВК_ЗагрузитьВидео() Экспорт
     
-    Параметры    = ПолучитьПараметрыВК();
+    ПараметрыТеста = Новый Структура;
-    Видео        = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Video");
+    OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Video", ПараметрыТеста);
-    Наименование = "Новое видео";
-    Описание     = "Описание видео";
     
-    Результат = OPI_VK.ЗагрузитьВидеоНаСервер(Видео, Наименование, Описание, , Параметры);
+    VK_ЗагрузитьВидеоНаСервер(ПараметрыТеста);
-    
-    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗагрузитьВидеоНаСервер");
-    
-    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["video_id"]).Заполнено();
-    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["video_hash"]).Заполнено();
-    
-    OPI_Инструменты.Пауза(5);
     
 КонецПроцедуры
 
@@ -3444,6 +3362,13 @@
         
 КонецПроцедуры
 
+Процедура Проверка_ВКВидео(Знач Результат)
+
+    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["video_id"]).Заполнено();
+    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["video_hash"]).Заполнено();
+        
+КонецПроцедуры
+
 Процедура Проверка_ГКОбъект(Знач Результат, Знач Наименование, Знач Описание)
     
     OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие");
@@ -5388,6 +5313,82 @@
         
 КонецПроцедуры
 
+Процедура VK_ПолучитьСписокТоваров(ПараметрыФункции)
+
+    Параметры = ПолучитьПараметрыВК();    
+    Результат = OPI_VK.ПолучитьСписокТоваров(, Параметры);
+    
+    // END
+    
+    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокТоваров", "VK");
+    
+    Проверка_Массив(Результат);
+    OPI_Инструменты.Пауза(5);
+        
+КонецПроцедуры
+
+Процедура VK_ПолучитьСписокПодборок(ПараметрыФункции)
+
+    Параметры = ПолучитьПараметрыВК();    
+    Результат = OPI_VK.ПолучитьСписокПодборок(Параметры);
+    
+    // END
+    
+    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокПодборок", "VK");
+    
+    Проверка_Массив(Результат);
+    OPI_Инструменты.Пауза(5);
+        
+КонецПроцедуры
+
+Процедура VK_ПолучитьСписокСвойств(ПараметрыФункции)
+
+    Параметры  = ПолучитьПараметрыВК(); 
+    Результат  = OPI_VK.ПолучитьСписокСвойств(Параметры);
+    
+    // END
+    
+    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокСвойств", "VK");
+    
+    Проверка_Массив(Результат);
+    OPI_Инструменты.Пауза(5);
+        
+КонецПроцедуры
+
+Процедура VK_ПолучитьСписокЗаказов(ПараметрыФункции)
+
+    Параметры  = ПолучитьПараметрыВК();
+    Результат  = OPI_VK.ПолучитьСписокЗаказов(Параметры);
+    
+    // END
+    
+    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокЗаказов", "VK");
+    
+    Проверка_Массив(Результат);
+    OPI_Инструменты.Пауза(5);
+        
+КонецПроцедуры
+
+Процедура VK_ЗагрузитьВидеоНаСервер(ПараметрыФункции)
+    
+    Параметры    = ПолучитьПараметрыВК();
+    
+    Видео        = ПараметрыФункции["Video"];
+    Наименование = "Новое видео";
+    Описание     = "Описание видео";
+    
+    Результат = OPI_VK.ЗагрузитьВидеоНаСервер(Видео, Наименование, Описание, , Параметры);
+    
+    // END
+    
+    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗагрузитьВидеоНаСервер", "VK");
+    
+    Проверка_ВКВидео(Результат);
+    
+    OPI_Инструменты.Пауза(5);
+    
+КонецПроцедуры
+
 #КонецОбласти
 
 #Область Dropbox