1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-08-13 20:05:19 +02:00
Code Issues Releases Activity

Форматирование

Browse Source
This commit is contained in:
Anton
2024-07-27 17:50:12 +03:00
parent a7ff9f1662
commit 337367c792
48 changed files with 2006 additions and 2000 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
.github/workflows/os/format.os vendored
View File

@@ -23,6 +23,7 @@
КонецЦикла; КонецЦикла;
ТекстФайла = СтрСоединить(БлокиКода, ""); ТекстФайла = СтрСоединить(БлокиКода, "");
ТекстФайла = СтрЗаменить(ТекстФайла, Символы.Таб, " ");
ТекстовыйДокумент.УстановитьТекст(ТекстФайла); ТекстовыйДокумент.УстановитьТекст(ТекстФайла);
ТекстовыйДокумент.Записать(ПутьКМодулю); ТекстовыйДокумент.Записать(ПутьКМодулю);

74
src/en/OInt/core/Modules/OPI_Bitrix24.os
View File

@@ -141,10 +141,10 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function ServerTime(Val URL, Val Token = "") Export Function ServerTime(Val URL, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "server.time"); Parameters = NormalizeAuth(URL, Token, "server.time");
Response = OPI_Tools.Get(URL, Parameters); Response = OPI_Tools.Get(URL, Parameters);
Return Response; Return Response;
EndFunction EndFunction
@@ -170,12 +170,12 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function CreatePost(Val URL Function CreatePost(Val URL
, Val Text , Val Text
, Val Visibility = "UA" , Val Visibility = "UA"
, Val Files = "" , Val Files = ""
, Val Title = "" , Val Title = ""
, Val Important = False , Val Important = False
, Val Token = "") Export , Val Token = "") Export
MakeBoolean(Important); MakeBoolean(Important);
@@ -1015,9 +1015,9 @@ Function GetTasksFilterStructure(Val Clear = False) Export
, "<status for sorting. Similar to REAL_STATUS, but has three additional meta-statuses>"); , "<status for sorting. Similar to REAL_STATUS, but has three additional meta-statuses>");
If Clear Then If Clear Then
For Each Filter In FilterStructure Do For Each Filter In FilterStructure Do
Filter.Value = ""; Filter.Value = "";
EndDo; EndDo;
EndIf; EndIf;
//@skip-check constructor-function-return-section //@skip-check constructor-function-return-section
@@ -1367,7 +1367,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function GetResultsList(Val URL, Val TaskID, Val Token = "") Export Function GetResultsList(Val URL, Val TaskID, Val Token = "") Export
Response = ManageTask(URL, TaskID, "tasks.task.result.list", Token); Response = ManageTask(URL, TaskID, "tasks.task.result.list", Token);
Return Response; Return Response;
EndFunction EndFunction
@@ -1387,7 +1387,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function CreateResultFromComment(Val URL, Val CommentID, Val Token = "") Export Function CreateResultFromComment(Val URL, Val CommentID, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "tasks.task.result.addFromComment"); Parameters = NormalizeAuth(URL, Token, "tasks.task.result.addFromComment");
OPI_Tools.AddField("commentId", CommentID, "String", Parameters); OPI_Tools.AddField("commentId", CommentID, "String", Parameters);
Response = OPI_Tools.Post(URL, Parameters); Response = OPI_Tools.Post(URL, Parameters);
@@ -1411,7 +1411,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function DeleteResultFromComment(Val URL, Val CommentID, Val Token = "") Export Function DeleteResultFromComment(Val URL, Val CommentID, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "tasks.task.result.deleteFromComment"); Parameters = NormalizeAuth(URL, Token, "tasks.task.result.deleteFromComment");
OPI_Tools.AddField("commentId", CommentID, "String", Parameters); OPI_Tools.AddField("commentId", CommentID, "String", Parameters);
Response = OPI_Tools.Post(URL, Parameters); Response = OPI_Tools.Post(URL, Parameters);
@@ -1864,7 +1864,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function GetAppSotrage(Val URL, Val Token = "") Export Function GetAppSotrage(Val URL, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "disk.storage.getforapp"); Parameters = NormalizeAuth(URL, Token, "disk.storage.getforapp");
Response = OPI_Tools.Post(URL, Parameters); Response = OPI_Tools.Post(URL, Parameters);
Return Response; Return Response;
@@ -1886,8 +1886,8 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function GetStorage(Val URL, Val StorageID, Val Token = "") Export Function GetStorage(Val URL, Val StorageID, Val Token = "") Export
Response = FileManagement(URL, StorageID, "disk.storage.get", Token); Response = FileManagement(URL, StorageID, "disk.storage.get", Token);
Return Response; Return Response;
EndFunction EndFunction
@@ -1907,7 +1907,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function RenameStorage(Val URL, Val StorageID, Val Name, Val Token = "") Export Function RenameStorage(Val URL, Val StorageID, Val Name, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "disk.storage.rename"); Parameters = NormalizeAuth(URL, Token, "disk.storage.rename");
OPI_Tools.AddField("id" , StorageID , "String", Parameters); OPI_Tools.AddField("id" , StorageID , "String", Parameters);
OPI_Tools.AddField("newName", Name , "String", Parameters); OPI_Tools.AddField("newName", Name , "String", Parameters);
@@ -1933,8 +1933,8 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function GetStorageObjects(Val URL, Val StorageID, Val Token = "") Export Function GetStorageObjects(Val URL, Val StorageID, Val Token = "") Export
Response = FileManagement(URL, StorageID, "disk.storage.getchildren", Token); Response = FileManagement(URL, StorageID, "disk.storage.getchildren", Token);
Return Response; Return Response;
EndFunction EndFunction
@@ -1954,11 +1954,11 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function CreateStorageFolder(Val URL, Val StorageID, Val Name, Val Token = "") Export Function CreateStorageFolder(Val URL, Val StorageID, Val Name, Val Token = "") Export
OPI_TypeConversion.GetLine(Name); OPI_TypeConversion.GetLine(Name);
FolderStructure = New Structure("NAME", Name); FolderStructure = New Structure("NAME", Name);
Parameters = NormalizeAuth(URL, Token, "disk.storage.addfolder"); Parameters = NormalizeAuth(URL, Token, "disk.storage.addfolder");
OPI_Tools.AddField("id" , StorageID , "String" , Parameters); OPI_Tools.AddField("id" , StorageID , "String" , Parameters);
OPI_Tools.AddField("data", FolderStructure, "Collection", Parameters); OPI_Tools.AddField("data", FolderStructure, "Collection", Parameters);
@@ -3443,33 +3443,33 @@ Function NormalizeAuth(URL, Val Token, Val Method = "")
Parameters = New Structure; Parameters = New Structure;
IsTokenAuth = ValueIsFilled(Token); IsTokenAuth = ValueIsFilled(Token);
UncorrectItems = New Array; UncorrectItems = New Array;
UncorrectItems.Add("https://"); UncorrectItems.Add("https://");
UncorrectItems.Add("http://"); UncorrectItems.Add("http://");
UncorrectItems.Add("www."); UncorrectItems.Add("www.");
For Each DeletedElement In UncorrectItems Do For Each DeletedElement In UncorrectItems Do
URL = StrReplace(URL, DeletedElement, ""); URL = StrReplace(URL, DeletedElement, "");
EndDo; EndDo;
URL = TrimAll(URL); URL = TrimAll(URL);
If Not StrEndsWith(URL, "/") Then If Not StrEndsWith(URL, "/") Then
URL = URL + "/"; URL = URL + "/";
EndIf; EndIf;
If IsTokenAuth Then If IsTokenAuth Then
If Not StrEndsWith(URL, "rest/") Then If Not StrEndsWith(URL, "rest/") Then
URL = URL + "rest/"; URL = URL + "rest/";
EndIf; EndIf;
Parameters.Insert("auth", Token); Parameters.Insert("auth", Token);
EndIf; EndIf;
If ValueIsFilled(Method) Then If ValueIsFilled(Method) Then
URL = URL + TrimAll(Method); URL = URL + TrimAll(Method);
EndIf; EndIf;
Return Parameters; Return Parameters;

4
src/en/OInt/core/Modules/OPI_Dropbox.os
View File

@@ -751,13 +751,13 @@ EndFunction
// Map Of KeyAndValue - serialized JSON response from Dropbox // Map Of KeyAndValue - serialized JSON response from Dropbox
Function CancelFilePublication(Val Token, Val FileID) Export Function CancelFilePublication(Val Token, Val FileID) Export
OPI_TypeConversion.GetLine(FileID); OPI_TypeConversion.GetLine(FileID);
If Not StrStartsWith(FileID, "id:") Then If Not StrStartsWith(FileID, "id:") Then
FileID = "id:" + FileID; FileID = "id:" + FileID;
EndIf; EndIf;
URL = "https://api.dropboxapi.com/2/sharing/unshare_file"; URL = "https://api.dropboxapi.com/2/sharing/unshare_file";
Parameters = New Structure; Parameters = New Structure;
OPI_Tools.AddField("file", FileID, "String", Parameters); OPI_Tools.AddField("file", FileID, "String", Parameters);

24
src/en/OInt/core/Modules/OPI_GoogleDrive.os
View File

@@ -604,8 +604,8 @@ Function UploadLargeFile(Val Description, Val FileMapping, Val Headers, Val Iden
Return Response; Return Response;
EndIf; EndIf;
UploadResponse = UploadFileInParts(Binary, UploadURL); UploadResponse = UploadFileInParts(Binary, UploadURL);
Response = ?(ValueIsFilled(UploadResponse), UploadResponse, Response); Response = ?(ValueIsFilled(UploadResponse), UploadResponse, Response);
OPI_Tools.ProcessResponse(Response); OPI_Tools.ProcessResponse(Response);
Return Response; Return Response;
@@ -614,9 +614,9 @@ EndFunction
Function UploadFileInParts(Val Binary, Val UploadURL) Function UploadFileInParts(Val Binary, Val UploadURL)
Response = ""; Response = "";
ChunkSize = 268435456; ChunkSize = 268435456;
BytesRead = 0; BytesRead = 0;
CurrentPosition = 0; CurrentPosition = 0;
TotalSize = Binary.Size(); TotalSize = Binary.Size();
StrTotalSize = OPI_Tools.NumberToString(TotalSize); StrTotalSize = OPI_Tools.NumberToString(TotalSize);
@@ -649,15 +649,15 @@ Function UploadFileInParts(Val Binary, Val UploadURL)
Response = OPI_Tools.Put(UploadURL, CurrentData, AdditionalHeaders, False, True); Response = OPI_Tools.Put(UploadURL, CurrentData, AdditionalHeaders, False, True);
CheckResult = CheckPartUpload(Response, StrTotalSize, AdditionalHeaders, UploadURL, CurrentPosition); CheckResult = CheckPartUpload(Response, StrTotalSize, AdditionalHeaders, UploadURL, CurrentPosition);
If ValueIsFilled(CheckResult) Then If ValueIsFilled(CheckResult) Then
Return CheckResult; Return CheckResult;
EndIf; EndIf;
KBytes = 1024; KBytes = 1024;
MByte = KBytes * KBytes; MByte = KBytes * KBytes;
Message(OPI_Tools.ProgressInformation(CurrentPosition, TotalSize, "MB", MByte)); Message(OPI_Tools.ProgressInformation(CurrentPosition, TotalSize, "MB", MByte));
RunGarbageCollection(); RunGarbageCollection();
FreeObject(CurrentData); FreeObject(CurrentData);
@@ -695,7 +695,7 @@ Function CheckPartUpload(Response, StrTotalSize, AdditionalHeaders, UploadURL, C
Else Else
OPI_Tools.ProcessResponse(Response); OPI_Tools.ProcessResponse(Response);
Return Response; Return Response;
EndIf; EndIf;
@@ -713,7 +713,7 @@ Function CheckPartUpload(Response, StrTotalSize, AdditionalHeaders, UploadURL, C
PartsRequired = 2; PartsRequired = 2;
If Not ArrayOfInformation.Count() = PartsRequired Then If Not ArrayOfInformation.Count() = PartsRequired Then
OPI_Tools.ProcessResponse(Response); OPI_Tools.ProcessResponse(Response);
Return Response; Return Response;
EndIf; EndIf;

2
src/en/OInt/core/Modules/OPI_GoogleSheets.os
View File

@@ -359,7 +359,7 @@ EndProcedure
Procedure AddSheetName(Cell, Val Sheet) Procedure AddSheetName(Cell, Val Sheet)
If ValueIsFilled(Sheet) Then If ValueIsFilled(Sheet) Then
Cell = "'" + Sheet + "'!" + Cell; Cell = "'" + Sheet + "'!" + Cell;
EndIf; EndIf;
EndProcedure EndProcedure

126
src/en/OInt/core/Modules/OPI_Telegram.os
View File

@@ -250,11 +250,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendTextMessage(Val Token Function SendTextMessage(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown" , Val Markup = "Markdown"
, Val RepliedID = 0) Export , Val RepliedID = 0) Export
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
OPI_Tools.ReplaceSpecialCharacters(Text, Markup); OPI_Tools.ReplaceSpecialCharacters(Text, Markup);
@@ -290,11 +290,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendImage(Val Token Function SendImage(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Image , Val Image
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
Return SendFile(Token, ChatID, Text, Image, "photo", Keyboard, Markup); Return SendFile(Token, ChatID, Text, Image, "photo", Keyboard, Markup);
@@ -314,11 +314,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendVideo(Val Token Function SendVideo(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Video , Val Video
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
Return SendFile(Token, ChatID, Text, Video, "video", Keyboard, Markup); Return SendFile(Token, ChatID, Text, Video, "video", Keyboard, Markup);
@@ -338,11 +338,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendAudio(Val Token Function SendAudio(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Audio , Val Audio
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
Return SendFile(Token, ChatID, Text, Audio, "audio", Keyboard, Markup); Return SendFile(Token, ChatID, Text, Audio, "audio", Keyboard, Markup);
@@ -363,12 +363,12 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendDocument(Val Token Function SendDocument(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Document , Val Document
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown" , Val Markup = "Markdown"
, Val FileName = "") Export , Val FileName = "") Export
Return SendFile(Token, ChatID, Text, Document, "document", Keyboard, Markup, FileName); Return SendFile(Token, ChatID, Text, Document, "document", Keyboard, Markup, FileName);
@@ -388,11 +388,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendGif(Val Token Function SendGif(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val GIF , Val GIF
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
Return SendFile(Token, ChatID, Text, GIF, "animation", Keyboard, Markup); Return SendFile(Token, ChatID, Text, GIF, "animation", Keyboard, Markup);
@@ -415,18 +415,18 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendMediaGroup(Val Token Function SendMediaGroup(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val FileMapping , Val FileMapping
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
// FileMapping // FileMapping
// Key - File, Value - Type // Key - File, Value - Type
// Types: audio, document, photo, video // Types: audio, document, photo, video
// Different types cannot be mixed! // Different types cannot be mixed!
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
OPI_TypeConversion.GetLine(ChatID); OPI_TypeConversion.GetLine(ChatID);
@@ -466,7 +466,7 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendLocation(Val Token, Val ChatID, Val Latitude, Val Longitude, Val Keyboard = "") Export Function SendLocation(Val Token, Val ChatID, Val Latitude, Val Longitude, Val Keyboard = "") Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
OPI_TypeConversion.GetLine(ChatID); OPI_TypeConversion.GetLine(ChatID);
@@ -501,7 +501,7 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendContact(Val Token, Val ChatID, Val Name, Val LastName, Val Phone, Val Keyboard = "") Export Function SendContact(Val Token, Val ChatID, Val Name, Val LastName, Val Phone, Val Keyboard = "") Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
OPI_TypeConversion.GetLine(ChatID); OPI_TypeConversion.GetLine(ChatID);
@@ -642,7 +642,7 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function Ban(Val Token, Val ChatID, Val UserID) Export Function Ban(Val Token, Val ChatID, Val UserID) Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
URL = "api.telegram.org/bot" + Token + "/banChatMember"; URL = "api.telegram.org/bot" + Token + "/banChatMember";
@@ -670,7 +670,7 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function Unban(Val Token, Val ChatID, Val UserID) Export Function Unban(Val Token, Val ChatID, Val UserID) Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
URL = "api.telegram.org/bot" + Token + "/unbanChatMember"; URL = "api.telegram.org/bot" + Token + "/unbanChatMember";
@@ -705,7 +705,7 @@ Function CreateInvitationLink(Val Token
, Val ExpirationDate = "" , Val ExpirationDate = ""
, Val UserLimit = 0) Export , Val UserLimit = 0) Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
URL = "api.telegram.org/bot" + Token + "/createChatInviteLink"; URL = "api.telegram.org/bot" + Token + "/createChatInviteLink";
@@ -817,16 +817,16 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function DeleteMessage(Val Token, Val ChatID, Val MessageID) Export Function DeleteMessage(Val Token, Val ChatID, Val MessageID) Export
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
URL = "api.telegram.org/bot" + Token + "/deleteMessage"; URL = "api.telegram.org/bot" + Token + "/deleteMessage";
Parameters = New Structure; Parameters = New Structure;
OPI_Tools.AddField("message_id", MessageID, "String", Parameters); OPI_Tools.AddField("message_id", MessageID, "String", Parameters);
OPI_Tools.AddField("chat_id" , ChatID , "String", Parameters); OPI_Tools.AddField("chat_id" , ChatID , "String", Parameters);
Response = OPI_Tools.Get(URL, Parameters); Response = OPI_Tools.Get(URL, Parameters);
Return Response; Return Response;
EndFunction EndFunction
@@ -852,7 +852,7 @@ Function GetAvatarIconList(Val Token) Export
Icons = Response[Result]; Icons = Response[Result];
If Not ValueIsFilled(Icons) Then If Not ValueIsFilled(Icons) Then
Return Response; Return Response;
EndIf; EndIf;
Collection = New Map; Collection = New Map;
@@ -1267,28 +1267,28 @@ Procedure ConvertFilesToMedia(FileMapping, Text, Media)
TempMap = New Map; TempMap = New Map;
Counter = 0; Counter = 0;
For Each CurrentFile In FileMapping Do For Each CurrentFile In FileMapping Do
CurrentData = CurrentFile.Key; CurrentData = CurrentFile.Key;
TypeOfMedia = CurrentFile.Value; TypeOfMedia = CurrentFile.Value;
MediaName = ConvertFileData(CurrentData, TypeOfMedia, Counter); MediaName = ConvertFileData(CurrentData, TypeOfMedia, Counter);
TempMap.Insert(MediaName + "|" + MediaName, CurrentData); TempMap.Insert(MediaName + "|" + MediaName, CurrentData);
MediaStructure = New Structure; MediaStructure = New Structure;
MediaStructure.Insert("type" , TypeOfMedia); MediaStructure.Insert("type" , TypeOfMedia);
MediaStructure.Insert("media", "attach://" + MediaName); MediaStructure.Insert("media", "attach://" + MediaName);
If Counter = 0 Then If Counter = 0 Then
MediaStructure.Insert("caption", Text); MediaStructure.Insert("caption", Text);
EndIf; EndIf;
Media.Add(MediaStructure); Media.Add(MediaStructure);
Counter = Counter + 1; Counter = Counter + 1;
EndDo; EndDo;
Media = OPI_Tools.JSONString(Media); Media = OPI_Tools.JSONString(Media);
FileMapping = TempMap; FileMapping = TempMap;

10
src/en/OInt/core/Modules/OPI_Twitter.os
View File

@@ -202,7 +202,7 @@ Function CreateCustomTweet(Val Text = ""
If PollOptionsArray.Count() > 0 Then If PollOptionsArray.Count() > 0 Then
OptionStructure = New Structure("options,duration_minutes", PollOptionsArray, PollDuration); OptionStructure = New Structure("options,duration_minutes", PollOptionsArray, PollDuration);
Fields.Insert("poll", OptionStructure); Fields.Insert("poll", OptionStructure);
EndIf; EndIf;
@@ -664,22 +664,22 @@ EndFunction
Function GetProcessingStatus(Val Parameters, Val Fields, Val URL) Function GetProcessingStatus(Val Parameters, Val Fields, Val URL)
ProcessingInfo = "processing_info"; ProcessingInfo = "processing_info";
Authorization = CreateAuthorizationHeaderV1(Parameters, Fields, "POST", URL); Authorization = CreateAuthorizationHeaderV1(Parameters, Fields, "POST", URL);
Response = OPI_Tools.Post(URL, Fields, Authorization, False); Response = OPI_Tools.Post(URL, Fields, Authorization, False);
Information = Response[ProcessingInfo]; Information = Response[ProcessingInfo];
If Not ValueIsFilled(Information) Then If Not ValueIsFilled(Information) Then
Return Response; Return Response;
EndIf; EndIf;
ProcessingStatus = Information["state"]; ProcessingStatus = Information["state"];
If Not ValueIsFilled(ProcessingStatus) Then If Not ValueIsFilled(ProcessingStatus) Then
Return Response; Return Response;
Else Else
Return ProcessingStatus; Return ProcessingStatus;
EndIf; EndIf;
EndFunction EndFunction

132
src/en/OInt/core/Modules/OPI_VK.os
View File

@@ -104,7 +104,7 @@ Function CreatePost(Val Text
ObjectId = ResponseMap.Get("id"); ObjectId = ResponseMap.Get("id");
If Not ValueIsFilled(OwnerId) Or Not ValueIsFilled(ObjectId) Then If Not ValueIsFilled(OwnerId) Or Not ValueIsFilled(ObjectId) Then
Return ResponseMap; Return ResponseMap;
EndIf; EndIf;
OwnerId = OPI_Tools.NumberToString(OwnerId); OwnerId = OPI_Tools.NumberToString(OwnerId);
@@ -208,11 +208,11 @@ Function CreatePoll(Val Question, Val AnswersArray, Val Image = "", Val Paramete
If ValueIsFilled(Photo) Then If ValueIsFilled(Photo) Then
PhotoID = Photo["id"]; PhotoID = Photo["id"];
If Not ValueIsFilled(PhotoID) Then If Not ValueIsFilled(PhotoID) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
@@ -234,7 +234,7 @@ Function CreatePoll(Val Question, Val AnswersArray, Val Image = "", Val Paramete
PollMap = Poll.Get(Response_); PollMap = Poll.Get(Response_);
If Not ValueIsFilled(PollMap) Then If Not ValueIsFilled(PollMap) Then
Return Poll; Return Poll;
EndIf; EndIf;
OwnerId = PollMap.Get("owner_id"); OwnerId = PollMap.Get("owner_id");
@@ -395,26 +395,26 @@ Function UploadVideoToServer(Val Video
, Val Album = "" , Val Album = ""
, Val Parameters = "") Export , Val Parameters = "") Export
String_ = "String"; String_ = "String";
Parameters = GetStandardParameters(Parameters); Parameters = GetStandardParameters(Parameters);
OPI_Tools.AddField("name" , Name , String_, Parameters); OPI_Tools.AddField("name" , Name , String_, Parameters);
OPI_Tools.AddField("description", Description , String_, Parameters); OPI_Tools.AddField("description", Description , String_, Parameters);
OPI_Tools.AddField("album_id" , Album , String_, Parameters); OPI_Tools.AddField("album_id" , Album , String_, Parameters);
Response = OPI_Tools.Get("api.vk.com/method/video.save", Parameters); Response = OPI_Tools.Get("api.vk.com/method/video.save", Parameters);
Result = Response["response"]; Result = Response["response"];
If Not ValueIsFilled(Result) Then If Not ValueIsFilled(Result) Then
Return Response; Return Response;
EndIf; EndIf;
URL = Result["upload_url"]; URL = Result["upload_url"];
If Not ValueIsFilled(URL) Then If Not ValueIsFilled(URL) Then
Return Response; Return Response;
EndIf; EndIf;
FileMapping = New Map; FileMapping = New Map;
OPI_Tools.AddField("video_file.mp4", Video, "BinaryData", FileMapping); OPI_Tools.AddField("video_file.mp4", Video, "BinaryData", FileMapping);
@@ -771,16 +771,16 @@ Function ShortenLink(Val URL, Val Parameters = "") Export
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
URL = Result["short_url"]; URL = Result["short_url"];
If ValueIsFilled(URL) Then If ValueIsFilled(URL) Then
Return URL; Return URL;
Else Else
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
EndFunction EndFunction
@@ -1065,14 +1065,14 @@ Function GetProductCategoryList(Val Parameters = "") Export
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
Count = Result["count"]; Count = Result["count"];
If Not ValueIsFilled(Count) Then If Not ValueIsFilled(Count) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
Parameters_.Insert("count", Count); Parameters_.Insert("count", Count);
@@ -1081,14 +1081,14 @@ Function GetProductCategoryList(Val Parameters = "") Export
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
Categories = Result["items"]; Categories = Result["items"];
If Not ValueIsFilled(Categories) Then If Not ValueIsFilled(Categories) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
CategoryMap = New Map; CategoryMap = New Map;
@@ -1380,7 +1380,7 @@ EndFunction
// //
// Parameters: // Parameters:
// Name - String - New selection name - title // Name - String - New selection name - title
// Selection - String - Selection ID - sel // Selection - String - Selection ID - sel
// Image - String, BinaryData - New selection image - picture // Image - String, BinaryData - New selection image - picture
// Main - Boolean - Main - main // Main - Boolean - Main - main
// Hidden - Boolean - Hidden - hidden // Hidden - Boolean - Hidden - hidden
@@ -1757,19 +1757,19 @@ EndFunction
Function GetImageID(Val Image, Val Parameters, Val View) Function GetImageID(Val Image, Val Parameters, Val View)
Response_ = "response"; Response_ = "response";
Response = UploadPhotoToServer(Image, Parameters, View); Response = UploadPhotoToServer(Image, Parameters, View);
Result = Response[Response_]; Result = Response[Response_];
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
PhotoID = Result["photo_id"]; PhotoID = Result["photo_id"];
If Not ValueIsFilled(PhotoID) Then If Not ValueIsFilled(PhotoID) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
PhotoID = OPI_Tools.NumberToString(PhotoID); PhotoID = OPI_Tools.NumberToString(PhotoID);
@@ -1779,17 +1779,17 @@ EndFunction
Function GetImageMap(Val Image, Val Parameters, Val View) Function GetImageMap(Val Image, Val Parameters, Val View)
Response = UploadPhotoToServer(Image, Parameters, View); Response = UploadPhotoToServer(Image, Parameters, View);
ResponseArray = Response.Get("response"); ResponseArray = Response.Get("response");
If Not ValueIsFilled(ResponseArray) Or Not TypeOf(ResponseArray) = Type("Array") Then If Not ValueIsFilled(ResponseArray) Or Not TypeOf(ResponseArray) = Type("Array") Then
Return Response; Return Response;
Else Else
If ResponseArray.Count() = 0 Then If ResponseArray.Count() = 0 Then
Return Response; Return Response;
Else Else
ResponseMap = ResponseArray[0]; ResponseMap = ResponseArray[0];
EndIf; EndIf;
EndIf; EndIf;
Return ResponseMap; Return ResponseMap;
@@ -1798,20 +1798,20 @@ EndFunction
Function GetSelectionArray(Val Selections, Val Parameters = "") Function GetSelectionArray(Val Selections, Val Parameters = "")
Response_ = "response"; Response_ = "response";
Selections = GetSelectionsByID(Selections, Parameters); Selections = GetSelectionsByID(Selections, Parameters);
Result = Selections[Response_]; Result = Selections[Response_];
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
SelectionArray = Result["items"]; SelectionArray = Result["items"];
If Not ValueIsFilled(SelectionArray) Then If Not ValueIsFilled(SelectionArray) Then
Return Selections; Return Selections;
EndIf; EndIf;
Else Else
Return Selections; Return Selections;
EndIf; EndIf;
Return SelectionArray; Return SelectionArray;
@@ -1914,11 +1914,11 @@ Function ProductManagement(Val ProductDescription, Val ProductID = "", Val Selec
ProductID = Result["market_item_id"]; ProductID = Result["market_item_id"];
If Not ValueIsFilled(ProductID) Then If Not ValueIsFilled(ProductID) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
If ValueIsFilled(Selection) And ValueIsFilled(ProductID) Then If ValueIsFilled(Selection) And ValueIsFilled(ProductID) Then
@@ -2060,14 +2060,14 @@ Procedure FillProductRequestFields(Val ProductDescription, Parameters)
Result = Response[Response_]; Result = Response[Response_];
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
PhotoID = Result["photo_id"]; PhotoID = Result["photo_id"];
If Not ValueIsFilled(PhotoID) Then If Not ValueIsFilled(PhotoID) Then
Return; Return;
EndIf; EndIf;
Else Else
Return; Return;
EndIf; EndIf;
PhotoID = OPI_Tools.NumberToString(PhotoID); PhotoID = OPI_Tools.NumberToString(PhotoID);
@@ -2116,9 +2116,9 @@ Procedure AddAdditionalProductPhotos(Val PhotoArray, Parameters)
PhotoID = GetImageID(Photo, Parameters, "Product"); PhotoID = GetImageID(Photo, Parameters, "Product");
If Not TypeOf(PhotoID) = Type("String") Then If Not TypeOf(PhotoID) = Type("String") Then
Return; Return;
EndIf; EndIf;
PhotoString = PhotoString + PhotoID + ","; PhotoString = PhotoString + PhotoID + ",";

20
src/en/OInt/core/Modules/OPI_YandexDisk.os
View File

@@ -89,7 +89,7 @@ Function CreateFolder(Val Token, Val Path) Export
ResponseURL = Response[Href]; ResponseURL = Response[Href];
If Not ValueIsFilled(ResponseURL) Then If Not ValueIsFilled(ResponseURL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.Get(ResponseURL, , Headers); Response = OPI_Tools.Get(ResponseURL, , Headers);
@@ -183,7 +183,7 @@ Function CreateObjectCopy(Val Token, Val Original, Val Path, Val Overwrite = Fal
ResponseURL = Response[Href]; ResponseURL = Response[Href];
If Not ValueIsFilled(ResponseURL) Then If Not ValueIsFilled(ResponseURL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.Get(ResponseURL, , Headers); Response = OPI_Tools.Get(ResponseURL, , Headers);
@@ -230,14 +230,14 @@ EndFunction
Function DownloadFile(Val Token, Val Path, Val SavePath = "") Export Function DownloadFile(Val Token, Val Path, Val SavePath = "") Export
OPI_TypeConversion.GetLine(SavePath); OPI_TypeConversion.GetLine(SavePath);
Response = GetDownloadLink(Token, Path); Response = GetDownloadLink(Token, Path);
URL = Response["href"]; URL = Response["href"];
If Not ValueIsFilled(URL) Then If Not ValueIsFilled(URL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.Get(URL, , , SavePath); Response = OPI_Tools.Get(URL, , , SavePath);
Return Response; Return Response;
@@ -330,7 +330,7 @@ Function MoveObject(Val Token, Val Original, Val Path, Val Overwrite = False) Ex
ResponseURL = Response[Href]; ResponseURL = Response[Href];
If Not ValueIsFilled(ResponseURL) Then If Not ValueIsFilled(ResponseURL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.Get(ResponseURL, , Headers); Response = OPI_Tools.Get(ResponseURL, , Headers);
@@ -369,7 +369,7 @@ Function UploadFile(Val Token, Val Path, Val File, Val Overwrite = False) Export
URL = Response[Href]; URL = Response[Href];
If Not ValueIsFilled(URL) Then If Not ValueIsFilled(URL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.PutMultipart(URL, New Structure(), File, "multipart", Headers); Response = OPI_Tools.PutMultipart(URL, New Structure(), File, "multipart", Headers);

2
src/en/OInt/tests/Modules/Coverage_ЗапускВсехТестов.os
View File

@@ -4,5 +4,5 @@
Tests = OPI_TestDataRetrieval.FormAssertsTests(); Tests = OPI_TestDataRetrieval.FormAssertsTests();
For Each Test In Tests Do For Each Test In Tests Do
Execute("OPI_Tests." + Test + "()"); Execute("OPI_Tests." + Test + "()");
EndDo; EndDo;

430
src/en/OInt/tests/Modules/internal/OPI_Tests.os
View File

@@ -68,71 +68,71 @@ EndFunction
Procedure TelegramAPI_GetBotInfo() Export Procedure TelegramAPI_GetBotInfo() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters);
Telegram_GetBotInformation(TestParameters); Telegram_GetBotInformation(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_GetUpdates() Export Procedure TelegramAPI_GetUpdates() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters);
Telegram_DeleteWebhook(TestParameters); Telegram_DeleteWebhook(TestParameters);
Telegram_GetUpdates(TestParameters); Telegram_GetUpdates(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_SetWebhook() Export Procedure TelegramAPI_SetWebhook() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_URL" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_URL" , TestParameters);
Telegram_SetWebhook(TestParameters); Telegram_SetWebhook(TestParameters);
Telegram_DeleteWebhook(TestParameters); Telegram_DeleteWebhook(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_SendTextMessage() Export Procedure TelegramAPI_SendTextMessage() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters);
Telegram_SendTextMessage(TestParameters); Telegram_SendTextMessage(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_SendImage() Export Procedure TelegramAPI_SendImage() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Picture" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Picture" , TestParameters);
Telegram_SendPicture(TestParameters); Telegram_SendPicture(TestParameters);
Telegram_DownloadFile(TestParameters); Telegram_DownloadFile(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_SendVideo() Export Procedure TelegramAPI_SendVideo() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Video" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Video" , TestParameters);
Telegram_SendVideo(TestParameters); Telegram_SendVideo(TestParameters);
Telegram_DownloadFile(TestParameters); Telegram_DownloadFile(TestParameters);
EndProcedure EndProcedure
@@ -225,7 +225,7 @@ Procedure TelegramAPI_SendPoll() Export
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
Telegram_SendPoll(TestParameters); Telegram_SendPoll(TestParameters);
EndProcedure EndProcedure
@@ -237,7 +237,7 @@ Procedure TelegramAPI_ForwardMessage() Export
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelMessageID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelMessageID", TestParameters);
Telegram_ForwardMessage(TestParameters); Telegram_ForwardMessage(TestParameters);
EndProcedure EndProcedure
@@ -259,7 +259,7 @@ Procedure TelegramAPI_CreateInvitationLink() Export
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
Telegram_CreateInviteLink(TestParameters); Telegram_CreateInviteLink(TestParameters);
EndProcedure EndProcedure
@@ -270,9 +270,9 @@ Procedure TelegramAPI_PinUnpinMessage() Export
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelMessageID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelMessageID", TestParameters);
Telegram_PinMessage(TestParameters); Telegram_PinMessage(TestParameters);
Telegram_UnpinMessage(TestParameters); Telegram_UnpinMessage(TestParameters);
Telegram_DeleteMessage(TestParameters); Telegram_DeleteMessage(TestParameters);
EndProcedure EndProcedure
@@ -291,7 +291,7 @@ Procedure TelegramAPI_GetForumAvatarsList() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters);
Telegram_GetForumAvatarList(TestParameters); Telegram_GetForumAvatarList(TestParameters);
EndProcedure EndProcedure
@@ -303,33 +303,33 @@ Procedure TelegramAPI_CreateDeleteForumTopic() Export
OPI_TestDataRetrieval.ParameterToCollection("Picture" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Picture" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters);
Telegram_CreateForumTopic(TestParameters); Telegram_CreateForumTopic(TestParameters);
Telegram_EditForumTopic(TestParameters); Telegram_EditForumTopic(TestParameters);
Telegram_CloseForumTopic(TestParameters); Telegram_CloseForumTopic(TestParameters);
Telegram_OpenForumTopic(TestParameters); Telegram_OpenForumTopic(TestParameters);
Telegram_ClearPinnedMessagesList(TestParameters); Telegram_ClearPinnedMessagesList(TestParameters);
Telegram_DeleteForumTopic(TestParameters); Telegram_DeleteForumTopic(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_HideShowMainTopic() Export Procedure TelegramAPI_HideShowMainTopic() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ForumID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ForumID", TestParameters);
Telegram_HideMainForumTopic(TestParameters); Telegram_HideMainForumTopic(TestParameters);
Telegram_ShowMainForumTopic(TestParameters); Telegram_ShowMainForumTopic(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_ChangeMainTopicName() Export Procedure TelegramAPI_ChangeMainTopicName() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ForumID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ForumID", TestParameters);
Telegram_ChangeMainTopicName(TestParameters); Telegram_ChangeMainTopicName(TestParameters);
EndProcedure EndProcedure
@@ -1806,13 +1806,13 @@ EndProcedure
Procedure Notion_CreatePage() Export Procedure Notion_CreatePage() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent"); Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent");
Title = "TestTitle"; Title = "TestTitle";
Result = OPI_Notion.CreatePage(Token, Parent, Title); Result = OPI_Notion.CreatePage(Token, Parent, Title);
OPI_TestDataRetrieval.WriteLog(Result, "CreatePage"); OPI_TestDataRetrieval.WriteLog(Result, "CreatePage");
Check_NotionObject(Result); Check_NotionObject(Result);
@@ -1820,46 +1820,46 @@ EndProcedure
Procedure Notion_CreateEditDatabase() Export Procedure Notion_CreateEditDatabase() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent"); Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent");
Title = "TestTitle"; Title = "TestTitle";
Properties = New Map; Properties = New Map;
Properties.Insert("Name" , "title"); Properties.Insert("Name" , "title");
Properties.Insert("Description" , "rich_text"); Properties.Insert("Description" , "rich_text");
Properties.Insert("Number" , "number"); Properties.Insert("Number" , "number");
Properties.Insert("Status" , "status"); Properties.Insert("Status" , "status");
Properties.Insert("CreationDate" , "date"); Properties.Insert("CreationDate" , "date");
Properties.Insert("Image" , "files"); Properties.Insert("Image" , "files");
Properties.Insert("Active" , "checkbox"); Properties.Insert("Active" , "checkbox");
Properties.Insert("Website" , "url"); Properties.Insert("Website" , "url");
Properties.Insert("Email" , "email"); Properties.Insert("Email" , "email");
Properties.Insert("Phone" , "phone_number"); Properties.Insert("Phone" , "phone_number");
Properties.Insert("User" , "people"); Properties.Insert("User" , "people");
ValueSelection = New Map; ValueSelection = New Map;
ValueSelection.Insert("New" , "green"); ValueSelection.Insert("New" , "green");
ValueSelection.Insert("InProgress" , "yellow"); ValueSelection.Insert("InProgress" , "yellow");
ValueSelection.Insert("Remote" , "red"); ValueSelection.Insert("Remote" , "red");
Properties.Insert("Status", ValueSelection); Properties.Insert("Status", ValueSelection);
Result = OPI_Notion.CreateDatabase(Token, Parent, Title, Properties); Result = OPI_Notion.CreateDatabase(Token, Parent, Title, Properties);
OPI_TestDataRetrieval.WriteLog(Result, "CreateDatabase"); OPI_TestDataRetrieval.WriteLog(Result, "CreateDatabase");
Check_NotionObject(Result, "database"); Check_NotionObject(Result, "database");
Base = Result["id"]; Base = Result["id"];
Title = "TestTitle"; Title = "TestTitle";
Description = "TestDescription"; Description = "TestDescription";
Properties = New Map; Properties = New Map;
Properties.Insert("Email", "rich_text"); // Type fields "Email" will changed with email to text Properties.Insert("Email", "rich_text"); // Type fields "Email" will changed with email to text
Properties.Insert("Website"); // Field "Website" will deleted Properties.Insert("Website"); // Field "Website" will deleted
Result = OPI_Notion.EditDatabaseProperties(Token, Base, Properties, Title, Description); Result = OPI_Notion.EditDatabaseProperties(Token, Base, Properties, Title, Description);
OPI_TestDataRetrieval.WriteLog(Result, "EditDatabaseProperties"); OPI_TestDataRetrieval.WriteLog(Result, "EditDatabaseProperties");
Check_NotionObject(Result, "database"); Check_NotionObject(Result, "database");
@@ -1867,12 +1867,12 @@ EndProcedure
Procedure Notion_GetPageInfo() Export Procedure Notion_GetPageInfo() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Page = OPI_TestDataRetrieval.GetParameter("Notion_Page"); Page = OPI_TestDataRetrieval.GetParameter("Notion_Page");
Result = OPI_Notion.GetPage(Token, Page); Result = OPI_Notion.GetPage(Token, Page);
OPI_TestDataRetrieval.WriteLog(Result, "GetPage"); OPI_TestDataRetrieval.WriteLog(Result, "GetPage");
Check_NotionObject(Result); Check_NotionObject(Result);
@@ -1880,12 +1880,12 @@ EndProcedure
Procedure Notion_GetDatabaseInfo() Export Procedure Notion_GetDatabaseInfo() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Base = OPI_TestDataRetrieval.GetParameter("Notion_Base"); Base = OPI_TestDataRetrieval.GetParameter("Notion_Base");
Result = OPI_Notion.GetDatabase(Token, Base); Result = OPI_Notion.GetDatabase(Token, Base);
OPI_TestDataRetrieval.WriteLog(Result, "GetDatabase"); OPI_TestDataRetrieval.WriteLog(Result, "GetDatabase");
Check_NotionObject(Result, "database"); Check_NotionObject(Result, "database");
@@ -1893,28 +1893,28 @@ EndProcedure
Procedure Notion_CreatePageInDatabase() Export Procedure Notion_CreatePageInDatabase() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Base = OPI_TestDataRetrieval.GetParameter("Notion_Base"); Base = OPI_TestDataRetrieval.GetParameter("Notion_Base");
Image = New Map; Image = New Map;
Image.Insert("Logo", OPI_TestDataRetrieval.GetParameter("Picture")); Image.Insert("Logo", OPI_TestDataRetrieval.GetParameter("Picture"));
Properties = New Map; Properties = New Map;
Properties.Insert("Name" , "LLC Vector"); Properties.Insert("Name" , "LLC Vector");
Properties.Insert("Description" , "OurFirstClient"); Properties.Insert("Description" , "OurFirstClient");
Properties.Insert("Number" , 1); Properties.Insert("Number" , 1);
Properties.Insert("Status" , "Regular"); Properties.Insert("Status" , "Regular");
Properties.Insert("CreationDate" , OPI_Tools.GetCurrentDate()); Properties.Insert("CreationDate" , OPI_Tools.GetCurrentDate());
Properties.Insert("Image" , Image); Properties.Insert("Image" , Image);
Properties.Insert("Active" , True); Properties.Insert("Active" , True);
Properties.Insert("Website" , "https://vector.ru"); Properties.Insert("Website" , "https://vector.ru");
Properties.Insert("Email" , "mail@vector.ru"); Properties.Insert("Email" , "mail@vector.ru");
Properties.Insert("Phone" , "88005553535"); Properties.Insert("Phone" , "88005553535");
Properties.Insert("Status" , "New"); Properties.Insert("Status" , "New");
Result = OPI_Notion.CreatePageInDatabase(Token, Base, Properties); Result = OPI_Notion.CreatePageInDatabase(Token, Base, Properties);
OPI_TestDataRetrieval.WriteLog(Result, "CreatePageInDatabase"); OPI_TestDataRetrieval.WriteLog(Result, "CreatePageInDatabase");
Check_NotionObject(Result); Check_NotionObject(Result);
@@ -1925,24 +1925,24 @@ EndProcedure
Procedure Notion_EditPageProperties() Export Procedure Notion_EditPageProperties() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Page = OPI_TestDataRetrieval.GetParameter("Notion_Page"); Page = OPI_TestDataRetrieval.GetParameter("Notion_Page");
Icon = OPI_TestDataRetrieval.GetParameter("Picture"); Icon = OPI_TestDataRetrieval.GetParameter("Picture");
Cover = OPI_TestDataRetrieval.GetParameter("Picture2"); Cover = OPI_TestDataRetrieval.GetParameter("Picture2");
Archive = False; Archive = False;
Properties = New Map; Properties = New Map;
Properties.Insert("Active" , False); Properties.Insert("Active" , False);
Properties.Insert("Email" , "vector@mail.ru"); Properties.Insert("Email" , "vector@mail.ru");
Result = OPI_Notion.EditPageProperties(Token Result = OPI_Notion.EditPageProperties(Token
, Page , Page
, Properties , Properties
, Icon , Icon
, Cover , Cover
, Archive); , Archive);
OPI_TestDataRetrieval.WriteLog(Result, "EditPageProperties"); OPI_TestDataRetrieval.WriteLog(Result, "EditPageProperties");
Check_NotionObject(Result); Check_NotionObject(Result);
@@ -1950,32 +1950,32 @@ EndProcedure
Procedure Notion_CreateDeleteBlock() Export Procedure Notion_CreateDeleteBlock() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent"); Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent");
Block = OPI_TestDataRetrieval.GetParameter("Notion_Block"); Block = OPI_TestDataRetrieval.GetParameter("Notion_Block");
Result = OPI_Notion.ReturnBlock(Token, Block); Result = OPI_Notion.ReturnBlock(Token, Block);
OPI_TestDataRetrieval.WriteLog(Result, "ReturnBlock"); OPI_TestDataRetrieval.WriteLog(Result, "ReturnBlock");
Check_NotionObject(Result, "block"); Check_NotionObject(Result, "block");
Result = OPI_Notion.CreateBlock(Token, Parent, Result); Result = OPI_Notion.CreateBlock(Token, Parent, Result);
OPI_TestDataRetrieval.WriteLog(Result, "CreateBlock"); OPI_TestDataRetrieval.WriteLog(Result, "CreateBlock");
Check_NotionObject(Result, "list"); Check_NotionObject(Result, "list");
Block = Result["results"][0]["id"]; Block = Result["results"][0]["id"];
Result = OPI_Notion.ReturnChildBlocks(Token, Block); Result = OPI_Notion.ReturnChildBlocks(Token, Block);
OPI_TestDataRetrieval.WriteLog(Result, "ReturnChildBlocks"); OPI_TestDataRetrieval.WriteLog(Result, "ReturnChildBlocks");
Check_NotionObject(Result, "list"); Check_NotionObject(Result, "list");
Result = OPI_Notion.DeleteBlock(Token, Block); Result = OPI_Notion.DeleteBlock(Token, Block);
OPI_TestDataRetrieval.WriteLog(Result, "DeleteBlock"); OPI_TestDataRetrieval.WriteLog(Result, "DeleteBlock");
Check_NotionObject(Result, "block"); Check_NotionObject(Result, "block");
@@ -1983,10 +1983,10 @@ EndProcedure
Procedure Notion_GetUsers() Export Procedure Notion_GetUsers() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Result = OPI_Notion.UserList(Token); Result = OPI_Notion.UserList(Token);
OPI_TestDataRetrieval.WriteLog(Result, "UserList"); OPI_TestDataRetrieval.WriteLog(Result, "UserList");
Check_NotionObject(Result, "list"); Check_NotionObject(Result, "list");
@@ -1994,11 +1994,11 @@ EndProcedure
Procedure Notion_GetUserData() Export Procedure Notion_GetUserData() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
User = OPI_TestDataRetrieval.GetParameter("Notion_User"); User = OPI_TestDataRetrieval.GetParameter("Notion_User");
Result = OPI_Notion.GetUserData(Token, User); Result = OPI_Notion.GetUserData(Token, User);
OPI_TestDataRetrieval.WriteLog(Result, "GetUserData"); OPI_TestDataRetrieval.WriteLog(Result, "GetUserData");
Check_NotionObject(Result, "user"); Check_NotionObject(Result, "user");
@@ -2855,7 +2855,7 @@ EndProcedure
Procedure B24_ServerTime() Export Procedure B24_ServerTime() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_URL" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_URL" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_Domain", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_Domain", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_Token" , TestParameters);
@@ -3238,7 +3238,7 @@ EndProcedure
Procedure Check_Structure(Val Result) Procedure Check_Structure(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Structure").Заполнено(); OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Structure").Заполнено();
EndProcedure EndProcedure
@@ -3674,13 +3674,13 @@ EndProcedure
Procedure Check_BitrixTime(Val Result) Procedure Check_BitrixTime(Val Result)
Time = Result["result"]; Time = Result["result"];
If Not TypeOf(Time) = Type("Date") Then If Not TypeOf(Time) = Type("Date") Then
Time = XMLValue(Type("Date"), Time); Time = XMLValue(Type("Date"), Time);
EndIf; EndIf;
OPI_TestDataRetrieval.ExpectsThat(Time).ИмеетТип("Date").Заполнено(); OPI_TestDataRetrieval.ExpectsThat(Time).ИмеетТип("Date").Заполнено();
EndProcedure EndProcedure
@@ -3790,14 +3790,14 @@ EndProcedure
Procedure Check_BitrixCommentsList(Val Result) Procedure Check_BitrixCommentsList(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result["result"]).ИмеетТип("Array"); OPI_TestDataRetrieval.ExpectsThat(Result["result"]).ИмеетТип("Array");
OPI_TestDataRetrieval.ExpectsThat(Result["result"][0]["POST_MESSAGE"]).Заполнено(); OPI_TestDataRetrieval.ExpectsThat(Result["result"][0]["POST_MESSAGE"]).Заполнено();
EndProcedure EndProcedure
Procedure Check_BitrixResultsList(Val Result) Procedure Check_BitrixResultsList(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result["result"]).ИмеетТип("Array"); OPI_TestDataRetrieval.ExpectsThat(Result["result"]).ИмеетТип("Array");
OPI_TestDataRetrieval.ExpectsThat(Result["result"][0]["text"]).Заполнено(); OPI_TestDataRetrieval.ExpectsThat(Result["result"][0]["text"]).Заполнено();
EndProcedure EndProcedure
@@ -3852,10 +3852,10 @@ EndProcedure
Procedure Telegram_GetUpdates(FunctionParameters) Procedure Telegram_GetUpdates(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Result = OPI_Telegram.GetUpdates(Token); Result = OPI_Telegram.GetUpdates(Token);
// END // END
OPI_TestDataRetrieval.WriteLog(Result, "GetUpdates", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "GetUpdates", "Telegram");
@@ -3884,12 +3884,12 @@ EndProcedure
Procedure Telegram_DeleteWebhook(FunctionParameters) Procedure Telegram_DeleteWebhook(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Result = OPI_Telegram.DeleteWebhook(Token); Result = OPI_Telegram.DeleteWebhook(Token);
// END // END
OPI_TestDataRetrieval.WriteLog(Result, "DeleteWebhook", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "DeleteWebhook", "Telegram");
Check_TelegramWebhookDeletion(Result); Check_TelegramWebhookDeletion(Result);
@@ -3899,10 +3899,10 @@ EndProcedure
Procedure Telegram_SendTextMessage(FunctionParameters) Procedure Telegram_SendTextMessage(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
ChatID = FunctionParameters["Telegram_ChatID"]; ChatID = FunctionParameters["Telegram_ChatID"];
ChannelID = FunctionParameters["Telegram_ChannelID"]; ChannelID = FunctionParameters["Telegram_ChannelID"];
Text = FunctionParameters["String"]; Text = FunctionParameters["String"];
Result = OPI_Telegram.SendTextMessage(Token, ChatID, Text); Result = OPI_Telegram.SendTextMessage(Token, ChatID, Text);
@@ -4288,8 +4288,8 @@ EndProcedure
Procedure Telegram_DownloadFile(FunctionParameters) Procedure Telegram_DownloadFile(FunctionParameters)
FileID = FunctionParameters["Telegram_FileID"]; FileID = FunctionParameters["Telegram_FileID"];
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Result = OPI_Telegram.DownloadFile(Token, FileID); Result = OPI_Telegram.DownloadFile(Token, FileID);
@@ -4314,7 +4314,7 @@ Procedure Telegram_ForwardMessage(FunctionParameters)
OPI_TestDataRetrieval.WriteLog(Result, "ForwardMessage", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "ForwardMessage", "Telegram");
Check_TelegramForward(Result, MessageID); Check_TelegramForward(Result, MessageID);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
@@ -4322,18 +4322,18 @@ EndProcedure
Procedure Telegram_Ban(FunctionParameters) Procedure Telegram_Ban(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
UserID = FunctionParameters["Telegram_ChatID"]; UserID = FunctionParameters["Telegram_ChatID"];
ChannelID = FunctionParameters["Telegram_ChannelID"]; ChannelID = FunctionParameters["Telegram_ChannelID"];
Result = OPI_Telegram.Ban(Token, ChannelID, UserID); Result = OPI_Telegram.Ban(Token, ChannelID, UserID);
// END // END
OPI_TestDataRetrieval.WriteLog(Result, "Ban", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "Ban", "Telegram");
Check_TelegramBan(Result); Check_TelegramBan(Result);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
EndProcedure EndProcedure
@@ -4343,14 +4343,14 @@ Procedure Telegram_Unban(FunctionParameters)
UserID = FunctionParameters["Telegram_ChatID"]; UserID = FunctionParameters["Telegram_ChatID"];
ChannelID = FunctionParameters["Telegram_ChannelID"]; ChannelID = FunctionParameters["Telegram_ChannelID"];
Result = OPI_Telegram.Unban(Token, ChannelID, UserID); Result = OPI_Telegram.Unban(Token, ChannelID, UserID);
// END // END
OPI_TestDataRetrieval.WriteLog(Result, "Unban", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "Unban", "Telegram");
Check_TelegramBan(Result); Check_TelegramBan(Result);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
EndProcedure EndProcedure
@@ -4371,7 +4371,7 @@ Procedure Telegram_CreateInviteLink(FunctionParameters)
OPI_TestDataRetrieval.WriteLog(Result, "CreateInvitationLink", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "CreateInvitationLink", "Telegram");
Check_TelegramInvitation(Result, Title, UnixExpiration); Check_TelegramInvitation(Result, Title, UnixExpiration);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
@@ -4385,11 +4385,11 @@ Procedure Telegram_PinMessage(FunctionParameters)
Result = OPI_Telegram.PinMessage(Token, ChannelID, MessageID); Result = OPI_Telegram.PinMessage(Token, ChannelID, MessageID);
// END // END
OPI_TestDataRetrieval.WriteLog(Result, "PinMessage", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "PinMessage", "Telegram");
Check_TelegramTrue(Result); Check_TelegramTrue(Result);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
@@ -4403,11 +4403,11 @@ Procedure Telegram_UnpinMessage(FunctionParameters)
Result = OPI_Telegram.UnpinMessage(Token, ChannelID, MessageID); Result = OPI_Telegram.UnpinMessage(Token, ChannelID, MessageID);
// END // END
OPI_TestDataRetrieval.WriteLog(Result, "UnpinMessage", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "UnpinMessage", "Telegram");
Check_TelegramTrue(Result); Check_TelegramTrue(Result);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
@@ -4432,10 +4432,10 @@ EndProcedure
Procedure Telegram_GetForumAvatarList(FunctionParameters) Procedure Telegram_GetForumAvatarList(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Result = OPI_Telegram.GetAvatarIconList(Token); Result = OPI_Telegram.GetAvatarIconList(Token);
// END // END
OPI_TestDataRetrieval.WriteLog(Result, "GetAvatarIconList", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "GetAvatarIconList", "Telegram");
@@ -4447,14 +4447,14 @@ EndProcedure
Procedure Telegram_CreateForumTopic(FunctionParameters) Procedure Telegram_CreateForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Icon = "5357419403325481346"; Icon = "5357419403325481346";
Name = "TestTopic " + String(New UUID); Name = "TestTopic " + String(New UUID);
Result = OPI_Telegram.CreateForumThread(Token, Chat, Name, Icon); Result = OPI_Telegram.CreateForumThread(Token, Chat, Name, Icon);
// END // END
OPI_TestDataRetrieval.WriteLog(Result, "CreateForumThread", "Telegram"); OPI_TestDataRetrieval.WriteLog(Result, "CreateForumThread", "Telegram");
@@ -4464,10 +4464,10 @@ Procedure Telegram_CreateForumTopic(FunctionParameters)
OPI_Tools.AddField("Telegram_TopicID", Topic, "String", FunctionParameters); OPI_Tools.AddField("Telegram_TopicID", Topic, "String", FunctionParameters);
OPI_TestDataRetrieval.WriteParameter("Telegram_TopicID", FunctionParameters["Telegram_TopicID"]); OPI_TestDataRetrieval.WriteParameter("Telegram_TopicID", FunctionParameters["Telegram_TopicID"]);
Check_TelegramCreateTopic(Result, Name, Icon); Check_TelegramCreateTopic(Result, Name, Icon);
ChatTopic = Chat + "*" + Topic; ChatTopic = Chat + "*" + Topic;
Text = FunctionParameters["String"]; Text = FunctionParameters["String"];
Result = OPI_Telegram.SendTextMessage(Token, ChatTopic, Text); Result = OPI_Telegram.SendTextMessage(Token, ChatTopic, Text);
OPI_TestDataRetrieval.WriteLog(Result, "SendTextMessage (forum)"); OPI_TestDataRetrieval.WriteLog(Result, "SendTextMessage (forum)");
@@ -4478,7 +4478,7 @@ EndProcedure
Procedure Telegram_EditForumTopic(FunctionParameters) Procedure Telegram_EditForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
NewName = "NewTestTitle"; NewName = "NewTestTitle";
@@ -4498,15 +4498,15 @@ EndProcedure
Procedure Telegram_CloseForumTopic(FunctionParameters) Procedure Telegram_CloseForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
OPI_Telegram.OpenForumThread(Token, Chat); // SKIP OPI_Telegram.OpenForumThread(Token, Chat); // SKIP
Result = OPI_Telegram.CloseForumThread(Token, Chat); // Closes main topic Result = OPI_Telegram.CloseForumThread(Token, Chat); // Closes main topic
OPI_TestDataRetrieval.WriteLog(Result, "CloseForumTopic (main)"); OPI_TestDataRetrieval.WriteLog(Result, "CloseForumTopic (main)");
Check_TelegramTrue(Result); // SKIP Check_TelegramTrue(Result); // SKIP
@@ -4524,13 +4524,13 @@ EndProcedure
Procedure Telegram_OpenForumTopic(FunctionParameters) Procedure Telegram_OpenForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
Result = OPI_Telegram.OpenForumThread(Token, Chat); // Opens main topic Result = OPI_Telegram.OpenForumThread(Token, Chat); // Opens main topic
OPI_TestDataRetrieval.WriteLog(Result, "OpenForumTopic (main)"); OPI_TestDataRetrieval.WriteLog(Result, "OpenForumTopic (main)");
Check_TelegramTrue(Result); // SKIP Check_TelegramTrue(Result); // SKIP
@@ -4548,7 +4548,7 @@ EndProcedure
Procedure Telegram_DeleteForumTopic(FunctionParameters) Procedure Telegram_DeleteForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
@@ -4566,7 +4566,7 @@ EndProcedure
Procedure Telegram_ClearPinnedMessagesList(FunctionParameters) Procedure Telegram_ClearPinnedMessagesList(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
@@ -4590,7 +4590,7 @@ EndProcedure
Procedure Telegram_HideMainForumTopic(FunctionParameters) Procedure Telegram_HideMainForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Result = OPI_Telegram.HideMainForumTopic(Token, Chat); Result = OPI_Telegram.HideMainForumTopic(Token, Chat);
@@ -4607,7 +4607,7 @@ EndProcedure
Procedure Telegram_ShowMainForumTopic(FunctionParameters) Procedure Telegram_ShowMainForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Result = OPI_Telegram.ShowMainForumTopic(Token, Chat); Result = OPI_Telegram.ShowMainForumTopic(Token, Chat);
@@ -4624,8 +4624,8 @@ EndProcedure
Procedure Telegram_ChangeMainTopicName(FunctionParameters) Procedure Telegram_ChangeMainTopicName(FunctionParameters)
Title = "New main thread name " + String(New UUID); Title = "New main thread name " + String(New UUID);
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Result = OPI_Telegram.EditMainForumTopicName(Token, Chat, Title); Result = OPI_Telegram.EditMainForumTopicName(Token, Chat, Title);
@@ -4642,11 +4642,11 @@ EndProcedure
Procedure Telegram_DeleteMessage(FunctionParameters) Procedure Telegram_DeleteMessage(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
ChatID = FunctionParameters["Telegram_ChannelID"]; ChatID = FunctionParameters["Telegram_ChannelID"];
MessageID = FunctionParameters["Telegram_ChannelMessageID"]; MessageID = FunctionParameters["Telegram_ChannelMessageID"];
Result = OPI_Telegram.DeleteMessage(Token, ChatID, MessageID); Result = OPI_Telegram.DeleteMessage(Token, ChatID, MessageID);
// END // END
@@ -6252,7 +6252,7 @@ EndProcedure
Procedure Dropbox_CancelFilePublication(FunctionParameters) Procedure Dropbox_CancelFilePublication(FunctionParameters)
Token = FunctionParameters["Dropbox_Token"]; Token = FunctionParameters["Dropbox_Token"];
File = FunctionParameters["Dropbox_FileID"]; File = FunctionParameters["Dropbox_FileID"];
Result = OPI_Dropbox.CancelFilePublication(Token, File); Result = OPI_Dropbox.CancelFilePublication(Token, File);
@@ -6274,7 +6274,7 @@ Procedure Bitrix24_GetAppAuthLink(FunctionParameters)
Domain = FunctionParameters["Bitrix24_Domain"]; Domain = FunctionParameters["Bitrix24_Domain"];
ClientID = FunctionParameters["Bitrix24_ClientID"]; ClientID = FunctionParameters["Bitrix24_ClientID"];
Result = OPI_Bitrix24.GetAppAuthLink(Domain, ClientID); Result = OPI_Bitrix24.GetAppAuthLink(Domain, ClientID);
// END // END
@@ -6292,7 +6292,7 @@ Procedure Bitrix24_GetToken(FunctionParameters)
ClientSecret = FunctionParameters["Bitrix24_ClientSecret"]; ClientSecret = FunctionParameters["Bitrix24_ClientSecret"];
Code = FunctionParameters["Bitrix24_Code"]; Code = FunctionParameters["Bitrix24_Code"];
Result = OPI_Bitrix24.GetToken(ClientID, ClientSecret, Code); Result = OPI_Bitrix24.GetToken(ClientID, ClientSecret, Code);
// END // END
@@ -6311,7 +6311,7 @@ Procedure Bitrix24_RefreshToken(FunctionParameters)
ClientSecret = FunctionParameters["Bitrix24_ClientSecret"]; ClientSecret = FunctionParameters["Bitrix24_ClientSecret"];
Refresh = FunctionParameters["Bitrix24_Refresh"]; Refresh = FunctionParameters["Bitrix24_Refresh"];
Result = OPI_Bitrix24.RefreshToken(ClientID, ClientSecret, Refresh); Result = OPI_Bitrix24.RefreshToken(ClientID, ClientSecret, Refresh);
// END // END
@@ -6328,9 +6328,9 @@ EndProcedure
Procedure Bitrix24_ServerTime(FunctionParameters) Procedure Bitrix24_ServerTime(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
Result = OPI_Bitrix24.ServerTime(URL); Result = OPI_Bitrix24.ServerTime(URL);
OPI_TestDataRetrieval.WriteLog(Result, "ServerTime (wh)", "Bitrix24"); OPI_TestDataRetrieval.WriteLog(Result, "ServerTime (wh)", "Bitrix24");
@@ -6362,7 +6362,7 @@ Procedure Bitrix24_CreatePost(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
Result = OPI_Bitrix24.CreatePost(URL, Text, , Files, Title, True); Result = OPI_Bitrix24.CreatePost(URL, Text, , Files, Title, True);
OPI_TestDataRetrieval.WriteLog(Result, "CreatePost (wh)", "Bitrix24"); OPI_TestDataRetrieval.WriteLog(Result, "CreatePost (wh)", "Bitrix24");
@@ -6427,7 +6427,7 @@ Procedure Bitrix24_DeletePost(FunctionParameters)
PostID = FunctionParameters["Bitrix24_HookPostID"]; PostID = FunctionParameters["Bitrix24_HookPostID"];
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
Result = OPI_Bitrix24.DeletePost(URL, PostID); Result = OPI_Bitrix24.DeletePost(URL, PostID);
OPI_TestDataRetrieval.WriteLog(Result, "DeletePost (wh)", "Bitrix24"); OPI_TestDataRetrieval.WriteLog(Result, "DeletePost (wh)", "Bitrix24");
@@ -7222,7 +7222,7 @@ EndProcedure
Procedure Bitrix24_GetStorage(FunctionParameters) Procedure Bitrix24_GetStorage(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
StorageID = 3; StorageID = 3;
Result = OPI_Bitrix24.GetStorage(URL, StorageID); Result = OPI_Bitrix24.GetStorage(URL, StorageID);
@@ -7373,7 +7373,7 @@ EndProcedure
Procedure Bitrix24_GetFolderExternalLink(FunctionParameters) Procedure Bitrix24_GetFolderExternalLink(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
FolderID = FunctionParameters["Bitrix24_FolderID"]; FolderID = FunctionParameters["Bitrix24_FolderID"];
Result = OPI_Bitrix24.GetFolderExternalLink(URL, FolderID); Result = OPI_Bitrix24.GetFolderExternalLink(URL, FolderID);
@@ -7397,7 +7397,7 @@ EndProcedure
Procedure Bitrix24_GetFolderFilterStructure(FunctionParameters) Procedure Bitrix24_GetFolderFilterStructure(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
Result = OPI_Bitrix24.GetFolderFilterStructure(URL); Result = OPI_Bitrix24.GetFolderFilterStructure(URL);
@@ -7420,7 +7420,7 @@ EndProcedure
Procedure Bitrix24_GetFolderItems(FunctionParameters) Procedure Bitrix24_GetFolderItems(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
FolderID = FunctionParameters["Bitrix24_FolderID"]; FolderID = FunctionParameters["Bitrix24_FolderID"];
Result = OPI_Bitrix24.GetFolderItems(URL, FolderID); Result = OPI_Bitrix24.GetFolderItems(URL, FolderID);
@@ -7444,7 +7444,7 @@ EndProcedure
Procedure Bitrxi24_MarkFolderAsDeleted(FunctionParameters) Procedure Bitrxi24_MarkFolderAsDeleted(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
FolderID = FunctionParameters["Bitrix24_FolderID"]; FolderID = FunctionParameters["Bitrix24_FolderID"];
Result = OPI_Bitrix24.MarkFolderAsDeleted(URL, FolderID); Result = OPI_Bitrix24.MarkFolderAsDeleted(URL, FolderID);

56
src/en/OInt/tools/Modules/OPI_TestDataRetrieval.os
View File

@@ -345,15 +345,15 @@ EndFunction
Procedure ParameterToCollection(Parameter, Collection) Export Procedure ParameterToCollection(Parameter, Collection) Export
Value = GetParameter(Parameter); Value = GetParameter(Parameter);
Collection.Insert(Parameter, Value); Collection.Insert(Parameter, Value);
EndProcedure EndProcedure
Procedure BinaryToCollection(Parameter, Collection) Export Procedure BinaryToCollection(Parameter, Collection) Export
Value = GetBinary(Parameter); Value = GetBinary(Parameter);
Collection.Insert(Parameter, Value); Collection.Insert(Parameter, Value);
EndProcedure EndProcedure
@@ -384,8 +384,8 @@ Procedure WriteLog(Val Result, Val Method, Val Library = "") Export
Message(Chars.LF); Message(Chars.LF);
If ValueIsFilled(Library) Then If ValueIsFilled(Library) Then
WriteLogFile(Data, Method, Library); WriteLogFile(Data, Method, Library);
EndIf; EndIf;
EndProcedure EndProcedure
@@ -410,11 +410,11 @@ Function DataFilePath()
For Each PossiblePath In PossiblePaths Do For Each PossiblePath In PossiblePaths Do
RepositoryFile = New File(PossiblePath); RepositoryFile = New File(PossiblePath);
If RepositoryFile.Exist() Then If RepositoryFile.Exist() Then
Path = PossiblePath; Path = PossiblePath;
EndIf; EndIf;
EndDo; EndDo;
@@ -453,35 +453,35 @@ EndProcedure
Procedure WriteLogFile(Val Data, Val Method, Val Library) Procedure WriteLogFile(Val Data, Val Method, Val Library)
Try Try
LogPath = "./docs/ru/results"; LogPath = "./docs/ru/results";
LibraryLogPath = LogPath + "/" + Library; LibraryLogPath = LogPath + "/" + Library;
LogDirectory = New File(LogPath); LogDirectory = New File(LogPath);
If Not LogDirectory.Exist() Then If Not LogDirectory.Exist() Then
CreateDirectory(LogPath); CreateDirectory(LogPath);
EndIf; EndIf;
LibraryLogCatalog = New File(LibraryLogPath); LibraryLogCatalog = New File(LibraryLogPath);
If Not LibraryLogCatalog.Exist() Then If Not LibraryLogCatalog.Exist() Then
CreateDirectory(LibraryLogPath); CreateDirectory(LibraryLogPath);
EndIf; EndIf;
FilePath = LibraryLogPath + "/" + Method + ".log"; FilePath = LibraryLogPath + "/" + Method + ".log";
LogFile = New File(FilePath); LogFile = New File(FilePath);
If Not LogFile.Exist() Then If Not LogFile.Exist() Then
LogDocument = New TextDocument; LogDocument = New TextDocument;
LogDocument.SetText(Data); LogDocument.SetText(Data);
LogDocument.Write(FilePath); LogDocument.Write(FilePath);
EndIf; EndIf;
Except Except
Message("Failed to write log file!: " + ErrorDescription()); Message("Failed to write log file!: " + ErrorDescription());
EndTry; EndTry;
EndProcedure EndProcedure

26
src/en/OInt/tools/Modules/OPI_TypeConversion.os
View File

@@ -151,7 +151,7 @@ Procedure GetCollection(Value) Export
Except Except
Value = InitialValue; Value = InitialValue;
GetArray(Value); GetArray(Value);
EndTry; EndTry;
@@ -169,17 +169,17 @@ Procedure GetArray(Value) Export
CommaInQuotes = "','"; CommaInQuotes = "','";
Value = StrReplace(Value, "['" , ""); Value = StrReplace(Value, "['" , "");
Value = StrReplace(Value, "']" , ""); Value = StrReplace(Value, "']" , "");
Value = StrReplace(Value, "', '" , CommaInQuotes); Value = StrReplace(Value, "', '" , CommaInQuotes);
Value = StrReplace(Value, "' , '", CommaInQuotes); Value = StrReplace(Value, "' , '", CommaInQuotes);
Value = StrReplace(Value, "' ,'" , CommaInQuotes); Value = StrReplace(Value, "' ,'" , CommaInQuotes);
Value = StrSplit(Value, CommaInQuotes, False); Value = StrSplit(Value, CommaInQuotes, False);
For N = 0 To Value.UBound() Do For N = 0 To Value.UBound() Do
Value[N] = TrimAll(Value[N]); Value[N] = TrimAll(Value[N]);
EndDo; EndDo;
Else Else
@@ -187,7 +187,7 @@ Procedure GetArray(Value) Export
Value = OPI_Tools.NumberToString(Value); Value = OPI_Tools.NumberToString(Value);
EndIf; EndIf;
OPI_Tools.ValueToArray(Value); OPI_Tools.ValueToArray(Value);
EndIf; EndIf;
@@ -309,7 +309,7 @@ EndProcedure
Function ThisIsCollection(Val Value) Function ThisIsCollection(Val Value)
Return TypeOf(Value) = Type("Array") Return TypeOf(Value) = Type("Array")
Or TypeOf(Value) = Type("Structure") Or TypeOf(Value) = Type("Structure")
Or TypeOf(Value) = Type("Map"); Or TypeOf(Value) = Type("Map");
@@ -317,7 +317,7 @@ EndFunction
Function ThisIsSymbolic(Val Value) Function ThisIsSymbolic(Val Value)
Return TypeOf(Value) = Type("String") Return TypeOf(Value) = Type("String")
Or TypeOf(Value) = Type("Number") Or TypeOf(Value) = Type("Number")
Or TypeOf(Value) = Type("Date"); Or TypeOf(Value) = Type("Date");

74
src/en/OPI/src/CommonModules/OPI_Bitrix24/Module.bsl
View File

@@ -141,10 +141,10 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function ServerTime(Val URL, Val Token = "") Export Function ServerTime(Val URL, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "server.time"); Parameters = NormalizeAuth(URL, Token, "server.time");
Response = OPI_Tools.Get(URL, Parameters); Response = OPI_Tools.Get(URL, Parameters);
Return Response; Return Response;
EndFunction EndFunction
@@ -170,12 +170,12 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function CreatePost(Val URL Function CreatePost(Val URL
, Val Text , Val Text
, Val Visibility = "UA" , Val Visibility = "UA"
, Val Files = "" , Val Files = ""
, Val Title = "" , Val Title = ""
, Val Important = False , Val Important = False
, Val Token = "") Export , Val Token = "") Export
MakeBoolean(Important); MakeBoolean(Important);
@@ -1015,9 +1015,9 @@ Function GetTasksFilterStructure(Val Clear = False) Export
, "<status for sorting. Similar to REAL_STATUS, but has three additional meta-statuses>"); , "<status for sorting. Similar to REAL_STATUS, but has three additional meta-statuses>");
If Clear Then If Clear Then
For Each Filter In FilterStructure Do For Each Filter In FilterStructure Do
Filter.Value = ""; Filter.Value = "";
EndDo; EndDo;
EndIf; EndIf;
//@skip-check constructor-function-return-section //@skip-check constructor-function-return-section
@@ -1367,7 +1367,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function GetResultsList(Val URL, Val TaskID, Val Token = "") Export Function GetResultsList(Val URL, Val TaskID, Val Token = "") Export
Response = ManageTask(URL, TaskID, "tasks.task.result.list", Token); Response = ManageTask(URL, TaskID, "tasks.task.result.list", Token);
Return Response; Return Response;
EndFunction EndFunction
@@ -1387,7 +1387,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function CreateResultFromComment(Val URL, Val CommentID, Val Token = "") Export Function CreateResultFromComment(Val URL, Val CommentID, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "tasks.task.result.addFromComment"); Parameters = NormalizeAuth(URL, Token, "tasks.task.result.addFromComment");
OPI_Tools.AddField("commentId", CommentID, "String", Parameters); OPI_Tools.AddField("commentId", CommentID, "String", Parameters);
Response = OPI_Tools.Post(URL, Parameters); Response = OPI_Tools.Post(URL, Parameters);
@@ -1411,7 +1411,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function DeleteResultFromComment(Val URL, Val CommentID, Val Token = "") Export Function DeleteResultFromComment(Val URL, Val CommentID, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "tasks.task.result.deleteFromComment"); Parameters = NormalizeAuth(URL, Token, "tasks.task.result.deleteFromComment");
OPI_Tools.AddField("commentId", CommentID, "String", Parameters); OPI_Tools.AddField("commentId", CommentID, "String", Parameters);
Response = OPI_Tools.Post(URL, Parameters); Response = OPI_Tools.Post(URL, Parameters);
@@ -1864,7 +1864,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function GetAppSotrage(Val URL, Val Token = "") Export Function GetAppSotrage(Val URL, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "disk.storage.getforapp"); Parameters = NormalizeAuth(URL, Token, "disk.storage.getforapp");
Response = OPI_Tools.Post(URL, Parameters); Response = OPI_Tools.Post(URL, Parameters);
Return Response; Return Response;
@@ -1886,8 +1886,8 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function GetStorage(Val URL, Val StorageID, Val Token = "") Export Function GetStorage(Val URL, Val StorageID, Val Token = "") Export
Response = FileManagement(URL, StorageID, "disk.storage.get", Token); Response = FileManagement(URL, StorageID, "disk.storage.get", Token);
Return Response; Return Response;
EndFunction EndFunction
@@ -1907,7 +1907,7 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function RenameStorage(Val URL, Val StorageID, Val Name, Val Token = "") Export Function RenameStorage(Val URL, Val StorageID, Val Name, Val Token = "") Export
Parameters = NormalizeAuth(URL, Token, "disk.storage.rename"); Parameters = NormalizeAuth(URL, Token, "disk.storage.rename");
OPI_Tools.AddField("id" , StorageID , "String", Parameters); OPI_Tools.AddField("id" , StorageID , "String", Parameters);
OPI_Tools.AddField("newName", Name , "String", Parameters); OPI_Tools.AddField("newName", Name , "String", Parameters);
@@ -1933,8 +1933,8 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function GetStorageObjects(Val URL, Val StorageID, Val Token = "") Export Function GetStorageObjects(Val URL, Val StorageID, Val Token = "") Export
Response = FileManagement(URL, StorageID, "disk.storage.getchildren", Token); Response = FileManagement(URL, StorageID, "disk.storage.getchildren", Token);
Return Response; Return Response;
EndFunction EndFunction
@@ -1954,11 +1954,11 @@ EndFunction
// Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API // Map Of KeyAndValue - serialized JSON of answer from Bitrix24 API
Function CreateStorageFolder(Val URL, Val StorageID, Val Name, Val Token = "") Export Function CreateStorageFolder(Val URL, Val StorageID, Val Name, Val Token = "") Export
OPI_TypeConversion.GetLine(Name); OPI_TypeConversion.GetLine(Name);
FolderStructure = New Structure("NAME", Name); FolderStructure = New Structure("NAME", Name);
Parameters = NormalizeAuth(URL, Token, "disk.storage.addfolder"); Parameters = NormalizeAuth(URL, Token, "disk.storage.addfolder");
OPI_Tools.AddField("id" , StorageID , "String" , Parameters); OPI_Tools.AddField("id" , StorageID , "String" , Parameters);
OPI_Tools.AddField("data", FolderStructure, "Collection", Parameters); OPI_Tools.AddField("data", FolderStructure, "Collection", Parameters);
@@ -3443,33 +3443,33 @@ Function NormalizeAuth(URL, Val Token, Val Method = "")
Parameters = New Structure; Parameters = New Structure;
IsTokenAuth = ValueIsFilled(Token); IsTokenAuth = ValueIsFilled(Token);
UncorrectItems = New Array; UncorrectItems = New Array;
UncorrectItems.Add("https://"); UncorrectItems.Add("https://");
UncorrectItems.Add("http://"); UncorrectItems.Add("http://");
UncorrectItems.Add("www."); UncorrectItems.Add("www.");
For Each DeletedElement In UncorrectItems Do For Each DeletedElement In UncorrectItems Do
URL = StrReplace(URL, DeletedElement, ""); URL = StrReplace(URL, DeletedElement, "");
EndDo; EndDo;
URL = TrimAll(URL); URL = TrimAll(URL);
If Not StrEndsWith(URL, "/") Then If Not StrEndsWith(URL, "/") Then
URL = URL + "/"; URL = URL + "/";
EndIf; EndIf;
If IsTokenAuth Then If IsTokenAuth Then
If Not StrEndsWith(URL, "rest/") Then If Not StrEndsWith(URL, "rest/") Then
URL = URL + "rest/"; URL = URL + "rest/";
EndIf; EndIf;
Parameters.Insert("auth", Token); Parameters.Insert("auth", Token);
EndIf; EndIf;
If ValueIsFilled(Method) Then If ValueIsFilled(Method) Then
URL = URL + TrimAll(Method); URL = URL + TrimAll(Method);
EndIf; EndIf;
Return Parameters; Return Parameters;

4
src/en/OPI/src/CommonModules/OPI_Dropbox/Module.bsl
View File

@@ -751,13 +751,13 @@ EndFunction
// Map Of KeyAndValue - serialized JSON response from Dropbox // Map Of KeyAndValue - serialized JSON response from Dropbox
Function CancelFilePublication(Val Token, Val FileID) Export Function CancelFilePublication(Val Token, Val FileID) Export
OPI_TypeConversion.GetLine(FileID); OPI_TypeConversion.GetLine(FileID);
If Not StrStartsWith(FileID, "id:") Then If Not StrStartsWith(FileID, "id:") Then
FileID = "id:" + FileID; FileID = "id:" + FileID;
EndIf; EndIf;
URL = "https://api.dropboxapi.com/2/sharing/unshare_file"; URL = "https://api.dropboxapi.com/2/sharing/unshare_file";
Parameters = New Structure; Parameters = New Structure;
OPI_Tools.AddField("file", FileID, "String", Parameters); OPI_Tools.AddField("file", FileID, "String", Parameters);

24
src/en/OPI/src/CommonModules/OPI_GoogleDrive/Module.bsl
View File

@@ -604,8 +604,8 @@ Function UploadLargeFile(Val Description, Val FileMapping, Val Headers, Val Iden
Return Response; Return Response;
EndIf; EndIf;
UploadResponse = UploadFileInParts(Binary, UploadURL); UploadResponse = UploadFileInParts(Binary, UploadURL);
Response = ?(ValueIsFilled(UploadResponse), UploadResponse, Response); Response = ?(ValueIsFilled(UploadResponse), UploadResponse, Response);
OPI_Tools.ProcessResponse(Response); OPI_Tools.ProcessResponse(Response);
Return Response; Return Response;
@@ -614,9 +614,9 @@ EndFunction
Function UploadFileInParts(Val Binary, Val UploadURL) Function UploadFileInParts(Val Binary, Val UploadURL)
Response = ""; Response = "";
ChunkSize = 268435456; ChunkSize = 268435456;
BytesRead = 0; BytesRead = 0;
CurrentPosition = 0; CurrentPosition = 0;
TotalSize = Binary.Size(); TotalSize = Binary.Size();
StrTotalSize = OPI_Tools.NumberToString(TotalSize); StrTotalSize = OPI_Tools.NumberToString(TotalSize);
@@ -649,15 +649,15 @@ Function UploadFileInParts(Val Binary, Val UploadURL)
Response = OPI_Tools.Put(UploadURL, CurrentData, AdditionalHeaders, False, True); Response = OPI_Tools.Put(UploadURL, CurrentData, AdditionalHeaders, False, True);
CheckResult = CheckPartUpload(Response, StrTotalSize, AdditionalHeaders, UploadURL, CurrentPosition); CheckResult = CheckPartUpload(Response, StrTotalSize, AdditionalHeaders, UploadURL, CurrentPosition);
If ValueIsFilled(CheckResult) Then If ValueIsFilled(CheckResult) Then
Return CheckResult; Return CheckResult;
EndIf; EndIf;
// !OInt KB = 1024; // !OInt KB = 1024;
// !OInt MB = KB * KB; // !OInt MB = KB * KB;
// !OInt Message(OPI_Tools.ProgressInfo(CurrentPosition, TotalSize, "MB", MB)); // !OInt Message(OPI_Tools.ProgressInfo(CurrentPosition, TotalSize, "MB", MB));
// !OInt RunGarbageCollection(); // !OInt RunGarbageCollection();
// !OInt FreeObject(CurrentData); // !OInt FreeObject(CurrentData);
@@ -695,7 +695,7 @@ Function CheckPartUpload(Response, StrTotalSize, AdditionalHeaders, UploadURL, C
Else Else
OPI_Tools.ProcessResponse(Response); OPI_Tools.ProcessResponse(Response);
Return Response; Return Response;
EndIf; EndIf;
@@ -713,7 +713,7 @@ Function CheckPartUpload(Response, StrTotalSize, AdditionalHeaders, UploadURL, C
PartsRequired = 2; PartsRequired = 2;
If Not ArrayOfInformation.Count() = PartsRequired Then If Not ArrayOfInformation.Count() = PartsRequired Then
OPI_Tools.ProcessResponse(Response); OPI_Tools.ProcessResponse(Response);
Return Response; Return Response;
EndIf; EndIf;

2
src/en/OPI/src/CommonModules/OPI_GoogleSheets/Module.bsl
View File

@@ -359,7 +359,7 @@ EndProcedure
Procedure AddSheetName(Cell, Val Sheet) Procedure AddSheetName(Cell, Val Sheet)
If ValueIsFilled(Sheet) Then If ValueIsFilled(Sheet) Then
Cell = "'" + Sheet + "'!" + Cell; Cell = "'" + Sheet + "'!" + Cell;
EndIf; EndIf;
EndProcedure EndProcedure

126
src/en/OPI/src/CommonModules/OPI_Telegram/Module.bsl
View File

@@ -250,11 +250,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendTextMessage(Val Token Function SendTextMessage(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown" , Val Markup = "Markdown"
, Val RepliedID = 0) Export , Val RepliedID = 0) Export
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
OPI_Tools.ReplaceSpecialCharacters(Text, Markup); OPI_Tools.ReplaceSpecialCharacters(Text, Markup);
@@ -290,11 +290,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendImage(Val Token Function SendImage(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Image , Val Image
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
Return SendFile(Token, ChatID, Text, Image, "photo", Keyboard, Markup); Return SendFile(Token, ChatID, Text, Image, "photo", Keyboard, Markup);
@@ -314,11 +314,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendVideo(Val Token Function SendVideo(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Video , Val Video
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
Return SendFile(Token, ChatID, Text, Video, "video", Keyboard, Markup); Return SendFile(Token, ChatID, Text, Video, "video", Keyboard, Markup);
@@ -338,11 +338,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendAudio(Val Token Function SendAudio(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Audio , Val Audio
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
Return SendFile(Token, ChatID, Text, Audio, "audio", Keyboard, Markup); Return SendFile(Token, ChatID, Text, Audio, "audio", Keyboard, Markup);
@@ -363,12 +363,12 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendDocument(Val Token Function SendDocument(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val Document , Val Document
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown" , Val Markup = "Markdown"
, Val FileName = "") Export , Val FileName = "") Export
Return SendFile(Token, ChatID, Text, Document, "document", Keyboard, Markup, FileName); Return SendFile(Token, ChatID, Text, Document, "document", Keyboard, Markup, FileName);
@@ -388,11 +388,11 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendGif(Val Token Function SendGif(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val GIF , Val GIF
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
Return SendFile(Token, ChatID, Text, GIF, "animation", Keyboard, Markup); Return SendFile(Token, ChatID, Text, GIF, "animation", Keyboard, Markup);
@@ -415,18 +415,18 @@ EndFunction
// Returns: // Returns:
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendMediaGroup(Val Token Function SendMediaGroup(Val Token
, Val ChatID , Val ChatID
, Val Text , Val Text
, Val FileMapping , Val FileMapping
, Val Keyboard = "" , Val Keyboard = ""
, Val Markup = "Markdown") Export , Val Markup = "Markdown") Export
// FileMapping // FileMapping
// Key - File, Value - Type // Key - File, Value - Type
// Types: audio, document, photo, video // Types: audio, document, photo, video
// Different types cannot be mixed! // Different types cannot be mixed!
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
OPI_TypeConversion.GetLine(ChatID); OPI_TypeConversion.GetLine(ChatID);
@@ -466,7 +466,7 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendLocation(Val Token, Val ChatID, Val Latitude, Val Longitude, Val Keyboard = "") Export Function SendLocation(Val Token, Val ChatID, Val Latitude, Val Longitude, Val Keyboard = "") Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
OPI_TypeConversion.GetLine(ChatID); OPI_TypeConversion.GetLine(ChatID);
@@ -501,7 +501,7 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function SendContact(Val Token, Val ChatID, Val Name, Val LastName, Val Phone, Val Keyboard = "") Export Function SendContact(Val Token, Val ChatID, Val Name, Val LastName, Val Phone, Val Keyboard = "") Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
OPI_TypeConversion.GetLine(ChatID); OPI_TypeConversion.GetLine(ChatID);
@@ -642,7 +642,7 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function Ban(Val Token, Val ChatID, Val UserID) Export Function Ban(Val Token, Val ChatID, Val UserID) Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
URL = "api.telegram.org/bot" + Token + "/banChatMember"; URL = "api.telegram.org/bot" + Token + "/banChatMember";
@@ -670,7 +670,7 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function Unban(Val Token, Val ChatID, Val UserID) Export Function Unban(Val Token, Val ChatID, Val UserID) Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
URL = "api.telegram.org/bot" + Token + "/unbanChatMember"; URL = "api.telegram.org/bot" + Token + "/unbanChatMember";
@@ -705,7 +705,7 @@ Function CreateInvitationLink(Val Token
, Val ExpirationDate = "" , Val ExpirationDate = ""
, Val UserLimit = 0) Export , Val UserLimit = 0) Export
String_ = "String"; String_ = "String";
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
URL = "api.telegram.org/bot" + Token + "/createChatInviteLink"; URL = "api.telegram.org/bot" + Token + "/createChatInviteLink";
@@ -817,16 +817,16 @@ EndFunction
// Map Of KeyAndValue - Serialized JSON response from Telegram // Map Of KeyAndValue - Serialized JSON response from Telegram
Function DeleteMessage(Val Token, Val ChatID, Val MessageID) Export Function DeleteMessage(Val Token, Val ChatID, Val MessageID) Export
OPI_TypeConversion.GetLine(Token); OPI_TypeConversion.GetLine(Token);
URL = "api.telegram.org/bot" + Token + "/deleteMessage"; URL = "api.telegram.org/bot" + Token + "/deleteMessage";
Parameters = New Structure; Parameters = New Structure;
OPI_Tools.AddField("message_id", MessageID, "String", Parameters); OPI_Tools.AddField("message_id", MessageID, "String", Parameters);
OPI_Tools.AddField("chat_id" , ChatID , "String", Parameters); OPI_Tools.AddField("chat_id" , ChatID , "String", Parameters);
Response = OPI_Tools.Get(URL, Parameters); Response = OPI_Tools.Get(URL, Parameters);
Return Response; Return Response;
EndFunction EndFunction
@@ -852,7 +852,7 @@ Function GetAvatarIconList(Val Token) Export
Icons = Response[Result]; Icons = Response[Result];
If Not ValueIsFilled(Icons) Then If Not ValueIsFilled(Icons) Then
Return Response; Return Response;
EndIf; EndIf;
Collection = New Map; Collection = New Map;
@@ -1267,28 +1267,28 @@ Procedure ConvertFilesToMedia(FileMapping, Text, Media)
TempMap = New Map; TempMap = New Map;
Counter = 0; Counter = 0;
For Each CurrentFile In FileMapping Do For Each CurrentFile In FileMapping Do
CurrentData = CurrentFile.Key; CurrentData = CurrentFile.Key;
TypeOfMedia = CurrentFile.Value; TypeOfMedia = CurrentFile.Value;
MediaName = ConvertFileData(CurrentData, TypeOfMedia, Counter); MediaName = ConvertFileData(CurrentData, TypeOfMedia, Counter);
TempMap.Insert(MediaName + "|" + MediaName, CurrentData); TempMap.Insert(MediaName + "|" + MediaName, CurrentData);
MediaStructure = New Structure; MediaStructure = New Structure;
MediaStructure.Insert("type" , TypeOfMedia); MediaStructure.Insert("type" , TypeOfMedia);
MediaStructure.Insert("media", "attach://" + MediaName); MediaStructure.Insert("media", "attach://" + MediaName);
If Counter = 0 Then If Counter = 0 Then
MediaStructure.Insert("caption", Text); MediaStructure.Insert("caption", Text);
EndIf; EndIf;
Media.Add(MediaStructure); Media.Add(MediaStructure);
Counter = Counter + 1; Counter = Counter + 1;
EndDo; EndDo;
Media = OPI_Tools.JSONString(Media); Media = OPI_Tools.JSONString(Media);
FileMapping = TempMap; FileMapping = TempMap;

56
src/en/OPI/src/CommonModules/OPI_TestDataRetrieval/Module.bsl
View File

@@ -345,15 +345,15 @@ EndFunction
Procedure ParameterToCollection(Parameter, Collection) Export Procedure ParameterToCollection(Parameter, Collection) Export
Value = GetParameter(Parameter); Value = GetParameter(Parameter);
Collection.Insert(Parameter, Value); Collection.Insert(Parameter, Value);
EndProcedure EndProcedure
Procedure BinaryToCollection(Parameter, Collection) Export Procedure BinaryToCollection(Parameter, Collection) Export
Value = GetBinary(Parameter); Value = GetBinary(Parameter);
Collection.Insert(Parameter, Value); Collection.Insert(Parameter, Value);
EndProcedure EndProcedure
@@ -384,8 +384,8 @@ Procedure WriteLog(Val Result, Val Method, Val Library = "") Export
Message(Chars.LF); Message(Chars.LF);
If ValueIsFilled(Library) Then If ValueIsFilled(Library) Then
WriteLogFile(Data, Method, Library); WriteLogFile(Data, Method, Library);
EndIf; EndIf;
EndProcedure EndProcedure
@@ -410,11 +410,11 @@ Function DataFilePath()
For Each PossiblePath In PossiblePaths Do For Each PossiblePath In PossiblePaths Do
RepositoryFile = New File(PossiblePath); RepositoryFile = New File(PossiblePath);
If RepositoryFile.Exists() Then If RepositoryFile.Exists() Then
Path = PossiblePath; Path = PossiblePath;
EndIf; EndIf;
EndDo; EndDo;
@@ -453,35 +453,35 @@ EndProcedure
Procedure WriteLogFile(Val Data, Val Method, Val Library) Procedure WriteLogFile(Val Data, Val Method, Val Library)
Try Try
LogPath = "./docs/ru/results"; LogPath = "./docs/ru/results";
LibraryLogPath = LogPath + "/" + Library; LibraryLogPath = LogPath + "/" + Library;
LogDirectory = New File(LogPath); LogDirectory = New File(LogPath);
If Not LogDirectory.Exists() Then If Not LogDirectory.Exists() Then
CreateDirectory(LogPath); CreateDirectory(LogPath);
EndIf; EndIf;
LibraryLogCatalog = New File(LibraryLogPath); LibraryLogCatalog = New File(LibraryLogPath);
If Not LibraryLogCatalog.Exists() Then If Not LibraryLogCatalog.Exists() Then
CreateDirectory(LibraryLogPath); CreateDirectory(LibraryLogPath);
EndIf; EndIf;
FilePath = LibraryLogPath + "/" + Method + ".log"; FilePath = LibraryLogPath + "/" + Method + ".log";
LogFile = New File(FilePath); LogFile = New File(FilePath);
If Not LogFile.Exists() Then If Not LogFile.Exists() Then
LogDocument = New TextDocument; LogDocument = New TextDocument;
LogDocument.SetText(Data); LogDocument.SetText(Data);
LogDocument.Write(FilePath); LogDocument.Write(FilePath);
EndIf; EndIf;
Except Except
Message("Failed to write log file!: " + ErrorDescription()); Message("Failed to write log file!: " + ErrorDescription());
EndTry; EndTry;
EndProcedure EndProcedure

430
src/en/OPI/src/CommonModules/OPI_Tests/Module.bsl
View File

@@ -68,71 +68,71 @@ EndFunction
Procedure TelegramAPI_GetBotInfo() Export Procedure TelegramAPI_GetBotInfo() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters);
Telegram_GetBotInformation(TestParameters); Telegram_GetBotInformation(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_GetUpdates() Export Procedure TelegramAPI_GetUpdates() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters);
Telegram_DeleteWebhook(TestParameters); Telegram_DeleteWebhook(TestParameters);
Telegram_GetUpdates(TestParameters); Telegram_GetUpdates(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_SetWebhook() Export Procedure TelegramAPI_SetWebhook() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_URL" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_URL" , TestParameters);
Telegram_SetWebhook(TestParameters); Telegram_SetWebhook(TestParameters);
Telegram_DeleteWebhook(TestParameters); Telegram_DeleteWebhook(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_SendTextMessage() Export Procedure TelegramAPI_SendTextMessage() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters);
Telegram_SendTextMessage(TestParameters); Telegram_SendTextMessage(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_SendImage() Export Procedure TelegramAPI_SendImage() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Picture" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Picture" , TestParameters);
Telegram_SendPicture(TestParameters); Telegram_SendPicture(TestParameters);
Telegram_DownloadFile(TestParameters); Telegram_DownloadFile(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_SendVideo() Export Procedure TelegramAPI_SendVideo() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Video" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Video" , TestParameters);
Telegram_SendVideo(TestParameters); Telegram_SendVideo(TestParameters);
Telegram_DownloadFile(TestParameters); Telegram_DownloadFile(TestParameters);
EndProcedure EndProcedure
@@ -225,7 +225,7 @@ Procedure TelegramAPI_SendPoll() Export
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChatID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
Telegram_SendPoll(TestParameters); Telegram_SendPoll(TestParameters);
EndProcedure EndProcedure
@@ -237,7 +237,7 @@ Procedure TelegramAPI_ForwardMessage() Export
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelMessageID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelMessageID", TestParameters);
Telegram_ForwardMessage(TestParameters); Telegram_ForwardMessage(TestParameters);
EndProcedure EndProcedure
@@ -259,7 +259,7 @@ Procedure TelegramAPI_CreateInvitationLink() Export
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID", TestParameters);
Telegram_CreateInviteLink(TestParameters); Telegram_CreateInviteLink(TestParameters);
EndProcedure EndProcedure
@@ -270,9 +270,9 @@ Procedure TelegramAPI_PinUnpinMessage() Export
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelID" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelMessageID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ChannelMessageID", TestParameters);
Telegram_PinMessage(TestParameters); Telegram_PinMessage(TestParameters);
Telegram_UnpinMessage(TestParameters); Telegram_UnpinMessage(TestParameters);
Telegram_DeleteMessage(TestParameters); Telegram_DeleteMessage(TestParameters);
EndProcedure EndProcedure
@@ -291,7 +291,7 @@ Procedure TelegramAPI_GetForumAvatarsList() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token", TestParameters);
Telegram_GetForumAvatarList(TestParameters); Telegram_GetForumAvatarList(TestParameters);
EndProcedure EndProcedure
@@ -303,33 +303,33 @@ Procedure TelegramAPI_CreateDeleteForumTopic() Export
OPI_TestDataRetrieval.ParameterToCollection("Picture" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Picture" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("String" , TestParameters);
Telegram_CreateForumTopic(TestParameters); Telegram_CreateForumTopic(TestParameters);
Telegram_EditForumTopic(TestParameters); Telegram_EditForumTopic(TestParameters);
Telegram_CloseForumTopic(TestParameters); Telegram_CloseForumTopic(TestParameters);
Telegram_OpenForumTopic(TestParameters); Telegram_OpenForumTopic(TestParameters);
Telegram_ClearPinnedMessagesList(TestParameters); Telegram_ClearPinnedMessagesList(TestParameters);
Telegram_DeleteForumTopic(TestParameters); Telegram_DeleteForumTopic(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_HideShowMainTopic() Export Procedure TelegramAPI_HideShowMainTopic() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ForumID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ForumID", TestParameters);
Telegram_HideMainForumTopic(TestParameters); Telegram_HideMainForumTopic(TestParameters);
Telegram_ShowMainForumTopic(TestParameters); Telegram_ShowMainForumTopic(TestParameters);
EndProcedure EndProcedure
Procedure TelegramAPI_ChangeMainTopicName() Export Procedure TelegramAPI_ChangeMainTopicName() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_Token" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Telegram_ForumID", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Telegram_ForumID", TestParameters);
Telegram_ChangeMainTopicName(TestParameters); Telegram_ChangeMainTopicName(TestParameters);
EndProcedure EndProcedure
@@ -1806,13 +1806,13 @@ EndProcedure
Procedure Notion_CreatePage() Export Procedure Notion_CreatePage() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent"); Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent");
Title = "TestTitle"; Title = "TestTitle";
Result = OPI_Notion.CreatePage(Token, Parent, Title); Result = OPI_Notion.CreatePage(Token, Parent, Title);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreatePage"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreatePage");
Check_NotionObject(Result); Check_NotionObject(Result);
@@ -1820,46 +1820,46 @@ EndProcedure
Procedure Notion_CreateEditDatabase() Export Procedure Notion_CreateEditDatabase() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent"); Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent");
Title = "TestTitle"; Title = "TestTitle";
Properties = New Map; Properties = New Map;
Properties.Insert("Name" , "title"); Properties.Insert("Name" , "title");
Properties.Insert("Description" , "rich_text"); Properties.Insert("Description" , "rich_text");
Properties.Insert("Number" , "number"); Properties.Insert("Number" , "number");
Properties.Insert("Status" , "status"); Properties.Insert("Status" , "status");
Properties.Insert("CreationDate" , "date"); Properties.Insert("CreationDate" , "date");
Properties.Insert("Image" , "files"); Properties.Insert("Image" , "files");
Properties.Insert("Active" , "checkbox"); Properties.Insert("Active" , "checkbox");
Properties.Insert("Website" , "url"); Properties.Insert("Website" , "url");
Properties.Insert("Email" , "email"); Properties.Insert("Email" , "email");
Properties.Insert("Phone" , "phone_number"); Properties.Insert("Phone" , "phone_number");
Properties.Insert("User" , "people"); Properties.Insert("User" , "people");
ValueSelection = New Map; ValueSelection = New Map;
ValueSelection.Insert("New" , "green"); ValueSelection.Insert("New" , "green");
ValueSelection.Insert("InProgress" , "yellow"); ValueSelection.Insert("InProgress" , "yellow");
ValueSelection.Insert("Remote" , "red"); ValueSelection.Insert("Remote" , "red");
Properties.Insert("Status", ValueSelection); Properties.Insert("Status", ValueSelection);
Result = OPI_Notion.CreateDatabase(Token, Parent, Title, Properties); Result = OPI_Notion.CreateDatabase(Token, Parent, Title, Properties);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateDatabase"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateDatabase");
Check_NotionObject(Result, "database"); Check_NotionObject(Result, "database");
Base = Result["id"]; Base = Result["id"];
Title = "TestTitle"; Title = "TestTitle";
Description = "TestDescription"; Description = "TestDescription";
Properties = New Map; Properties = New Map;
Properties.Insert("Email", "rich_text"); // Type fields "Email" will changed with email to text Properties.Insert("Email", "rich_text"); // Type fields "Email" will changed with email to text
Properties.Insert("Website"); // Field "Website" will deleted Properties.Insert("Website"); // Field "Website" will deleted
Result = OPI_Notion.EditDatabaseProperties(Token, Base, Properties, Title, Description); Result = OPI_Notion.EditDatabaseProperties(Token, Base, Properties, Title, Description);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "EditDatabaseProperties"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "EditDatabaseProperties");
Check_NotionObject(Result, "database"); Check_NotionObject(Result, "database");
@@ -1867,12 +1867,12 @@ EndProcedure
Procedure Notion_GetPageInfo() Export Procedure Notion_GetPageInfo() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Page = OPI_TestDataRetrieval.GetParameter("Notion_Page"); Page = OPI_TestDataRetrieval.GetParameter("Notion_Page");
Result = OPI_Notion.GetPage(Token, Page); Result = OPI_Notion.GetPage(Token, Page);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetPage"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetPage");
Check_NotionObject(Result); Check_NotionObject(Result);
@@ -1880,12 +1880,12 @@ EndProcedure
Procedure Notion_GetDatabaseInfo() Export Procedure Notion_GetDatabaseInfo() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Base = OPI_TestDataRetrieval.GetParameter("Notion_Base"); Base = OPI_TestDataRetrieval.GetParameter("Notion_Base");
Result = OPI_Notion.GetDatabase(Token, Base); Result = OPI_Notion.GetDatabase(Token, Base);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetDatabase"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetDatabase");
Check_NotionObject(Result, "database"); Check_NotionObject(Result, "database");
@@ -1893,28 +1893,28 @@ EndProcedure
Procedure Notion_CreatePageInDatabase() Export Procedure Notion_CreatePageInDatabase() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Base = OPI_TestDataRetrieval.GetParameter("Notion_Base"); Base = OPI_TestDataRetrieval.GetParameter("Notion_Base");
Image = New Map; Image = New Map;
Image.Insert("Logo", OPI_TestDataRetrieval.GetParameter("Picture")); Image.Insert("Logo", OPI_TestDataRetrieval.GetParameter("Picture"));
Properties = New Map; Properties = New Map;
Properties.Insert("Name" , "LLC Vector"); Properties.Insert("Name" , "LLC Vector");
Properties.Insert("Description" , "OurFirstClient"); Properties.Insert("Description" , "OurFirstClient");
Properties.Insert("Number" , 1); Properties.Insert("Number" , 1);
Properties.Insert("Status" , "Regular"); Properties.Insert("Status" , "Regular");
Properties.Insert("CreationDate" , OPI_Tools.GetCurrentDate()); Properties.Insert("CreationDate" , OPI_Tools.GetCurrentDate());
Properties.Insert("Image" , Image); Properties.Insert("Image" , Image);
Properties.Insert("Active" , True); Properties.Insert("Active" , True);
Properties.Insert("Website" , "https://vector.ru"); Properties.Insert("Website" , "https://vector.ru");
Properties.Insert("Email" , "mail@vector.ru"); Properties.Insert("Email" , "mail@vector.ru");
Properties.Insert("Phone" , "88005553535"); Properties.Insert("Phone" , "88005553535");
Properties.Insert("Status" , "New"); Properties.Insert("Status" , "New");
Result = OPI_Notion.CreatePageInDatabase(Token, Base, Properties); Result = OPI_Notion.CreatePageInDatabase(Token, Base, Properties);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreatePageInDatabase"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreatePageInDatabase");
Check_NotionObject(Result); Check_NotionObject(Result);
@@ -1925,24 +1925,24 @@ EndProcedure
Procedure Notion_EditPageProperties() Export Procedure Notion_EditPageProperties() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Page = OPI_TestDataRetrieval.GetParameter("Notion_Page"); Page = OPI_TestDataRetrieval.GetParameter("Notion_Page");
Icon = OPI_TestDataRetrieval.GetParameter("Picture"); Icon = OPI_TestDataRetrieval.GetParameter("Picture");
Cover = OPI_TestDataRetrieval.GetParameter("Picture2"); Cover = OPI_TestDataRetrieval.GetParameter("Picture2");
Archive = False; Archive = False;
Properties = New Map; Properties = New Map;
Properties.Insert("Active" , False); Properties.Insert("Active" , False);
Properties.Insert("Email" , "vector@mail.ru"); Properties.Insert("Email" , "vector@mail.ru");
Result = OPI_Notion.EditPageProperties(Token Result = OPI_Notion.EditPageProperties(Token
, Page , Page
, Properties , Properties
, Icon , Icon
, Cover , Cover
, Archive); , Archive);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "EditPageProperties"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "EditPageProperties");
Check_NotionObject(Result); Check_NotionObject(Result);
@@ -1950,32 +1950,32 @@ EndProcedure
Procedure Notion_CreateDeleteBlock() Export Procedure Notion_CreateDeleteBlock() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent"); Parent = OPI_TestDataRetrieval.GetParameter("Notion_Parent");
Block = OPI_TestDataRetrieval.GetParameter("Notion_Block"); Block = OPI_TestDataRetrieval.GetParameter("Notion_Block");
Result = OPI_Notion.ReturnBlock(Token, Block); Result = OPI_Notion.ReturnBlock(Token, Block);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "ReturnBlock"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "ReturnBlock");
Check_NotionObject(Result, "block"); Check_NotionObject(Result, "block");
Result = OPI_Notion.CreateBlock(Token, Parent, Result); Result = OPI_Notion.CreateBlock(Token, Parent, Result);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateBlock"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateBlock");
Check_NotionObject(Result, "list"); Check_NotionObject(Result, "list");
Block = Result["results"][0]["id"]; Block = Result["results"][0]["id"];
Result = OPI_Notion.ReturnChildBlocks(Token, Block); Result = OPI_Notion.ReturnChildBlocks(Token, Block);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "ReturnChildBlocks"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "ReturnChildBlocks");
Check_NotionObject(Result, "list"); Check_NotionObject(Result, "list");
Result = OPI_Notion.DeleteBlock(Token, Block); Result = OPI_Notion.DeleteBlock(Token, Block);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeleteBlock"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeleteBlock");
Check_NotionObject(Result, "block"); Check_NotionObject(Result, "block");
@@ -1983,10 +1983,10 @@ EndProcedure
Procedure Notion_GetUsers() Export Procedure Notion_GetUsers() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
Result = OPI_Notion.UserList(Token); Result = OPI_Notion.UserList(Token);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "UserList"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "UserList");
Check_NotionObject(Result, "list"); Check_NotionObject(Result, "list");
@@ -1994,11 +1994,11 @@ EndProcedure
Procedure Notion_GetUserData() Export Procedure Notion_GetUserData() Export
Token = OPI_TestDataRetrieval.GetParameter("Notion_Token"); Token = OPI_TestDataRetrieval.GetParameter("Notion_Token");
User = OPI_TestDataRetrieval.GetParameter("Notion_User"); User = OPI_TestDataRetrieval.GetParameter("Notion_User");
Result = OPI_Notion.GetUserData(Token, User); Result = OPI_Notion.GetUserData(Token, User);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetUserData"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetUserData");
Check_NotionObject(Result, "user"); Check_NotionObject(Result, "user");
@@ -2855,7 +2855,7 @@ EndProcedure
Procedure B24_ServerTime() Export Procedure B24_ServerTime() Export
TestParameters = New Structure; TestParameters = New Structure;
OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_URL" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_URL" , TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_Domain", TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_Domain", TestParameters);
OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_Token" , TestParameters); OPI_TestDataRetrieval.ParameterToCollection("Bitrix24_Token" , TestParameters);
@@ -3238,7 +3238,7 @@ EndProcedure
Procedure Check_Structure(Val Result) Procedure Check_Structure(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Structure").Заполнено(); OPI_TestDataRetrieval.ExpectsThat(Result).ИмеетТип("Structure").Заполнено();
EndProcedure EndProcedure
@@ -3674,13 +3674,13 @@ EndProcedure
Procedure Check_BitrixTime(Val Result) Procedure Check_BitrixTime(Val Result)
Time = Result["result"]; Time = Result["result"];
If Not TypeOf(Time) = Type("Date") Then If Not TypeOf(Time) = Type("Date") Then
Time = XMLValue(Type("Date"), Time); Time = XMLValue(Type("Date"), Time);
EndIf; EndIf;
OPI_TestDataRetrieval.ExpectsThat(Time).ИмеетТип("Date").Заполнено(); OPI_TestDataRetrieval.ExpectsThat(Time).ИмеетТип("Date").Заполнено();
EndProcedure EndProcedure
@@ -3790,14 +3790,14 @@ EndProcedure
Procedure Check_BitrixCommentsList(Val Result) Procedure Check_BitrixCommentsList(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result["result"]).ИмеетТип("Array"); OPI_TestDataRetrieval.ExpectsThat(Result["result"]).ИмеетТип("Array");
OPI_TestDataRetrieval.ExpectsThat(Result["result"][0]["POST_MESSAGE"]).Заполнено(); OPI_TestDataRetrieval.ExpectsThat(Result["result"][0]["POST_MESSAGE"]).Заполнено();
EndProcedure EndProcedure
Procedure Check_BitrixResultsList(Val Result) Procedure Check_BitrixResultsList(Val Result)
OPI_TestDataRetrieval.ExpectsThat(Result["result"]).ИмеетТип("Array"); OPI_TestDataRetrieval.ExpectsThat(Result["result"]).ИмеетТип("Array");
OPI_TestDataRetrieval.ExpectsThat(Result["result"][0]["text"]).Заполнено(); OPI_TestDataRetrieval.ExpectsThat(Result["result"][0]["text"]).Заполнено();
EndProcedure EndProcedure
@@ -3852,10 +3852,10 @@ EndProcedure
Procedure Telegram_GetUpdates(FunctionParameters) Procedure Telegram_GetUpdates(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Result = OPI_Telegram.GetUpdates(Token); Result = OPI_Telegram.GetUpdates(Token);
// END // END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetUpdates", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetUpdates", "Telegram");
@@ -3884,12 +3884,12 @@ EndProcedure
Procedure Telegram_DeleteWebhook(FunctionParameters) Procedure Telegram_DeleteWebhook(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Result = OPI_Telegram.DeleteWebhook(Token); Result = OPI_Telegram.DeleteWebhook(Token);
// END // END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeleteWebhook", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeleteWebhook", "Telegram");
Check_TelegramWebhookDeletion(Result); Check_TelegramWebhookDeletion(Result);
@@ -3899,10 +3899,10 @@ EndProcedure
Procedure Telegram_SendTextMessage(FunctionParameters) Procedure Telegram_SendTextMessage(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
ChatID = FunctionParameters["Telegram_ChatID"]; ChatID = FunctionParameters["Telegram_ChatID"];
ChannelID = FunctionParameters["Telegram_ChannelID"]; ChannelID = FunctionParameters["Telegram_ChannelID"];
Text = FunctionParameters["String"]; Text = FunctionParameters["String"];
Result = OPI_Telegram.SendTextMessage(Token, ChatID, Text); Result = OPI_Telegram.SendTextMessage(Token, ChatID, Text);
@@ -4288,8 +4288,8 @@ EndProcedure
Procedure Telegram_DownloadFile(FunctionParameters) Procedure Telegram_DownloadFile(FunctionParameters)
FileID = FunctionParameters["Telegram_FileID"]; FileID = FunctionParameters["Telegram_FileID"];
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Result = OPI_Telegram.DownloadFile(Token, FileID); Result = OPI_Telegram.DownloadFile(Token, FileID);
@@ -4314,7 +4314,7 @@ Procedure Telegram_ForwardMessage(FunctionParameters)
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "ForwardMessage", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "ForwardMessage", "Telegram");
Check_TelegramForward(Result, MessageID); Check_TelegramForward(Result, MessageID);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
@@ -4322,18 +4322,18 @@ EndProcedure
Procedure Telegram_Ban(FunctionParameters) Procedure Telegram_Ban(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
UserID = FunctionParameters["Telegram_ChatID"]; UserID = FunctionParameters["Telegram_ChatID"];
ChannelID = FunctionParameters["Telegram_ChannelID"]; ChannelID = FunctionParameters["Telegram_ChannelID"];
Result = OPI_Telegram.Ban(Token, ChannelID, UserID); Result = OPI_Telegram.Ban(Token, ChannelID, UserID);
// END // END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "Ban", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "Ban", "Telegram");
Check_TelegramBan(Result); Check_TelegramBan(Result);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
EndProcedure EndProcedure
@@ -4343,14 +4343,14 @@ Procedure Telegram_Unban(FunctionParameters)
UserID = FunctionParameters["Telegram_ChatID"]; UserID = FunctionParameters["Telegram_ChatID"];
ChannelID = FunctionParameters["Telegram_ChannelID"]; ChannelID = FunctionParameters["Telegram_ChannelID"];
Result = OPI_Telegram.Unban(Token, ChannelID, UserID); Result = OPI_Telegram.Unban(Token, ChannelID, UserID);
// END // END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "Unban", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "Unban", "Telegram");
Check_TelegramBan(Result); Check_TelegramBan(Result);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
EndProcedure EndProcedure
@@ -4371,7 +4371,7 @@ Procedure Telegram_CreateInviteLink(FunctionParameters)
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateInvitationLink", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateInvitationLink", "Telegram");
Check_TelegramInvitation(Result, Title, UnixExpiration); Check_TelegramInvitation(Result, Title, UnixExpiration);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
@@ -4385,11 +4385,11 @@ Procedure Telegram_PinMessage(FunctionParameters)
Result = OPI_Telegram.PinMessage(Token, ChannelID, MessageID); Result = OPI_Telegram.PinMessage(Token, ChannelID, MessageID);
// END // END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "PinMessage", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "PinMessage", "Telegram");
Check_TelegramTrue(Result); Check_TelegramTrue(Result);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
@@ -4403,11 +4403,11 @@ Procedure Telegram_UnpinMessage(FunctionParameters)
Result = OPI_Telegram.UnpinMessage(Token, ChannelID, MessageID); Result = OPI_Telegram.UnpinMessage(Token, ChannelID, MessageID);
// END // END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "DetachMessage", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "DetachMessage", "Telegram");
Check_TelegramTrue(Result); Check_TelegramTrue(Result);
OPI_Tools.Pause(5); OPI_Tools.Pause(5);
@@ -4432,10 +4432,10 @@ EndProcedure
Procedure Telegram_GetForumAvatarList(FunctionParameters) Procedure Telegram_GetForumAvatarList(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Result = OPI_Telegram.GetAvatarIconList(Token); Result = OPI_Telegram.GetAvatarIconList(Token);
// END // END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetAvatarIconList", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "GetAvatarIconList", "Telegram");
@@ -4447,14 +4447,14 @@ EndProcedure
Procedure Telegram_CreateForumTopic(FunctionParameters) Procedure Telegram_CreateForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Icon = "5357419403325481346"; Icon = "5357419403325481346";
Name = "TestTopic " + String(New UUID); Name = "TestTopic " + String(New UUID);
Result = OPI_Telegram.CreateForumThread(Token, Chat, Name, Icon); Result = OPI_Telegram.CreateForumThread(Token, Chat, Name, Icon);
// END // END
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateForumTopic", "Telegram"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateForumTopic", "Telegram");
@@ -4464,10 +4464,10 @@ Procedure Telegram_CreateForumTopic(FunctionParameters)
OPI_Tools.AddField("Telegram_TopicID", Topic, "String", FunctionParameters); OPI_Tools.AddField("Telegram_TopicID", Topic, "String", FunctionParameters);
OPI_TestDataRetrieval.WriteParameter("Telegram_TopicID", FunctionParameters["Telegram_TopicID"]); OPI_TestDataRetrieval.WriteParameter("Telegram_TopicID", FunctionParameters["Telegram_TopicID"]);
Check_TelegramCreateTopic(Result, Name, Icon); Check_TelegramCreateTopic(Result, Name, Icon);
ChatTopic = Chat + "*" + Topic; ChatTopic = Chat + "*" + Topic;
Text = FunctionParameters["String"]; Text = FunctionParameters["String"];
Result = OPI_Telegram.SendTextMessage(Token, ChatTopic, Text); Result = OPI_Telegram.SendTextMessage(Token, ChatTopic, Text);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "SendTextMessage (forum)"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "SendTextMessage (forum)");
@@ -4478,7 +4478,7 @@ EndProcedure
Procedure Telegram_EditForumTopic(FunctionParameters) Procedure Telegram_EditForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
NewName = "NewTestTitle"; NewName = "NewTestTitle";
@@ -4498,15 +4498,15 @@ EndProcedure
Procedure Telegram_CloseForumTopic(FunctionParameters) Procedure Telegram_CloseForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
OPI_Telegram.OpenForumThread(Token, Chat); // SKIP OPI_Telegram.OpenForumThread(Token, Chat); // SKIP
Result = OPI_Telegram.CloseForumThread(Token, Chat); // Closes main topic Result = OPI_Telegram.CloseForumThread(Token, Chat); // Closes main topic
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CloseForumTopic (main)"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CloseForumTopic (main)");
Check_TelegramTrue(Result); // SKIP Check_TelegramTrue(Result); // SKIP
@@ -4524,13 +4524,13 @@ EndProcedure
Procedure Telegram_OpenForumTopic(FunctionParameters) Procedure Telegram_OpenForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
Result = OPI_Telegram.OpenForumThread(Token, Chat); // Opens main topic Result = OPI_Telegram.OpenForumThread(Token, Chat); // Opens main topic
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "OpenForumTopic (main)"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "OpenForumTopic (main)");
Check_TelegramTrue(Result); // SKIP Check_TelegramTrue(Result); // SKIP
@@ -4548,7 +4548,7 @@ EndProcedure
Procedure Telegram_DeleteForumTopic(FunctionParameters) Procedure Telegram_DeleteForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
@@ -4566,7 +4566,7 @@ EndProcedure
Procedure Telegram_ClearPinnedMessagesList(FunctionParameters) Procedure Telegram_ClearPinnedMessagesList(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Topic = FunctionParameters["Telegram_TopicID"]; Topic = FunctionParameters["Telegram_TopicID"];
@@ -4590,7 +4590,7 @@ EndProcedure
Procedure Telegram_HideMainForumTopic(FunctionParameters) Procedure Telegram_HideMainForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Result = OPI_Telegram.HideMainForumTopic(Token, Chat); Result = OPI_Telegram.HideMainForumTopic(Token, Chat);
@@ -4607,7 +4607,7 @@ EndProcedure
Procedure Telegram_ShowMainForumTopic(FunctionParameters) Procedure Telegram_ShowMainForumTopic(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Result = OPI_Telegram.ShowMainForumTopic(Token, Chat); Result = OPI_Telegram.ShowMainForumTopic(Token, Chat);
@@ -4624,8 +4624,8 @@ EndProcedure
Procedure Telegram_ChangeMainTopicName(FunctionParameters) Procedure Telegram_ChangeMainTopicName(FunctionParameters)
Title = "New main thread name " + String(New UUID); Title = "New main thread name " + String(New UUID);
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
Chat = FunctionParameters["Telegram_ForumID"]; Chat = FunctionParameters["Telegram_ForumID"];
Result = OPI_Telegram.EditMainForumTopicName(Token, Chat, Title); Result = OPI_Telegram.EditMainForumTopicName(Token, Chat, Title);
@@ -4642,11 +4642,11 @@ EndProcedure
Procedure Telegram_DeleteMessage(FunctionParameters) Procedure Telegram_DeleteMessage(FunctionParameters)
Token = FunctionParameters["Telegram_Token"]; Token = FunctionParameters["Telegram_Token"];
ChatID = FunctionParameters["Telegram_ChannelID"]; ChatID = FunctionParameters["Telegram_ChannelID"];
MessageID = FunctionParameters["Telegram_ChannelMessageID"]; MessageID = FunctionParameters["Telegram_ChannelMessageID"];
Result = OPI_Telegram.DeleteMessage(Token, ChatID, MessageID); Result = OPI_Telegram.DeleteMessage(Token, ChatID, MessageID);
// END // END
@@ -6252,7 +6252,7 @@ EndProcedure
Procedure Dropbox_CancelFilePublication(FunctionParameters) Procedure Dropbox_CancelFilePublication(FunctionParameters)
Token = FunctionParameters["Dropbox_Token"]; Token = FunctionParameters["Dropbox_Token"];
File = FunctionParameters["Dropbox_FileID"]; File = FunctionParameters["Dropbox_FileID"];
Result = OPI_Dropbox.CancelFilePublication(Token, File); Result = OPI_Dropbox.CancelFilePublication(Token, File);
@@ -6274,7 +6274,7 @@ Procedure Bitrix24_GetAppAuthLink(FunctionParameters)
Domain = FunctionParameters["Bitrix24_Domain"]; Domain = FunctionParameters["Bitrix24_Domain"];
ClientID = FunctionParameters["Bitrix24_ClientID"]; ClientID = FunctionParameters["Bitrix24_ClientID"];
Result = OPI_Bitrix24.GetAppAuthLink(Domain, ClientID); Result = OPI_Bitrix24.GetAppAuthLink(Domain, ClientID);
// END // END
@@ -6292,7 +6292,7 @@ Procedure Bitrix24_GetToken(FunctionParameters)
ClientSecret = FunctionParameters["Bitrix24_ClientSecret"]; ClientSecret = FunctionParameters["Bitrix24_ClientSecret"];
Code = FunctionParameters["Bitrix24_Code"]; Code = FunctionParameters["Bitrix24_Code"];
Result = OPI_Bitrix24.GetToken(ClientID, ClientSecret, Code); Result = OPI_Bitrix24.GetToken(ClientID, ClientSecret, Code);
// END // END
@@ -6311,7 +6311,7 @@ Procedure Bitrix24_RefreshToken(FunctionParameters)
ClientSecret = FunctionParameters["Bitrix24_ClientSecret"]; ClientSecret = FunctionParameters["Bitrix24_ClientSecret"];
Refresh = FunctionParameters["Bitrix24_Refresh"]; Refresh = FunctionParameters["Bitrix24_Refresh"];
Result = OPI_Bitrix24.RefreshToken(ClientID, ClientSecret, Refresh); Result = OPI_Bitrix24.RefreshToken(ClientID, ClientSecret, Refresh);
// END // END
@@ -6328,9 +6328,9 @@ EndProcedure
Procedure Bitrix24_ServerTime(FunctionParameters) Procedure Bitrix24_ServerTime(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
Result = OPI_Bitrix24.ServerTime(URL); Result = OPI_Bitrix24.ServerTime(URL);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "ServerTime (wh)", "Bitrix24"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "ServerTime (wh)", "Bitrix24");
@@ -6362,7 +6362,7 @@ Procedure Bitrix24_CreatePost(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
Result = OPI_Bitrix24.CreatePost(URL, Text, , Files, Title, True); Result = OPI_Bitrix24.CreatePost(URL, Text, , Files, Title, True);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreatePost (wh)", "Bitrix24"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreatePost (wh)", "Bitrix24");
@@ -6427,7 +6427,7 @@ Procedure Bitrix24_DeletePost(FunctionParameters)
PostID = FunctionParameters["Bitrix24_HookPostID"]; PostID = FunctionParameters["Bitrix24_HookPostID"];
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
Result = OPI_Bitrix24.DeletePost(URL, PostID); Result = OPI_Bitrix24.DeletePost(URL, PostID);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeletePost (wh)", "Bitrix24"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "DeletePost (wh)", "Bitrix24");
@@ -7222,7 +7222,7 @@ EndProcedure
Procedure Bitrix24_GetStorage(FunctionParameters) Procedure Bitrix24_GetStorage(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
StorageID = 3; StorageID = 3;
Result = OPI_Bitrix24.GetStorage(URL, StorageID); Result = OPI_Bitrix24.GetStorage(URL, StorageID);
@@ -7373,7 +7373,7 @@ EndProcedure
Procedure Bitrix24_GetFolderExternalLink(FunctionParameters) Procedure Bitrix24_GetFolderExternalLink(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
FolderID = FunctionParameters["Bitrix24_FolderID"]; FolderID = FunctionParameters["Bitrix24_FolderID"];
Result = OPI_Bitrix24.GetFolderExternalLink(URL, FolderID); Result = OPI_Bitrix24.GetFolderExternalLink(URL, FolderID);
@@ -7397,7 +7397,7 @@ EndProcedure
Procedure Bitrix24_GetFolderFilterStructure(FunctionParameters) Procedure Bitrix24_GetFolderFilterStructure(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
Result = OPI_Bitrix24.GetFolderFilterStructure(URL); Result = OPI_Bitrix24.GetFolderFilterStructure(URL);
@@ -7420,7 +7420,7 @@ EndProcedure
Procedure Bitrix24_GetFolderItems(FunctionParameters) Procedure Bitrix24_GetFolderItems(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
FolderID = FunctionParameters["Bitrix24_FolderID"]; FolderID = FunctionParameters["Bitrix24_FolderID"];
Result = OPI_Bitrix24.GetFolderItems(URL, FolderID); Result = OPI_Bitrix24.GetFolderItems(URL, FolderID);
@@ -7444,7 +7444,7 @@ EndProcedure
Procedure Bitrxi24_MarkFolderAsDeleted(FunctionParameters) Procedure Bitrxi24_MarkFolderAsDeleted(FunctionParameters)
URL = FunctionParameters["Bitrix24_URL"]; URL = FunctionParameters["Bitrix24_URL"];
FolderID = FunctionParameters["Bitrix24_FolderID"]; FolderID = FunctionParameters["Bitrix24_FolderID"];
Result = OPI_Bitrix24.MarkFolderAsDeleted(URL, FolderID); Result = OPI_Bitrix24.MarkFolderAsDeleted(URL, FolderID);

10
src/en/OPI/src/CommonModules/OPI_Twitter/Module.bsl
View File

@@ -202,7 +202,7 @@ Function CreateCustomTweet(Val Text = ""
If PollOptionsArray.Count() > 0 Then If PollOptionsArray.Count() > 0 Then
OptionStructure = New Structure("options,duration_minutes", PollOptionsArray, PollDuration); OptionStructure = New Structure("options,duration_minutes", PollOptionsArray, PollDuration);
Fields.Insert("poll", OptionStructure); Fields.Insert("poll", OptionStructure);
EndIf; EndIf;
@@ -664,22 +664,22 @@ EndFunction
Function GetProcessingStatus(Val Parameters, Val Fields, Val URL) Function GetProcessingStatus(Val Parameters, Val Fields, Val URL)
ProcessingInfo = "processing_info"; ProcessingInfo = "processing_info";
Authorization = CreateAuthorizationHeaderV1(Parameters, Fields, "POST", URL); Authorization = CreateAuthorizationHeaderV1(Parameters, Fields, "POST", URL);
Response = OPI_Tools.Post(URL, Fields, Authorization, False); Response = OPI_Tools.Post(URL, Fields, Authorization, False);
Information = Response[ProcessingInfo]; Information = Response[ProcessingInfo];
If Not ValueIsFilled(Information) Then If Not ValueIsFilled(Information) Then
Return Response; Return Response;
EndIf; EndIf;
ProcessingStatus = Information["state"]; ProcessingStatus = Information["state"];
If Not ValueIsFilled(ProcessingStatus) Then If Not ValueIsFilled(ProcessingStatus) Then
Return Response; Return Response;
Else Else
Return ProcessingStatus; Return ProcessingStatus;
EndIf; EndIf;
EndFunction EndFunction

26
src/en/OPI/src/CommonModules/OPI_TypeConversion/Module.bsl
View File

@@ -151,7 +151,7 @@ Procedure GetCollection(Value) Export
Except Except
Value = InitialValue; Value = InitialValue;
GetArray(Value); GetArray(Value);
EndTry; EndTry;
@@ -169,17 +169,17 @@ Procedure GetArray(Value) Export
CommaInQuotes = "','"; CommaInQuotes = "','";
Value = StrReplace(Value, "['" , ""); Value = StrReplace(Value, "['" , "");
Value = StrReplace(Value, "']" , ""); Value = StrReplace(Value, "']" , "");
Value = StrReplace(Value, "', '" , CommaInQuotes); Value = StrReplace(Value, "', '" , CommaInQuotes);
Value = StrReplace(Value, "' , '", CommaInQuotes); Value = StrReplace(Value, "' , '", CommaInQuotes);
Value = StrReplace(Value, "' ,'" , CommaInQuotes); Value = StrReplace(Value, "' ,'" , CommaInQuotes);
Value = StrSplit(Value, CommaInQuotes, False); Value = StrSplit(Value, CommaInQuotes, False);
For N = 0 To Value.UBound() Do For N = 0 To Value.UBound() Do
Value[N] = TrimAll(Value[N]); Value[N] = TrimAll(Value[N]);
EndDo; EndDo;
Else Else
@@ -187,7 +187,7 @@ Procedure GetArray(Value) Export
Value = OPI_Tools.NumberToString(Value); Value = OPI_Tools.NumberToString(Value);
EndIf; EndIf;
OPI_Tools.ValueToArray(Value); OPI_Tools.ValueToArray(Value);
EndIf; EndIf;
@@ -309,7 +309,7 @@ EndProcedure
Function ThisIsCollection(Val Value) Function ThisIsCollection(Val Value)
Return TypeOf(Value) = Type("Array") Return TypeOf(Value) = Type("Array")
Or TypeOf(Value) = Type("Structure") Or TypeOf(Value) = Type("Structure")
Or TypeOf(Value) = Type("Map"); Or TypeOf(Value) = Type("Map");
@@ -317,7 +317,7 @@ EndFunction
Function ThisIsSymbolic(Val Value) Function ThisIsSymbolic(Val Value)
Return TypeOf(Value) = Type("String") Return TypeOf(Value) = Type("String")
Or TypeOf(Value) = Type("Number") Or TypeOf(Value) = Type("Number")
Or TypeOf(Value) = Type("Date"); Or TypeOf(Value) = Type("Date");

132
src/en/OPI/src/CommonModules/OPI_VK/Module.bsl
View File

@@ -104,7 +104,7 @@ Function CreatePost(Val Text
ObjectId = ResponseMap.Get("id"); ObjectId = ResponseMap.Get("id");
If Not ValueIsFilled(OwnerId) Or Not ValueIsFilled(ObjectId) Then If Not ValueIsFilled(OwnerId) Or Not ValueIsFilled(ObjectId) Then
Return ResponseMap; Return ResponseMap;
EndIf; EndIf;
OwnerId = OPI_Tools.NumberToString(OwnerId); OwnerId = OPI_Tools.NumberToString(OwnerId);
@@ -208,11 +208,11 @@ Function CreatePoll(Val Question, Val AnswersArray, Val Image = "", Val Paramete
If ValueIsFilled(Photo) Then If ValueIsFilled(Photo) Then
PhotoID = Photo["id"]; PhotoID = Photo["id"];
If Not ValueIsFilled(PhotoID) Then If Not ValueIsFilled(PhotoID) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
@@ -234,7 +234,7 @@ Function CreatePoll(Val Question, Val AnswersArray, Val Image = "", Val Paramete
PollMap = Poll.Get(Response_); PollMap = Poll.Get(Response_);
If Not ValueIsFilled(PollMap) Then If Not ValueIsFilled(PollMap) Then
Return Poll; Return Poll;
EndIf; EndIf;
OwnerId = PollMap.Get("owner_id"); OwnerId = PollMap.Get("owner_id");
@@ -395,26 +395,26 @@ Function UploadVideoToServer(Val Video
, Val Album = "" , Val Album = ""
, Val Parameters = "") Export , Val Parameters = "") Export
String_ = "String"; String_ = "String";
Parameters = GetStandardParameters(Parameters); Parameters = GetStandardParameters(Parameters);
OPI_Tools.AddField("name" , Name , String_, Parameters); OPI_Tools.AddField("name" , Name , String_, Parameters);
OPI_Tools.AddField("description", Description , String_, Parameters); OPI_Tools.AddField("description", Description , String_, Parameters);
OPI_Tools.AddField("album_id" , Album , String_, Parameters); OPI_Tools.AddField("album_id" , Album , String_, Parameters);
Response = OPI_Tools.Get("api.vk.com/method/video.save", Parameters); Response = OPI_Tools.Get("api.vk.com/method/video.save", Parameters);
Result = Response["response"]; Result = Response["response"];
If Not ValueIsFilled(Result) Then If Not ValueIsFilled(Result) Then
Return Response; Return Response;
EndIf; EndIf;
URL = Result["upload_url"]; URL = Result["upload_url"];
If Not ValueIsFilled(URL) Then If Not ValueIsFilled(URL) Then
Return Response; Return Response;
EndIf; EndIf;
FileMapping = New Map; FileMapping = New Map;
OPI_Tools.AddField("video_file.mp4", Video, "BinaryData", FileMapping); OPI_Tools.AddField("video_file.mp4", Video, "BinaryData", FileMapping);
@@ -771,16 +771,16 @@ Function ShortenLink(Val URL, Val Parameters = "") Export
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
URL = Result["short_url"]; URL = Result["short_url"];
If ValueIsFilled(URL) Then If ValueIsFilled(URL) Then
Return URL; Return URL;
Else Else
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
EndFunction EndFunction
@@ -1065,14 +1065,14 @@ Function GetProductCategoryList(Val Parameters = "") Export
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
Count = Result["count"]; Count = Result["count"];
If Not ValueIsFilled(Count) Then If Not ValueIsFilled(Count) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
Parameters_.Insert("count", Count); Parameters_.Insert("count", Count);
@@ -1081,14 +1081,14 @@ Function GetProductCategoryList(Val Parameters = "") Export
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
Categories = Result["items"]; Categories = Result["items"];
If Not ValueIsFilled(Categories) Then If Not ValueIsFilled(Categories) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
CategoryMap = New Map; CategoryMap = New Map;
@@ -1380,7 +1380,7 @@ EndFunction
// //
// Parameters: // Parameters:
// Name - String - New selection name - title // Name - String - New selection name - title
// Selection - String - Selection ID - sel // Selection - String - Selection ID - sel
// Image - String, BinaryData - New selection image - picture // Image - String, BinaryData - New selection image - picture
// Main - Boolean - Main - main // Main - Boolean - Main - main
// Hidden - Boolean - Hidden - hidden // Hidden - Boolean - Hidden - hidden
@@ -1757,19 +1757,19 @@ EndFunction
Function GetImageID(Val Image, Val Parameters, Val View) Function GetImageID(Val Image, Val Parameters, Val View)
Response_ = "response"; Response_ = "response";
Response = UploadPhotoToServer(Image, Parameters, View); Response = UploadPhotoToServer(Image, Parameters, View);
Result = Response[Response_]; Result = Response[Response_];
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
PhotoID = Result["photo_id"]; PhotoID = Result["photo_id"];
If Not ValueIsFilled(PhotoID) Then If Not ValueIsFilled(PhotoID) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
PhotoID = OPI_Tools.NumberToString(PhotoID); PhotoID = OPI_Tools.NumberToString(PhotoID);
@@ -1779,17 +1779,17 @@ EndFunction
Function GetImageMap(Val Image, Val Parameters, Val View) Function GetImageMap(Val Image, Val Parameters, Val View)
Response = UploadPhotoToServer(Image, Parameters, View); Response = UploadPhotoToServer(Image, Parameters, View);
ResponseArray = Response.Get("response"); ResponseArray = Response.Get("response");
If Not ValueIsFilled(ResponseArray) Or Not TypeOf(ResponseArray) = Type("Array") Then If Not ValueIsFilled(ResponseArray) Or Not TypeOf(ResponseArray) = Type("Array") Then
Return Response; Return Response;
Else Else
If ResponseArray.Count() = 0 Then If ResponseArray.Count() = 0 Then
Return Response; Return Response;
Else Else
ResponseMap = ResponseArray[0]; ResponseMap = ResponseArray[0];
EndIf; EndIf;
EndIf; EndIf;
Return ResponseMap; Return ResponseMap;
@@ -1798,20 +1798,20 @@ EndFunction
Function GetSelectionArray(Val Selections, Val Parameters = "") Function GetSelectionArray(Val Selections, Val Parameters = "")
Response_ = "response"; Response_ = "response";
Selections = GetSelectionsByID(Selections, Parameters); Selections = GetSelectionsByID(Selections, Parameters);
Result = Selections[Response_]; Result = Selections[Response_];
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
SelectionArray = Result["items"]; SelectionArray = Result["items"];
If Not ValueIsFilled(SelectionArray) Then If Not ValueIsFilled(SelectionArray) Then
Return Selections; Return Selections;
EndIf; EndIf;
Else Else
Return Selections; Return Selections;
EndIf; EndIf;
Return SelectionArray; Return SelectionArray;
@@ -1914,11 +1914,11 @@ Function ProductManagement(Val ProductDescription, Val ProductID = "", Val Selec
ProductID = Result["market_item_id"]; ProductID = Result["market_item_id"];
If Not ValueIsFilled(ProductID) Then If Not ValueIsFilled(ProductID) Then
Return Response; Return Response;
EndIf; EndIf;
Else Else
Return Response; Return Response;
EndIf; EndIf;
If ValueIsFilled(Selection) And ValueIsFilled(ProductID) Then If ValueIsFilled(Selection) And ValueIsFilled(ProductID) Then
@@ -2060,14 +2060,14 @@ Procedure FillProductRequestFields(Val ProductDescription, Parameters)
Result = Response[Response_]; Result = Response[Response_];
If ValueIsFilled(Result) Then If ValueIsFilled(Result) Then
PhotoID = Result["photo_id"]; PhotoID = Result["photo_id"];
If Not ValueIsFilled(PhotoID) Then If Not ValueIsFilled(PhotoID) Then
Return; Return;
EndIf; EndIf;
Else Else
Return; Return;
EndIf; EndIf;
PhotoID = OPI_Tools.NumberToString(PhotoID); PhotoID = OPI_Tools.NumberToString(PhotoID);
@@ -2116,9 +2116,9 @@ Procedure AddAdditionalProductPhotos(Val PhotoArray, Parameters)
PhotoID = GetImageID(Photo, Parameters, "Product"); PhotoID = GetImageID(Photo, Parameters, "Product");
If Not TypeOf(PhotoID) = Type("String") Then If Not TypeOf(PhotoID) = Type("String") Then
Return; Return;
EndIf; EndIf;
PhotoString = PhotoString + PhotoID + ","; PhotoString = PhotoString + PhotoID + ",";

20
src/en/OPI/src/CommonModules/OPI_YandexDisk/Module.bsl
View File

@@ -89,7 +89,7 @@ Function CreateFolder(Val Token, Val Path) Export
ResponseURL = Response[Href]; ResponseURL = Response[Href];
If Not ValueIsFilled(ResponseURL) Then If Not ValueIsFilled(ResponseURL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.Get(ResponseURL, , Headers); Response = OPI_Tools.Get(ResponseURL, , Headers);
@@ -183,7 +183,7 @@ Function CreateObjectCopy(Val Token, Val Original, Val Path, Val Overwrite = Fal
ResponseURL = Response[Href]; ResponseURL = Response[Href];
If Not ValueIsFilled(ResponseURL) Then If Not ValueIsFilled(ResponseURL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.Get(ResponseURL, , Headers); Response = OPI_Tools.Get(ResponseURL, , Headers);
@@ -230,14 +230,14 @@ EndFunction
Function DownloadFile(Val Token, Val Path, Val SavePath = "") Export Function DownloadFile(Val Token, Val Path, Val SavePath = "") Export
OPI_TypeConversion.GetLine(SavePath); OPI_TypeConversion.GetLine(SavePath);
Response = GetDownloadLink(Token, Path); Response = GetDownloadLink(Token, Path);
URL = Response["href"]; URL = Response["href"];
If Not ValueIsFilled(URL) Then If Not ValueIsFilled(URL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.Get(URL, , , SavePath); Response = OPI_Tools.Get(URL, , , SavePath);
Return Response; Return Response;
@@ -330,7 +330,7 @@ Function MoveObject(Val Token, Val Original, Val Path, Val Overwrite = False) Ex
ResponseURL = Response[Href]; ResponseURL = Response[Href];
If Not ValueIsFilled(ResponseURL) Then If Not ValueIsFilled(ResponseURL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.Get(ResponseURL, , Headers); Response = OPI_Tools.Get(ResponseURL, , Headers);
@@ -369,7 +369,7 @@ Function UploadFile(Val Token, Val Path, Val File, Val Overwrite = False) Export
URL = Response[Href]; URL = Response[Href];
If Not ValueIsFilled(URL) Then If Not ValueIsFilled(URL) Then
Return Response; Return Response;
EndIf; EndIf;
Response = OPI_Tools.PutMultipart(URL, New Structure(), File, "multipart", Headers); Response = OPI_Tools.PutMultipart(URL, New Structure(), File, "multipart", Headers);

74
src/ru/OInt/core/Modules/OPI_Bitrix24.os
View File

@@ -141,10 +141,10 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция СерверноеВремя(Знач URL, Знач Токен = "") Экспорт Функция СерверноеВремя(Знач URL, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "server.time"); Параметры = НормализоватьАвторизацию(URL, Токен, "server.time");
Ответ = OPI_Инструменты.Get(URL, Параметры); Ответ = OPI_Инструменты.Get(URL, Параметры);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -170,12 +170,12 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция СоздатьНовость(Знач URL Функция СоздатьНовость(Знач URL
, Знач Текст , Знач Текст
, Знач Видимость = "UA" , Знач Видимость = "UA"
, Знач Файлы = "" , Знач Файлы = ""
, Знач Заголовок = "" , Знач Заголовок = ""
, Знач Важное = Ложь , Знач Важное = Ложь
, Знач Токен = "") Экспорт , Знач Токен = "") Экспорт
ПривестиБулево(Важное); ПривестиБулево(Важное);
@@ -1015,9 +1015,9 @@
, "<статус для сортировки. Аналогичен REAL_STATUS, но имеет дополнительно три мета-статуса>"); , "<статус для сортировки. Аналогичен REAL_STATUS, но имеет дополнительно три мета-статуса>");
Если Пустая Тогда Если Пустая Тогда
Для Каждого Фильтр Из СтруктураФильтра Цикл Для Каждого Фильтр Из СтруктураФильтра Цикл
Фильтр.Значение = ""; Фильтр.Значение = "";
КонецЦикла; КонецЦикла;
КонецЕсли; КонецЕсли;
//@skip-check constructor-function-return-section //@skip-check constructor-function-return-section
@@ -1367,7 +1367,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПолучитьСписокРезультатов(Знач URL, Знач IDЗадачи, Знач Токен = "") Экспорт Функция ПолучитьСписокРезультатов(Знач URL, Знач IDЗадачи, Знач Токен = "") Экспорт
Ответ = УправлениеЗадачей(URL, IDЗадачи, "tasks.task.result.list", Токен); Ответ = УправлениеЗадачей(URL, IDЗадачи, "tasks.task.result.list", Токен);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -1387,7 +1387,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция СоздатьРезультатИзКомментария(Знач URL, Знач IDКомментария, Знач Токен = "") Экспорт Функция СоздатьРезультатИзКомментария(Знач URL, Знач IDКомментария, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "tasks.task.result.addFromComment"); Параметры = НормализоватьАвторизацию(URL, Токен, "tasks.task.result.addFromComment");
OPI_Инструменты.ДобавитьПоле("commentId", IDКомментария, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("commentId", IDКомментария, "Строка", Параметры);
Ответ = OPI_Инструменты.Post(URL, Параметры); Ответ = OPI_Инструменты.Post(URL, Параметры);
@@ -1411,7 +1411,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция УдалитьРезультатИзКомментария(Знач URL, Знач IDКомментария, Знач Токен = "") Экспорт Функция УдалитьРезультатИзКомментария(Знач URL, Знач IDКомментария, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "tasks.task.result.deleteFromComment"); Параметры = НормализоватьАвторизацию(URL, Токен, "tasks.task.result.deleteFromComment");
OPI_Инструменты.ДобавитьПоле("commentId", IDКомментария, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("commentId", IDКомментария, "Строка", Параметры);
Ответ = OPI_Инструменты.Post(URL, Параметры); Ответ = OPI_Инструменты.Post(URL, Параметры);
@@ -1864,7 +1864,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПолучитьХранилищеПриложения(Знач URL, Знач Токен = "") Экспорт Функция ПолучитьХранилищеПриложения(Знач URL, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.getforapp"); Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.getforapp");
Ответ = OPI_Инструменты.Post(URL, Параметры); Ответ = OPI_Инструменты.Post(URL, Параметры);
Возврат Ответ; Возврат Ответ;
@@ -1886,8 +1886,8 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПолучитьХранилище(Знач URL, Знач IDХранилища, Знач Токен = "") Экспорт Функция ПолучитьХранилище(Знач URL, Знач IDХранилища, Знач Токен = "") Экспорт
Ответ = УправлениеФайлом(URL, IDХранилища, "disk.storage.get", Токен); Ответ = УправлениеФайлом(URL, IDХранилища, "disk.storage.get", Токен);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -1907,7 +1907,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПереименоватьХранилище(Знач URL, Знач IDХранилища, Знач Наименование, Знач Токен = "") Экспорт Функция ПереименоватьХранилище(Знач URL, Знач IDХранилища, Знач Наименование, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.rename"); Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.rename");
OPI_Инструменты.ДобавитьПоле("id" , IDХранилища , "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("id" , IDХранилища , "Строка", Параметры);
OPI_Инструменты.ДобавитьПоле("newName", Наименование, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("newName", Наименование, "Строка", Параметры);
@@ -1933,8 +1933,8 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПолучитьСодержимоеХранилища(Знач URL, Знач IDХранилища, Знач Токен = "") Экспорт Функция ПолучитьСодержимоеХранилища(Знач URL, Знач IDХранилища, Знач Токен = "") Экспорт
Ответ = УправлениеФайлом(URL, IDХранилища, "disk.storage.getchildren", Токен); Ответ = УправлениеФайлом(URL, IDХранилища, "disk.storage.getchildren", Токен);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -1954,11 +1954,11 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция СоздатьКаталогВХранилище(Знач URL, Знач IDХранилища, Знач Наименование, Знач Токен = "") Экспорт Функция СоздатьКаталогВХранилище(Знач URL, Знач IDХранилища, Знач Наименование, Знач Токен = "") Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(Наименование); OPI_ПреобразованиеТипов.ПолучитьСтроку(Наименование);
СтруктураПапки = Новый Структура("NAME", Наименование); СтруктураПапки = Новый Структура("NAME", Наименование);
Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.addfolder"); Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.addfolder");
OPI_Инструменты.ДобавитьПоле("id" , IDХранилища , "Строка" , Параметры); OPI_Инструменты.ДобавитьПоле("id" , IDХранилища , "Строка" , Параметры);
OPI_Инструменты.ДобавитьПоле("data", СтруктураПапки, "Коллекция", Параметры); OPI_Инструменты.ДобавитьПоле("data", СтруктураПапки, "Коллекция", Параметры);
@@ -3443,33 +3443,33 @@
Параметры = Новый Структура; Параметры = Новый Структура;
ЭтоАвторизацияТокеном = ЗначениеЗаполнено(Токен); ЭтоАвторизацияТокеном = ЗначениеЗаполнено(Токен);
МассивЛишнихЭлементов = Новый Массив; МассивЛишнихЭлементов = Новый Массив;
МассивЛишнихЭлементов.Добавить("https://"); МассивЛишнихЭлементов.Добавить("https://");
МассивЛишнихЭлементов.Добавить("http://"); МассивЛишнихЭлементов.Добавить("http://");
МассивЛишнихЭлементов.Добавить("www."); МассивЛишнихЭлементов.Добавить("www.");
Для Каждого УдаляемыйЭлемент Из МассивЛишнихЭлементов Цикл Для Каждого УдаляемыйЭлемент Из МассивЛишнихЭлементов Цикл
URL = СтрЗаменить(URL, УдаляемыйЭлемент, ""); URL = СтрЗаменить(URL, УдаляемыйЭлемент, "");
КонецЦикла; КонецЦикла;
URL = СокрЛП(URL); URL = СокрЛП(URL);
Если Не СтрЗаканчиваетсяНа(URL, "/") Тогда Если Не СтрЗаканчиваетсяНа(URL, "/") Тогда
URL = URL + "/"; URL = URL + "/";
КонецЕсли; КонецЕсли;
Если ЭтоАвторизацияТокеном Тогда Если ЭтоАвторизацияТокеном Тогда
Если Не СтрЗаканчиваетсяНа(URL, "rest/") Тогда Если Не СтрЗаканчиваетсяНа(URL, "rest/") Тогда
URL = URL + "rest/"; URL = URL + "rest/";
КонецЕсли; КонецЕсли;
Параметры.Вставить("auth", Токен); Параметры.Вставить("auth", Токен);
КонецЕсли; КонецЕсли;
Если ЗначениеЗаполнено(Метод) Тогда Если ЗначениеЗаполнено(Метод) Тогда
URL = URL + СокрЛП(Метод); URL = URL + СокрЛП(Метод);
КонецЕсли; КонецЕсли;
Возврат Параметры; Возврат Параметры;

4
src/ru/OInt/core/Modules/OPI_Dropbox.os
View File

@@ -751,13 +751,13 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Dropbox // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Dropbox
Функция ОтменитьПубликациюФайла(Знач Токен, Знач IDФайла) Экспорт Функция ОтменитьПубликациюФайла(Знач Токен, Знач IDФайла) Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(IDФайла); OPI_ПреобразованиеТипов.ПолучитьСтроку(IDФайла);
Если Не СтрНачинаетсяС(IDФайла, "id:") Тогда Если Не СтрНачинаетсяС(IDФайла, "id:") Тогда
IDФайла = "id:" + IDФайла; IDФайла = "id:" + IDФайла;
КонецЕсли; КонецЕсли;
URL = "https://api.dropboxapi.com/2/sharing/unshare_file"; URL = "https://api.dropboxapi.com/2/sharing/unshare_file";
Параметры = Новый Структура; Параметры = Новый Структура;
OPI_Инструменты.ДобавитьПоле("file", IDФайла, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("file", IDФайла, "Строка", Параметры);

24
src/ru/OInt/core/Modules/OPI_GoogleDrive.os
View File

@@ -604,8 +604,8 @@
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
ОтветЗагрузки = ЗагрузитьФайлЧастями(Двоичные, АдресЗагрузки); ОтветЗагрузки = ЗагрузитьФайлЧастями(Двоичные, АдресЗагрузки);
Ответ = ?(ЗначениеЗаполнено(ОтветЗагрузки), ОтветЗагрузки, Ответ); Ответ = ?(ЗначениеЗаполнено(ОтветЗагрузки), ОтветЗагрузки, Ответ);
OPI_Инструменты.ОбработатьОтвет(Ответ); OPI_Инструменты.ОбработатьОтвет(Ответ);
Возврат Ответ; Возврат Ответ;
@@ -614,9 +614,9 @@
Функция ЗагрузитьФайлЧастями(Знач Двоичные, Знач АдресЗагрузки) Функция ЗагрузитьФайлЧастями(Знач Двоичные, Знач АдресЗагрузки)
Ответ = ""; Ответ = "";
РазмерЧасти = 268435456; РазмерЧасти = 268435456;
ПрочитаноБайт = 0; ПрочитаноБайт = 0;
ТекущаяПозиция = 0; ТекущаяПозиция = 0;
ОбщийРазмер = Двоичные.Размер(); ОбщийРазмер = Двоичные.Размер();
СтрОбщийРазмер = OPI_Инструменты.ЧислоВСтроку(ОбщийРазмер); СтрОбщийРазмер = OPI_Инструменты.ЧислоВСтроку(ОбщийРазмер);
@@ -649,15 +649,15 @@
Ответ = OPI_Инструменты.Put(АдресЗагрузки, ТекущиеДанные, ДопЗаголовки, Ложь, Истина); Ответ = OPI_Инструменты.Put(АдресЗагрузки, ТекущиеДанные, ДопЗаголовки, Ложь, Истина);
РезультатПроверки = ПроверитьЗагрузкуЧасти(Ответ, СтрОбщийРазмер, ДопЗаголовки, АдресЗагрузки, ТекущаяПозиция); РезультатПроверки = ПроверитьЗагрузкуЧасти(Ответ, СтрОбщийРазмер, ДопЗаголовки, АдресЗагрузки, ТекущаяПозиция);
Если ЗначениеЗаполнено(РезультатПроверки) Тогда Если ЗначениеЗаполнено(РезультатПроверки) Тогда
Возврат РезультатПроверки; Возврат РезультатПроверки;
КонецЕсли; КонецЕсли;
КБайт = 1024; КБайт = 1024;
МБайт = КБайт * КБайт; МБайт = КБайт * КБайт;
Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт)); Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт));
ВыполнитьСборкуМусора(); ВыполнитьСборкуМусора();
ОсвободитьОбъект(ТекущиеДанные); ОсвободитьОбъект(ТекущиеДанные);
@@ -695,7 +695,7 @@
Иначе Иначе
OPI_Инструменты.ОбработатьОтвет(Ответ); OPI_Инструменты.ОбработатьОтвет(Ответ);
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
@@ -713,7 +713,7 @@
НеобходимоЧастей = 2; НеобходимоЧастей = 2;
Если Не МассивИнформации.Количество() = НеобходимоЧастей Тогда Если Не МассивИнформации.Количество() = НеобходимоЧастей Тогда
OPI_Инструменты.ОбработатьОтвет(Ответ); OPI_Инструменты.ОбработатьОтвет(Ответ);
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;

2
src/ru/OInt/core/Modules/OPI_GoogleSheets.os
View File

@@ -359,7 +359,7 @@
Процедура ДобавитьИмяЛиста(Ячейка, Знач Лист) Процедура ДобавитьИмяЛиста(Ячейка, Знач Лист)
Если ЗначениеЗаполнено(Лист) Тогда Если ЗначениеЗаполнено(Лист) Тогда
Ячейка = "'" + Лист + "'!" + Ячейка; Ячейка = "'" + Лист + "'!" + Ячейка;
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры

126
src/ru/OInt/core/Modules/OPI_Telegram.os
View File

@@ -250,11 +250,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьТекстовоеСообщение(Знач Токен Функция ОтправитьТекстовоеСообщение(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown" , Знач Разметка = "Markdown"
, Знач IDВходящего = 0) Экспорт , Знач IDВходящего = 0) Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
OPI_Инструменты.ЗаменитьСпецСимволы(Текст, Разметка); OPI_Инструменты.ЗаменитьСпецСимволы(Текст, Разметка);
@@ -290,11 +290,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьКартинку(Знач Токен Функция ОтправитьКартинку(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Картинка , Знач Картинка
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Картинка, "photo", Клавиатура, Разметка); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Картинка, "photo", Клавиатура, Разметка);
@@ -314,11 +314,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьВидео(Знач Токен Функция ОтправитьВидео(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Видео , Знач Видео
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Видео, "video", Клавиатура, Разметка); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Видео, "video", Клавиатура, Разметка);
@@ -338,11 +338,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьАудио(Знач Токен Функция ОтправитьАудио(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Аудио , Знач Аудио
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Аудио, "audio", Клавиатура, Разметка); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Аудио, "audio", Клавиатура, Разметка);
@@ -363,12 +363,12 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьДокумент(Знач Токен Функция ОтправитьДокумент(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Документ , Знач Документ
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown" , Знач Разметка = "Markdown"
, Знач ИмяФайла = "") Экспорт , Знач ИмяФайла = "") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Документ, "document", Клавиатура, Разметка, ИмяФайла); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Документ, "document", Клавиатура, Разметка, ИмяФайла);
@@ -388,11 +388,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьГифку(Знач Токен Функция ОтправитьГифку(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Гифка , Знач Гифка
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Гифка, "animation", Клавиатура, Разметка); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Гифка, "animation", Клавиатура, Разметка);
@@ -415,18 +415,18 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьМедиагруппу(Знач Токен Функция ОтправитьМедиагруппу(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач СоответствиеФайлов , Знач СоответствиеФайлов
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
// СоответствиеФайлов // СоответствиеФайлов
// Ключ - Файл, Значение - Тип // Ключ - Файл, Значение - Тип
// Типы: audio, document, photo, video // Типы: audio, document, photo, video
// Нельзя замешивать разные типы! // Нельзя замешивать разные типы!
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата); OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата);
@@ -466,7 +466,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьМестоположение(Знач Токен, Знач IDЧата, Знач Широта, Знач Долгота, Знач Клавиатура = "") Экспорт Функция ОтправитьМестоположение(Знач Токен, Знач IDЧата, Знач Широта, Знач Долгота, Знач Клавиатура = "") Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата); OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата);
@@ -501,7 +501,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьКонтакт(Знач Токен, Знач IDЧата, Знач Имя, Знач Фамилия, Знач Телефон, Знач Клавиатура = "") Экспорт Функция ОтправитьКонтакт(Знач Токен, Знач IDЧата, Знач Имя, Знач Фамилия, Знач Телефон, Знач Клавиатура = "") Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата); OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата);
@@ -642,7 +642,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция Бан(Знач Токен, Знач IDЧата, Знач IDПользователя) Экспорт Функция Бан(Знач Токен, Знач IDЧата, Знач IDПользователя) Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
URL = "api.telegram.org/bot" + Токен + "/banChatMember"; URL = "api.telegram.org/bot" + Токен + "/banChatMember";
@@ -670,7 +670,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция Разбан(Знач Токен, Знач IDЧата, Знач IDПользователя) Экспорт Функция Разбан(Знач Токен, Знач IDЧата, Знач IDПользователя) Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
URL = "api.telegram.org/bot" + Токен + "/unbanChatMember"; URL = "api.telegram.org/bot" + Токен + "/unbanChatMember";
@@ -705,7 +705,7 @@
, Знач ДатаИстечения = "" , Знач ДатаИстечения = ""
, Знач ЛимитПользователей = 0) Экспорт , Знач ЛимитПользователей = 0) Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
URL = "api.telegram.org/bot" + Токен + "/createChatInviteLink"; URL = "api.telegram.org/bot" + Токен + "/createChatInviteLink";
@@ -817,16 +817,16 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция УдалитьСообщение(Знач Токен, Знач IDЧата, Знач IDСообщения) Экспорт Функция УдалитьСообщение(Знач Токен, Знач IDЧата, Знач IDСообщения) Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
URL = "api.telegram.org/bot" + Токен + "/deleteMessage"; URL = "api.telegram.org/bot" + Токен + "/deleteMessage";
Параметры = Новый Структура; Параметры = Новый Структура;
OPI_Инструменты.ДобавитьПоле("message_id", IDСообщения, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("message_id", IDСообщения, "Строка", Параметры);
OPI_Инструменты.ДобавитьПоле("chat_id" , IDЧата , "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("chat_id" , IDЧата , "Строка", Параметры);
Ответ = OPI_Инструменты.Get(URL, Параметры); Ответ = OPI_Инструменты.Get(URL, Параметры);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -852,7 +852,7 @@
Иконки = Ответ[Result]; Иконки = Ответ[Result];
Если Не ЗначениеЗаполнено(Иконки) Тогда Если Не ЗначениеЗаполнено(Иконки) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Коллекция = Новый Соответствие; Коллекция = Новый Соответствие;
@@ -1267,28 +1267,28 @@
ВременноеСоответствие = Новый Соответствие; ВременноеСоответствие = Новый Соответствие;
Счетчик = 0; Счетчик = 0;
Для Каждого ТекущийФайл Из СоответствиеФайлов Цикл Для Каждого ТекущийФайл Из СоответствиеФайлов Цикл
ТекущиеДанные = ТекущийФайл.Ключ; ТекущиеДанные = ТекущийФайл.Ключ;
ТипМедиа = ТекущийФайл.Значение; ТипМедиа = ТекущийФайл.Значение;
ИмяМедиа = ПреобразоватьДанныеФайла(ТекущиеДанные, ТипМедиа, Счетчик); ИмяМедиа = ПреобразоватьДанныеФайла(ТекущиеДанные, ТипМедиа, Счетчик);
ВременноеСоответствие.Вставить(ИмяМедиа + "|" + ИмяМедиа, ТекущиеДанные); ВременноеСоответствие.Вставить(ИмяМедиа + "|" + ИмяМедиа, ТекущиеДанные);
СтруктураМедиа = Новый Структура; СтруктураМедиа = Новый Структура;
СтруктураМедиа.Вставить("type" , ТипМедиа); СтруктураМедиа.Вставить("type" , ТипМедиа);
СтруктураМедиа.Вставить("media", "attach://" + ИмяМедиа); СтруктураМедиа.Вставить("media", "attach://" + ИмяМедиа);
Если Счетчик = 0 Тогда Если Счетчик = 0 Тогда
СтруктураМедиа.Вставить("caption", Текст); СтруктураМедиа.Вставить("caption", Текст);
КонецЕсли; КонецЕсли;
Медиа.Добавить(СтруктураМедиа); Медиа.Добавить(СтруктураМедиа);
Счетчик = Счетчик + 1; Счетчик = Счетчик + 1;
КонецЦикла; КонецЦикла;
Медиа = OPI_Инструменты.JSONСтрокой(Медиа); Медиа = OPI_Инструменты.JSONСтрокой(Медиа);
СоответствиеФайлов = ВременноеСоответствие; СоответствиеФайлов = ВременноеСоответствие;

10
src/ru/OInt/core/Modules/OPI_Twitter.os
View File

@@ -202,7 +202,7 @@
Если МассивВариантовОпроса.Количество() > 0 Тогда Если МассивВариантовОпроса.Количество() > 0 Тогда
СтруктураВарианта = Новый Структура("options,duration_minutes", МассивВариантовОпроса, ДлительностьОпроса); СтруктураВарианта = Новый Структура("options,duration_minutes", МассивВариантовОпроса, ДлительностьОпроса);
Поля.Вставить("poll", СтруктураВарианта); Поля.Вставить("poll", СтруктураВарианта);
КонецЕсли; КонецЕсли;
@@ -664,22 +664,22 @@
Функция ПолучитьСтатусОбработки(Знач Параметры, Знач Поля, Знач URL) Функция ПолучитьСтатусОбработки(Знач Параметры, Знач Поля, Знач URL)
ProcessingInfo = "processing_info"; ProcessingInfo = "processing_info";
Авторизация = СоздатьЗаголовокАвторизацииV1(Параметры, Поля, "POST", URL); Авторизация = СоздатьЗаголовокАвторизацииV1(Параметры, Поля, "POST", URL);
Ответ = OPI_Инструменты.Post(URL, Поля, Авторизация, Ложь); Ответ = OPI_Инструменты.Post(URL, Поля, Авторизация, Ложь);
Информация = Ответ[ProcessingInfo]; Информация = Ответ[ProcessingInfo];
Если Не ЗначениеЗаполнено(Информация) Тогда Если Не ЗначениеЗаполнено(Информация) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
СтатусОбработки = Информация["state"]; СтатусОбработки = Информация["state"];
Если Не ЗначениеЗаполнено(СтатусОбработки) Тогда Если Не ЗначениеЗаполнено(СтатусОбработки) Тогда
Возврат Ответ; Возврат Ответ;
Иначе Иначе
Возврат СтатусОбработки; Возврат СтатусОбработки;
КонецЕсли; КонецЕсли;
КонецФункции КонецФункции

132
src/ru/OInt/core/Modules/OPI_VK.os
View File

@@ -104,7 +104,7 @@
ObjectId = ОтветСоответствие.Получить("id"); ObjectId = ОтветСоответствие.Получить("id");
Если Не ЗначениеЗаполнено(OwnerId) Или Не ЗначениеЗаполнено(ObjectId) Тогда Если Не ЗначениеЗаполнено(OwnerId) Или Не ЗначениеЗаполнено(ObjectId) Тогда
Возврат ОтветСоответствие; Возврат ОтветСоответствие;
КонецЕсли; КонецЕсли;
OwnerId = OPI_Инструменты.ЧислоВСтроку(OwnerId); OwnerId = OPI_Инструменты.ЧислоВСтроку(OwnerId);
@@ -208,11 +208,11 @@
Если ЗначениеЗаполнено(Фото) Тогда Если ЗначениеЗаполнено(Фото) Тогда
IDФото = Фото["id"]; IDФото = Фото["id"];
Если Не ЗначениеЗаполнено(IDФото) Тогда Если Не ЗначениеЗаполнено(IDФото) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
@@ -234,7 +234,7 @@
ОпросСоответствие = Опрос.Получить(Response_); ОпросСоответствие = Опрос.Получить(Response_);
Если Не ЗначениеЗаполнено(ОпросСоответствие) Тогда Если Не ЗначениеЗаполнено(ОпросСоответствие) Тогда
Возврат Опрос; Возврат Опрос;
КонецЕсли; КонецЕсли;
OwnerId = ОпросСоответствие.Получить("owner_id"); OwnerId = ОпросСоответствие.Получить("owner_id");
@@ -395,26 +395,26 @@
, Знач Альбом = "" , Знач Альбом = ""
, Знач Параметры = "") Экспорт , Знач Параметры = "") Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
Параметры = ПолучитьСтандартныеПараметры(Параметры); Параметры = ПолучитьСтандартныеПараметры(Параметры);
OPI_Инструменты.ДобавитьПоле("name" , Наименование, Строка_, Параметры); OPI_Инструменты.ДобавитьПоле("name" , Наименование, Строка_, Параметры);
OPI_Инструменты.ДобавитьПоле("description", Описание , Строка_, Параметры); OPI_Инструменты.ДобавитьПоле("description", Описание , Строка_, Параметры);
OPI_Инструменты.ДобавитьПоле("album_id" , Альбом , Строка_, Параметры); OPI_Инструменты.ДобавитьПоле("album_id" , Альбом , Строка_, Параметры);
Ответ = OPI_Инструменты.Get("api.vk.com/method/video.save", Параметры); Ответ = OPI_Инструменты.Get("api.vk.com/method/video.save", Параметры);
Результат = Ответ["response"]; Результат = Ответ["response"];
Если Не ЗначениеЗаполнено(Результат) Тогда Если Не ЗначениеЗаполнено(Результат) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
URL = Результат["upload_url"]; URL = Результат["upload_url"];
Если Не ЗначениеЗаполнено(URL) Тогда Если Не ЗначениеЗаполнено(URL) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
СоответствиеФайлов = Новый Соответствие; СоответствиеФайлов = Новый Соответствие;
OPI_Инструменты.ДобавитьПоле("video_file.mp4", Видео, "ДвоичныеДанные", СоответствиеФайлов); OPI_Инструменты.ДобавитьПоле("video_file.mp4", Видео, "ДвоичныеДанные", СоответствиеФайлов);
@@ -771,16 +771,16 @@
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
URL = Результат["short_url"]; URL = Результат["short_url"];
Если ЗначениеЗаполнено(URL) Тогда Если ЗначениеЗаполнено(URL) Тогда
Возврат URL; Возврат URL;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
КонецФункции КонецФункции
@@ -1065,14 +1065,14 @@
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
Количество = Результат["count"]; Количество = Результат["count"];
Если Не ЗначениеЗаполнено(Количество) Тогда Если Не ЗначениеЗаполнено(Количество) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Параметры_.Вставить("count", Количество); Параметры_.Вставить("count", Количество);
@@ -1081,14 +1081,14 @@
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
Категории = Результат["items"]; Категории = Результат["items"];
Если Не ЗначениеЗаполнено(Категории) Тогда Если Не ЗначениеЗаполнено(Категории) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
СоответствиеКатегорий = Новый Соответствие; СоответствиеКатегорий = Новый Соответствие;
@@ -1380,7 +1380,7 @@
// //
// Параметры: // Параметры:
// Название - Строка - Новое название подборки - title // Название - Строка - Новое название подборки - title
// Подборка - Строка - ID подборки - sel // Подборка - Строка - ID подборки - sel
// Картинка - Строка,ДвоичныеДанные - Новая картинка подборки - picture // Картинка - Строка,ДвоичныеДанные - Новая картинка подборки - picture
// Основная - Булево - Основная - main // Основная - Булево - Основная - main
// Скрытая - Булево - Скрытая - hidden // Скрытая - Булево - Скрытая - hidden
@@ -1757,19 +1757,19 @@
Функция ПолучитьИДКартинки(Знач Картинка, Знач Параметры, Знач Вид) Функция ПолучитьИДКартинки(Знач Картинка, Знач Параметры, Знач Вид)
Response_ = "response"; Response_ = "response";
Ответ = ЗагрузитьФотоНаСервер(Картинка, Параметры, Вид); Ответ = ЗагрузитьФотоНаСервер(Картинка, Параметры, Вид);
Результат = Ответ[Response_]; Результат = Ответ[Response_];
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
ИДФото = Результат["photo_id"]; ИДФото = Результат["photo_id"];
Если Не ЗначениеЗаполнено(ИДФото) Тогда Если Не ЗначениеЗаполнено(ИДФото) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
ИДФото = OPI_Инструменты.ЧислоВСтроку(ИДФото); ИДФото = OPI_Инструменты.ЧислоВСтроку(ИДФото);
@@ -1779,17 +1779,17 @@
Функция ПолучитьСоответствиеКартинки(Знач Картинка, Знач Параметры, Знач Вид) Функция ПолучитьСоответствиеКартинки(Знач Картинка, Знач Параметры, Знач Вид)
Ответ = ЗагрузитьФотоНаСервер(Картинка, Параметры, Вид); Ответ = ЗагрузитьФотоНаСервер(Картинка, Параметры, Вид);
ОтветМассив = Ответ.Получить("response"); ОтветМассив = Ответ.Получить("response");
Если Не ЗначениеЗаполнено(ОтветМассив) Или Не ТипЗнч(ОтветМассив) = Тип("Массив") Тогда Если Не ЗначениеЗаполнено(ОтветМассив) Или Не ТипЗнч(ОтветМассив) = Тип("Массив") Тогда
Возврат Ответ; Возврат Ответ;
Иначе Иначе
Если ОтветМассив.Количество() = 0 Тогда Если ОтветМассив.Количество() = 0 Тогда
Возврат Ответ; Возврат Ответ;
Иначе Иначе
ОтветСоответствие = ОтветМассив[0]; ОтветСоответствие = ОтветМассив[0];
КонецЕсли; КонецЕсли;
КонецЕсли; КонецЕсли;
Возврат ОтветСоответствие; Возврат ОтветСоответствие;
@@ -1798,20 +1798,20 @@
Функция ПолучитьМассивПодборок(Знач Подборки, Знач Параметры = "") Функция ПолучитьМассивПодборок(Знач Подборки, Знач Параметры = "")
Response_ = "response"; Response_ = "response";
Подборки = ПолучитьПодборкиПоИД(Подборки, Параметры); Подборки = ПолучитьПодборкиПоИД(Подборки, Параметры);
Результат = Подборки[Response_]; Результат = Подборки[Response_];
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
МассивПодборок = Результат["items"]; МассивПодборок = Результат["items"];
Если Не ЗначениеЗаполнено(МассивПодборок) Тогда Если Не ЗначениеЗаполнено(МассивПодборок) Тогда
Возврат Подборки; Возврат Подборки;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Подборки; Возврат Подборки;
КонецЕсли; КонецЕсли;
Возврат МассивПодборок; Возврат МассивПодборок;
@@ -1914,11 +1914,11 @@
ИДТовара = Результат["market_item_id"]; ИДТовара = Результат["market_item_id"];
Если Не ЗначениеЗаполнено(ИДТовара) Тогда Если Не ЗначениеЗаполнено(ИДТовара) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Если ЗначениеЗаполнено(Подборка) И ЗначениеЗаполнено(ИДТовара) Тогда Если ЗначениеЗаполнено(Подборка) И ЗначениеЗаполнено(ИДТовара) Тогда
@@ -2060,14 +2060,14 @@
Результат = Ответ[Response_]; Результат = Ответ[Response_];
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
ИДФото = Результат["photo_id"]; ИДФото = Результат["photo_id"];
Если Не ЗначениеЗаполнено(ИДФото) Тогда Если Не ЗначениеЗаполнено(ИДФото) Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат; Возврат;
КонецЕсли; КонецЕсли;
ИДФото = OPI_Инструменты.ЧислоВСтроку(ИДФото); ИДФото = OPI_Инструменты.ЧислоВСтроку(ИДФото);
@@ -2116,9 +2116,9 @@
ИДФото = ПолучитьИДКартинки(Фото, Параметры, "Товар"); ИДФото = ПолучитьИДКартинки(Фото, Параметры, "Товар");
Если Не ТипЗнч(ИДФото) = Тип("Строка") Тогда Если Не ТипЗнч(ИДФото) = Тип("Строка") Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
СтрокаФотографий = СтрокаФотографий + ИДФото + ","; СтрокаФотографий = СтрокаФотографий + ИДФото + ",";

20
src/ru/OInt/core/Modules/OPI_YandexDisk.os
View File

@@ -89,7 +89,7 @@
URLОтвета = Ответ[Href]; URLОтвета = Ответ[Href];
Если Не ЗначениеЗаполнено(URLОтвета) Тогда Если Не ЗначениеЗаполнено(URLОтвета) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки); Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки);
@@ -183,7 +183,7 @@
URLОтвета = Ответ[Href]; URLОтвета = Ответ[Href];
Если Не ЗначениеЗаполнено(URLОтвета) Тогда Если Не ЗначениеЗаполнено(URLОтвета) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки); Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки);
@@ -230,14 +230,14 @@
Функция СкачатьФайл(Знач Токен, Знач Путь, Знач ПутьСохранения = "") Экспорт Функция СкачатьФайл(Знач Токен, Знач Путь, Знач ПутьСохранения = "") Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(ПутьСохранения); OPI_ПреобразованиеТипов.ПолучитьСтроку(ПутьСохранения);
Ответ = ПолучитьСсылкуДляСкачивания(Токен, Путь); Ответ = ПолучитьСсылкуДляСкачивания(Токен, Путь);
URL = Ответ["href"]; URL = Ответ["href"];
Если Не ЗначениеЗаполнено(URL) Тогда Если Не ЗначениеЗаполнено(URL) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.Get(URL, , , ПутьСохранения); Ответ = OPI_Инструменты.Get(URL, , , ПутьСохранения);
Возврат Ответ; Возврат Ответ;
@@ -330,7 +330,7 @@
URLОтвета = Ответ[Href]; URLОтвета = Ответ[Href];
Если Не ЗначениеЗаполнено(URLОтвета) Тогда Если Не ЗначениеЗаполнено(URLОтвета) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки); Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки);
@@ -369,7 +369,7 @@
URL = Ответ[Href]; URL = Ответ[Href];
Если Не ЗначениеЗаполнено(URL) Тогда Если Не ЗначениеЗаполнено(URL) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.PutMultipart(URL, Новый Структура(), Файл, "multipart", Заголовки); Ответ = OPI_Инструменты.PutMultipart(URL, Новый Структура(), Файл, "multipart", Заголовки);

2
src/ru/OInt/tests/Modules/Coverage_ЗапускВсехТестов.os
View File

@@ -4,5 +4,5 @@
Тесты = OPI_ПолучениеДанныхТестов.СформироватьТестыАссертс(); Тесты = OPI_ПолучениеДанныхТестов.СформироватьТестыАссертс();
Для Каждого Тест Из Тесты Цикл Для Каждого Тест Из Тесты Цикл
Выполнить("OPI_Тесты." + Тест + "()"); Выполнить("OPI_Тесты." + Тест + "()");
КонецЦикла; КонецЦикла;

430
src/ru/OInt/tests/Modules/internal/OPI_Тесты.os
View File

@@ -68,71 +68,71 @@
Процедура Телеграм_ПолучитьИнформациюБота() Экспорт Процедура Телеграм_ПолучитьИнформациюБота() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста);
Telegram_ПолучитьИнформациюБота(ПараметрыТеста); Telegram_ПолучитьИнформациюБота(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ПолучитьОбновления() Экспорт Процедура Телеграм_ПолучитьОбновления() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста);
Telegram_УдалитьWebhook(ПараметрыТеста); Telegram_УдалитьWebhook(ПараметрыТеста);
Telegram_ПолучитьОбновления(ПараметрыТеста); Telegram_ПолучитьОбновления(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_УстановитьWebhook() Экспорт Процедура Телеграм_УстановитьWebhook() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_URL" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_URL" , ПараметрыТеста);
Telegram_УстановитьWebhook(ПараметрыТеста); Telegram_УстановитьWebhook(ПараметрыТеста);
Telegram_УдалитьWebhook(ПараметрыТеста); Telegram_УдалитьWebhook(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ОтправитьТекстовоеСообщение() Экспорт Процедура Телеграм_ОтправитьТекстовоеСообщение() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста);
Telegram_ОтправитьТекстовоеСообщение(ПараметрыТеста); Telegram_ОтправитьТекстовоеСообщение(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ОтправитьКартинку() Экспорт Процедура Телеграм_ОтправитьКартинку() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста);
Telegram_ОтправитьКартинку(ПараметрыТеста); Telegram_ОтправитьКартинку(ПараметрыТеста);
Telegram_СкачатьФайл(ПараметрыТеста); Telegram_СкачатьФайл(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ОтправитьВидео() Экспорт Процедура Телеграм_ОтправитьВидео() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Video" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Video" , ПараметрыТеста);
Telegram_ОтправитьВидео(ПараметрыТеста); Telegram_ОтправитьВидео(ПараметрыТеста);
Telegram_СкачатьФайл(ПараметрыТеста); Telegram_СкачатьФайл(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -225,7 +225,7 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
Telegram_ОтправитьОпрос(ПараметрыТеста); Telegram_ОтправитьОпрос(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -237,7 +237,7 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelMessageID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelMessageID", ПараметрыТеста);
Telegram_ПереслатьСообщение(ПараметрыТеста); Telegram_ПереслатьСообщение(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -259,7 +259,7 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
Telegram_СоздатьСсылкуПриглашение(ПараметрыТеста); Telegram_СоздатьСсылкуПриглашение(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -270,9 +270,9 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelMessageID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelMessageID", ПараметрыТеста);
Telegram_ЗакрепитьСообщение(ПараметрыТеста); Telegram_ЗакрепитьСообщение(ПараметрыТеста);
Telegram_ОткрепитьСообщение(ПараметрыТеста); Telegram_ОткрепитьСообщение(ПараметрыТеста);
Telegram_УдалитьСообщение(ПараметрыТеста); Telegram_УдалитьСообщение(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -291,7 +291,7 @@
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста);
Telegram_ПолучитьСписокАватаровФорума(ПараметрыТеста); Telegram_ПолучитьСписокАватаровФорума(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -303,33 +303,33 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста);
Telegram_СоздатьТемуФорума(ПараметрыТеста); Telegram_СоздатьТемуФорума(ПараметрыТеста);
Telegram_ИзменитьТемуФорума(ПараметрыТеста); Telegram_ИзменитьТемуФорума(ПараметрыТеста);
Telegram_ЗакрытьТемуФорума(ПараметрыТеста); Telegram_ЗакрытьТемуФорума(ПараметрыТеста);
Telegram_ОткрытьТемуФорума(ПараметрыТеста); Telegram_ОткрытьТемуФорума(ПараметрыТеста);
Telegram_ОчиститьСписокЗакрепленныхСообщенийТемы(ПараметрыТеста); Telegram_ОчиститьСписокЗакрепленныхСообщенийТемы(ПараметрыТеста);
Telegram_УдалитьТемуФорума(ПараметрыТеста); Telegram_УдалитьТемуФорума(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_СкрытьПоказатьГлавнуюТему() Экспорт Процедура Телеграм_СкрытьПоказатьГлавнуюТему() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ForumID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ForumID", ПараметрыТеста);
Telegram_СкрытьГлавнуюТемуФорума(ПараметрыТеста); Telegram_СкрытьГлавнуюТемуФорума(ПараметрыТеста);
Telegram_ПоказатьГлавнуюТемуФорума(ПараметрыТеста); Telegram_ПоказатьГлавнуюТемуФорума(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ИзменитьИмяГлавнойТемы() Экспорт Процедура Телеграм_ИзменитьИмяГлавнойТемы() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ForumID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ForumID", ПараметрыТеста);
Telegram_ИзменитьИмяГлавнойТемыФорума(ПараметрыТеста); Telegram_ИзменитьИмяГлавнойТемыФорума(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -1806,13 +1806,13 @@
Процедура Ноушн_СоздатьСтраницу() Экспорт Процедура Ноушн_СоздатьСтраницу() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent"); Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent");
Заголовок = "Тестовый заголовок"; Заголовок = "Тестовый заголовок";
Результат = OPI_Notion.СоздатьСтраницу(Токен, Родитель, Заголовок); Результат = OPI_Notion.СоздатьСтраницу(Токен, Родитель, Заголовок);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСтраницу"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСтраницу");
Проверка_НоушнОбъект(Результат); Проверка_НоушнОбъект(Результат);
@@ -1820,46 +1820,46 @@
Процедура Ноушн_СоздатьИзменитьБазу() Экспорт Процедура Ноушн_СоздатьИзменитьБазу() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent"); Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent");
Заголовок = "Тестовый заголовок"; Заголовок = "Тестовый заголовок";
Свойства = Новый Соответствие; Свойства = Новый Соответствие;
Свойства.Вставить("Имя" , "title"); Свойства.Вставить("Имя" , "title");
Свойства.Вставить("Описание" , "rich_text"); Свойства.Вставить("Описание" , "rich_text");
Свойства.Вставить("Номер" , "number"); Свойства.Вставить("Номер" , "number");
Свойства.Вставить("Статус" , "status"); Свойства.Вставить("Статус" , "status");
Свойства.Вставить("Дата создания" , "date"); Свойства.Вставить("Дата создания" , "date");
Свойства.Вставить("Картинка" , "files"); Свойства.Вставить("Картинка" , "files");
Свойства.Вставить("Активен" , "checkbox"); Свойства.Вставить("Активен" , "checkbox");
Свойства.Вставить("Сайт" , "url"); Свойства.Вставить("Сайт" , "url");
Свойства.Вставить("Почта" , "email"); Свойства.Вставить("Почта" , "email");
Свойства.Вставить("Телефон" , "phone_number"); Свойства.Вставить("Телефон" , "phone_number");
Свойства.Вставить("Пользователь" , "people"); Свойства.Вставить("Пользователь" , "people");
ВыборЗначения = Новый Соответствие; ВыборЗначения = Новый Соответствие;
ВыборЗначения.Вставить("Новый" , "green"); ВыборЗначения.Вставить("Новый" , "green");
ВыборЗначения.Вставить("В работе" , "yellow"); ВыборЗначения.Вставить("В работе" , "yellow");
ВыборЗначения.Вставить("Удаленный", "red"); ВыборЗначения.Вставить("Удаленный", "red");
Свойства.Вставить("Статус", ВыборЗначения); Свойства.Вставить("Статус", ВыборЗначения);
Результат = OPI_Notion.СоздатьБазуДанных(Токен, Родитель, Заголовок, Свойства); Результат = OPI_Notion.СоздатьБазуДанных(Токен, Родитель, Заголовок, Свойства);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьБазуДанных"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьБазуДанных");
Проверка_НоушнОбъект(Результат, "database"); Проверка_НоушнОбъект(Результат, "database");
База = Результат["id"]; База = Результат["id"];
Заголовок = "Тестовый заголовок"; Заголовок = "Тестовый заголовок";
Описание = "Тестовое описание"; Описание = "Тестовое описание";
Свойства = Новый Соответствие; Свойства = Новый Соответствие;
Свойства.Вставить("Почта", "rich_text"); // Тип поля "Почта" будет изменен с email на текст Свойства.Вставить("Почта", "rich_text"); // Тип поля "Почта" будет изменен с email на текст
Свойства.Вставить("Сайт"); // Поле "Сайт" будет удалено Свойства.Вставить("Сайт"); // Поле "Сайт" будет удалено
Результат = OPI_Notion.ИзменитьСвойстваБазы(Токен, База, Свойства, Заголовок, Описание); Результат = OPI_Notion.ИзменитьСвойстваБазы(Токен, База, Свойства, Заголовок, Описание);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьСвойстваБазы"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьСвойстваБазы");
Проверка_НоушнОбъект(Результат, "database"); Проверка_НоушнОбъект(Результат, "database");
@@ -1867,12 +1867,12 @@
Процедура Ноушн_ПолучитьИнформациюОСтранице() Экспорт Процедура Ноушн_ПолучитьИнформациюОСтранице() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Страница = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Page"); Страница = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Page");
Результат = OPI_Notion.ПолучитьСтраницу(Токен, Страница); Результат = OPI_Notion.ПолучитьСтраницу(Токен, Страница);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСтраницу"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСтраницу");
Проверка_НоушнОбъект(Результат); Проверка_НоушнОбъект(Результат);
@@ -1880,12 +1880,12 @@
Процедура Ноушн_ПолучитьИнформациюОБазе() Экспорт Процедура Ноушн_ПолучитьИнформациюОБазе() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
База = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Base"); База = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Base");
Результат = OPI_Notion.ПолучитьБазуДанных(Токен, База); Результат = OPI_Notion.ПолучитьБазуДанных(Токен, База);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьБазуДанных"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьБазуДанных");
Проверка_НоушнОбъект(Результат, "database"); Проверка_НоушнОбъект(Результат, "database");
@@ -1893,28 +1893,28 @@
Процедура Ноушн_СоздатьСтраницуВБазу() Экспорт Процедура Ноушн_СоздатьСтраницуВБазу() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
База = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Base"); База = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Base");
Картинка = Новый Соответствие; Картинка = Новый Соответствие;
Картинка.Вставить("Лого", OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture")); Картинка.Вставить("Лого", OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture"));
Свойства = Новый Соответствие; Свойства = Новый Соответствие;
Свойства.Вставить("Имя" , "ООО Вектор"); Свойства.Вставить("Имя" , "ООО Вектор");
Свойства.Вставить("Описание" , "Наш первый клиент"); Свойства.Вставить("Описание" , "Наш первый клиент");
Свойства.Вставить("Номер" , 1); Свойства.Вставить("Номер" , 1);
Свойства.Вставить("Статус" , "Обычный"); Свойства.Вставить("Статус" , "Обычный");
Свойства.Вставить("Дата создания" , OPI_Инструменты.ПолучитьТекущуюДату()); Свойства.Вставить("Дата создания" , OPI_Инструменты.ПолучитьТекущуюДату());
Свойства.Вставить("Картинка" , Картинка); Свойства.Вставить("Картинка" , Картинка);
Свойства.Вставить("Активен" , Истина); Свойства.Вставить("Активен" , Истина);
Свойства.Вставить("Сайт" , "https://vector.ru"); Свойства.Вставить("Сайт" , "https://vector.ru");
Свойства.Вставить("Почта" , "mail@vector.ru"); Свойства.Вставить("Почта" , "mail@vector.ru");
Свойства.Вставить("Телефон" , "88005553535"); Свойства.Вставить("Телефон" , "88005553535");
Свойства.Вставить("Статус" , "Новый"); Свойства.Вставить("Статус" , "Новый");
Результат = OPI_Notion.СоздатьСтраницуВБазу(Токен, База, Свойства); Результат = OPI_Notion.СоздатьСтраницуВБазу(Токен, База, Свойства);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСтраницуВБазу"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСтраницуВБазу");
Проверка_НоушнОбъект(Результат); Проверка_НоушнОбъект(Результат);
@@ -1925,24 +1925,24 @@
Процедура Ноушн_ИзменитьСвойстваСтраницы() Экспорт Процедура Ноушн_ИзменитьСвойстваСтраницы() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Страница = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Page"); Страница = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Page");
Иконка = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture"); Иконка = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture");
Обложка = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture2"); Обложка = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture2");
Архивировать = Ложь; Архивировать = Ложь;
Свойства = Новый Соответствие; Свойства = Новый Соответствие;
Свойства.Вставить("Активен" , Ложь); Свойства.Вставить("Активен" , Ложь);
Свойства.Вставить("Почта" , "vector@mail.ru"); Свойства.Вставить("Почта" , "vector@mail.ru");
Результат = OPI_Notion.ИзменитьСвойстваСтраницы(Токен Результат = OPI_Notion.ИзменитьСвойстваСтраницы(Токен
, Страница , Страница
, Свойства , Свойства
, Иконка , Иконка
, Обложка , Обложка
, Архивировать); , Архивировать);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьСвойстваСтраницы"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьСвойстваСтраницы");
Проверка_НоушнОбъект(Результат); Проверка_НоушнОбъект(Результат);
@@ -1950,32 +1950,32 @@
Процедура Ноушн_СоздатьУдалитьБлок() Экспорт Процедура Ноушн_СоздатьУдалитьБлок() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent"); Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent");
Блок = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Block"); Блок = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Block");
Результат = OPI_Notion.ВернутьБлок(Токен, Блок); Результат = OPI_Notion.ВернутьБлок(Токен, Блок);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ВернутьБлок"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ВернутьБлок");
Проверка_НоушнОбъект(Результат, "block"); Проверка_НоушнОбъект(Результат, "block");
Результат = OPI_Notion.СоздатьБлок(Токен, Родитель, Результат); Результат = OPI_Notion.СоздатьБлок(Токен, Родитель, Результат);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьБлок"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьБлок");
Проверка_НоушнОбъект(Результат, "list"); Проверка_НоушнОбъект(Результат, "list");
Блок = Результат["results"][0]["id"]; Блок = Результат["results"][0]["id"];
Результат = OPI_Notion.ВернутьДочерниеБлоки(Токен, Блок); Результат = OPI_Notion.ВернутьДочерниеБлоки(Токен, Блок);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ВернутьДочерниеБлоки"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ВернутьДочерниеБлоки");
Проверка_НоушнОбъект(Результат, "list"); Проверка_НоушнОбъект(Результат, "list");
Результат = OPI_Notion.УдалитьБлок(Токен, Блок); Результат = OPI_Notion.УдалитьБлок(Токен, Блок);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьБлок"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьБлок");
Проверка_НоушнОбъект(Результат, "block"); Проверка_НоушнОбъект(Результат, "block");
@@ -1983,10 +1983,10 @@
Процедура Ноушн_ПолучитьПользователей() Экспорт Процедура Ноушн_ПолучитьПользователей() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Результат = OPI_Notion.СписокПользователей(Токен); Результат = OPI_Notion.СписокПользователей(Токен);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СписокПользователей"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СписокПользователей");
Проверка_НоушнОбъект(Результат, "list"); Проверка_НоушнОбъект(Результат, "list");
@@ -1994,11 +1994,11 @@
Процедура Ноушн_ПолучитьДанныеПользователя() Экспорт Процедура Ноушн_ПолучитьДанныеПользователя() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Пользователь = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_User"); Пользователь = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_User");
Результат = OPI_Notion.ПолучитьДанныеПользователя(Токен, Пользователь); Результат = OPI_Notion.ПолучитьДанныеПользователя(Токен, Пользователь);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьДанныеПользователя"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьДанныеПользователя");
Проверка_НоушнОбъект(Результат, "user"); Проверка_НоушнОбъект(Результат, "user");
@@ -2855,7 +2855,7 @@
Процедура Б24_СерверноеВремя() Экспорт Процедура Б24_СерверноеВремя() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_URL" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_URL" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Domain", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Domain", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Token" , ПараметрыТеста);
@@ -3238,7 +3238,7 @@
Процедура Проверка_Структура(Знач Результат) Процедура Проверка_Структура(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Структура").Заполнено(); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Структура").Заполнено();
КонецПроцедуры КонецПроцедуры
@@ -3674,13 +3674,13 @@
Процедура Проверка_БитриксВремя(Знач Результат) Процедура Проверка_БитриксВремя(Знач Результат)
Время = Результат["result"]; Время = Результат["result"];
Если Не ТипЗнч(Время) = Тип("Дата") Тогда Если Не ТипЗнч(Время) = Тип("Дата") Тогда
Время = XMLЗначение(Тип("Дата"), Время); Время = XMLЗначение(Тип("Дата"), Время);
КонецЕсли; КонецЕсли;
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Время).ИмеетТип("Дата").Заполнено(); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Время).ИмеетТип("Дата").Заполнено();
КонецПроцедуры КонецПроцедуры
@@ -3790,14 +3790,14 @@
Процедура Проверка_БитриксСписокКомментариев(Знач Результат) Процедура Проверка_БитриксСписокКомментариев(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"]).ИмеетТип("Массив"); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"]).ИмеетТип("Массив");
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"][0]["POST_MESSAGE"]).Заполнено(); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"][0]["POST_MESSAGE"]).Заполнено();
КонецПроцедуры КонецПроцедуры
Процедура Проверка_БитриксСписокРезультатов(Знач Результат) Процедура Проверка_БитриксСписокРезультатов(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"]).ИмеетТип("Массив"); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"]).ИмеетТип("Массив");
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"][0]["text"]).Заполнено(); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"][0]["text"]).Заполнено();
КонецПроцедуры КонецПроцедуры
@@ -3852,10 +3852,10 @@
Процедура Telegram_ПолучитьОбновления(ПараметрыФункции) Процедура Telegram_ПолучитьОбновления(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Результат = OPI_Telegram.ПолучитьОбновления(Токен); Результат = OPI_Telegram.ПолучитьОбновления(Токен);
// END // END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьОбновления", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьОбновления", "Telegram");
@@ -3884,12 +3884,12 @@
Процедура Telegram_УдалитьWebhook(ПараметрыФункции) Процедура Telegram_УдалитьWebhook(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Результат = OPI_Telegram.УдалитьWebhook(Токен); Результат = OPI_Telegram.УдалитьWebhook(Токен);
// END // END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьWebhook", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьWebhook", "Telegram");
Проверка_ТелеграмУдалениеВебхук(Результат); Проверка_ТелеграмУдалениеВебхук(Результат);
@@ -3899,10 +3899,10 @@
Процедура Telegram_ОтправитьТекстовоеСообщение(ПараметрыФункции) Процедура Telegram_ОтправитьТекстовоеСообщение(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
IDЧата = ПараметрыФункции["Telegram_ChatID"]; IDЧата = ПараметрыФункции["Telegram_ChatID"];
IDКанала = ПараметрыФункции["Telegram_ChannelID"]; IDКанала = ПараметрыФункции["Telegram_ChannelID"];
Текст = ПараметрыФункции["String"]; Текст = ПараметрыФункции["String"];
Результат = OPI_Telegram.ОтправитьТекстовоеСообщение(Токен, IDЧата, Текст); Результат = OPI_Telegram.ОтправитьТекстовоеСообщение(Токен, IDЧата, Текст);
@@ -4288,8 +4288,8 @@
Процедура Telegram_СкачатьФайл(ПараметрыФункции) Процедура Telegram_СкачатьФайл(ПараметрыФункции)
IDФайла = ПараметрыФункции["Telegram_FileID"]; IDФайла = ПараметрыФункции["Telegram_FileID"];
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Результат = OPI_Telegram.СкачатьФайл(Токен, IDФайла); Результат = OPI_Telegram.СкачатьФайл(Токен, IDФайла);
@@ -4314,7 +4314,7 @@
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПереслатьСообщение", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПереслатьСообщение", "Telegram");
Проверка_ТелеграмПереслать(Результат, IDСообщения); Проверка_ТелеграмПереслать(Результат, IDСообщения);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
@@ -4322,18 +4322,18 @@
Процедура Telegram_Бан(ПараметрыФункции) Процедура Telegram_Бан(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
IDПользователя = ПараметрыФункции["Telegram_ChatID"]; IDПользователя = ПараметрыФункции["Telegram_ChatID"];
IDКанала = ПараметрыФункции["Telegram_ChannelID"]; IDКанала = ПараметрыФункции["Telegram_ChannelID"];
Результат = OPI_Telegram.Бан(Токен, IDКанала, IDПользователя); Результат = OPI_Telegram.Бан(Токен, IDКанала, IDПользователя);
// END // END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "Бан", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "Бан", "Telegram");
Проверка_ТелеграмБан(Результат); Проверка_ТелеграмБан(Результат);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
КонецПроцедуры КонецПроцедуры
@@ -4343,14 +4343,14 @@
IDПользователя = ПараметрыФункции["Telegram_ChatID"]; IDПользователя = ПараметрыФункции["Telegram_ChatID"];
IDКанала = ПараметрыФункции["Telegram_ChannelID"]; IDКанала = ПараметрыФункции["Telegram_ChannelID"];
Результат = OPI_Telegram.Разбан(Токен, IDКанала, IDПользователя); Результат = OPI_Telegram.Разбан(Токен, IDКанала, IDПользователя);
// END // END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "Разбан", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "Разбан", "Telegram");
Проверка_ТелеграмБан(Результат); Проверка_ТелеграмБан(Результат);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
КонецПроцедуры КонецПроцедуры
@@ -4371,7 +4371,7 @@
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСсылкуПриглашение", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСсылкуПриглашение", "Telegram");
Проверка_ТелеграмПриглашение(Результат, Заголовок, UnixИстечение); Проверка_ТелеграмПриглашение(Результат, Заголовок, UnixИстечение);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
@@ -4385,11 +4385,11 @@
Результат = OPI_Telegram.ЗакрепитьСообщение(Токен, IDКанала, IDСообщения); Результат = OPI_Telegram.ЗакрепитьСообщение(Токен, IDКанала, IDСообщения);
// END // END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗакрепитьСообщение", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗакрепитьСообщение", "Telegram");
Проверка_ТелеграмИстина(Результат); Проверка_ТелеграмИстина(Результат);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
@@ -4403,11 +4403,11 @@
Результат = OPI_Telegram.ОткрепитьСообщение(Токен, IDКанала, IDСообщения); Результат = OPI_Telegram.ОткрепитьСообщение(Токен, IDКанала, IDСообщения);
// END // END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОткрепитьСообщение", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОткрепитьСообщение", "Telegram");
Проверка_ТелеграмИстина(Результат); Проверка_ТелеграмИстина(Результат);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
@@ -4432,10 +4432,10 @@
Процедура Telegram_ПолучитьСписокАватаровФорума(ПараметрыФункции) Процедура Telegram_ПолучитьСписокАватаровФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Результат = OPI_Telegram.ПолучитьСписокИконокАватаров(Токен); Результат = OPI_Telegram.ПолучитьСписокИконокАватаров(Токен);
// END // END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокИконокАватаров", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокИконокАватаров", "Telegram");
@@ -4447,14 +4447,14 @@
Процедура Telegram_СоздатьТемуФорума(ПараметрыФункции) Процедура Telegram_СоздатьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Иконка = "5357419403325481346"; Иконка = "5357419403325481346";
Имя = "Тестовая тема " + Строка(Новый УникальныйИдентификатор); Имя = "Тестовая тема " + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Telegram.СоздатьТемуФорума(Токен, Чат, Имя, Иконка); Результат = OPI_Telegram.СоздатьТемуФорума(Токен, Чат, Имя, Иконка);
// END // END
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТемуФорума", "Telegram"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТемуФорума", "Telegram");
@@ -4464,10 +4464,10 @@
OPI_Инструменты.ДобавитьПоле("Telegram_TopicID", Тема, "Строка", ПараметрыФункции); OPI_Инструменты.ДобавитьПоле("Telegram_TopicID", Тема, "Строка", ПараметрыФункции);
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Telegram_TopicID", ПараметрыФункции["Telegram_TopicID"]); OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Telegram_TopicID", ПараметрыФункции["Telegram_TopicID"]);
Проверка_ТелеграмСозданиеТемы(Результат, Имя, Иконка); Проверка_ТелеграмСозданиеТемы(Результат, Имя, Иконка);
ЧатТема = Чат + "*" + Тема; ЧатТема = Чат + "*" + Тема;
Текст = ПараметрыФункции["String"]; Текст = ПараметрыФункции["String"];
Результат = OPI_Telegram.ОтправитьТекстовоеСообщение(Токен, ЧатТема, Текст); Результат = OPI_Telegram.ОтправитьТекстовоеСообщение(Токен, ЧатТема, Текст);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОтправитьТекстовоеСообщение (форум)"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОтправитьТекстовоеСообщение (форум)");
@@ -4478,7 +4478,7 @@
Процедура Telegram_ИзменитьТемуФорума(ПараметрыФункции) Процедура Telegram_ИзменитьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
НовоеИмя = "Новый тестовый заголовок"; НовоеИмя = "Новый тестовый заголовок";
@@ -4498,15 +4498,15 @@
Процедура Telegram_ЗакрытьТемуФорума(ПараметрыФункции) Процедура Telegram_ЗакрытьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
OPI_Telegram.ОткрытьТемуФорума(Токен, Чат); // SKIP OPI_Telegram.ОткрытьТемуФорума(Токен, Чат); // SKIP
Результат = OPI_Telegram.ЗакрытьТемуФорума(Токен, Чат); // Закрывает главную тему Результат = OPI_Telegram.ЗакрытьТемуФорума(Токен, Чат); // Закрывает главную тему
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗакрытьТемуФорума (главная)"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗакрытьТемуФорума (главная)");
Проверка_ТелеграмИстина(Результат); // SKIP Проверка_ТелеграмИстина(Результат); // SKIP
@@ -4524,13 +4524,13 @@
Процедура Telegram_ОткрытьТемуФорума(ПараметрыФункции) Процедура Telegram_ОткрытьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
Результат = OPI_Telegram.ОткрытьТемуФорума(Токен, Чат); // Открывает главную тему Результат = OPI_Telegram.ОткрытьТемуФорума(Токен, Чат); // Открывает главную тему
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОткрытьТемуФорума (главная)"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОткрытьТемуФорума (главная)");
Проверка_ТелеграмИстина(Результат); // SKIP Проверка_ТелеграмИстина(Результат); // SKIP
@@ -4548,7 +4548,7 @@
Процедура Telegram_УдалитьТемуФорума(ПараметрыФункции) Процедура Telegram_УдалитьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
@@ -4566,7 +4566,7 @@
Процедура Telegram_ОчиститьСписокЗакрепленныхСообщенийТемы(ПараметрыФункции) Процедура Telegram_ОчиститьСписокЗакрепленныхСообщенийТемы(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
@@ -4590,7 +4590,7 @@
Процедура Telegram_СкрытьГлавнуюТемуФорума(ПараметрыФункции) Процедура Telegram_СкрытьГлавнуюТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Результат = OPI_Telegram.СкрытьГлавнуюТемуФорума(Токен, Чат); Результат = OPI_Telegram.СкрытьГлавнуюТемуФорума(Токен, Чат);
@@ -4607,7 +4607,7 @@
Процедура Telegram_ПоказатьГлавнуюТемуФорума(ПараметрыФункции) Процедура Telegram_ПоказатьГлавнуюТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Результат = OPI_Telegram.ПоказатьГлавнуюТемуФорума(Токен, Чат); Результат = OPI_Telegram.ПоказатьГлавнуюТемуФорума(Токен, Чат);
@@ -4624,8 +4624,8 @@
Процедура Telegram_ИзменитьИмяГлавнойТемыФорума(ПараметрыФункции) Процедура Telegram_ИзменитьИмяГлавнойТемыФорума(ПараметрыФункции)
Заголовок = "Новое имя главной темы " + Строка(Новый УникальныйИдентификатор); Заголовок = "Новое имя главной темы " + Строка(Новый УникальныйИдентификатор);
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Результат = OPI_Telegram.ИзменитьИмяГлавнойТемыФорума(Токен, Чат, Заголовок); Результат = OPI_Telegram.ИзменитьИмяГлавнойТемыФорума(Токен, Чат, Заголовок);
@@ -4642,11 +4642,11 @@
Процедура Telegram_УдалитьСообщение(ПараметрыФункции) Процедура Telegram_УдалитьСообщение(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
IDЧата = ПараметрыФункции["Telegram_ChannelID"]; IDЧата = ПараметрыФункции["Telegram_ChannelID"];
IDСообщения = ПараметрыФункции["Telegram_ChannelMessageID"]; IDСообщения = ПараметрыФункции["Telegram_ChannelMessageID"];
Результат = OPI_Telegram.УдалитьСообщение(Токен, IDЧата, IDСообщения); Результат = OPI_Telegram.УдалитьСообщение(Токен, IDЧата, IDСообщения);
// END // END
@@ -6252,7 +6252,7 @@
Процедура Dropbox_ОтменитьПубликациюФайла(ПараметрыФункции) Процедура Dropbox_ОтменитьПубликациюФайла(ПараметрыФункции)
Токен = ПараметрыФункции["Dropbox_Token"]; Токен = ПараметрыФункции["Dropbox_Token"];
Файл = ПараметрыФункции["Dropbox_FileID"]; Файл = ПараметрыФункции["Dropbox_FileID"];
Результат = OPI_Dropbox.ОтменитьПубликациюФайла(Токен, Файл); Результат = OPI_Dropbox.ОтменитьПубликациюФайла(Токен, Файл);
@@ -6274,7 +6274,7 @@
Домен = ПараметрыФункции["Bitrix24_Domain"]; Домен = ПараметрыФункции["Bitrix24_Domain"];
ClientID = ПараметрыФункции["Bitrix24_ClientID"]; ClientID = ПараметрыФункции["Bitrix24_ClientID"];
Результат = OPI_Bitrix24.ПолучитьСсылкуАвторизацииПриложения(Домен, ClientID); Результат = OPI_Bitrix24.ПолучитьСсылкуАвторизацииПриложения(Домен, ClientID);
// END // END
@@ -6292,7 +6292,7 @@
ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"]; ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"];
Code = ПараметрыФункции["Bitrix24_Code"]; Code = ПараметрыФункции["Bitrix24_Code"];
Результат = OPI_Bitrix24.ПолучитьТокен(ClientID, ClientSecret, Code); Результат = OPI_Bitrix24.ПолучитьТокен(ClientID, ClientSecret, Code);
// END // END
@@ -6311,7 +6311,7 @@
ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"]; ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"];
Refresh = ПараметрыФункции["Bitrix24_Refresh"]; Refresh = ПараметрыФункции["Bitrix24_Refresh"];
Результат = OPI_Bitrix24.ОбновитьТокен(ClientID, ClientSecret, Refresh); Результат = OPI_Bitrix24.ОбновитьТокен(ClientID, ClientSecret, Refresh);
// END // END
@@ -6328,9 +6328,9 @@
Процедура Bitrix24_СерверноеВремя(ПараметрыФункции) Процедура Bitrix24_СерверноеВремя(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
Результат = OPI_Bitrix24.СерверноеВремя(URL); Результат = OPI_Bitrix24.СерверноеВремя(URL);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СерверноеВремя (хук)", "Bitrix24"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СерверноеВремя (хук)", "Bitrix24");
@@ -6362,7 +6362,7 @@
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
Результат = OPI_Bitrix24.СоздатьНовость(URL, Текст, , Файлы, Заголовок, Истина); Результат = OPI_Bitrix24.СоздатьНовость(URL, Текст, , Файлы, Заголовок, Истина);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьНовость (хук)", "Bitrix24"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьНовость (хук)", "Bitrix24");
@@ -6427,7 +6427,7 @@
IDНовости = ПараметрыФункции["Bitrix24_HookPostID"]; IDНовости = ПараметрыФункции["Bitrix24_HookPostID"];
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
Результат = OPI_Bitrix24.УдалитьНовость(URL, IDНовости); Результат = OPI_Bitrix24.УдалитьНовость(URL, IDНовости);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьНовость (хук)", "Bitrix24"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьНовость (хук)", "Bitrix24");
@@ -7222,7 +7222,7 @@
Процедура Bitrix24_ПолучитьХранилище(ПараметрыФункции) Процедура Bitrix24_ПолучитьХранилище(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
IDХранилища = 3; IDХранилища = 3;
Результат = OPI_Bitrix24.ПолучитьХранилище(URL, IDХранилища); Результат = OPI_Bitrix24.ПолучитьХранилище(URL, IDХранилища);
@@ -7373,7 +7373,7 @@
Процедура Bitrix24_ПолучитьВнешнююСсылкуКаталога(ПараметрыФункции) Процедура Bitrix24_ПолучитьВнешнююСсылкуКаталога(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
IDКаталога = ПараметрыФункции["Bitrix24_FolderID"]; IDКаталога = ПараметрыФункции["Bitrix24_FolderID"];
Результат = OPI_Bitrix24.ПолучитьВнешнююСсылкуКаталога(URL, IDКаталога); Результат = OPI_Bitrix24.ПолучитьВнешнююСсылкуКаталога(URL, IDКаталога);
@@ -7397,7 +7397,7 @@
Процедура Bitrix24_ПолучитьСтруктуруФильтраКаталога(ПараметрыФункции) Процедура Bitrix24_ПолучитьСтруктуруФильтраКаталога(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
Результат = OPI_Bitrix24.ПолучитьСтруктуруФильтраКаталога(URL); Результат = OPI_Bitrix24.ПолучитьСтруктуруФильтраКаталога(URL);
@@ -7420,7 +7420,7 @@
Процедура Bitrix24_ПолучитьДочерниеЭлементыКаталога(ПараметрыФункции) Процедура Bitrix24_ПолучитьДочерниеЭлементыКаталога(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
IDКаталога = ПараметрыФункции["Bitrix24_FolderID"]; IDКаталога = ПараметрыФункции["Bitrix24_FolderID"];
Результат = OPI_Bitrix24.ПолучитьДочерниеЭлементыКаталога(URL, IDКаталога); Результат = OPI_Bitrix24.ПолучитьДочерниеЭлементыКаталога(URL, IDКаталога);
@@ -7444,7 +7444,7 @@
Процедура Bitrix24_ПоместитьКаталогВКорзину(ПараметрыФункции) Процедура Bitrix24_ПоместитьКаталогВКорзину(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
IDКаталога = ПараметрыФункции["Bitrix24_FolderID"]; IDКаталога = ПараметрыФункции["Bitrix24_FolderID"];
Результат = OPI_Bitrix24.ПоместитьКаталогВКорзину(URL, IDКаталога); Результат = OPI_Bitrix24.ПоместитьКаталогВКорзину(URL, IDКаталога);

56
src/ru/OInt/tools/Modules/OPI_ПолучениеДанныхТестов.os
View File

@@ -345,15 +345,15 @@
Процедура ПараметрВКоллекцию(Параметр, Коллекция) Экспорт Процедура ПараметрВКоллекцию(Параметр, Коллекция) Экспорт
Значение = ПолучитьПараметр(Параметр); Значение = ПолучитьПараметр(Параметр);
Коллекция.Вставить(Параметр, Значение); Коллекция.Вставить(Параметр, Значение);
КонецПроцедуры КонецПроцедуры
Процедура ДвоичныеВКоллекцию(Параметр, Коллекция) Экспорт Процедура ДвоичныеВКоллекцию(Параметр, Коллекция) Экспорт
Значение = ПолучитьДвоичные(Параметр); Значение = ПолучитьДвоичные(Параметр);
Коллекция.Вставить(Параметр, Значение); Коллекция.Вставить(Параметр, Значение);
КонецПроцедуры КонецПроцедуры
@@ -384,8 +384,8 @@
Сообщить(Символы.ПС); Сообщить(Символы.ПС);
Если ЗначениеЗаполнено(Библиотека) Тогда Если ЗначениеЗаполнено(Библиотека) Тогда
ЗаписатьФайлЛога(Данные, Метод, Библиотека); ЗаписатьФайлЛога(Данные, Метод, Библиотека);
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры
@@ -410,11 +410,11 @@
Для Каждого ВозможныйПуть Из ВозможныеПути Цикл Для Каждого ВозможныйПуть Из ВозможныеПути Цикл
ФайлРепозитория = Новый Файл(ВозможныйПуть); ФайлРепозитория = Новый Файл(ВозможныйПуть);
Если ФайлРепозитория.Существует() Тогда Если ФайлРепозитория.Существует() Тогда
Путь = ВозможныйПуть; Путь = ВозможныйПуть;
КонецЕсли; КонецЕсли;
КонецЦикла; КонецЦикла;
@@ -453,35 +453,35 @@
Процедура ЗаписатьФайлЛога(Знач Данные, Знач Метод, Знач Библиотека) Процедура ЗаписатьФайлЛога(Знач Данные, Знач Метод, Знач Библиотека)
Попытка Попытка
ПутьЛогов = "./docs/ru/results"; ПутьЛогов = "./docs/ru/results";
ПутьЛоговБиблиотеки = ПутьЛогов + "/" + Библиотека; ПутьЛоговБиблиотеки = ПутьЛогов + "/" + Библиотека;
КаталогЛогов = Новый Файл(ПутьЛогов); КаталогЛогов = Новый Файл(ПутьЛогов);
Если Не КаталогЛогов.Существует() Тогда Если Не КаталогЛогов.Существует() Тогда
СоздатьКаталог(ПутьЛогов); СоздатьКаталог(ПутьЛогов);
КонецЕсли; КонецЕсли;
КаталогЛоговБиблиотеки = Новый Файл(ПутьЛоговБиблиотеки); КаталогЛоговБиблиотеки = Новый Файл(ПутьЛоговБиблиотеки);
Если Не КаталогЛоговБиблиотеки.Существует() Тогда Если Не КаталогЛоговБиблиотеки.Существует() Тогда
СоздатьКаталог(ПутьЛоговБиблиотеки); СоздатьКаталог(ПутьЛоговБиблиотеки);
КонецЕсли; КонецЕсли;
ПутьКФайлу = ПутьЛоговБиблиотеки + "/" + Метод + ".log"; ПутьКФайлу = ПутьЛоговБиблиотеки + "/" + Метод + ".log";
ФайлЛога = Новый Файл(ПутьКФайлу); ФайлЛога = Новый Файл(ПутьКФайлу);
Если Не ФайлЛога.Существует() Тогда Если Не ФайлЛога.Существует() Тогда
ДокументЛога = Новый ТекстовыйДокумент; ДокументЛога = Новый ТекстовыйДокумент;
ДокументЛога.УстановитьТекст(Данные); ДокументЛога.УстановитьТекст(Данные);
ДокументЛога.Записать(ПутьКФайлу); ДокументЛога.Записать(ПутьКФайлу);
КонецЕсли; КонецЕсли;
Исключение Исключение
Сообщить("Не удалось записать файл лога!: " + ОписаниеОшибки()); Сообщить("Не удалось записать файл лога!: " + ОписаниеОшибки());
КонецПопытки; КонецПопытки;
КонецПроцедуры КонецПроцедуры

26
src/ru/OInt/tools/Modules/OPI_ПреобразованиеТипов.os
View File

@@ -151,7 +151,7 @@
Исключение Исключение
Значение = ИсходноеЗначение; Значение = ИсходноеЗначение;
ПолучитьМассив(Значение); ПолучитьМассив(Значение);
КонецПопытки; КонецПопытки;
@@ -169,17 +169,17 @@
ЗапятаяВКавычках = "','"; ЗапятаяВКавычках = "','";
Значение = СтрЗаменить(Значение, "['" , ""); Значение = СтрЗаменить(Значение, "['" , "");
Значение = СтрЗаменить(Значение, "']" , ""); Значение = СтрЗаменить(Значение, "']" , "");
Значение = СтрЗаменить(Значение, "', '" , ЗапятаяВКавычках); Значение = СтрЗаменить(Значение, "', '" , ЗапятаяВКавычках);
Значение = СтрЗаменить(Значение, "' , '", ЗапятаяВКавычках); Значение = СтрЗаменить(Значение, "' , '", ЗапятаяВКавычках);
Значение = СтрЗаменить(Значение, "' ,'" , ЗапятаяВКавычках); Значение = СтрЗаменить(Значение, "' ,'" , ЗапятаяВКавычках);
Значение = СтрРазделить(Значение, ЗапятаяВКавычках, Ложь); Значение = СтрРазделить(Значение, ЗапятаяВКавычках, Ложь);
Для Н = 0 По Значение.ВГраница() Цикл Для Н = 0 По Значение.ВГраница() Цикл
Значение[Н] = СокрЛП(Значение[Н]); Значение[Н] = СокрЛП(Значение[Н]);
КонецЦикла; КонецЦикла;
Иначе Иначе
@@ -187,7 +187,7 @@
Значение = OPI_Инструменты.ЧислоВСтроку(Значение); Значение = OPI_Инструменты.ЧислоВСтроку(Значение);
КонецЕсли; КонецЕсли;
OPI_Инструменты.ЗначениеВМассив(Значение); OPI_Инструменты.ЗначениеВМассив(Значение);
КонецЕсли; КонецЕсли;
@@ -309,7 +309,7 @@
Функция ЭтоКоллекция(Знач Значение) Функция ЭтоКоллекция(Знач Значение)
Возврат ТипЗнч(Значение) = Тип("Массив") Возврат ТипЗнч(Значение) = Тип("Массив")
Или ТипЗнч(Значение) = Тип("Структура") Или ТипЗнч(Значение) = Тип("Структура")
Или ТипЗнч(Значение) = Тип("Соответствие"); Или ТипЗнч(Значение) = Тип("Соответствие");
@@ -317,7 +317,7 @@
Функция ЭтоСимвольное(Знач Значение) Функция ЭтоСимвольное(Знач Значение)
Возврат ТипЗнч(Значение) = Тип("Строка") Возврат ТипЗнч(Значение) = Тип("Строка")
Или ТипЗнч(Значение) = Тип("Число") Или ТипЗнч(Значение) = Тип("Число")
Или ТипЗнч(Значение) = Тип("Дата"); Или ТипЗнч(Значение) = Тип("Дата");

83
src/ru/OPI/src/CommonModules/OPI_Bitrix24/Module.bsl
View File

@@ -141,10 +141,10 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция СерверноеВремя(Знач URL, Знач Токен = "") Экспорт Функция СерверноеВремя(Знач URL, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "server.time"); Параметры = НормализоватьАвторизацию(URL, Токен, "server.time");
Ответ = OPI_Инструменты.Get(URL, Параметры); Ответ = OPI_Инструменты.Get(URL, Параметры);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -170,12 +170,12 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция СоздатьНовость(Знач URL Функция СоздатьНовость(Знач URL
, Знач Текст , Знач Текст
, Знач Видимость = "UA" , Знач Видимость = "UA"
, Знач Файлы = "" , Знач Файлы = ""
, Знач Заголовок = "" , Знач Заголовок = ""
, Знач Важное = Ложь , Знач Важное = Ложь
, Знач Токен = "") Экспорт , Знач Токен = "") Экспорт
ПривестиБулево(Важное); ПривестиБулево(Важное);
@@ -349,8 +349,8 @@
Параметры = НормализоватьАвторизацию(URL, Токен, "log.blogcomment.add"); Параметры = НормализоватьАвторизацию(URL, Токен, "log.blogcomment.add");
OPI_Инструменты.ДобавитьПоле("POST_ID" , IDНовости, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("POST_ID", IDНовости, "Строка", Параметры);
OPI_Инструменты.ДобавитьПоле("TEXT" , Текст , "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("TEXT" , Текст , "Строка", Параметры);
Ответ = OPI_Инструменты.Post(URL, Параметры); Ответ = OPI_Инструменты.Post(URL, Параметры);
@@ -376,8 +376,8 @@
Параметры = НормализоватьАвторизацию(URL, Токен, "log.blogpost.share"); Параметры = НормализоватьАвторизацию(URL, Токен, "log.blogpost.share");
OPI_Инструменты.ДобавитьПоле("POST_ID" , IDНовости, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("POST_ID", IDНовости, "Строка", Параметры);
OPI_Инструменты.ДобавитьПоле("DEST" , Видимость, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("DEST" , Видимость, "Строка", Параметры);
Ответ = OPI_Инструменты.Post(URL, Параметры); Ответ = OPI_Инструменты.Post(URL, Параметры);
@@ -1015,9 +1015,9 @@
, "<статус для сортировки. Аналогичен REAL_STATUS, но имеет дополнительно три мета-статуса>"); , "<статус для сортировки. Аналогичен REAL_STATUS, но имеет дополнительно три мета-статуса>");
Если Пустая Тогда Если Пустая Тогда
Для Каждого Фильтр Из СтруктураФильтра Цикл Для Каждого Фильтр Из СтруктураФильтра Цикл
Фильтр.Значение = ""; Фильтр.Значение = "";
КонецЦикла; КонецЦикла;
КонецЕсли; КонецЕсли;
//@skip-check constructor-function-return-section //@skip-check constructor-function-return-section
@@ -1343,6 +1343,7 @@
Функция УдалитьКомментарийЗадачи(Знач URL, Знач IDЗадачи, Знач IDКомментария, Знач Токен = "") Экспорт Функция УдалитьКомментарийЗадачи(Знач URL, Знач IDЗадачи, Знач IDКомментария, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "task.commentitem.delete"); Параметры = НормализоватьАвторизацию(URL, Токен, "task.commentitem.delete");
OPI_Инструменты.ДобавитьПоле("TASKID", IDЗадачи , "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("TASKID", IDЗадачи , "Строка", Параметры);
OPI_Инструменты.ДобавитьПоле("ITEMID", IDКомментария, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("ITEMID", IDКомментария, "Строка", Параметры);
@@ -1367,7 +1368,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПолучитьСписокРезультатов(Знач URL, Знач IDЗадачи, Знач Токен = "") Экспорт Функция ПолучитьСписокРезультатов(Знач URL, Знач IDЗадачи, Знач Токен = "") Экспорт
Ответ = УправлениеЗадачей(URL, IDЗадачи, "tasks.task.result.list", Токен); Ответ = УправлениеЗадачей(URL, IDЗадачи, "tasks.task.result.list", Токен);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -1387,7 +1388,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция СоздатьРезультатИзКомментария(Знач URL, Знач IDКомментария, Знач Токен = "") Экспорт Функция СоздатьРезультатИзКомментария(Знач URL, Знач IDКомментария, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "tasks.task.result.addFromComment"); Параметры = НормализоватьАвторизацию(URL, Токен, "tasks.task.result.addFromComment");
OPI_Инструменты.ДобавитьПоле("commentId", IDКомментария, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("commentId", IDКомментария, "Строка", Параметры);
Ответ = OPI_Инструменты.Post(URL, Параметры); Ответ = OPI_Инструменты.Post(URL, Параметры);
@@ -1411,7 +1412,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция УдалитьРезультатИзКомментария(Знач URL, Знач IDКомментария, Знач Токен = "") Экспорт Функция УдалитьРезультатИзКомментария(Знач URL, Знач IDКомментария, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "tasks.task.result.deleteFromComment"); Параметры = НормализоватьАвторизацию(URL, Токен, "tasks.task.result.deleteFromComment");
OPI_Инструменты.ДобавитьПоле("commentId", IDКомментария, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("commentId", IDКомментария, "Строка", Параметры);
Ответ = OPI_Инструменты.Post(URL, Параметры); Ответ = OPI_Инструменты.Post(URL, Параметры);
@@ -1864,7 +1865,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПолучитьХранилищеПриложения(Знач URL, Знач Токен = "") Экспорт Функция ПолучитьХранилищеПриложения(Знач URL, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.getforapp"); Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.getforapp");
Ответ = OPI_Инструменты.Post(URL, Параметры); Ответ = OPI_Инструменты.Post(URL, Параметры);
Возврат Ответ; Возврат Ответ;
@@ -1886,8 +1887,8 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПолучитьХранилище(Знач URL, Знач IDХранилища, Знач Токен = "") Экспорт Функция ПолучитьХранилище(Знач URL, Знач IDХранилища, Знач Токен = "") Экспорт
Ответ = УправлениеФайлом(URL, IDХранилища, "disk.storage.get", Токен); Ответ = УправлениеФайлом(URL, IDХранилища, "disk.storage.get", Токен);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -1907,7 +1908,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПереименоватьХранилище(Знач URL, Знач IDХранилища, Знач Наименование, Знач Токен = "") Экспорт Функция ПереименоватьХранилище(Знач URL, Знач IDХранилища, Знач Наименование, Знач Токен = "") Экспорт
Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.rename"); Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.rename");
OPI_Инструменты.ДобавитьПоле("id" , IDХранилища , "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("id" , IDХранилища , "Строка", Параметры);
OPI_Инструменты.ДобавитьПоле("newName", Наименование, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("newName", Наименование, "Строка", Параметры);
@@ -1933,8 +1934,8 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция ПолучитьСодержимоеХранилища(Знач URL, Знач IDХранилища, Знач Токен = "") Экспорт Функция ПолучитьСодержимоеХранилища(Знач URL, Знач IDХранилища, Знач Токен = "") Экспорт
Ответ = УправлениеФайлом(URL, IDХранилища, "disk.storage.getchildren", Токен); Ответ = УправлениеФайлом(URL, IDХранилища, "disk.storage.getchildren", Токен);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -1954,11 +1955,11 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24 // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Bitrxi24
Функция СоздатьКаталогВХранилище(Знач URL, Знач IDХранилища, Знач Наименование, Знач Токен = "") Экспорт Функция СоздатьКаталогВХранилище(Знач URL, Знач IDХранилища, Знач Наименование, Знач Токен = "") Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(Наименование); OPI_ПреобразованиеТипов.ПолучитьСтроку(Наименование);
СтруктураПапки = Новый Структура("NAME", Наименование); СтруктураПапки = Новый Структура("NAME", Наименование);
Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.addfolder"); Параметры = НормализоватьАвторизацию(URL, Токен, "disk.storage.addfolder");
OPI_Инструменты.ДобавитьПоле("id" , IDХранилища , "Строка" , Параметры); OPI_Инструменты.ДобавитьПоле("id" , IDХранилища , "Строка" , Параметры);
OPI_Инструменты.ДобавитьПоле("data", СтруктураПапки, "Коллекция", Параметры); OPI_Инструменты.ДобавитьПоле("data", СтруктураПапки, "Коллекция", Параметры);
@@ -3443,33 +3444,33 @@
Параметры = Новый Структура; Параметры = Новый Структура;
ЭтоАвторизацияТокеном = ЗначениеЗаполнено(Токен); ЭтоАвторизацияТокеном = ЗначениеЗаполнено(Токен);
МассивЛишнихЭлементов = Новый Массив; МассивЛишнихЭлементов = Новый Массив;
МассивЛишнихЭлементов.Добавить("https://"); МассивЛишнихЭлементов.Добавить("https://");
МассивЛишнихЭлементов.Добавить("http://"); МассивЛишнихЭлементов.Добавить("http://");
МассивЛишнихЭлементов.Добавить("www."); МассивЛишнихЭлементов.Добавить("www.");
Для Каждого УдаляемыйЭлемент Из МассивЛишнихЭлементов Цикл Для Каждого УдаляемыйЭлемент Из МассивЛишнихЭлементов Цикл
URL = СтрЗаменить(URL, УдаляемыйЭлемент, ""); URL = СтрЗаменить(URL, УдаляемыйЭлемент, "");
КонецЦикла; КонецЦикла;
URL = СокрЛП(URL); URL = СокрЛП(URL);
Если Не СтрЗаканчиваетсяНа(URL, "/") Тогда Если Не СтрЗаканчиваетсяНа(URL, "/") Тогда
URL = URL + "/"; URL = URL + "/";
КонецЕсли; КонецЕсли;
Если ЭтоАвторизацияТокеном Тогда Если ЭтоАвторизацияТокеном Тогда
Если Не СтрЗаканчиваетсяНа(URL, "rest/") Тогда Если Не СтрЗаканчиваетсяНа(URL, "rest/") Тогда
URL = URL + "rest/"; URL = URL + "rest/";
КонецЕсли; КонецЕсли;
Параметры.Вставить("auth", Токен); Параметры.Вставить("auth", Токен);
КонецЕсли; КонецЕсли;
Если ЗначениеЗаполнено(Метод) Тогда Если ЗначениеЗаполнено(Метод) Тогда
URL = URL + СокрЛП(Метод); URL = URL + СокрЛП(Метод);
КонецЕсли; КонецЕсли;
Возврат Параметры; Возврат Параметры;

8
src/ru/OPI/src/CommonModules/OPI_Dropbox/Module.bsl
View File

@@ -655,8 +655,8 @@
КонецЦикла; КонецЦикла;
Параметры = Новый Структура; Параметры = Новый Структура;
OPI_Инструменты.ДобавитьПоле("file" , IDФайла , Строка_ , Параметры); OPI_Инструменты.ДобавитьПоле("file" , IDФайла , Строка_ , Параметры);
OPI_Инструменты.ДобавитьПоле("members", МассивПользователей , "Массив", Параметры); OPI_Инструменты.ДобавитьПоле("members", МассивПользователей, "Массив", Параметры);
Режим = ?(ТолькоПросмотр, "viewer", "editor"); Режим = ?(ТолькоПросмотр, "viewer", "editor");
@@ -751,13 +751,13 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Dropbox // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Dropbox
Функция ОтменитьПубликациюФайла(Знач Токен, Знач IDФайла) Экспорт Функция ОтменитьПубликациюФайла(Знач Токен, Знач IDФайла) Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(IDФайла); OPI_ПреобразованиеТипов.ПолучитьСтроку(IDФайла);
Если Не СтрНачинаетсяС(IDФайла, "id:") Тогда Если Не СтрНачинаетсяС(IDФайла, "id:") Тогда
IDФайла = "id:" + IDФайла; IDФайла = "id:" + IDФайла;
КонецЕсли; КонецЕсли;
URL = "https://api.dropboxapi.com/2/sharing/unshare_file"; URL = "https://api.dropboxapi.com/2/sharing/unshare_file";
Параметры = Новый Структура; Параметры = Новый Структура;
OPI_Инструменты.ДобавитьПоле("file", IDФайла, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("file", IDФайла, "Строка", Параметры);

24
src/ru/OPI/src/CommonModules/OPI_GoogleDrive/Module.bsl
View File

@@ -604,8 +604,8 @@
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
ОтветЗагрузки = ЗагрузитьФайлЧастями(Двоичные, АдресЗагрузки); ОтветЗагрузки = ЗагрузитьФайлЧастями(Двоичные, АдресЗагрузки);
Ответ = ?(ЗначениеЗаполнено(ОтветЗагрузки), ОтветЗагрузки, Ответ); Ответ = ?(ЗначениеЗаполнено(ОтветЗагрузки), ОтветЗагрузки, Ответ);
OPI_Инструменты.ОбработатьОтвет(Ответ); OPI_Инструменты.ОбработатьОтвет(Ответ);
Возврат Ответ; Возврат Ответ;
@@ -614,9 +614,9 @@
Функция ЗагрузитьФайлЧастями(Знач Двоичные, Знач АдресЗагрузки) Функция ЗагрузитьФайлЧастями(Знач Двоичные, Знач АдресЗагрузки)
Ответ = ""; Ответ = "";
РазмерЧасти = 268435456; РазмерЧасти = 268435456;
ПрочитаноБайт = 0; ПрочитаноБайт = 0;
ТекущаяПозиция = 0; ТекущаяПозиция = 0;
ОбщийРазмер = Двоичные.Размер(); ОбщийРазмер = Двоичные.Размер();
СтрОбщийРазмер = OPI_Инструменты.ЧислоВСтроку(ОбщийРазмер); СтрОбщийРазмер = OPI_Инструменты.ЧислоВСтроку(ОбщийРазмер);
@@ -649,15 +649,15 @@
Ответ = OPI_Инструменты.Put(АдресЗагрузки, ТекущиеДанные, ДопЗаголовки, Ложь, Истина); Ответ = OPI_Инструменты.Put(АдресЗагрузки, ТекущиеДанные, ДопЗаголовки, Ложь, Истина);
РезультатПроверки = ПроверитьЗагрузкуЧасти(Ответ, СтрОбщийРазмер, ДопЗаголовки, АдресЗагрузки, ТекущаяПозиция); РезультатПроверки = ПроверитьЗагрузкуЧасти(Ответ, СтрОбщийРазмер, ДопЗаголовки, АдресЗагрузки, ТекущаяПозиция);
Если ЗначениеЗаполнено(РезультатПроверки) Тогда Если ЗначениеЗаполнено(РезультатПроверки) Тогда
Возврат РезультатПроверки; Возврат РезультатПроверки;
КонецЕсли; КонецЕсли;
// !OInt КБайт = 1024; // !OInt КБайт = 1024;
// !OInt МБайт = КБайт * КБайт; // !OInt МБайт = КБайт * КБайт;
// !OInt Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт)); // !OInt Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт));
// !OInt ВыполнитьСборкуМусора(); // !OInt ВыполнитьСборкуМусора();
// !OInt ОсвободитьОбъект(ТекущиеДанные); // !OInt ОсвободитьОбъект(ТекущиеДанные);
@@ -695,7 +695,7 @@
Иначе Иначе
OPI_Инструменты.ОбработатьОтвет(Ответ); OPI_Инструменты.ОбработатьОтвет(Ответ);
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
@@ -713,7 +713,7 @@
НеобходимоЧастей = 2; НеобходимоЧастей = 2;
Если Не МассивИнформации.Количество() = НеобходимоЧастей Тогда Если Не МассивИнформации.Количество() = НеобходимоЧастей Тогда
OPI_Инструменты.ОбработатьОтвет(Ответ); OPI_Инструменты.ОбработатьОтвет(Ответ);
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;

2
src/ru/OPI/src/CommonModules/OPI_GoogleSheets/Module.bsl
View File

@@ -359,7 +359,7 @@
Процедура ДобавитьИмяЛиста(Ячейка, Знач Лист) Процедура ДобавитьИмяЛиста(Ячейка, Знач Лист)
Если ЗначениеЗаполнено(Лист) Тогда Если ЗначениеЗаполнено(Лист) Тогда
Ячейка = "'" + Лист + "'!" + Ячейка; Ячейка = "'" + Лист + "'!" + Ячейка;
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры

126
src/ru/OPI/src/CommonModules/OPI_Telegram/Module.bsl
View File

@@ -250,11 +250,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьТекстовоеСообщение(Знач Токен Функция ОтправитьТекстовоеСообщение(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown" , Знач Разметка = "Markdown"
, Знач IDВходящего = 0) Экспорт , Знач IDВходящего = 0) Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
OPI_Инструменты.ЗаменитьСпецСимволы(Текст, Разметка); OPI_Инструменты.ЗаменитьСпецСимволы(Текст, Разметка);
@@ -290,11 +290,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьКартинку(Знач Токен Функция ОтправитьКартинку(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Картинка , Знач Картинка
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Картинка, "photo", Клавиатура, Разметка); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Картинка, "photo", Клавиатура, Разметка);
@@ -314,11 +314,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьВидео(Знач Токен Функция ОтправитьВидео(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Видео , Знач Видео
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Видео, "video", Клавиатура, Разметка); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Видео, "video", Клавиатура, Разметка);
@@ -338,11 +338,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьАудио(Знач Токен Функция ОтправитьАудио(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Аудио , Знач Аудио
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Аудио, "audio", Клавиатура, Разметка); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Аудио, "audio", Клавиатура, Разметка);
@@ -363,12 +363,12 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьДокумент(Знач Токен Функция ОтправитьДокумент(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Документ , Знач Документ
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown" , Знач Разметка = "Markdown"
, Знач ИмяФайла = "") Экспорт , Знач ИмяФайла = "") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Документ, "document", Клавиатура, Разметка, ИмяФайла); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Документ, "document", Клавиатура, Разметка, ИмяФайла);
@@ -388,11 +388,11 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьГифку(Знач Токен Функция ОтправитьГифку(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач Гифка , Знач Гифка
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
Возврат ОтправитьФайл(Токен, IDЧата, Текст, Гифка, "animation", Клавиатура, Разметка); Возврат ОтправитьФайл(Токен, IDЧата, Текст, Гифка, "animation", Клавиатура, Разметка);
@@ -415,18 +415,18 @@
// Возвращаемое значение: // Возвращаемое значение:
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьМедиагруппу(Знач Токен Функция ОтправитьМедиагруппу(Знач Токен
, Знач IDЧата , Знач IDЧата
, Знач Текст , Знач Текст
, Знач СоответствиеФайлов , Знач СоответствиеФайлов
, Знач Клавиатура = "" , Знач Клавиатура = ""
, Знач Разметка = "Markdown") Экспорт , Знач Разметка = "Markdown") Экспорт
// СоответствиеФайлов // СоответствиеФайлов
// Ключ - Файл, Значение - Тип // Ключ - Файл, Значение - Тип
// Типы: audio, document, photo, video // Типы: audio, document, photo, video
// Нельзя замешивать разные типы! // Нельзя замешивать разные типы!
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата); OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата);
@@ -466,7 +466,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьМестоположение(Знач Токен, Знач IDЧата, Знач Широта, Знач Долгота, Знач Клавиатура = "") Экспорт Функция ОтправитьМестоположение(Знач Токен, Знач IDЧата, Знач Широта, Знач Долгота, Знач Клавиатура = "") Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата); OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата);
@@ -501,7 +501,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция ОтправитьКонтакт(Знач Токен, Знач IDЧата, Знач Имя, Знач Фамилия, Знач Телефон, Знач Клавиатура = "") Экспорт Функция ОтправитьКонтакт(Знач Токен, Знач IDЧата, Знач Имя, Знач Фамилия, Знач Телефон, Знач Клавиатура = "") Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата); OPI_ПреобразованиеТипов.ПолучитьСтроку(IDЧата);
@@ -642,7 +642,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция Бан(Знач Токен, Знач IDЧата, Знач IDПользователя) Экспорт Функция Бан(Знач Токен, Знач IDЧата, Знач IDПользователя) Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
URL = "api.telegram.org/bot" + Токен + "/banChatMember"; URL = "api.telegram.org/bot" + Токен + "/banChatMember";
@@ -670,7 +670,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция Разбан(Знач Токен, Знач IDЧата, Знач IDПользователя) Экспорт Функция Разбан(Знач Токен, Знач IDЧата, Знач IDПользователя) Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
URL = "api.telegram.org/bot" + Токен + "/unbanChatMember"; URL = "api.telegram.org/bot" + Токен + "/unbanChatMember";
@@ -705,7 +705,7 @@
, Знач ДатаИстечения = "" , Знач ДатаИстечения = ""
, Знач ЛимитПользователей = 0) Экспорт , Знач ЛимитПользователей = 0) Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
URL = "api.telegram.org/bot" + Токен + "/createChatInviteLink"; URL = "api.telegram.org/bot" + Токен + "/createChatInviteLink";
@@ -817,16 +817,16 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Telegram
Функция УдалитьСообщение(Знач Токен, Знач IDЧата, Знач IDСообщения) Экспорт Функция УдалитьСообщение(Знач Токен, Знач IDЧата, Знач IDСообщения) Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен); OPI_ПреобразованиеТипов.ПолучитьСтроку(Токен);
URL = "api.telegram.org/bot" + Токен + "/deleteMessage"; URL = "api.telegram.org/bot" + Токен + "/deleteMessage";
Параметры = Новый Структура; Параметры = Новый Структура;
OPI_Инструменты.ДобавитьПоле("message_id", IDСообщения, "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("message_id", IDСообщения, "Строка", Параметры);
OPI_Инструменты.ДобавитьПоле("chat_id" , IDЧата , "Строка", Параметры); OPI_Инструменты.ДобавитьПоле("chat_id" , IDЧата , "Строка", Параметры);
Ответ = OPI_Инструменты.Get(URL, Параметры); Ответ = OPI_Инструменты.Get(URL, Параметры);
Возврат Ответ; Возврат Ответ;
КонецФункции КонецФункции
@@ -852,7 +852,7 @@
Иконки = Ответ[Result]; Иконки = Ответ[Result];
Если Не ЗначениеЗаполнено(Иконки) Тогда Если Не ЗначениеЗаполнено(Иконки) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Коллекция = Новый Соответствие; Коллекция = Новый Соответствие;
@@ -1267,28 +1267,28 @@
ВременноеСоответствие = Новый Соответствие; ВременноеСоответствие = Новый Соответствие;
Счетчик = 0; Счетчик = 0;
Для Каждого ТекущийФайл Из СоответствиеФайлов Цикл Для Каждого ТекущийФайл Из СоответствиеФайлов Цикл
ТекущиеДанные = ТекущийФайл.Ключ; ТекущиеДанные = ТекущийФайл.Ключ;
ТипМедиа = ТекущийФайл.Значение; ТипМедиа = ТекущийФайл.Значение;
ИмяМедиа = ПреобразоватьДанныеФайла(ТекущиеДанные, ТипМедиа, Счетчик); ИмяМедиа = ПреобразоватьДанныеФайла(ТекущиеДанные, ТипМедиа, Счетчик);
ВременноеСоответствие.Вставить(ИмяМедиа + "|" + ИмяМедиа, ТекущиеДанные); ВременноеСоответствие.Вставить(ИмяМедиа + "|" + ИмяМедиа, ТекущиеДанные);
СтруктураМедиа = Новый Структура; СтруктураМедиа = Новый Структура;
СтруктураМедиа.Вставить("type" , ТипМедиа); СтруктураМедиа.Вставить("type" , ТипМедиа);
СтруктураМедиа.Вставить("media", "attach://" + ИмяМедиа); СтруктураМедиа.Вставить("media", "attach://" + ИмяМедиа);
Если Счетчик = 0 Тогда Если Счетчик = 0 Тогда
СтруктураМедиа.Вставить("caption", Текст); СтруктураМедиа.Вставить("caption", Текст);
КонецЕсли; КонецЕсли;
Медиа.Добавить(СтруктураМедиа); Медиа.Добавить(СтруктураМедиа);
Счетчик = Счетчик + 1; Счетчик = Счетчик + 1;
КонецЦикла; КонецЦикла;
Медиа = OPI_Инструменты.JSONСтрокой(Медиа); Медиа = OPI_Инструменты.JSONСтрокой(Медиа);
СоответствиеФайлов = ВременноеСоответствие; СоответствиеФайлов = ВременноеСоответствие;

26
src/ru/OPI/src/CommonModules/OPI_Twitter/Module.bsl
View File

@@ -202,7 +202,7 @@
Если МассивВариантовОпроса.Количество() > 0 Тогда Если МассивВариантовОпроса.Количество() > 0 Тогда
СтруктураВарианта = Новый Структура("options,duration_minutes", МассивВариантовОпроса, ДлительностьОпроса); СтруктураВарианта = Новый Структура("options,duration_minutes", МассивВариантовОпроса, ДлительностьОпроса);
Поля.Вставить("poll", СтруктураВарианта); Поля.Вставить("poll", СтруктураВарианта);
КонецЕсли; КонецЕсли;
@@ -638,13 +638,13 @@
Разделитель = ""","; Разделитель = """,";
ЗаголовокАвторизации = ЗаголовокАвторизации ЗаголовокАвторизации = ЗаголовокАвторизации
+ "OAuth " + "OAuth "
+ "oauth_consumer_key =""" + Параметры[OCK] + Разделитель + "oauth_consumer_key =""" + Параметры[OCK] + Разделитель
+ "oauth_token =""" + Параметры[OTK] + Разделитель + "oauth_token =""" + Параметры[OTK] + Разделитель
+ "oauth_signature_method=""" + МетодХэширования + Разделитель + "oauth_signature_method=""" + МетодХэширования + Разделитель
+ "oauth_timestamp =""" + ТекущаяДатаUNIX + Разделитель + "oauth_timestamp =""" + ТекущаяДатаUNIX + Разделитель
+ "oauth_nonce =""" + ТекущаяДатаUNIX + Разделитель + "oauth_nonce =""" + ТекущаяДатаUNIX + Разделитель
+ "oauth_version =""" + ВерсияАпи + Разделитель + "oauth_version =""" + ВерсияАпи + Разделитель
+ "oauth_signature =""" + Сигнатура; + "oauth_signature =""" + Сигнатура;
СоответствиеЗаголовка = Новый Соответствие; СоответствиеЗаголовка = Новый Соответствие;
СоответствиеЗаголовка.Вставить("authorization", ЗаголовокАвторизации); СоответствиеЗаголовка.Вставить("authorization", ЗаголовокАвторизации);
@@ -664,22 +664,22 @@
Функция ПолучитьСтатусОбработки(Знач Параметры, Знач Поля, Знач URL) Функция ПолучитьСтатусОбработки(Знач Параметры, Знач Поля, Знач URL)
ProcessingInfo = "processing_info"; ProcessingInfo = "processing_info";
Авторизация = СоздатьЗаголовокАвторизацииV1(Параметры, Поля, "POST", URL); Авторизация = СоздатьЗаголовокАвторизацииV1(Параметры, Поля, "POST", URL);
Ответ = OPI_Инструменты.Post(URL, Поля, Авторизация, Ложь); Ответ = OPI_Инструменты.Post(URL, Поля, Авторизация, Ложь);
Информация = Ответ[ProcessingInfo]; Информация = Ответ[ProcessingInfo];
Если Не ЗначениеЗаполнено(Информация) Тогда Если Не ЗначениеЗаполнено(Информация) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
СтатусОбработки = Информация["state"]; СтатусОбработки = Информация["state"];
Если Не ЗначениеЗаполнено(СтатусОбработки) Тогда Если Не ЗначениеЗаполнено(СтатусОбработки) Тогда
Возврат Ответ; Возврат Ответ;
Иначе Иначе
Возврат СтатусОбработки; Возврат СтатусОбработки;
КонецЕсли; КонецЕсли;
КонецФункции КонецФункции

141
src/ru/OPI/src/CommonModules/OPI_VK/Module.bsl
View File

@@ -104,7 +104,7 @@
ObjectId = ОтветСоответствие.Получить("id"); ObjectId = ОтветСоответствие.Получить("id");
Если Не ЗначениеЗаполнено(OwnerId) Или Не ЗначениеЗаполнено(ObjectId) Тогда Если Не ЗначениеЗаполнено(OwnerId) Или Не ЗначениеЗаполнено(ObjectId) Тогда
Возврат ОтветСоответствие; Возврат ОтветСоответствие;
КонецЕсли; КонецЕсли;
OwnerId = OPI_Инструменты.ЧислоВСтроку(OwnerId); OwnerId = OPI_Инструменты.ЧислоВСтроку(OwnerId);
@@ -148,10 +148,10 @@
СтрокаВложений = СтрСоединить(Объекты, ","); СтрокаВложений = СтрСоединить(Объекты, ",");
СтрокаВложений = СтрокаВложений + СсылкаПодЗаписью; СтрокаВложений = СтрокаВложений + СсылкаПодЗаписью;
Параметры.Вставить("message" , Текст); Параметры.Вставить("message" , Текст);
Параметры.Вставить("attachments" , СтрокаВложений); Параметры.Вставить("attachments" , СтрокаВложений);
Параметры.Вставить("mark_as_ads" , ?(Реклама, 1, 0)); Параметры.Вставить("mark_as_ads" , ?(Реклама, 1, 0));
Параметры.Вставить("close_comments" , ?(Реклама, 1, 0)); Параметры.Вставить("close_comments", ?(Реклама, 1, 0));
Ответ = OPI_Инструменты.Get("api.vk.com/method/wall.post", Параметры); Ответ = OPI_Инструменты.Get("api.vk.com/method/wall.post", Параметры);
@@ -208,11 +208,11 @@
Если ЗначениеЗаполнено(Фото) Тогда Если ЗначениеЗаполнено(Фото) Тогда
IDФото = Фото["id"]; IDФото = Фото["id"];
Если Не ЗначениеЗаполнено(IDФото) Тогда Если Не ЗначениеЗаполнено(IDФото) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
@@ -234,7 +234,7 @@
ОпросСоответствие = Опрос.Получить(Response_); ОпросСоответствие = Опрос.Получить(Response_);
Если Не ЗначениеЗаполнено(ОпросСоответствие) Тогда Если Не ЗначениеЗаполнено(ОпросСоответствие) Тогда
Возврат Опрос; Возврат Опрос;
КонецЕсли; КонецЕсли;
OwnerId = ОпросСоответствие.Получить("owner_id"); OwnerId = ОпросСоответствие.Получить("owner_id");
@@ -395,26 +395,26 @@
, Знач Альбом = "" , Знач Альбом = ""
, Знач Параметры = "") Экспорт , Знач Параметры = "") Экспорт
Строка_ = "Строка"; Строка_ = "Строка";
Параметры = ПолучитьСтандартныеПараметры(Параметры); Параметры = ПолучитьСтандартныеПараметры(Параметры);
OPI_Инструменты.ДобавитьПоле("name" , Наименование, Строка_, Параметры); OPI_Инструменты.ДобавитьПоле("name" , Наименование, Строка_, Параметры);
OPI_Инструменты.ДобавитьПоле("description", Описание , Строка_, Параметры); OPI_Инструменты.ДобавитьПоле("description", Описание , Строка_, Параметры);
OPI_Инструменты.ДобавитьПоле("album_id" , Альбом , Строка_, Параметры); OPI_Инструменты.ДобавитьПоле("album_id" , Альбом , Строка_, Параметры);
Ответ = OPI_Инструменты.Get("api.vk.com/method/video.save", Параметры); Ответ = OPI_Инструменты.Get("api.vk.com/method/video.save", Параметры);
Результат = Ответ["response"]; Результат = Ответ["response"];
Если Не ЗначениеЗаполнено(Результат) Тогда Если Не ЗначениеЗаполнено(Результат) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
URL = Результат["upload_url"]; URL = Результат["upload_url"];
Если Не ЗначениеЗаполнено(URL) Тогда Если Не ЗначениеЗаполнено(URL) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
СоответствиеФайлов = Новый Соответствие; СоответствиеФайлов = Новый Соответствие;
OPI_Инструменты.ДобавитьПоле("video_file.mp4", Видео, "ДвоичныеДанные", СоответствиеФайлов); OPI_Инструменты.ДобавитьПоле("video_file.mp4", Видео, "ДвоичныеДанные", СоответствиеФайлов);
@@ -771,16 +771,16 @@
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
URL = Результат["short_url"]; URL = Результат["short_url"];
Если ЗначениеЗаполнено(URL) Тогда Если ЗначениеЗаполнено(URL) Тогда
Возврат URL; Возврат URL;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
КонецФункции КонецФункции
@@ -1065,14 +1065,14 @@
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
Количество = Результат["count"]; Количество = Результат["count"];
Если Не ЗначениеЗаполнено(Количество) Тогда Если Не ЗначениеЗаполнено(Количество) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Параметры_.Вставить("count", Количество); Параметры_.Вставить("count", Количество);
@@ -1081,14 +1081,14 @@
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
Категории = Результат["items"]; Категории = Результат["items"];
Если Не ЗначениеЗаполнено(Категории) Тогда Если Не ЗначениеЗаполнено(Категории) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
СоответствиеКатегорий = Новый Соответствие; СоответствиеКатегорий = Новый Соответствие;
@@ -1380,7 +1380,7 @@
// //
// Параметры: // Параметры:
// Название - Строка - Новое название подборки - title // Название - Строка - Новое название подборки - title
// Подборка - Строка - ID подборки - sel // Подборка - Строка - ID подборки - sel
// Картинка - Строка,ДвоичныеДанные - Новая картинка подборки - picture // Картинка - Строка,ДвоичныеДанные - Новая картинка подборки - picture
// Основная - Булево - Основная - main // Основная - Булево - Основная - main
// Скрытая - Булево - Скрытая - hidden // Скрытая - Булево - Скрытая - hidden
@@ -1757,19 +1757,19 @@
Функция ПолучитьИДКартинки(Знач Картинка, Знач Параметры, Знач Вид) Функция ПолучитьИДКартинки(Знач Картинка, Знач Параметры, Знач Вид)
Response_ = "response"; Response_ = "response";
Ответ = ЗагрузитьФотоНаСервер(Картинка, Параметры, Вид); Ответ = ЗагрузитьФотоНаСервер(Картинка, Параметры, Вид);
Результат = Ответ[Response_]; Результат = Ответ[Response_];
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
ИДФото = Результат["photo_id"]; ИДФото = Результат["photo_id"];
Если Не ЗначениеЗаполнено(ИДФото) Тогда Если Не ЗначениеЗаполнено(ИДФото) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
ИДФото = OPI_Инструменты.ЧислоВСтроку(ИДФото); ИДФото = OPI_Инструменты.ЧислоВСтроку(ИДФото);
@@ -1779,17 +1779,17 @@
Функция ПолучитьСоответствиеКартинки(Знач Картинка, Знач Параметры, Знач Вид) Функция ПолучитьСоответствиеКартинки(Знач Картинка, Знач Параметры, Знач Вид)
Ответ = ЗагрузитьФотоНаСервер(Картинка, Параметры, Вид); Ответ = ЗагрузитьФотоНаСервер(Картинка, Параметры, Вид);
ОтветМассив = Ответ.Получить("response"); ОтветМассив = Ответ.Получить("response");
Если Не ЗначениеЗаполнено(ОтветМассив) Или Не ТипЗнч(ОтветМассив) = Тип("Массив") Тогда Если Не ЗначениеЗаполнено(ОтветМассив) Или Не ТипЗнч(ОтветМассив) = Тип("Массив") Тогда
Возврат Ответ; Возврат Ответ;
Иначе Иначе
Если ОтветМассив.Количество() = 0 Тогда Если ОтветМассив.Количество() = 0 Тогда
Возврат Ответ; Возврат Ответ;
Иначе Иначе
ОтветСоответствие = ОтветМассив[0]; ОтветСоответствие = ОтветМассив[0];
КонецЕсли; КонецЕсли;
КонецЕсли; КонецЕсли;
Возврат ОтветСоответствие; Возврат ОтветСоответствие;
@@ -1798,20 +1798,20 @@
Функция ПолучитьМассивПодборок(Знач Подборки, Знач Параметры = "") Функция ПолучитьМассивПодборок(Знач Подборки, Знач Параметры = "")
Response_ = "response"; Response_ = "response";
Подборки = ПолучитьПодборкиПоИД(Подборки, Параметры); Подборки = ПолучитьПодборкиПоИД(Подборки, Параметры);
Результат = Подборки[Response_]; Результат = Подборки[Response_];
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
МассивПодборок = Результат["items"]; МассивПодборок = Результат["items"];
Если Не ЗначениеЗаполнено(МассивПодборок) Тогда Если Не ЗначениеЗаполнено(МассивПодборок) Тогда
Возврат Подборки; Возврат Подборки;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Подборки; Возврат Подборки;
КонецЕсли; КонецЕсли;
Возврат МассивПодборок; Возврат МассивПодборок;
@@ -1914,11 +1914,11 @@
ИДТовара = Результат["market_item_id"]; ИДТовара = Результат["market_item_id"];
Если Не ЗначениеЗаполнено(ИДТовара) Тогда Если Не ЗначениеЗаполнено(ИДТовара) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Иначе Иначе
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Если ЗначениеЗаполнено(Подборка) И ЗначениеЗаполнено(ИДТовара) Тогда Если ЗначениеЗаполнено(Подборка) И ЗначениеЗаполнено(ИДТовара) Тогда
@@ -2060,14 +2060,15 @@
Результат = Ответ[Response_]; Результат = Ответ[Response_];
Если ЗначениеЗаполнено(Результат) Тогда Если ЗначениеЗаполнено(Результат) Тогда
ИДФото = Результат["photo_id"];
Если Не ЗначениеЗаполнено(ИДФото) Тогда ИДФото = Результат["photo_id"];
Возврат;
КонецЕсли; Если Не ЗначениеЗаполнено(ИДФото) Тогда
Возврат;
КонецЕсли;
Иначе Иначе
Возврат; Возврат;
КонецЕсли; КонецЕсли;
ИДФото = OPI_Инструменты.ЧислоВСтроку(ИДФото); ИДФото = OPI_Инструменты.ЧислоВСтроку(ИДФото);
@@ -2116,9 +2117,9 @@
ИДФото = ПолучитьИДКартинки(Фото, Параметры, "Товар"); ИДФото = ПолучитьИДКартинки(Фото, Параметры, "Товар");
Если Не ТипЗнч(ИДФото) = Тип("Строка") Тогда Если Не ТипЗнч(ИДФото) = Тип("Строка") Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
СтрокаФотографий = СтрокаФотографий + ИДФото + ","; СтрокаФотографий = СтрокаФотографий + ИДФото + ",";

24
src/ru/OPI/src/CommonModules/OPI_YandexDisk/Module.bsl
View File

@@ -89,7 +89,7 @@
URLОтвета = Ответ[Href]; URLОтвета = Ответ[Href];
Если Не ЗначениеЗаполнено(URLОтвета) Тогда Если Не ЗначениеЗаполнено(URLОтвета) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки); Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки);
@@ -183,7 +183,7 @@
URLОтвета = Ответ[Href]; URLОтвета = Ответ[Href];
Если Не ЗначениеЗаполнено(URLОтвета) Тогда Если Не ЗначениеЗаполнено(URLОтвета) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки); Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки);
@@ -230,14 +230,14 @@
Функция СкачатьФайл(Знач Токен, Знач Путь, Знач ПутьСохранения = "") Экспорт Функция СкачатьФайл(Знач Токен, Знач Путь, Знач ПутьСохранения = "") Экспорт
OPI_ПреобразованиеТипов.ПолучитьСтроку(ПутьСохранения); OPI_ПреобразованиеТипов.ПолучитьСтроку(ПутьСохранения);
Ответ = ПолучитьСсылкуДляСкачивания(Токен, Путь); Ответ = ПолучитьСсылкуДляСкачивания(Токен, Путь);
URL = Ответ["href"]; URL = Ответ["href"];
Если Не ЗначениеЗаполнено(URL) Тогда Если Не ЗначениеЗаполнено(URL) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.Get(URL, , , ПутьСохранения); Ответ = OPI_Инструменты.Get(URL, , , ПутьСохранения);
Возврат Ответ; Возврат Ответ;
@@ -330,7 +330,7 @@
URLОтвета = Ответ[Href]; URLОтвета = Ответ[Href];
Если Не ЗначениеЗаполнено(URLОтвета) Тогда Если Не ЗначениеЗаполнено(URLОтвета) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки); Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки);
@@ -369,7 +369,7 @@
URL = Ответ[Href]; URL = Ответ[Href];
Если Не ЗначениеЗаполнено(URL) Тогда Если Не ЗначениеЗаполнено(URL) Тогда
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.PutMultipart(URL, Новый Структура(), Файл, "multipart", Заголовки); Ответ = OPI_Инструменты.PutMultipart(URL, Новый Структура(), Файл, "multipart", Заголовки);
@@ -619,7 +619,7 @@
Назначение = ?(ОбщийДоступ, "publish", "unpublish"); Назначение = ?(ОбщийДоступ, "publish", "unpublish");
Href = "href"; Href = "href";
URL = "https://cloud-api.yandex.net/v1/disk/resources/" + Назначение; URL = "https://cloud-api.yandex.net/v1/disk/resources/" + Назначение;
Параметры = Новый Структура; Параметры = Новый Структура;
Параметры.Вставить("path", Путь); Параметры.Вставить("path", Путь);
@@ -633,7 +633,7 @@
Возврат Ответ; Возврат Ответ;
КонецЕсли; КонецЕсли;
Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки); Ответ = OPI_Инструменты.Get(URLОтвета, , Заголовки);
Возврат Ответ; Возврат Ответ;

38
src/ru/OPI/src/CommonModules/OPI_Инструменты/Module.bsl
View File

@@ -44,7 +44,7 @@
#Область ЗапросыБезТела #Область ЗапросыБезТела
Функция Get(Знач URL, Знач Параметры = "", Знач ДопЗаголовки = "", Знач ФайлОтвета = Неопределено) Экспорт Функция Get(Знач URL, Знач Параметры = "", Знач ДопЗаголовки = "", Знач ФайлОтвета = Неопределено) Экспорт
Возврат ВыполнитьЗапросБезТела(URL, "GET", Параметры, ДопЗаголовки, ФайлОтвета); Возврат ВыполнитьЗапросБезТела(URL, "GET", Параметры, ДопЗаголовки, ФайлОтвета);
КонецФункции КонецФункции
Функция Delete(Знач URL, Знач Параметры = "", Знач ДопЗаголовки = "", Знач ФайлОтвета = Неопределено) Экспорт Функция Delete(Знач URL, Знач Параметры = "", Знач ДопЗаголовки = "", Знач ФайлОтвета = Неопределено) Экспорт
@@ -244,6 +244,7 @@
+ "=" + "="
+ ЗначениеПараметра + ЗначениеПараметра
+ "&"; + "&";
КонецЦикла; КонецЦикла;
СтрокаПараметров = Лев(СтрокаПараметров, СтрДлина(СтрокаПараметров) - 1); СтрокаПараметров = Лев(СтрокаПараметров, СтрДлина(СтрокаПараметров) - 1);
@@ -809,12 +810,16 @@
Функция ПреобразоватьПараметрВСтроку(Знач Значение) Функция ПреобразоватьПараметрВСтроку(Знач Значение)
Если ТипЗнч(Значение) = Тип("Массив") Тогда Если ТипЗнч(Значение) = Тип("Массив") Тогда
Значение = СтрСоединить(Значение, ",");
Значение = КодироватьСтроку(Значение, СпособКодированияСтроки.URLВКодировкеURL); Значение = СтрСоединить(Значение, ",");
Значение = "[" + Значение + "]"; Значение = КодироватьСтроку(Значение, СпособКодированияСтроки.URLВКодировкеURL);
Значение = "[" + Значение + "]";
Иначе Иначе
Значение = ЧислоВСтроку(Значение);
Значение = КодироватьСтроку(Значение, СпособКодированияСтроки.URLВКодировкеURL); Значение = ЧислоВСтроку(Значение);
Значение = КодироватьСтроку(Значение, СпособКодированияСтроки.URLВКодировкеURL);
КонецЕсли; КонецЕсли;
Возврат Значение; Возврат Значение;
@@ -834,11 +839,14 @@
Иначе Иначе
Если ТипКонтента = "image/jpeg" Тогда Если ТипКонтента = "image/jpeg" Тогда
ИмяПоля = "photo";
ИмяПоля = "photo";
Иначе Иначе
ИмяПоля = Лев(ИмяФайла, СтрНайти(ИмяФайла, ".") - 1);
ИмяПоля = ?(ЗначениеЗаполнено(ИмяПоля), ИмяПоля, СтрЗаменить(ДанныеФайла, ИмяПоля = Лев(ИмяФайла, СтрНайти(ИмяФайла, ".") - 1);
ЗаменаТочки, ".")); ИмяПоля = ?(ЗначениеЗаполнено(ИмяПоля), ИмяПоля, СтрЗаменить(ДанныеФайла, ЗаменаТочки, "."));
КонецЕсли; КонецЕсли;
КонецЕсли; КонецЕсли;
@@ -856,12 +864,18 @@
Или ТипЗнч(Параметры) = Тип("Массив"); Или ТипЗнч(Параметры) = Тип("Массив");
Если JSON Тогда Если JSON Тогда
Данные = JSONСтрокой(Параметры);
Данные = JSONСтрокой(Параметры);
ИначеЕсли Не Коллекция Тогда ИначеЕсли Не Коллекция Тогда
Данные = Параметры;
Данные = Параметры;
Иначе Иначе
СтрокаПараметров = ПараметрыЗапросаВСтроку(Параметры); СтрокаПараметров = ПараметрыЗапросаВСтроку(Параметры);
Данные = Прав(СтрокаПараметров, СтрДлина(СтрокаПараметров) - 1); Данные = Прав(СтрокаПараметров, СтрДлина(СтрокаПараметров) - 1);
КонецЕсли; КонецЕсли;
Если ТипЗнч(Данные) = Тип("Строка") Тогда Если ТипЗнч(Данные) = Тип("Строка") Тогда

56
src/ru/OPI/src/CommonModules/OPI_ПолучениеДанныхТестов/Module.bsl
View File

@@ -345,15 +345,15 @@
Процедура ПараметрВКоллекцию(Параметр, Коллекция) Экспорт Процедура ПараметрВКоллекцию(Параметр, Коллекция) Экспорт
Значение = ПолучитьПараметр(Параметр); Значение = ПолучитьПараметр(Параметр);
Коллекция.Вставить(Параметр, Значение); Коллекция.Вставить(Параметр, Значение);
КонецПроцедуры КонецПроцедуры
Процедура ДвоичныеВКоллекцию(Параметр, Коллекция) Экспорт Процедура ДвоичныеВКоллекцию(Параметр, Коллекция) Экспорт
Значение = ПолучитьДвоичные(Параметр); Значение = ПолучитьДвоичные(Параметр);
Коллекция.Вставить(Параметр, Значение); Коллекция.Вставить(Параметр, Значение);
КонецПроцедуры КонецПроцедуры
@@ -384,8 +384,8 @@
Сообщить(Символы.ПС); Сообщить(Символы.ПС);
Если ЗначениеЗаполнено(Библиотека) Тогда Если ЗначениеЗаполнено(Библиотека) Тогда
ЗаписатьФайлЛога(Данные, Метод, Библиотека); ЗаписатьФайлЛога(Данные, Метод, Библиотека);
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры
@@ -410,11 +410,11 @@
Для Каждого ВозможныйПуть Из ВозможныеПути Цикл Для Каждого ВозможныйПуть Из ВозможныеПути Цикл
ФайлРепозитория = Новый Файл(ВозможныйПуть); ФайлРепозитория = Новый Файл(ВозможныйПуть);
Если ФайлРепозитория.Существует() Тогда Если ФайлРепозитория.Существует() Тогда
Путь = ВозможныйПуть; Путь = ВозможныйПуть;
КонецЕсли; КонецЕсли;
КонецЦикла; КонецЦикла;
@@ -453,35 +453,35 @@
Процедура ЗаписатьФайлЛога(Знач Данные, Знач Метод, Знач Библиотека) Процедура ЗаписатьФайлЛога(Знач Данные, Знач Метод, Знач Библиотека)
Попытка Попытка
ПутьЛогов = "./docs/ru/results"; ПутьЛогов = "./docs/ru/results";
ПутьЛоговБиблиотеки = ПутьЛогов + "/" + Библиотека; ПутьЛоговБиблиотеки = ПутьЛогов + "/" + Библиотека;
КаталогЛогов = Новый Файл(ПутьЛогов); КаталогЛогов = Новый Файл(ПутьЛогов);
Если Не КаталогЛогов.Существует() Тогда Если Не КаталогЛогов.Существует() Тогда
СоздатьКаталог(ПутьЛогов); СоздатьКаталог(ПутьЛогов);
КонецЕсли; КонецЕсли;
КаталогЛоговБиблиотеки = Новый Файл(ПутьЛоговБиблиотеки); КаталогЛоговБиблиотеки = Новый Файл(ПутьЛоговБиблиотеки);
Если Не КаталогЛоговБиблиотеки.Существует() Тогда Если Не КаталогЛоговБиблиотеки.Существует() Тогда
СоздатьКаталог(ПутьЛоговБиблиотеки); СоздатьКаталог(ПутьЛоговБиблиотеки);
КонецЕсли; КонецЕсли;
ПутьКФайлу = ПутьЛоговБиблиотеки + "/" + Метод + ".log"; ПутьКФайлу = ПутьЛоговБиблиотеки + "/" + Метод + ".log";
ФайлЛога = Новый Файл(ПутьКФайлу); ФайлЛога = Новый Файл(ПутьКФайлу);
Если Не ФайлЛога.Существует() Тогда Если Не ФайлЛога.Существует() Тогда
ДокументЛога = Новый ТекстовыйДокумент; ДокументЛога = Новый ТекстовыйДокумент;
ДокументЛога.УстановитьТекст(Данные); ДокументЛога.УстановитьТекст(Данные);
ДокументЛога.Записать(ПутьКФайлу); ДокументЛога.Записать(ПутьКФайлу);
КонецЕсли; КонецЕсли;
Исключение Исключение
Сообщить("Не удалось записать файл лога!: " + ОписаниеОшибки()); Сообщить("Не удалось записать файл лога!: " + ОписаниеОшибки());
КонецПопытки; КонецПопытки;
КонецПроцедуры КонецПроцедуры

323
src/ru/OPI/src/CommonModules/OPI_ПреобразованиеТипов/Module.bsl
View File

@@ -35,271 +35,263 @@
//@skip-check wrong-string-literal-content //@skip-check wrong-string-literal-content
// #Использовать "./internal" // #Использовать "./internal"
#Область СлужебныйПрограммныйИнтерфейс #Область СлужебныйПрограммныйИнтерфейс
Процедура ПолучитьДвоичныеДанные(Значение) Экспорт Процедура ПолучитьДвоичныеДанные(Значение) Экспорт
Если Значение = Неопределено Тогда Если Значение = Неопределено Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Попытка Попытка
Если ТипЗнч(Значение) = Тип("ДвоичныеДанные") Тогда Если ТипЗнч(Значение) = Тип("ДвоичныеДанные") Тогда
Возврат; Возврат;
Иначе Иначе
Файл = Новый Файл(Значение); Файл = Новый Файл(Значение);
Если Файл.Существует() Тогда Если Файл.Существует() Тогда
Значение = Новый ДвоичныеДанные(Значение); Значение = Новый ДвоичныеДанные(Значение);
ИначеЕсли СтрНайти(Значение, "//") Тогда
Значение = OPI_Инструменты.Get(Значение);
Иначе
Значение = Base64Значение(Значение);
КонецЕсли;
ИначеЕсли СтрНайти(Значение, "//") Тогда КонецЕсли;
Значение = OPI_Инструменты.Get(Значение); Исключение
ВызватьИсключение "Ошибка получения двоичных данных из параметра: " + ОписаниеОшибки();
Иначе КонецПопытки;
Значение = Base64Значение(Значение);
КонецЕсли;
КонецЕсли;
Исключение
ВызватьИсключение "Ошибка получения двоичных данных из параметра: " + ОписаниеОшибки();
КонецПопытки;
КонецПроцедуры КонецПроцедуры
Процедура ПолучитьДвоичныеИлиПоток(Значение) Экспорт Процедура ПолучитьДвоичныеИлиПоток(Значение) Экспорт
Если Значение = Неопределено Тогда Если Значение = Неопределено Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Если ТипЗнч(Значение) <> Тип("Строка") Тогда Если ТипЗнч(Значение) <> Тип("Строка") Тогда
ПолучитьДвоичныеДанные(Значение); ПолучитьДвоичныеДанные(Значение);
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Файл = Новый Файл(Значение); Файл = Новый Файл(Значение);
Если Файл.Существует() Тогда Если Файл.Существует() Тогда
Значение = Новый ФайловыйПоток(Значение, РежимОткрытияФайла.Открыть); Значение = Новый ФайловыйПоток(Значение, РежимОткрытияФайла.Открыть);
Иначе Иначе
ПолучитьДвоичныеДанные(Значение); ПолучитьДвоичныеДанные(Значение);
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры
Процедура ПолучитьКоллекцию(Значение) Экспорт Процедура ПолучитьКоллекцию(Значение) Экспорт
Если Значение = Неопределено Тогда Если Значение = Неопределено Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Попытка Попытка
ИсходноеЗначение = Значение; ИсходноеЗначение = Значение;
Если ЭтоКоллекция(Значение) Тогда Если ЭтоКоллекция(Значение) Тогда
Возврат; Возврат;
Иначе Иначе
Если ТипЗнч(Значение) = Тип("ДвоичныеДанные") Тогда Если ТипЗнч(Значение) = Тип("ДвоичныеДанные") Тогда
Значение = ПолучитьСтрокуИзДвоичныхДанных(Значение); Значение = ПолучитьСтрокуИзДвоичныхДанных(Значение);
Иначе Иначе
Значение = OPI_Инструменты.ЧислоВСтроку(Значение); Значение = OPI_Инструменты.ЧислоВСтроку(Значение);
КонецЕсли; КонецЕсли;
Файл = Новый Файл(Значение); Файл = Новый Файл(Значение);
ЧтениеJSON = Новый ЧтениеJSON; ЧтениеJSON = Новый ЧтениеJSON;
Если Файл.Существует() Тогда Если Файл.Существует() Тогда
ЧтениеJSON.ОткрытьФайл(Значение); ЧтениеJSON.ОткрытьФайл(Значение);
ИначеЕсли СтрНачинаетсяС(нРег(Значение), "http") Тогда ИначеЕсли СтрНачинаетсяС(нРег(Значение), "http") Тогда
ИВФ = ПолучитьИмяВременногоФайла(); ИВФ = ПолучитьИмяВременногоФайла();
КопироватьФайл(Значение, ИВФ); КопироватьФайл(Значение, ИВФ);
ЧтениеJSON.ОткрытьФайл(ИВФ); ЧтениеJSON.ОткрытьФайл(ИВФ);
ЧтениеJSON.Прочитать(); ЧтениеJSON.Прочитать();
УдалитьФайлы(ИВФ); УдалитьФайлы(ИВФ);
Иначе Иначе
ЧтениеJSON.УстановитьСтроку(СокрЛП(Значение)); ЧтениеJSON.УстановитьСтроку(СокрЛП(Значение));
КонецЕсли; КонецЕсли;
Значение = ПрочитатьJSON(ЧтениеJSON, Истина, Неопределено, ФорматДатыJSON.ISO); Значение = ПрочитатьJSON(ЧтениеJSON, Истина, Неопределено, ФорматДатыJSON.ISO);
ЧтениеJSON.Закрыть(); ЧтениеJSON.Закрыть();
Если (Не ЭтоКоллекция(Значение)) Или Не ЗначениеЗаполнено(Значение) Тогда Если (Не ЭтоКоллекция(Значение)) Или Не ЗначениеЗаполнено(Значение) Тогда
Значение = ИсходноеЗначение; Значение = ИсходноеЗначение;
ПолучитьМассив(Значение); ПолучитьМассив(Значение);
КонецЕсли; КонецЕсли;
КонецЕсли; КонецЕсли;
Исключение Исключение
Значение = ИсходноеЗначение; Значение = ИсходноеЗначение;
ПолучитьМассив(Значение); ПолучитьМассив(Значение);
КонецПопытки; КонецПопытки;
КонецПроцедуры КонецПроцедуры
Процедура ПолучитьМассив(Значение) Экспорт Процедура ПолучитьМассив(Значение) Экспорт
Если ТипЗнч(Значение) = Тип("Массив") Тогда Если ТипЗнч(Значение) = Тип("Массив") Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Если ТипЗнч(Значение) = Тип("Строка") Если ТипЗнч(Значение) = Тип("Строка") И СтрНачинаетсяС(Значение, "[") И СтрЗаканчиваетсяНа(Значение, "]") Тогда
И СтрНачинаетсяС(Значение, "[")
И СтрЗаканчиваетсяНа(Значение, "]") Тогда
ЗапятаяВКавычках = "','"; ЗапятаяВКавычках = "','";
Значение = СтрЗаменить(Значение, "['" , ""); Значение = СтрЗаменить(Значение, "['", "");
Значение = СтрЗаменить(Значение, "']" , ""); Значение = СтрЗаменить(Значение, "']", "");
Значение = СтрЗаменить(Значение, "', '" , ЗапятаяВКавычках); Значение = СтрЗаменить(Значение, "', '", ЗапятаяВКавычках);
Значение = СтрЗаменить(Значение, "' , '", ЗапятаяВКавычках); Значение = СтрЗаменить(Значение, "' , '", ЗапятаяВКавычках);
Значение = СтрЗаменить(Значение, "' ,'" , ЗапятаяВКавычках); Значение = СтрЗаменить(Значение, "' ,'", ЗапятаяВКавычках);
Значение = СтрРазделить(Значение, ЗапятаяВКавычках, Ложь); Значение = СтрРазделить(Значение, ЗапятаяВКавычках, Ложь);
Для Н = 0 По Значение.ВГраница() Цикл Для Н = 0 По Значение.ВГраница() Цикл
Значение[Н] = СокрЛП(Значение[Н]); Значение[Н] = СокрЛП(Значение[Н]);
КонецЦикла; КонецЦикла;
Иначе Иначе
Если ТипЗнч(Значение) = Тип("Число") Тогда Если ТипЗнч(Значение) = Тип("Число") Тогда
Значение = OPI_Инструменты.ЧислоВСтроку(Значение); Значение = OPI_Инструменты.ЧислоВСтроку(Значение);
КонецЕсли; КонецЕсли;
OPI_Инструменты.ЗначениеВМассив(Значение); OPI_Инструменты.ЗначениеВМассив(Значение);
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры
Процедура ПолучитьБулево(Значение) Экспорт Процедура ПолучитьБулево(Значение) Экспорт
Если Значение = Неопределено Тогда Если Значение = Неопределено Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Попытка Попытка
Если ТипЗнч(Значение) = Тип("Булево") Тогда Если ТипЗнч(Значение) = Тип("Булево") Тогда
Возврат; Возврат;
Иначе Иначе
Значение = Булево(Значение); Значение = Булево(Значение);
КонецЕсли; КонецЕсли;
Исключение Исключение
ВызватьИсключение "Ошибка получения данных булево из параметра"; ВызватьИсключение "Ошибка получения данных булево из параметра";
КонецПопытки; КонецПопытки;
КонецПроцедуры КонецПроцедуры
Процедура ПолучитьСтроку(Значение, Знач ИзИсточника = Ложь) Экспорт Процедура ПолучитьСтроку(Значение, Знач ИзИсточника = Ложь) Экспорт
Если Значение = Неопределено Тогда Если Значение = Неопределено Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Попытка Попытка
Если ЭтоСимвольное(Значение) Тогда Если ЭтоСимвольное(Значение) Тогда
Если Не ИзИсточника Тогда Если Не ИзИсточника Тогда
Значение = OPI_Инструменты.ЧислоВСтроку(Значение); Значение = OPI_Инструменты.ЧислоВСтроку(Значение);
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Значение = OPI_Инструменты.ЧислоВСтроку(Значение); Значение = OPI_Инструменты.ЧислоВСтроку(Значение);
Файл = Новый Файл(Значение); Файл = Новый Файл(Значение);
Если Файл.Существует() Тогда Если Файл.Существует() Тогда
ЧтениеТекста = Новый ЧтениеТекста(Значение); ЧтениеТекста = Новый ЧтениеТекста(Значение);
Значение = ЧтениеТекста.Прочитать(); Значение = ЧтениеТекста.Прочитать();
ЧтениеТекста.Закрыть(); ЧтениеТекста.Закрыть();
ИначеЕсли СтрНачинаетсяС(нРег(Значение), "http") Тогда ИначеЕсли СтрНачинаетсяС(нРег(Значение), "http") Тогда
ИВФ = ПолучитьИмяВременногоФайла(); ИВФ = ПолучитьИмяВременногоФайла();
КопироватьФайл(Значение, ИВФ); КопироватьФайл(Значение, ИВФ);
ЧтениеТекста = Новый ЧтениеТекста(ИВФ); ЧтениеТекста = Новый ЧтениеТекста(ИВФ);
Значение = ЧтениеТекста.Прочитать(); Значение = ЧтениеТекста.Прочитать();
ЧтениеТекста.Закрыть(); ЧтениеТекста.Закрыть();
УдалитьФайлы(ИВФ); УдалитьФайлы(ИВФ);
Иначе Иначе
Возврат; Возврат;
КонецЕсли; КонецЕсли;
ИначеЕсли ТипЗнч(Значение) = Тип("ДвоичныеДанные") Тогда ИначеЕсли ТипЗнч(Значение) = Тип("ДвоичныеДанные") Тогда
Значение = ПолучитьСтрокуИзДвоичныхДанных(Значение); Значение = ПолучитьСтрокуИзДвоичныхДанных(Значение);
ИначеЕсли ЭтоКоллекция(Значение) Тогда ИначеЕсли ЭтоКоллекция(Значение) Тогда
Значение = OPI_Инструменты.JSONСтрокой(Значение); Значение = OPI_Инструменты.JSONСтрокой(Значение);
Иначе Иначе
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Исключение Исключение
Значение = Строка(Значение); Значение = Строка(Значение);
Возврат; Возврат;
КонецПопытки; КонецПопытки;
КонецПроцедуры КонецПроцедуры
Процедура ПолучитьДату(Значение) Экспорт Процедура ПолучитьДату(Значение) Экспорт
Если Значение = Неопределено Тогда Если Значение = Неопределено Тогда
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Дата = "Дата"; Дата = "Дата";
Попытка Попытка
Если ТипЗнч(Значение) = Тип(Дата) Тогда Если ТипЗнч(Значение) = Тип(Дата) Тогда
Возврат; Возврат;
Иначе Иначе
Значение = XMLЗначение(Тип(Дата), Значение); Значение = XMLЗначение(Тип(Дата), Значение);
КонецЕсли; КонецЕсли;
Исключение Исключение
ООД = Новый ОписаниеТипов(Дата); ООД = Новый ОписаниеТипов(Дата);
Значение = ООД.ПривестиЗначение(Значение); Значение = ООД.ПривестиЗначение(Значение);
КонецПопытки; КонецПопытки;
КонецПроцедуры КонецПроцедуры
Процедура ПолучитьЧисло(Значение) Экспорт Процедура ПолучитьЧисло(Значение) Экспорт
ОписаниеТипа = Новый ОписаниеТипов("Число"); ОписаниеТипа = Новый ОписаниеТипов("Число");
Значение = ОписаниеТипа.ПривестиЗначение(Значение); Значение = ОписаниеТипа.ПривестиЗначение(Значение);
КонецПроцедуры КонецПроцедуры
@@ -309,17 +301,14 @@
Функция ЭтоКоллекция(Знач Значение) Функция ЭтоКоллекция(Знач Значение)
Возврат ТипЗнч(Значение) = Тип("Массив") Возврат ТипЗнч(Значение) = Тип("Массив") Или ТипЗнч(Значение) = Тип("Структура") Или ТипЗнч(Значение) = Тип(
Или ТипЗнч(Значение) = Тип("Структура") "Соответствие");
Или ТипЗнч(Значение) = Тип("Соответствие");
КонецФункции КонецФункции
Функция ЭтоСимвольное(Знач Значение) Функция ЭтоСимвольное(Знач Значение)
Возврат ТипЗнч(Значение) = Тип("Строка") Возврат ТипЗнч(Значение) = Тип("Строка") Или ТипЗнч(Значение) = Тип("Число") Или ТипЗнч(Значение) = Тип("Дата");
Или ТипЗнч(Значение) = Тип("Число")
Или ТипЗнч(Значение) = Тип("Дата");
КонецФункции КонецФункции

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

@@ -68,71 +68,71 @@
Процедура Телеграм_ПолучитьИнформациюБота() Экспорт Процедура Телеграм_ПолучитьИнформациюБота() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста);
Telegram_ПолучитьИнформациюБота(ПараметрыТеста); Telegram_ПолучитьИнформациюБота(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ПолучитьОбновления() Экспорт Процедура Телеграм_ПолучитьОбновления() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста);
Telegram_УдалитьWebhook(ПараметрыТеста); Telegram_УдалитьWebhook(ПараметрыТеста);
Telegram_ПолучитьОбновления(ПараметрыТеста); Telegram_ПолучитьОбновления(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_УстановитьWebhook() Экспорт Процедура Телеграм_УстановитьWebhook() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_URL" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_URL" , ПараметрыТеста);
Telegram_УстановитьWebhook(ПараметрыТеста); Telegram_УстановитьWebhook(ПараметрыТеста);
Telegram_УдалитьWebhook(ПараметрыТеста); Telegram_УдалитьWebhook(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ОтправитьТекстовоеСообщение() Экспорт Процедура Телеграм_ОтправитьТекстовоеСообщение() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста);
Telegram_ОтправитьТекстовоеСообщение(ПараметрыТеста); Telegram_ОтправитьТекстовоеСообщение(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ОтправитьКартинку() Экспорт Процедура Телеграм_ОтправитьКартинку() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста);
Telegram_ОтправитьКартинку(ПараметрыТеста); Telegram_ОтправитьКартинку(ПараметрыТеста);
Telegram_СкачатьФайл(ПараметрыТеста); Telegram_СкачатьФайл(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ОтправитьВидео() Экспорт Процедура Телеграм_ОтправитьВидео() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Video" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Video" , ПараметрыТеста);
Telegram_ОтправитьВидео(ПараметрыТеста); Telegram_ОтправитьВидео(ПараметрыТеста);
Telegram_СкачатьФайл(ПараметрыТеста); Telegram_СкачатьФайл(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -225,7 +225,7 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChatID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
Telegram_ОтправитьОпрос(ПараметрыТеста); Telegram_ОтправитьОпрос(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -237,7 +237,7 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelMessageID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelMessageID", ПараметрыТеста);
Telegram_ПереслатьСообщение(ПараметрыТеста); Telegram_ПереслатьСообщение(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -259,7 +259,7 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID", ПараметрыТеста);
Telegram_СоздатьСсылкуПриглашение(ПараметрыТеста); Telegram_СоздатьСсылкуПриглашение(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -270,9 +270,9 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelMessageID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ChannelMessageID", ПараметрыТеста);
Telegram_ЗакрепитьСообщение(ПараметрыТеста); Telegram_ЗакрепитьСообщение(ПараметрыТеста);
Telegram_ОткрепитьСообщение(ПараметрыТеста); Telegram_ОткрепитьСообщение(ПараметрыТеста);
Telegram_УдалитьСообщение(ПараметрыТеста); Telegram_УдалитьСообщение(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -291,7 +291,7 @@
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token", ПараметрыТеста);
Telegram_ПолучитьСписокАватаровФорума(ПараметрыТеста); Telegram_ПолучитьСписокАватаровФорума(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -303,33 +303,33 @@
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("String" , ПараметрыТеста);
Telegram_СоздатьТемуФорума(ПараметрыТеста); Telegram_СоздатьТемуФорума(ПараметрыТеста);
Telegram_ИзменитьТемуФорума(ПараметрыТеста); Telegram_ИзменитьТемуФорума(ПараметрыТеста);
Telegram_ЗакрытьТемуФорума(ПараметрыТеста); Telegram_ЗакрытьТемуФорума(ПараметрыТеста);
Telegram_ОткрытьТемуФорума(ПараметрыТеста); Telegram_ОткрытьТемуФорума(ПараметрыТеста);
Telegram_ОчиститьСписокЗакрепленныхСообщенийТемы(ПараметрыТеста); Telegram_ОчиститьСписокЗакрепленныхСообщенийТемы(ПараметрыТеста);
Telegram_УдалитьТемуФорума(ПараметрыТеста); Telegram_УдалитьТемуФорума(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_СкрытьПоказатьГлавнуюТему() Экспорт Процедура Телеграм_СкрытьПоказатьГлавнуюТему() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ForumID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ForumID", ПараметрыТеста);
Telegram_СкрытьГлавнуюТемуФорума(ПараметрыТеста); Telegram_СкрытьГлавнуюТемуФорума(ПараметрыТеста);
Telegram_ПоказатьГлавнуюТемуФорума(ПараметрыТеста); Telegram_ПоказатьГлавнуюТемуФорума(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
Процедура Телеграм_ИзменитьИмяГлавнойТемы() Экспорт Процедура Телеграм_ИзменитьИмяГлавнойТемы() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_Token" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ForumID", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Telegram_ForumID", ПараметрыТеста);
Telegram_ИзменитьИмяГлавнойТемыФорума(ПараметрыТеста); Telegram_ИзменитьИмяГлавнойТемыФорума(ПараметрыТеста);
КонецПроцедуры КонецПроцедуры
@@ -1806,13 +1806,13 @@
Процедура Ноушн_СоздатьСтраницу() Экспорт Процедура Ноушн_СоздатьСтраницу() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent"); Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent");
Заголовок = "Тестовый заголовок"; Заголовок = "Тестовый заголовок";
Результат = OPI_Notion.СоздатьСтраницу(Токен, Родитель, Заголовок); Результат = OPI_Notion.СоздатьСтраницу(Токен, Родитель, Заголовок);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСтраницу"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСтраницу");
Проверка_НоушнОбъект(Результат); Проверка_НоушнОбъект(Результат);
@@ -1820,46 +1820,46 @@
Процедура Ноушн_СоздатьИзменитьБазу() Экспорт Процедура Ноушн_СоздатьИзменитьБазу() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent"); Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent");
Заголовок = "Тестовый заголовок"; Заголовок = "Тестовый заголовок";
Свойства = Новый Соответствие; Свойства = Новый Соответствие;
Свойства.Вставить("Имя" , "title"); Свойства.Вставить("Имя" , "title");
Свойства.Вставить("Описание" , "rich_text"); Свойства.Вставить("Описание" , "rich_text");
Свойства.Вставить("Номер" , "number"); Свойства.Вставить("Номер" , "number");
Свойства.Вставить("Статус" , "status"); Свойства.Вставить("Статус" , "status");
Свойства.Вставить("Дата создания" , "date"); Свойства.Вставить("Дата создания" , "date");
Свойства.Вставить("Картинка" , "files"); Свойства.Вставить("Картинка" , "files");
Свойства.Вставить("Активен" , "checkbox"); Свойства.Вставить("Активен" , "checkbox");
Свойства.Вставить("Сайт" , "url"); Свойства.Вставить("Сайт" , "url");
Свойства.Вставить("Почта" , "email"); Свойства.Вставить("Почта" , "email");
Свойства.Вставить("Телефон" , "phone_number"); Свойства.Вставить("Телефон" , "phone_number");
Свойства.Вставить("Пользователь" , "people"); Свойства.Вставить("Пользователь" , "people");
ВыборЗначения = Новый Соответствие; ВыборЗначения = Новый Соответствие;
ВыборЗначения.Вставить("Новый" , "green"); ВыборЗначения.Вставить("Новый" , "green");
ВыборЗначения.Вставить("В работе" , "yellow"); ВыборЗначения.Вставить("В работе" , "yellow");
ВыборЗначения.Вставить("Удаленный", "red"); ВыборЗначения.Вставить("Удаленный", "red");
Свойства.Вставить("Статус", ВыборЗначения); Свойства.Вставить("Статус", ВыборЗначения);
Результат = OPI_Notion.СоздатьБазуДанных(Токен, Родитель, Заголовок, Свойства); Результат = OPI_Notion.СоздатьБазуДанных(Токен, Родитель, Заголовок, Свойства);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьБазуДанных"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьБазуДанных");
Проверка_НоушнОбъект(Результат, "database"); Проверка_НоушнОбъект(Результат, "database");
База = Результат["id"]; База = Результат["id"];
Заголовок = "Тестовый заголовок"; Заголовок = "Тестовый заголовок";
Описание = "Тестовое описание"; Описание = "Тестовое описание";
Свойства = Новый Соответствие; Свойства = Новый Соответствие;
Свойства.Вставить("Почта", "rich_text"); // Тип поля "Почта" будет изменен с email на текст Свойства.Вставить("Почта", "rich_text"); // Тип поля "Почта" будет изменен с email на текст
Свойства.Вставить("Сайт"); // Поле "Сайт" будет удалено Свойства.Вставить("Сайт"); // Поле "Сайт" будет удалено
Результат = OPI_Notion.ИзменитьСвойстваБазы(Токен, База, Свойства, Заголовок, Описание); Результат = OPI_Notion.ИзменитьСвойстваБазы(Токен, База, Свойства, Заголовок, Описание);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьСвойстваБазы"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьСвойстваБазы");
Проверка_НоушнОбъект(Результат, "database"); Проверка_НоушнОбъект(Результат, "database");
@@ -1867,12 +1867,12 @@
Процедура Ноушн_ПолучитьИнформациюОСтранице() Экспорт Процедура Ноушн_ПолучитьИнформациюОСтранице() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Страница = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Page"); Страница = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Page");
Результат = OPI_Notion.ПолучитьСтраницу(Токен, Страница); Результат = OPI_Notion.ПолучитьСтраницу(Токен, Страница);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСтраницу"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСтраницу");
Проверка_НоушнОбъект(Результат); Проверка_НоушнОбъект(Результат);
@@ -1880,12 +1880,12 @@
Процедура Ноушн_ПолучитьИнформациюОБазе() Экспорт Процедура Ноушн_ПолучитьИнформациюОБазе() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
База = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Base"); База = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Base");
Результат = OPI_Notion.ПолучитьБазуДанных(Токен, База); Результат = OPI_Notion.ПолучитьБазуДанных(Токен, База);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьБазуДанных"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьБазуДанных");
Проверка_НоушнОбъект(Результат, "database"); Проверка_НоушнОбъект(Результат, "database");
@@ -1893,28 +1893,28 @@
Процедура Ноушн_СоздатьСтраницуВБазу() Экспорт Процедура Ноушн_СоздатьСтраницуВБазу() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
База = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Base"); База = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Base");
Картинка = Новый Соответствие; Картинка = Новый Соответствие;
Картинка.Вставить("Лого", OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture")); Картинка.Вставить("Лого", OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture"));
Свойства = Новый Соответствие; Свойства = Новый Соответствие;
Свойства.Вставить("Имя" , "ООО Вектор"); Свойства.Вставить("Имя" , "ООО Вектор");
Свойства.Вставить("Описание" , "Наш первый клиент"); Свойства.Вставить("Описание" , "Наш первый клиент");
Свойства.Вставить("Номер" , 1); Свойства.Вставить("Номер" , 1);
Свойства.Вставить("Статус" , "Обычный"); Свойства.Вставить("Статус" , "Обычный");
Свойства.Вставить("Дата создания" , OPI_Инструменты.ПолучитьТекущуюДату()); Свойства.Вставить("Дата создания" , OPI_Инструменты.ПолучитьТекущуюДату());
Свойства.Вставить("Картинка" , Картинка); Свойства.Вставить("Картинка" , Картинка);
Свойства.Вставить("Активен" , Истина); Свойства.Вставить("Активен" , Истина);
Свойства.Вставить("Сайт" , "https://vector.ru"); Свойства.Вставить("Сайт" , "https://vector.ru");
Свойства.Вставить("Почта" , "mail@vector.ru"); Свойства.Вставить("Почта" , "mail@vector.ru");
Свойства.Вставить("Телефон" , "88005553535"); Свойства.Вставить("Телефон" , "88005553535");
Свойства.Вставить("Статус" , "Новый"); Свойства.Вставить("Статус" , "Новый");
Результат = OPI_Notion.СоздатьСтраницуВБазу(Токен, База, Свойства); Результат = OPI_Notion.СоздатьСтраницуВБазу(Токен, База, Свойства);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСтраницуВБазу"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСтраницуВБазу");
Проверка_НоушнОбъект(Результат); Проверка_НоушнОбъект(Результат);
@@ -1925,24 +1925,24 @@
Процедура Ноушн_ИзменитьСвойстваСтраницы() Экспорт Процедура Ноушн_ИзменитьСвойстваСтраницы() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Страница = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Page"); Страница = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Page");
Иконка = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture"); Иконка = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture");
Обложка = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture2"); Обложка = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Picture2");
Архивировать = Ложь; Архивировать = Ложь;
Свойства = Новый Соответствие; Свойства = Новый Соответствие;
Свойства.Вставить("Активен" , Ложь); Свойства.Вставить("Активен" , Ложь);
Свойства.Вставить("Почта" , "vector@mail.ru"); Свойства.Вставить("Почта" , "vector@mail.ru");
Результат = OPI_Notion.ИзменитьСвойстваСтраницы(Токен Результат = OPI_Notion.ИзменитьСвойстваСтраницы(Токен
, Страница , Страница
, Свойства , Свойства
, Иконка , Иконка
, Обложка , Обложка
, Архивировать); , Архивировать);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьСвойстваСтраницы"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ИзменитьСвойстваСтраницы");
Проверка_НоушнОбъект(Результат); Проверка_НоушнОбъект(Результат);
@@ -1950,32 +1950,32 @@
Процедура Ноушн_СоздатьУдалитьБлок() Экспорт Процедура Ноушн_СоздатьУдалитьБлок() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent"); Родитель = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Parent");
Блок = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Block"); Блок = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Block");
Результат = OPI_Notion.ВернутьБлок(Токен, Блок); Результат = OPI_Notion.ВернутьБлок(Токен, Блок);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ВернутьБлок"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ВернутьБлок");
Проверка_НоушнОбъект(Результат, "block"); Проверка_НоушнОбъект(Результат, "block");
Результат = OPI_Notion.СоздатьБлок(Токен, Родитель, Результат); Результат = OPI_Notion.СоздатьБлок(Токен, Родитель, Результат);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьБлок"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьБлок");
Проверка_НоушнОбъект(Результат, "list"); Проверка_НоушнОбъект(Результат, "list");
Блок = Результат["results"][0]["id"]; Блок = Результат["results"][0]["id"];
Результат = OPI_Notion.ВернутьДочерниеБлоки(Токен, Блок); Результат = OPI_Notion.ВернутьДочерниеБлоки(Токен, Блок);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ВернутьДочерниеБлоки"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ВернутьДочерниеБлоки");
Проверка_НоушнОбъект(Результат, "list"); Проверка_НоушнОбъект(Результат, "list");
Результат = OPI_Notion.УдалитьБлок(Токен, Блок); Результат = OPI_Notion.УдалитьБлок(Токен, Блок);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьБлок"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьБлок");
Проверка_НоушнОбъект(Результат, "block"); Проверка_НоушнОбъект(Результат, "block");
@@ -1983,10 +1983,10 @@
Процедура Ноушн_ПолучитьПользователей() Экспорт Процедура Ноушн_ПолучитьПользователей() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Результат = OPI_Notion.СписокПользователей(Токен); Результат = OPI_Notion.СписокПользователей(Токен);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СписокПользователей"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СписокПользователей");
Проверка_НоушнОбъект(Результат, "list"); Проверка_НоушнОбъект(Результат, "list");
@@ -1994,11 +1994,11 @@
Процедура Ноушн_ПолучитьДанныеПользователя() Экспорт Процедура Ноушн_ПолучитьДанныеПользователя() Экспорт
Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token"); Токен = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_Token");
Пользователь = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_User"); Пользователь = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("Notion_User");
Результат = OPI_Notion.ПолучитьДанныеПользователя(Токен, Пользователь); Результат = OPI_Notion.ПолучитьДанныеПользователя(Токен, Пользователь);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьДанныеПользователя"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьДанныеПользователя");
Проверка_НоушнОбъект(Результат, "user"); Проверка_НоушнОбъект(Результат, "user");
@@ -2855,7 +2855,7 @@
Процедура Б24_СерверноеВремя() Экспорт Процедура Б24_СерверноеВремя() Экспорт
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_URL" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_URL" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Domain", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Domain", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Token" , ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Token" , ПараметрыТеста);
@@ -3238,7 +3238,7 @@
Процедура Проверка_Структура(Знач Результат) Процедура Проверка_Структура(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Структура").Заполнено(); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Структура").Заполнено();
КонецПроцедуры КонецПроцедуры
@@ -3674,13 +3674,13 @@
Процедура Проверка_БитриксВремя(Знач Результат) Процедура Проверка_БитриксВремя(Знач Результат)
Время = Результат["result"]; Время = Результат["result"];
Если Не ТипЗнч(Время) = Тип("Дата") Тогда Если Не ТипЗнч(Время) = Тип("Дата") Тогда
Время = XMLЗначение(Тип("Дата"), Время); Время = XMLЗначение(Тип("Дата"), Время);
КонецЕсли; КонецЕсли;
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Время).ИмеетТип("Дата").Заполнено(); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Время).ИмеетТип("Дата").Заполнено();
КонецПроцедуры КонецПроцедуры
@@ -3790,14 +3790,14 @@
Процедура Проверка_БитриксСписокКомментариев(Знач Результат) Процедура Проверка_БитриксСписокКомментариев(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"]).ИмеетТип("Массив"); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"]).ИмеетТип("Массив");
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"][0]["POST_MESSAGE"]).Заполнено(); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"][0]["POST_MESSAGE"]).Заполнено();
КонецПроцедуры КонецПроцедуры
Процедура Проверка_БитриксСписокРезультатов(Знач Результат) Процедура Проверка_БитриксСписокРезультатов(Знач Результат)
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"]).ИмеетТип("Массив"); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"]).ИмеетТип("Массив");
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"][0]["text"]).Заполнено(); OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["result"][0]["text"]).Заполнено();
КонецПроцедуры КонецПроцедуры
@@ -3852,10 +3852,10 @@
Процедура Telegram_ПолучитьОбновления(ПараметрыФункции) Процедура Telegram_ПолучитьОбновления(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Результат = OPI_Telegram.ПолучитьОбновления(Токен); Результат = OPI_Telegram.ПолучитьОбновления(Токен);
// END // END
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьОбновления", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьОбновления", "Telegram");
@@ -3884,12 +3884,12 @@
Процедура Telegram_УдалитьWebhook(ПараметрыФункции) Процедура Telegram_УдалитьWebhook(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Результат = OPI_Telegram.УдалитьWebhook(Токен); Результат = OPI_Telegram.УдалитьWebhook(Токен);
// END // END
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьWebhook", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьWebhook", "Telegram");
Проверка_ТелеграмУдалениеВебхук(Результат); Проверка_ТелеграмУдалениеВебхук(Результат);
@@ -3899,10 +3899,10 @@
Процедура Telegram_ОтправитьТекстовоеСообщение(ПараметрыФункции) Процедура Telegram_ОтправитьТекстовоеСообщение(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
IDЧата = ПараметрыФункции["Telegram_ChatID"]; IDЧата = ПараметрыФункции["Telegram_ChatID"];
IDКанала = ПараметрыФункции["Telegram_ChannelID"]; IDКанала = ПараметрыФункции["Telegram_ChannelID"];
Текст = ПараметрыФункции["String"]; Текст = ПараметрыФункции["String"];
Результат = OPI_Telegram.ОтправитьТекстовоеСообщение(Токен, IDЧата, Текст); Результат = OPI_Telegram.ОтправитьТекстовоеСообщение(Токен, IDЧата, Текст);
@@ -4288,8 +4288,8 @@
Процедура Telegram_СкачатьФайл(ПараметрыФункции) Процедура Telegram_СкачатьФайл(ПараметрыФункции)
IDФайла = ПараметрыФункции["Telegram_FileID"]; IDФайла = ПараметрыФункции["Telegram_FileID"];
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Результат = OPI_Telegram.СкачатьФайл(Токен, IDФайла); Результат = OPI_Telegram.СкачатьФайл(Токен, IDФайла);
@@ -4314,7 +4314,7 @@
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПереслатьСообщение", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПереслатьСообщение", "Telegram");
Проверка_ТелеграмПереслать(Результат, IDСообщения); Проверка_ТелеграмПереслать(Результат, IDСообщения);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
@@ -4322,18 +4322,18 @@
Процедура Telegram_Бан(ПараметрыФункции) Процедура Telegram_Бан(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
IDПользователя = ПараметрыФункции["Telegram_ChatID"]; IDПользователя = ПараметрыФункции["Telegram_ChatID"];
IDКанала = ПараметрыФункции["Telegram_ChannelID"]; IDКанала = ПараметрыФункции["Telegram_ChannelID"];
Результат = OPI_Telegram.Бан(Токен, IDКанала, IDПользователя); Результат = OPI_Telegram.Бан(Токен, IDКанала, IDПользователя);
// END // END
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "Бан", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "Бан", "Telegram");
Проверка_ТелеграмБан(Результат); Проверка_ТелеграмБан(Результат);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
КонецПроцедуры КонецПроцедуры
@@ -4343,14 +4343,14 @@
IDПользователя = ПараметрыФункции["Telegram_ChatID"]; IDПользователя = ПараметрыФункции["Telegram_ChatID"];
IDКанала = ПараметрыФункции["Telegram_ChannelID"]; IDКанала = ПараметрыФункции["Telegram_ChannelID"];
Результат = OPI_Telegram.Разбан(Токен, IDКанала, IDПользователя); Результат = OPI_Telegram.Разбан(Токен, IDКанала, IDПользователя);
// END // END
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "Разбан", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "Разбан", "Telegram");
Проверка_ТелеграмБан(Результат); Проверка_ТелеграмБан(Результат);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
КонецПроцедуры КонецПроцедуры
@@ -4371,7 +4371,7 @@
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСсылкуПриглашение", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСсылкуПриглашение", "Telegram");
Проверка_ТелеграмПриглашение(Результат, Заголовок, UnixИстечение); Проверка_ТелеграмПриглашение(Результат, Заголовок, UnixИстечение);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
@@ -4385,11 +4385,11 @@
Результат = OPI_Telegram.ЗакрепитьСообщение(Токен, IDКанала, IDСообщения); Результат = OPI_Telegram.ЗакрепитьСообщение(Токен, IDКанала, IDСообщения);
// END // END
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗакрепитьСообщение", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗакрепитьСообщение", "Telegram");
Проверка_ТелеграмИстина(Результат); Проверка_ТелеграмИстина(Результат);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
@@ -4403,11 +4403,11 @@
Результат = OPI_Telegram.ОткрепитьСообщение(Токен, IDКанала, IDСообщения); Результат = OPI_Telegram.ОткрепитьСообщение(Токен, IDКанала, IDСообщения);
// END // END
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОткрепитьСообщение", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОткрепитьСообщение", "Telegram");
Проверка_ТелеграмИстина(Результат); Проверка_ТелеграмИстина(Результат);
OPI_Инструменты.Пауза(5); OPI_Инструменты.Пауза(5);
@@ -4432,10 +4432,10 @@
Процедура Telegram_ПолучитьСписокАватаровФорума(ПараметрыФункции) Процедура Telegram_ПолучитьСписокАватаровФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Результат = OPI_Telegram.ПолучитьСписокИконокАватаров(Токен); Результат = OPI_Telegram.ПолучитьСписокИконокАватаров(Токен);
// END // END
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокИконокАватаров", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСписокИконокАватаров", "Telegram");
@@ -4447,14 +4447,14 @@
Процедура Telegram_СоздатьТемуФорума(ПараметрыФункции) Процедура Telegram_СоздатьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Иконка = "5357419403325481346"; Иконка = "5357419403325481346";
Имя = "Тестовая тема " + Строка(Новый УникальныйИдентификатор); Имя = "Тестовая тема " + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Telegram.СоздатьТемуФорума(Токен, Чат, Имя, Иконка); Результат = OPI_Telegram.СоздатьТемуФорума(Токен, Чат, Имя, Иконка);
// END // END
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТемуФорума", "Telegram"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТемуФорума", "Telegram");
@@ -4464,10 +4464,10 @@
OPI_Инструменты.ДобавитьПоле("Telegram_TopicID", Тема, "Строка", ПараметрыФункции); OPI_Инструменты.ДобавитьПоле("Telegram_TopicID", Тема, "Строка", ПараметрыФункции);
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Telegram_TopicID", ПараметрыФункции["Telegram_TopicID"]); OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Telegram_TopicID", ПараметрыФункции["Telegram_TopicID"]);
Проверка_ТелеграмСозданиеТемы(Результат, Имя, Иконка); Проверка_ТелеграмСозданиеТемы(Результат, Имя, Иконка);
ЧатТема = Чат + "*" + Тема; ЧатТема = Чат + "*" + Тема;
Текст = ПараметрыФункции["String"]; Текст = ПараметрыФункции["String"];
Результат = OPI_Telegram.ОтправитьТекстовоеСообщение(Токен, ЧатТема, Текст); Результат = OPI_Telegram.ОтправитьТекстовоеСообщение(Токен, ЧатТема, Текст);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОтправитьТекстовоеСообщение (форум)"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОтправитьТекстовоеСообщение (форум)");
@@ -4478,7 +4478,7 @@
Процедура Telegram_ИзменитьТемуФорума(ПараметрыФункции) Процедура Telegram_ИзменитьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
НовоеИмя = "Новый тестовый заголовок"; НовоеИмя = "Новый тестовый заголовок";
@@ -4498,15 +4498,15 @@
Процедура Telegram_ЗакрытьТемуФорума(ПараметрыФункции) Процедура Telegram_ЗакрытьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
OPI_Telegram.ОткрытьТемуФорума(Токен, Чат); // SKIP OPI_Telegram.ОткрытьТемуФорума(Токен, Чат); // SKIP
Результат = OPI_Telegram.ЗакрытьТемуФорума(Токен, Чат); // Закрывает главную тему Результат = OPI_Telegram.ЗакрытьТемуФорума(Токен, Чат); // Закрывает главную тему
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗакрытьТемуФорума (главная)"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ЗакрытьТемуФорума (главная)");
Проверка_ТелеграмИстина(Результат); // SKIP Проверка_ТелеграмИстина(Результат); // SKIP
@@ -4524,13 +4524,13 @@
Процедура Telegram_ОткрытьТемуФорума(ПараметрыФункции) Процедура Telegram_ОткрытьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
Результат = OPI_Telegram.ОткрытьТемуФорума(Токен, Чат); // Открывает главную тему Результат = OPI_Telegram.ОткрытьТемуФорума(Токен, Чат); // Открывает главную тему
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОткрытьТемуФорума (главная)"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОткрытьТемуФорума (главная)");
Проверка_ТелеграмИстина(Результат); // SKIP Проверка_ТелеграмИстина(Результат); // SKIP
@@ -4548,7 +4548,7 @@
Процедура Telegram_УдалитьТемуФорума(ПараметрыФункции) Процедура Telegram_УдалитьТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
@@ -4566,7 +4566,7 @@
Процедура Telegram_ОчиститьСписокЗакрепленныхСообщенийТемы(ПараметрыФункции) Процедура Telegram_ОчиститьСписокЗакрепленныхСообщенийТемы(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Тема = ПараметрыФункции["Telegram_TopicID"]; Тема = ПараметрыФункции["Telegram_TopicID"];
@@ -4590,7 +4590,7 @@
Процедура Telegram_СкрытьГлавнуюТемуФорума(ПараметрыФункции) Процедура Telegram_СкрытьГлавнуюТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Результат = OPI_Telegram.СкрытьГлавнуюТемуФорума(Токен, Чат); Результат = OPI_Telegram.СкрытьГлавнуюТемуФорума(Токен, Чат);
@@ -4607,7 +4607,7 @@
Процедура Telegram_ПоказатьГлавнуюТемуФорума(ПараметрыФункции) Процедура Telegram_ПоказатьГлавнуюТемуФорума(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Результат = OPI_Telegram.ПоказатьГлавнуюТемуФорума(Токен, Чат); Результат = OPI_Telegram.ПоказатьГлавнуюТемуФорума(Токен, Чат);
@@ -4624,8 +4624,8 @@
Процедура Telegram_ИзменитьИмяГлавнойТемыФорума(ПараметрыФункции) Процедура Telegram_ИзменитьИмяГлавнойТемыФорума(ПараметрыФункции)
Заголовок = "Новое имя главной темы " + Строка(Новый УникальныйИдентификатор); Заголовок = "Новое имя главной темы " + Строка(Новый УникальныйИдентификатор);
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
Чат = ПараметрыФункции["Telegram_ForumID"]; Чат = ПараметрыФункции["Telegram_ForumID"];
Результат = OPI_Telegram.ИзменитьИмяГлавнойТемыФорума(Токен, Чат, Заголовок); Результат = OPI_Telegram.ИзменитьИмяГлавнойТемыФорума(Токен, Чат, Заголовок);
@@ -4642,11 +4642,11 @@
Процедура Telegram_УдалитьСообщение(ПараметрыФункции) Процедура Telegram_УдалитьСообщение(ПараметрыФункции)
Токен = ПараметрыФункции["Telegram_Token"]; Токен = ПараметрыФункции["Telegram_Token"];
IDЧата = ПараметрыФункции["Telegram_ChannelID"]; IDЧата = ПараметрыФункции["Telegram_ChannelID"];
IDСообщения = ПараметрыФункции["Telegram_ChannelMessageID"]; IDСообщения = ПараметрыФункции["Telegram_ChannelMessageID"];
Результат = OPI_Telegram.УдалитьСообщение(Токен, IDЧата, IDСообщения); Результат = OPI_Telegram.УдалитьСообщение(Токен, IDЧата, IDСообщения);
// END // END
@@ -6252,7 +6252,7 @@
Процедура Dropbox_ОтменитьПубликациюФайла(ПараметрыФункции) Процедура Dropbox_ОтменитьПубликациюФайла(ПараметрыФункции)
Токен = ПараметрыФункции["Dropbox_Token"]; Токен = ПараметрыФункции["Dropbox_Token"];
Файл = ПараметрыФункции["Dropbox_FileID"]; Файл = ПараметрыФункции["Dropbox_FileID"];
Результат = OPI_Dropbox.ОтменитьПубликациюФайла(Токен, Файл); Результат = OPI_Dropbox.ОтменитьПубликациюФайла(Токен, Файл);
@@ -6274,7 +6274,7 @@
Домен = ПараметрыФункции["Bitrix24_Domain"]; Домен = ПараметрыФункции["Bitrix24_Domain"];
ClientID = ПараметрыФункции["Bitrix24_ClientID"]; ClientID = ПараметрыФункции["Bitrix24_ClientID"];
Результат = OPI_Bitrix24.ПолучитьСсылкуАвторизацииПриложения(Домен, ClientID); Результат = OPI_Bitrix24.ПолучитьСсылкуАвторизацииПриложения(Домен, ClientID);
// END // END
@@ -6292,7 +6292,7 @@
ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"]; ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"];
Code = ПараметрыФункции["Bitrix24_Code"]; Code = ПараметрыФункции["Bitrix24_Code"];
Результат = OPI_Bitrix24.ПолучитьТокен(ClientID, ClientSecret, Code); Результат = OPI_Bitrix24.ПолучитьТокен(ClientID, ClientSecret, Code);
// END // END
@@ -6311,7 +6311,7 @@
ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"]; ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"];
Refresh = ПараметрыФункции["Bitrix24_Refresh"]; Refresh = ПараметрыФункции["Bitrix24_Refresh"];
Результат = OPI_Bitrix24.ОбновитьТокен(ClientID, ClientSecret, Refresh); Результат = OPI_Bitrix24.ОбновитьТокен(ClientID, ClientSecret, Refresh);
// END // END
@@ -6328,9 +6328,9 @@
Процедура Bitrix24_СерверноеВремя(ПараметрыФункции) Процедура Bitrix24_СерверноеВремя(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
Результат = OPI_Bitrix24.СерверноеВремя(URL); Результат = OPI_Bitrix24.СерверноеВремя(URL);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СерверноеВремя (хук)", "Bitrix24"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СерверноеВремя (хук)", "Bitrix24");
@@ -6362,7 +6362,7 @@
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
Результат = OPI_Bitrix24.СоздатьНовость(URL, Текст, , Файлы, Заголовок, Истина); Результат = OPI_Bitrix24.СоздатьНовость(URL, Текст, , Файлы, Заголовок, Истина);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьНовость (хук)", "Bitrix24"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьНовость (хук)", "Bitrix24");
@@ -6427,7 +6427,7 @@
IDНовости = ПараметрыФункции["Bitrix24_HookPostID"]; IDНовости = ПараметрыФункции["Bitrix24_HookPostID"];
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
Результат = OPI_Bitrix24.УдалитьНовость(URL, IDНовости); Результат = OPI_Bitrix24.УдалитьНовость(URL, IDНовости);
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьНовость (хук)", "Bitrix24"); // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьНовость (хук)", "Bitrix24");
@@ -7222,7 +7222,7 @@
Процедура Bitrix24_ПолучитьХранилище(ПараметрыФункции) Процедура Bitrix24_ПолучитьХранилище(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
IDХранилища = 3; IDХранилища = 3;
Результат = OPI_Bitrix24.ПолучитьХранилище(URL, IDХранилища); Результат = OPI_Bitrix24.ПолучитьХранилище(URL, IDХранилища);
@@ -7373,7 +7373,7 @@
Процедура Bitrix24_ПолучитьВнешнююСсылкуКаталога(ПараметрыФункции) Процедура Bitrix24_ПолучитьВнешнююСсылкуКаталога(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
IDКаталога = ПараметрыФункции["Bitrix24_FolderID"]; IDКаталога = ПараметрыФункции["Bitrix24_FolderID"];
Результат = OPI_Bitrix24.ПолучитьВнешнююСсылкуКаталога(URL, IDКаталога); Результат = OPI_Bitrix24.ПолучитьВнешнююСсылкуКаталога(URL, IDКаталога);
@@ -7397,7 +7397,7 @@
Процедура Bitrix24_ПолучитьСтруктуруФильтраКаталога(ПараметрыФункции) Процедура Bitrix24_ПолучитьСтруктуруФильтраКаталога(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
Результат = OPI_Bitrix24.ПолучитьСтруктуруФильтраКаталога(URL); Результат = OPI_Bitrix24.ПолучитьСтруктуруФильтраКаталога(URL);
@@ -7420,7 +7420,7 @@
Процедура Bitrix24_ПолучитьДочерниеЭлементыКаталога(ПараметрыФункции) Процедура Bitrix24_ПолучитьДочерниеЭлементыКаталога(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
IDКаталога = ПараметрыФункции["Bitrix24_FolderID"]; IDКаталога = ПараметрыФункции["Bitrix24_FolderID"];
Результат = OPI_Bitrix24.ПолучитьДочерниеЭлементыКаталога(URL, IDКаталога); Результат = OPI_Bitrix24.ПолучитьДочерниеЭлементыКаталога(URL, IDКаталога);
@@ -7444,7 +7444,7 @@
Процедура Bitrix24_ПоместитьКаталогВКорзину(ПараметрыФункции) Процедура Bitrix24_ПоместитьКаталогВКорзину(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"]; URL = ПараметрыФункции["Bitrix24_URL"];
IDКаталога = ПараметрыФункции["Bitrix24_FolderID"]; IDКаталога = ПараметрыФункции["Bitrix24_FolderID"];
Результат = OPI_Bitrix24.ПоместитьКаталогВКорзину(URL, IDКаталога); Результат = OPI_Bitrix24.ПоместитьКаталогВКорзину(URL, IDКаталога);
@@ -9329,9 +9329,9 @@
Проверка_БитриксФайлСообщение(Результат); // SKIP Проверка_БитриксФайлСообщение(Результат); // SKIP
URL = ПараметрыФункции["Bitrix24_Domain"]; URL = ПараметрыФункции["Bitrix24_Domain"];
Токен = ПараметрыФункции["Bitrix24_Token"]; Токен = ПараметрыФункции["Bitrix24_Token"];
IDЧата = ПараметрыФункции["Bitrix24_ChatID"]; IDЧата = ПараметрыФункции["Bitrix24_ChatID"];
Каталог = OPI_Bitrix24.ПолучитьКаталогФайловЧата(URL, IDЧата, Токен); Каталог = OPI_Bitrix24.ПолучитьКаталогФайловЧата(URL, IDЧата, Токен);
IDКаталога = Каталог["result"]["ID"]; IDКаталога = Каталог["result"]["ID"];