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

Main build (Jenkins)

This commit is contained in:
Vitaly the Alpaca (bot) 2024-09-26 11:53:13 +03:00
parent d2f1d57e23
commit a848bbd122
5 changed files with 4792 additions and 4837 deletions

File diff suppressed because it is too large Load Diff

View File

@ -5685,18 +5685,13 @@ Procedure Twitter_CreateImageTweet(FunctionParameters)
Image = OPI_Tools.Get(Image); Image = OPI_Tools.Get(Image);
TFN = GetTempFileName();
Image.Write(TFN);
Text = "TestTweet" + String(New UUID); Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateImageTweet(Text, TFN, Parameters); Result = OPI_Twitter.CreateImageTweet(Text, Image, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateImageTweet (TFN)"); OPI_TestDataRetrieval.WriteLog(Result, "CreateImageTweet (TFN)");
OPI_TestDataRetrieval.Check_TwitterText(Result, Text); OPI_TestDataRetrieval.Check_TwitterText(Result, Text);
OPI_Tools.Pause(15); OPI_Tools.Pause(15);
DeleteFiles(TFN);
OPI_Tools.Pause(20); OPI_Tools.Pause(20);
EndProcedure EndProcedure
@ -5730,18 +5725,13 @@ Procedure Twitter_CreateVideoTweet(FunctionParameters)
Video = OPI_Tools.Get(Video); Video = OPI_Tools.Get(Video);
TFN = GetTempFileName();
Video.Write(TFN);
Text = "TestTweet" + String(New UUID); Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateVideoTweet(Text, TFN, Parameters); Result = OPI_Twitter.CreateVideoTweet(Text, Video, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateVideoTweet (TFN)"); OPI_TestDataRetrieval.WriteLog(Result, "CreateVideoTweet (TFN)");
OPI_TestDataRetrieval.Check_TwitterText(Result, Text); OPI_TestDataRetrieval.Check_TwitterText(Result, Text);
OPI_Tools.Pause(15); OPI_Tools.Pause(15);
DeleteFiles(TFN);
OPI_Tools.Pause(20); OPI_Tools.Pause(20);
EndProcedure EndProcedure
@ -5775,18 +5765,13 @@ Procedure Twitter_CreateGifTweet(FunctionParameters)
GIF = OPI_Tools.Get(GIF); GIF = OPI_Tools.Get(GIF);
TFN = GetTempFileName();
GIF.Write(TFN);
Text = "TestTweet" + String(New UUID); Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateGifTweet(Text, TFN, Parameters); Result = OPI_Twitter.CreateGifTweet(Text, GIF, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateGifTweet (TFN)"); OPI_TestDataRetrieval.WriteLog(Result, "CreateGifTweet (TFN)");
OPI_TestDataRetrieval.Check_TwitterText(Result, Text); OPI_TestDataRetrieval.Check_TwitterText(Result, Text);
OPI_Tools.Pause(15); OPI_Tools.Pause(15);
DeleteFiles(TFN);
OPI_Tools.Pause(20); OPI_Tools.Pause(20);
EndProcedure EndProcedure

View File

@ -5685,18 +5685,13 @@ Procedure Twitter_CreateImageTweet(FunctionParameters)
Image = OPI_Tools.Get(Image); Image = OPI_Tools.Get(Image);
TFN = GetTempFileName();
Image.Write(TFN);
Text = "TestTweet" + String(New UUID); Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateImageTweet(Text, TFN, Parameters); Result = OPI_Twitter.CreateImageTweet(Text, Image, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateImageTweet (TFN)"); OPI_TestDataRetrieval.WriteLog(Result, "CreateImageTweet (TFN)");
OPI_TestDataRetrieval.Check_TwitterText(Result, Text); OPI_TestDataRetrieval.Check_TwitterText(Result, Text);
OPI_Tools.Pause(15); OPI_Tools.Pause(15);
DeleteFiles(TFN);
OPI_Tools.Pause(20); OPI_Tools.Pause(20);
EndProcedure EndProcedure
@ -5730,18 +5725,13 @@ Procedure Twitter_CreateVideoTweet(FunctionParameters)
Video = OPI_Tools.Get(Video); Video = OPI_Tools.Get(Video);
TFN = GetTempFileName();
Video.Write(TFN);
Text = "TestTweet" + String(New UUID); Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateVideoTweet(Text, TFN, Parameters); Result = OPI_Twitter.CreateVideoTweet(Text, Video, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateVideoTweet (TFN)"); OPI_TestDataRetrieval.WriteLog(Result, "CreateVideoTweet (TFN)");
OPI_TestDataRetrieval.Check_TwitterText(Result, Text); OPI_TestDataRetrieval.Check_TwitterText(Result, Text);
OPI_Tools.Pause(15); OPI_Tools.Pause(15);
DeleteFiles(TFN);
OPI_Tools.Pause(20); OPI_Tools.Pause(20);
EndProcedure EndProcedure
@ -5775,18 +5765,13 @@ Procedure Twitter_CreateGifTweet(FunctionParameters)
GIF = OPI_Tools.Get(GIF); GIF = OPI_Tools.Get(GIF);
TFN = GetTempFileName();
GIF.Write(TFN);
Text = "TestTweet" + String(New UUID); Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateGifTweet(Text, TFN, Parameters); Result = OPI_Twitter.CreateGifTweet(Text, GIF, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateGifTweet (TFN)"); OPI_TestDataRetrieval.WriteLog(Result, "CreateGifTweet (TFN)");
OPI_TestDataRetrieval.Check_TwitterText(Result, Text); OPI_TestDataRetrieval.Check_TwitterText(Result, Text);
OPI_Tools.Pause(15); OPI_Tools.Pause(15);
DeleteFiles(TFN);
OPI_Tools.Pause(20); OPI_Tools.Pause(20);
EndProcedure EndProcedure

View File

@ -5685,18 +5685,13 @@
Картинка = OPI_Инструменты.Get(Картинка); Картинка = OPI_Инструменты.Get(Картинка);
ИВФ = ПолучитьИмяВременногоФайла();
Картинка.Записать(ИВФ);
Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор); Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Twitter.СоздатьТвитКартинки(Текст, ИВФ, Параметры); Результат = OPI_Twitter.СоздатьТвитКартинки(Текст, Картинка, Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитКартинки (ИВФ)"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитКартинки (ИВФ)");
OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст); OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст);
OPI_Инструменты.Пауза(15); OPI_Инструменты.Пауза(15);
УдалитьФайлы(ИВФ);
OPI_Инструменты.Пауза(20); OPI_Инструменты.Пауза(20);
КонецПроцедуры КонецПроцедуры
@ -5730,18 +5725,13 @@
Видео = OPI_Инструменты.Get(Видео); Видео = OPI_Инструменты.Get(Видео);
ИВФ = ПолучитьИмяВременногоФайла();
Видео.Записать(ИВФ);
Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор); Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Twitter.СоздатьТвитВидео(Текст, ИВФ, Параметры); Результат = OPI_Twitter.СоздатьТвитВидео(Текст, Видео, Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитВидео (ИВФ)"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитВидео (ИВФ)");
OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст); OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст);
OPI_Инструменты.Пауза(15); OPI_Инструменты.Пауза(15);
УдалитьФайлы(ИВФ);
OPI_Инструменты.Пауза(20); OPI_Инструменты.Пауза(20);
КонецПроцедуры КонецПроцедуры
@ -5775,18 +5765,13 @@
Гифка = OPI_Инструменты.Get(Гифка); Гифка = OPI_Инструменты.Get(Гифка);
ИВФ = ПолучитьИмяВременногоФайла();
Гифка.Записать(ИВФ);
Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор); Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Twitter.СоздатьТвитГифки(Текст, ИВФ, Параметры); Результат = OPI_Twitter.СоздатьТвитГифки(Текст, Гифка, Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитГифки (ИВФ)"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитГифки (ИВФ)");
OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст); OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст);
OPI_Инструменты.Пауза(15); OPI_Инструменты.Пауза(15);
УдалитьФайлы(ИВФ);
OPI_Инструменты.Пауза(20); OPI_Инструменты.Пауза(20);
КонецПроцедуры КонецПроцедуры

View File

@ -5723,7 +5723,7 @@
OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст); OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст);
OPI_Инструменты.Пауза(15); OPI_Инструменты.Пауза(15);
Видео = OPI_Инструменты.Get(Видео); Видео = OPI_Инструменты.Get(Видео);
Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор); Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Twitter.СоздатьТвитВидео(Текст, Видео, Параметры); Результат = OPI_Twitter.СоздатьТвитВидео(Текст, Видео, Параметры);
@ -5763,7 +5763,7 @@
OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст); OPI_ПолучениеДанныхТестов.Проверка_ТвиттерТекст(Результат, Текст);
OPI_Инструменты.Пауза(15); OPI_Инструменты.Пауза(15);
Гифка = OPI_Инструменты.Get(Гифка); Гифка = OPI_Инструменты.Get(Гифка);
Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор); Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Twitter.СоздатьТвитГифки(Текст, Гифка, Параметры); Результат = OPI_Twitter.СоздатьТвитГифки(Текст, Гифка, Параметры);