VKT: Изменение параметров чата

docs/en/data/VKTeams/SetChatDescription.json

@@ -0,0 +1,4 @@
+{
+"Token": "001.3501506236.091...",
+"ChatID": "689203963@chat.agent"
+}

docs/en/data/VKTeams/SetChatRules.json

@@ -0,0 +1,4 @@
+{
+"Token": "001.3501506236.091...",
+"ChatID": "689203963@chat.agent"
+}

docs/en/data/VKTeams/SetChatTitle.json

@@ -0,0 +1,4 @@
+{
+"Token": "001.3501506236.091...",
+"ChatID": "689203963@chat.agent"
+}

docs/en/examples/VKTeams/SetChatDescription.txt

@@ -0,0 +1,5 @@
+    Token  = "001.3501506236.091...";
+    ChatID = "689203963@chat.agent";
+    Text   = "New description";
+
+    Result = OPI_VKTeams.SetChatDescription(Token, ChatID, Text);

docs/en/examples/VKTeams/SetChatRules.txt

@@ -0,0 +1,5 @@
+    Token  = "001.3501506236.091...";
+    ChatID = "689203963@chat.agent";
+    Text   = "Text of the new rules";
+
+    Result = OPI_VKTeams.SetChatRules(Token, ChatID, Text);

docs/en/examples/VKTeams/SetChatTitle.txt

@@ -0,0 +1,5 @@
+    Token  = "001.3501506236.091...";
+    ChatID = "689203963@chat.agent";
+    Text   = "New title";
+
+    Result = OPI_VKTeams.SetChatTitle(Token, ChatID, Text);

docs/ru/data/VKTeams/УстановитьЗаголовокЧата.json

@@ -0,0 +1,4 @@
+{
+"Токен": "001.3501506236.091...",
+"IDЧата": "689203963@chat.agent"
+}

docs/ru/data/VKTeams/УстановитьОписаниеЧата.json

@@ -0,0 +1,4 @@
+{
+"Токен": "001.3501506236.091...",
+"IDЧата": "689203963@chat.agent"
+}

docs/ru/data/VKTeams/УстановитьПравилаЧата.json

@@ -0,0 +1,4 @@
+{
+"Токен": "001.3501506236.091...",
+"IDЧата": "689203963@chat.agent"
+}

docs/ru/examples/VKTeams/УстановитьЗаголовокЧата.txt

@@ -0,0 +1,5 @@
+    Токен   = "001.3501506236.091...";
+    IDЧата  = "689203963@chat.agent";
+    Текст   = "Новый заголовок";
+
+    Результат = OPI_VKTeams.УстановитьЗаголовокЧата(Токен, IDЧата, Текст);

docs/ru/examples/VKTeams/УстановитьОписаниеЧата.txt

@@ -0,0 +1,5 @@
+    Токен   = "001.3501506236.091...";
+    IDЧата  = "689203963@chat.agent";
+    Текст   = "Новое описание";
+
+    Результат = OPI_VKTeams.УстановитьОписаниеЧата(Токен, IDЧата, Текст);

docs/ru/examples/VKTeams/УстановитьПравилаЧата.txt

@@ -0,0 +1,5 @@
+    Токен   = "001.3501506236.091...";
+    IDЧата  = "689203963@chat.agent";
+    Текст   = "Текст новых правил";
+
+    Результат = OPI_VKTeams.УстановитьПравилаЧата(Токен, IDЧата, Текст);

src/en/OInt/core/Modules/OPI_VKTeams.os

@@ -667,6 +667,7 @@ EndFunction
 // Blocks the selected user in chat
 //
 // Note
+// To call this method, the bot must be an administrator in the chat room.
 // Method at API documentation: [GET ​​/chats​/blockUser](@teams.vk.com/botapi/#/chats/get_chats_blockUser)
 //
 // Parameters:
@@ -699,6 +700,7 @@ EndFunction
 // Unblocks a previously blocked user in the chat room
 //
 // Note
+// To call this method, the bot must be an administrator in the chat room.
 // Method at API documentation: [GET ​​/chats/unblockUser](@teams.vk.com/botapi/#/chats/get_chats_unblockUser)
 //
 // Parameters:
@@ -726,6 +728,7 @@ EndFunction
 // Confirms the user's request to join a private chat room
 //
 // Note
+// To call this method, the bot must be an administrator in the chat room.
 // Method at API documentation: [GET ​​/chats/resolvePending](@teams.vk.com/botapi/#/chats/get_chats_resolvePending)
 //
 // Parameters:
@@ -747,6 +750,7 @@ EndFunction
 // Rejects the user's request to join a private chat room
 //
 // Note
+// To call this method, the bot must be an administrator in the chat room.
 // Method at API documentation: [GET ​​/chats/resolvePending](@teams.vk.com/botapi/#/chats/get_chats_resolvePending)
 //
 // Parameters:
@@ -764,6 +768,72 @@ Function DisapprovePending(Val Token, Val ChatID, Val UserID = "") Export
 
 EndFunction
 
+// Set chat title
+// Sets new chat title
+//
+// Note
+// To call this method, the bot must be an administrator in the chat room.
+// Method at API documentation: [GET ​​/chats/setTitle](@teams.vk.com/botapi/#/chats/get_chats_setTitle)
+//
+// Parameters:
+// Token - String - Bot token - token
+// ChatID - String, Number - Chat ID - chatid
+// Text - String - Title text - text
+//
+// Returns:
+// Map Of KeyAndValue - Serialized JSON response from VK Teams
+Function SetChatTitle(Val Token, Val ChatID, Val Text) Export
+
+    Response = UpdateChatParameters(Token, ChatID, "title", Text);
+
+    Return Response;
+
+EndFunction
+
+// Set chat description
+// Sets new chat description
+//
+// Note
+// To call this method, the bot must be an administrator in the chat room.
+// Method at API documentation: [GET ​​/chats/setAbout](@teams.vk.com/botapi/#/chats/get_chats_setAbout)
+//
+// Parameters:
+// Token - String - Bot token - token
+// ChatID - String, Number - Chat ID - chatid
+// Text - String - Description text - text
+//
+// Returns:
+// Map Of KeyAndValue - Serialized JSON response from VK Teams
+Function SetChatDescription(Val Token, Val ChatID, Val Text) Export
+
+    Response = UpdateChatParameters(Token, ChatID, "about", Text);
+
+    Return Response;
+
+EndFunction
+
+// Set chat rules
+// Sets new chat rules
+//
+// Note
+// To call this method, the bot must be an administrator in the chat room.
+// Method at API documentation: [GET /chats/setRules](@teams.vk.com/botapi/#/chats/get_chats_setRules)
+//
+// Parameters:
+// Token - String - Bot token - token
+// ChatID - String, Number - Chat ID - chatid
+// Text - String - Rules Text - text
+//
+// Returns:
+// Map Of KeyAndValue - Serialized JSON response from VK Teams
+Function SetChatRules(Val Token, Val ChatID, Val Text) Export
+
+    Response = UpdateChatParameters(Token, ChatID, "rules", Text);
+
+    Return Response;
+
+EndFunction
+
 #EndRegion
 
 #EndRegion
@@ -814,4 +884,18 @@ Function ResolvePending(Val Token, Val ChatID, Val Response, Val UserID = "")
 
 EndFunction
 
+Function UpdateChatParameters(Val Token, Val ChatID, Val Parameter, Val Value)
+
+    URL        = "/chats/set" + Title(Parameter);
+    Parameters = NormalizeMain(URL, Token);
+
+    OPI_Tools.AddField("chatId" , ChatID , "String", Parameters);
+    OPI_Tools.AddField(Parameter, Value  , "String", Parameters);
+
+    Response = OPI_Tools.Get(URL, Parameters);
+
+    Return Response;
+
+EndFunction
+
 #EndRegion

src/en/OInt/tests/Modules/internal/OPI_Tests.os

@@ -3189,6 +3189,9 @@ Procedure VKT_ChatManagment() Export
     VKTeams_UnblockChatUser(TestParameters);
     VKTeams_ApprovePending(TestParameters);
     VKTeams_DisapprovePending(TestParameters);
+    VKTeams_SetChatTitle(TestParameters);
+    VKTeams_SetChatDescription(TestParameters);
+    VKTeams_SetChatRules(TestParameters);
 
 EndProcedure
 
@@ -11068,6 +11071,55 @@ Procedure VKTeams_DisapprovePending(FunctionParameters)
 
 EndProcedure
 
+Procedure VKTeams_SetChatTitle(FunctionParameters)
+
+    Token  = FunctionParameters["VkTeams_Token"];
+    ChatID = FunctionParameters["VkTeams_ChatID2"];
+    Text   = "New title";
+
+    Result = OPI_VKTeams.SetChatTitle(Token, ChatID, Text);
+
+    // END
+
+    OPI_TestDataRetrieval.WriteLog(Result, "SetChatTitle", "VkTeams");
+
+    Check_VKTTrue(Result);
+
+EndProcedure
+
+
+Procedure VKTeams_SetChatDescription(FunctionParameters)
+
+    Token  = FunctionParameters["VkTeams_Token"];
+    ChatID = FunctionParameters["VkTeams_ChatID2"];
+    Text   = "New description";
+
+    Result = OPI_VKTeams.SetChatDescription(Token, ChatID, Text);
+
+    // END
+
+    OPI_TestDataRetrieval.WriteLog(Result, "SetChatDescription", "VkTeams");
+
+    Check_VKTTrue(Result);
+
+EndProcedure
+
+Procedure VKTeams_SetChatRules(FunctionParameters)
+
+    Token  = FunctionParameters["VkTeams_Token"];
+    ChatID = FunctionParameters["VkTeams_ChatID2"];
+    Text   = "Text of the new rules";
+
+    Result = OPI_VKTeams.SetChatRules(Token, ChatID, Text);
+
+    // END
+
+    OPI_TestDataRetrieval.WriteLog(Result, "SetChatRules", "VkTeams");
+
+    Check_VKTTrue(Result);
+
+EndProcedure
+
 #EndRegion
 
 #EndRegion

src/en/OPI/src/CommonModules/OPI_Tests/Module.bsl

@@ -3189,6 +3189,9 @@ Procedure VKT_ChatManagment() Export
     VKTeams_UnblockChatUser(TestParameters);
     VKTeams_ApprovePending(TestParameters);
     VKTeams_DisapprovePending(TestParameters);
+    VKTeams_SetChatTitle(TestParameters);
+    VKTeams_SetChatDescription(TestParameters);
+    VKTeams_SetChatRules(TestParameters);
 
 EndProcedure
 
@@ -11068,6 +11071,55 @@ Procedure VKTeams_DisapprovePending(FunctionParameters)
 
 EndProcedure
 
+Procedure VKTeams_SetChatTitle(FunctionParameters)
+
+    Token  = FunctionParameters["VkTeams_Token"];
+    ChatID = FunctionParameters["VkTeams_ChatID2"];
+    Text   = "New title";
+
+    Result = OPI_VKTeams.SetChatTitle(Token, ChatID, Text);
+
+    // END
+
+    // !OInt OPI_TestDataRetrieval.WriteLog(Result, "SetChatTitle", "VkTeams");
+
+    Check_VKTTrue(Result);
+
+EndProcedure
+
+
+Procedure VKTeams_SetChatDescription(FunctionParameters)
+
+    Token  = FunctionParameters["VkTeams_Token"];
+    ChatID = FunctionParameters["VkTeams_ChatID2"];
+    Text   = "New description";
+
+    Result = OPI_VKTeams.SetChatDescription(Token, ChatID, Text);
+
+    // END
+
+    // !OInt OPI_TestDataRetrieval.WriteLog(Result, "SetChatDescription", "VkTeams");
+
+    Check_VKTTrue(Result);
+
+EndProcedure
+
+Procedure VKTeams_SetChatRules(FunctionParameters)
+
+    Token  = FunctionParameters["VkTeams_Token"];
+    ChatID = FunctionParameters["VkTeams_ChatID2"];
+    Text   = "Text of the new rules";
+
+    Result = OPI_VKTeams.SetChatRules(Token, ChatID, Text);
+
+    // END
+
+    // !OInt OPI_TestDataRetrieval.WriteLog(Result, "SetChatRules", "VkTeams");
+
+    Check_VKTTrue(Result);
+
+EndProcedure
+
 #EndRegion
 
 #EndRegion

src/en/OPI/src/CommonModules/OPI_VKTeams/Module.bsl

@@ -667,6 +667,7 @@ EndFunction
 // Blocks the selected user in chat
 //
 // Note
+// To call this method, the bot must be an administrator in the chat room.
 // Method at API documentation: [GET ​​/chats​/blockUser](@teams.vk.com/botapi/#/chats/get_chats_blockUser)
 //
 // Parameters:
@@ -699,6 +700,7 @@ EndFunction
 // Unblocks a previously blocked user in the chat room
 //
 // Note
+// To call this method, the bot must be an administrator in the chat room.
 // Method at API documentation: [GET ​​/chats/unblockUser](@teams.vk.com/botapi/#/chats/get_chats_unblockUser)
 //
 // Parameters:
@@ -726,6 +728,7 @@ EndFunction
 // Confirms the user's request to join a private chat room
 //
 // Note
+// To call this method, the bot must be an administrator in the chat room.
 // Method at API documentation: [GET ​​/chats/resolvePending](@teams.vk.com/botapi/#/chats/get_chats_resolvePending)
 //
 // Parameters:
@@ -747,6 +750,7 @@ EndFunction
 // Rejects the user's request to join a private chat room
 //
 // Note
+// To call this method, the bot must be an administrator in the chat room.
 // Method at API documentation: [GET ​​/chats/resolvePending](@teams.vk.com/botapi/#/chats/get_chats_resolvePending)
 //
 // Parameters:
@@ -764,6 +768,72 @@ Function DisapprovePending(Val Token, Val ChatID, Val UserID = "") Export
 
 EndFunction
 
+// Set chat title
+// Sets new chat title
+//
+// Note
+// To call this method, the bot must be an administrator in the chat room.
+// Method at API documentation: [GET ​​/chats/setTitle](@teams.vk.com/botapi/#/chats/get_chats_setTitle)
+//
+// Parameters:
+// Token - String - Bot token - token
+// ChatID - String, Number - Chat ID - chatid
+// Text - String - Title text - text
+//
+// Returns:
+// Map Of KeyAndValue - Serialized JSON response from VK Teams
+Function SetChatTitle(Val Token, Val ChatID, Val Text) Export
+
+    Response = UpdateChatParameters(Token, ChatID, "title", Text);
+
+    Return Response;
+
+EndFunction
+
+// Set chat description
+// Sets new chat description
+//
+// Note
+// To call this method, the bot must be an administrator in the chat room.
+// Method at API documentation: [GET ​​/chats/setAbout](@teams.vk.com/botapi/#/chats/get_chats_setAbout)
+//
+// Parameters:
+// Token - String - Bot token - token
+// ChatID - String, Number - Chat ID - chatid
+// Text - String - Description text - text
+//
+// Returns:
+// Map Of KeyAndValue - Serialized JSON response from VK Teams
+Function SetChatDescription(Val Token, Val ChatID, Val Text) Export
+
+    Response = UpdateChatParameters(Token, ChatID, "about", Text);
+
+    Return Response;
+
+EndFunction
+
+// Set chat rules
+// Sets new chat rules
+//
+// Note
+// To call this method, the bot must be an administrator in the chat room.
+// Method at API documentation: [GET /chats/setRules](@teams.vk.com/botapi/#/chats/get_chats_setRules)
+//
+// Parameters:
+// Token - String - Bot token - token
+// ChatID - String, Number - Chat ID - chatid
+// Text - String - Rules Text - text
+//
+// Returns:
+// Map Of KeyAndValue - Serialized JSON response from VK Teams
+Function SetChatRules(Val Token, Val ChatID, Val Text) Export
+
+    Response = UpdateChatParameters(Token, ChatID, "rules", Text);
+
+    Return Response;
+
+EndFunction
+
 #EndRegion
 
 #EndRegion
@@ -814,4 +884,18 @@ Function ResolvePending(Val Token, Val ChatID, Val Response, Val UserID = "")
 
 EndFunction
 
+Function UpdateChatParameters(Val Token, Val ChatID, Val Parameter, Val Value)
+
+    URL        = "/chats/set" + Title(Parameter);
+    Parameters = NormalizeMain(URL, Token);
+
+    OPI_Tools.AddField("chatId" , ChatID , "String", Parameters);
+    OPI_Tools.AddField(Parameter, Value  , "String", Parameters);
+
+    Response = OPI_Tools.Get(URL, Parameters);
+
+    Return Response;
+
+EndFunction
+
 #EndRegion

src/en/cli/data/Classes/internal/Classes/vkteams.os

@@ -853,6 +853,99 @@
     NewLine.Описание    = "User ID. For all active requests if not filled in (optional, def. val. - Empty value)";
     NewLine.Область     = "Chat management";
 
+
+    NewLine = CompositionTable.Add();
+    NewLine.Библиотека  = "vkteams";
+    NewLine.Модуль      = "OPI_VKTeams";
+    NewLine.Метод       = "SetChatTitle";
+    NewLine.МетодПоиска = "SETCHATTITLE";
+    NewLine.Параметр    = "--token";
+    NewLine.Описание    = "Bot token";
+    NewLine.Область     = "Chat management";
+    NewLine.ОписаниеМетода   = "Sets new chat title";
+
+
+    NewLine = CompositionTable.Add();
+    NewLine.Библиотека  = "vkteams";
+    NewLine.Модуль      = "OPI_VKTeams";
+    NewLine.Метод       = "SetChatTitle";
+    NewLine.МетодПоиска = "SETCHATTITLE";
+    NewLine.Параметр    = "--chatid";
+    NewLine.Описание    = "Chat ID";
+    NewLine.Область     = "Chat management";
+
+
+    NewLine = CompositionTable.Add();
+    NewLine.Библиотека  = "vkteams";
+    NewLine.Модуль      = "OPI_VKTeams";
+    NewLine.Метод       = "SetChatTitle";
+    NewLine.МетодПоиска = "SETCHATTITLE";
+    NewLine.Параметр    = "--text";
+    NewLine.Описание    = "Title text";
+    NewLine.Область     = "Chat management";
+
+
+    NewLine = CompositionTable.Add();
+    NewLine.Библиотека  = "vkteams";
+    NewLine.Модуль      = "OPI_VKTeams";
+    NewLine.Метод       = "SetChatDescription";
+    NewLine.МетодПоиска = "SETCHATDESCRIPTION";
+    NewLine.Параметр    = "--token";
+    NewLine.Описание    = "Bot token";
+    NewLine.Область     = "Chat management";
+    NewLine.ОписаниеМетода   = "Sets new chat description";
+
+
+    NewLine = CompositionTable.Add();
+    NewLine.Библиотека  = "vkteams";
+    NewLine.Модуль      = "OPI_VKTeams";
+    NewLine.Метод       = "SetChatDescription";
+    NewLine.МетодПоиска = "SETCHATDESCRIPTION";
+    NewLine.Параметр    = "--chatid";
+    NewLine.Описание    = "Chat ID";
+    NewLine.Область     = "Chat management";
+
+
+    NewLine = CompositionTable.Add();
+    NewLine.Библиотека  = "vkteams";
+    NewLine.Модуль      = "OPI_VKTeams";
+    NewLine.Метод       = "SetChatDescription";
+    NewLine.МетодПоиска = "SETCHATDESCRIPTION";
+    NewLine.Параметр    = "--text";
+    NewLine.Описание    = "Description text";
+    NewLine.Область     = "Chat management";
+
+
+    NewLine = CompositionTable.Add();
+    NewLine.Библиотека  = "vkteams";
+    NewLine.Модуль      = "OPI_VKTeams";
+    NewLine.Метод       = "SetChatRules";
+    NewLine.МетодПоиска = "SETCHATRULES";
+    NewLine.Параметр    = "--token";
+    NewLine.Описание    = "Bot token";
+    NewLine.Область     = "Chat management";
+    NewLine.ОписаниеМетода   = "Sets new chat rules";
+
+
+    NewLine = CompositionTable.Add();
+    NewLine.Библиотека  = "vkteams";
+    NewLine.Модуль      = "OPI_VKTeams";
+    NewLine.Метод       = "SetChatRules";
+    NewLine.МетодПоиска = "SETCHATRULES";
+    NewLine.Параметр    = "--chatid";
+    NewLine.Описание    = "Chat ID";
+    NewLine.Область     = "Chat management";
+
+
+    NewLine = CompositionTable.Add();
+    NewLine.Библиотека  = "vkteams";
+    NewLine.Модуль      = "OPI_VKTeams";
+    NewLine.Метод       = "SetChatRules";
+    NewLine.МетодПоиска = "SETCHATRULES";
+    NewLine.Параметр    = "--text";
+    NewLine.Описание    = "Rules Text";
+    NewLine.Область     = "Chat management";
+
     Return CompositionTable;
 EndFunction
 

src/ru/OInt/core/Modules/OPI_VKTeams.os

@@ -667,6 +667,7 @@
 // Блокирует выбранного пользователя в чате
 //
 // Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
 // Метод в документации API: [GET ​​/chats​/blockUser](@teams.vk.com/botapi/#/chats/get_chats_blockUser)
 //
 // Параметры:
@@ -699,6 +700,7 @@
 // Разблокирует ранее заблокированного пользователя в чате
 //
 // Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
 // Метод в документации API: [GET ​​/chats/unblockUser](@teams.vk.com/botapi/#/chats/get_chats_unblockUser)
 //
 // Параметры:
@@ -726,6 +728,7 @@
 // Подтверждает вступление пользователя в закрытый чат
 //
 // Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
 // Метод в документации API: [GET ​​/chats/resolvePending](@teams.vk.com/botapi/#/chats/get_chats_resolvePending)
 //
 // Параметры:
@@ -747,6 +750,7 @@
 // Отклоняет вступление пользователя в закрытый чат
 //
 // Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
 // Метод в документации API: [GET ​​/chats/resolvePending](@teams.vk.com/botapi/#/chats/get_chats_resolvePending)
 //
 // Параметры:
@@ -764,6 +768,72 @@
 
 КонецФункции
 
+// Установить заголовок чата
+// Устанавливает новый заголовок чата
+//
+// Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
+// Метод в документации API: [GET ​​/chats/setTitle](@teams.vk.com/botapi/#/chats/get_chats_setTitle)
+//
+// Параметры:
+//  Токен   - Строка        - Токен бота      - token
+//  IDЧата  - Строка, Число - ID чата         - chatid
+//  Текст   - Строка        - Текст заголовка - text
+//
+// Возвращаемое значение:
+//  Соответствие Из КлючИЗначение - сериализованный JSON ответа от VK Teams
+Функция УстановитьЗаголовокЧата(Знач Токен, Знач IDЧата, Знач Текст) Экспорт
+
+    Ответ = ИзменитьПараметрыЧата(Токен, IDЧата, "title", Текст);
+
+    Возврат Ответ;
+
+КонецФункции
+
+// Установить описание чата
+// Устанавливает новое описание чата
+//
+// Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
+// Метод в документации API: [GET ​​/chats/setAbout](@teams.vk.com/botapi/#/chats/get_chats_setAbout)
+//
+// Параметры:
+//  Токен   - Строка        - Токен бота     - token
+//  IDЧата  - Строка, Число - ID чата        - chatid
+//  Текст   - Строка        - Текст описания - text
+//
+// Возвращаемое значение:
+//  Соответствие Из КлючИЗначение - сериализованный JSON ответа от VK Teams
+Функция УстановитьОписаниеЧата(Знач Токен, Знач IDЧата, Знач Текст) Экспорт
+
+    Ответ = ИзменитьПараметрыЧата(Токен, IDЧата, "about", Текст);
+
+    Возврат Ответ;
+
+КонецФункции
+
+// Установить правила чата
+// Устанавливает новые правила чата
+//
+// Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
+// Метод в документации API: [GET /chats/setRules](@teams.vk.com/botapi/#/chats/get_chats_setRules)
+//
+// Параметры:
+//  Токен   - Строка        - Токен бота     - token
+//  IDЧата  - Строка, Число - ID чата        - chatid
+//  Текст   - Строка        - Текст правил   - text
+//
+// Возвращаемое значение:
+//  Соответствие Из КлючИЗначение - сериализованный JSON ответа от VK Teams
+Функция УстановитьПравилаЧата(Знач Токен, Знач IDЧата, Знач Текст) Экспорт
+
+    Ответ = ИзменитьПараметрыЧата(Токен, IDЧата, "rules", Текст);
+
+    Возврат Ответ;
+
+КонецФункции
+
 #КонецОбласти
 
 #КонецОбласти
@@ -814,4 +884,18 @@
 
 КонецФункции
 
+Функция ИзменитьПараметрыЧата(Знач Токен, Знач IDЧата, Знач Параметр, Знач Значение)
+
+    URL       = "/chats/set" + ТРег(Параметр);
+    Параметры = НормализоватьОснову(URL, Токен);
+
+    OPI_Инструменты.ДобавитьПоле("chatId", IDЧата  , "Строка", Параметры);
+    OPI_Инструменты.ДобавитьПоле(Параметр, Значение, "Строка", Параметры);
+
+    Ответ = OPI_Инструменты.Get(URL, Параметры);
+
+    Возврат Ответ;
+
+КонецФункции
+
 #КонецОбласти

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

@@ -3189,6 +3189,9 @@
     VKTeams_РазблокироватьПользователяЧата(ПараметрыТеста);
     VKTeams_ОдобритьЗаявкуНаВступление(ПараметрыТеста);
     VKTeams_ОтклонитьЗаявкуНаВступление(ПараметрыТеста);
+    VKTeams_УстановитьЗаголовокЧата(ПараметрыТеста);
+    VKTeams_УстановитьОписаниеЧата(ПараметрыТеста);
+    VKTeams_УстановитьПравилаЧата(ПараметрыТеста);
 
 КонецПроцедуры
 
@@ -11068,6 +11071,55 @@
 
 КонецПроцедуры
 
+Процедура VKTeams_УстановитьЗаголовокЧата(ПараметрыФункции)
+
+    Токен   = ПараметрыФункции["VkTeams_Token"];
+    IDЧата  = ПараметрыФункции["VkTeams_ChatID2"];
+    Текст   = "Новый заголовок";
+
+    Результат = OPI_VKTeams.УстановитьЗаголовокЧата(Токен, IDЧата, Текст);
+
+    // END
+
+    OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УстановитьЗаголовокЧата", "VkTeams");
+
+    Проверка_ВКТИстина(Результат);
+
+КонецПроцедуры
+
+
+Процедура VKTeams_УстановитьОписаниеЧата(ПараметрыФункции)
+
+    Токен   = ПараметрыФункции["VkTeams_Token"];
+    IDЧата  = ПараметрыФункции["VkTeams_ChatID2"];
+    Текст   = "Новое описание";
+
+    Результат = OPI_VKTeams.УстановитьОписаниеЧата(Токен, IDЧата, Текст);
+
+    // END
+
+    OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УстановитьОписаниеЧата", "VkTeams");
+
+    Проверка_ВКТИстина(Результат);
+
+КонецПроцедуры
+
+Процедура VKTeams_УстановитьПравилаЧата(ПараметрыФункции)
+
+    Токен   = ПараметрыФункции["VkTeams_Token"];
+    IDЧата  = ПараметрыФункции["VkTeams_ChatID2"];
+    Текст   = "Текст новых правил";
+
+    Результат = OPI_VKTeams.УстановитьПравилаЧата(Токен, IDЧата, Текст);
+
+    // END
+
+    OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УстановитьПравилаЧата", "VkTeams");
+
+    Проверка_ВКТИстина(Результат);
+
+КонецПроцедуры
+
 #КонецОбласти
 
 #КонецОбласти

src/ru/OPI/src/CommonModules/OPI_VKTeams/Module.bsl

@@ -667,6 +667,7 @@
 // Блокирует выбранного пользователя в чате
 //
 // Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
 // Метод в документации API: [GET ​​/chats​/blockUser](@teams.vk.com/botapi/#/chats/get_chats_blockUser)
 //
 // Параметры:
@@ -699,6 +700,7 @@
 // Разблокирует ранее заблокированного пользователя в чате
 //
 // Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
 // Метод в документации API: [GET ​​/chats/unblockUser](@teams.vk.com/botapi/#/chats/get_chats_unblockUser)
 //
 // Параметры:
@@ -726,6 +728,7 @@
 // Подтверждает вступление пользователя в закрытый чат
 //
 // Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
 // Метод в документации API: [GET ​​/chats/resolvePending](@teams.vk.com/botapi/#/chats/get_chats_resolvePending)
 //
 // Параметры:
@@ -747,6 +750,7 @@
 // Отклоняет вступление пользователя в закрытый чат
 //
 // Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
 // Метод в документации API: [GET ​​/chats/resolvePending](@teams.vk.com/botapi/#/chats/get_chats_resolvePending)
 //
 // Параметры:
@@ -764,6 +768,72 @@
 
 КонецФункции
 
+// Установить заголовок чата
+// Устанавливает новый заголовок чата
+//
+// Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
+// Метод в документации API: [GET ​​/chats/setTitle](@teams.vk.com/botapi/#/chats/get_chats_setTitle)
+//
+// Параметры:
+//  Токен   - Строка        - Токен бота      - token
+//  IDЧата  - Строка, Число - ID чата         - chatid
+//  Текст   - Строка        - Текст заголовка - text
+//
+// Возвращаемое значение:
+//  Соответствие Из КлючИЗначение - сериализованный JSON ответа от VK Teams
+Функция УстановитьЗаголовокЧата(Знач Токен, Знач IDЧата, Знач Текст) Экспорт
+
+    Ответ = ИзменитьПараметрыЧата(Токен, IDЧата, "title", Текст);
+
+    Возврат Ответ;
+
+КонецФункции
+
+// Установить описание чата
+// Устанавливает новое описание чата
+//
+// Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
+// Метод в документации API: [GET ​​/chats/setAbout](@teams.vk.com/botapi/#/chats/get_chats_setAbout)
+//
+// Параметры:
+//  Токен   - Строка        - Токен бота     - token
+//  IDЧата  - Строка, Число - ID чата        - chatid
+//  Текст   - Строка        - Текст описания - text
+//
+// Возвращаемое значение:
+//  Соответствие Из КлючИЗначение - сериализованный JSON ответа от VK Teams
+Функция УстановитьОписаниеЧата(Знач Токен, Знач IDЧата, Знач Текст) Экспорт
+
+    Ответ = ИзменитьПараметрыЧата(Токен, IDЧата, "about", Текст);
+
+    Возврат Ответ;
+
+КонецФункции
+
+// Установить правила чата
+// Устанавливает новые правила чата
+//
+// Примечание:
+// Для вызова этого метода бот должен быть администратором в чате.
+// Метод в документации API: [GET /chats/setRules](@teams.vk.com/botapi/#/chats/get_chats_setRules)
+//
+// Параметры:
+//  Токен   - Строка        - Токен бота     - token
+//  IDЧата  - Строка, Число - ID чата        - chatid
+//  Текст   - Строка        - Текст правил   - text
+//
+// Возвращаемое значение:
+//  Соответствие Из КлючИЗначение - сериализованный JSON ответа от VK Teams
+Функция УстановитьПравилаЧата(Знач Токен, Знач IDЧата, Знач Текст) Экспорт
+
+    Ответ = ИзменитьПараметрыЧата(Токен, IDЧата, "rules", Текст);
+
+    Возврат Ответ;
+
+КонецФункции
+
 #КонецОбласти
 
 #КонецОбласти
@@ -814,4 +884,18 @@
 
 КонецФункции
 
+Функция ИзменитьПараметрыЧата(Знач Токен, Знач IDЧата, Знач Параметр, Знач Значение)
+
+    URL       = "/chats/set" + ТРег(Параметр);
+    Параметры = НормализоватьОснову(URL, Токен);
+
+    OPI_Инструменты.ДобавитьПоле("chatId", IDЧата  , "Строка", Параметры);
+    OPI_Инструменты.ДобавитьПоле(Параметр, Значение, "Строка", Параметры);
+
+    Ответ = OPI_Инструменты.Get(URL, Параметры);
+
+    Возврат Ответ;
+
+КонецФункции
+
 #КонецОбласти

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

@@ -3189,6 +3189,9 @@
     VKTeams_РазблокироватьПользователяЧата(ПараметрыТеста);
     VKTeams_ОдобритьЗаявкуНаВступление(ПараметрыТеста);
     VKTeams_ОтклонитьЗаявкуНаВступление(ПараметрыТеста);
+    VKTeams_УстановитьЗаголовокЧата(ПараметрыТеста);
+    VKTeams_УстановитьОписаниеЧата(ПараметрыТеста);
+    VKTeams_УстановитьПравилаЧата(ПараметрыТеста);
 
 КонецПроцедуры
 
@@ -11068,6 +11071,55 @@
 
 КонецПроцедуры
 
+Процедура VKTeams_УстановитьЗаголовокЧата(ПараметрыФункции)
+
+    Токен   = ПараметрыФункции["VkTeams_Token"];
+    IDЧата  = ПараметрыФункции["VkTeams_ChatID2"];
+    Текст   = "Новый заголовок";
+
+    Результат = OPI_VKTeams.УстановитьЗаголовокЧата(Токен, IDЧата, Текст);
+
+    // END
+
+    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УстановитьЗаголовокЧата", "VkTeams");
+
+    Проверка_ВКТИстина(Результат);
+
+КонецПроцедуры
+
+
+Процедура VKTeams_УстановитьОписаниеЧата(ПараметрыФункции)
+
+    Токен   = ПараметрыФункции["VkTeams_Token"];
+    IDЧата  = ПараметрыФункции["VkTeams_ChatID2"];
+    Текст   = "Новое описание";
+
+    Результат = OPI_VKTeams.УстановитьОписаниеЧата(Токен, IDЧата, Текст);
+
+    // END
+
+    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УстановитьОписаниеЧата", "VkTeams");
+
+    Проверка_ВКТИстина(Результат);
+
+КонецПроцедуры
+
+Процедура VKTeams_УстановитьПравилаЧата(ПараметрыФункции)
+
+    Токен   = ПараметрыФункции["VkTeams_Token"];
+    IDЧата  = ПараметрыФункции["VkTeams_ChatID2"];
+    Текст   = "Текст новых правил";
+
+    Результат = OPI_VKTeams.УстановитьПравилаЧата(Токен, IDЧата, Текст);
+
+    // END
+
+    // !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УстановитьПравилаЧата", "VkTeams");
+
+    Проверка_ВКТИстина(Результат);
+
+КонецПроцедуры
+
 #КонецОбласти
 
 #КонецОбласти

src/ru/cli/data/Classes/internal/Classes/vkteams.os

@@ -865,6 +865,99 @@
     НоваяСтрока.Описание    = "ID пользователя. Ответ на все заявки, если не заполнено (необяз. по ум. - Пустое значение)";
     НоваяСтрока.Область     = "Управление чатами";
 
+
+    НоваяСтрока = ТаблицаСостава.Добавить();
+    НоваяСтрока.Библиотека  = "vkteams";
+    НоваяСтрока.Модуль      = "OPI_VKTeams";
+    НоваяСтрока.Метод       = "УстановитьЗаголовокЧата";
+    НоваяСтрока.МетодПоиска = "УСТАНОВИТЬЗАГОЛОВОКЧАТА";
+    НоваяСтрока.Параметр    = "--token";
+    НоваяСтрока.Описание    = "Токен бота";
+    НоваяСтрока.Область     = "Управление чатами";
+    НоваяСтрока.ОписаниеМетода   = "Устанавливает новый заголовок чата";
+
+
+    НоваяСтрока = ТаблицаСостава.Добавить();
+    НоваяСтрока.Библиотека  = "vkteams";
+    НоваяСтрока.Модуль      = "OPI_VKTeams";
+    НоваяСтрока.Метод       = "УстановитьЗаголовокЧата";
+    НоваяСтрока.МетодПоиска = "УСТАНОВИТЬЗАГОЛОВОКЧАТА";
+    НоваяСтрока.Параметр    = "--chatid";
+    НоваяСтрока.Описание    = "ID чата";
+    НоваяСтрока.Область     = "Управление чатами";
+
+
+    НоваяСтрока = ТаблицаСостава.Добавить();
+    НоваяСтрока.Библиотека  = "vkteams";
+    НоваяСтрока.Модуль      = "OPI_VKTeams";
+    НоваяСтрока.Метод       = "УстановитьЗаголовокЧата";
+    НоваяСтрока.МетодПоиска = "УСТАНОВИТЬЗАГОЛОВОКЧАТА";
+    НоваяСтрока.Параметр    = "--text";
+    НоваяСтрока.Описание    = "Текст заголовка";
+    НоваяСтрока.Область     = "Управление чатами";
+
+
+    НоваяСтрока = ТаблицаСостава.Добавить();
+    НоваяСтрока.Библиотека  = "vkteams";
+    НоваяСтрока.Модуль      = "OPI_VKTeams";
+    НоваяСтрока.Метод       = "УстановитьОписаниеЧата";
+    НоваяСтрока.МетодПоиска = "УСТАНОВИТЬОПИСАНИЕЧАТА";
+    НоваяСтрока.Параметр    = "--token";
+    НоваяСтрока.Описание    = "Токен бота";
+    НоваяСтрока.Область     = "Управление чатами";
+    НоваяСтрока.ОписаниеМетода   = "Устанавливает новое описание чата";
+
+
+    НоваяСтрока = ТаблицаСостава.Добавить();
+    НоваяСтрока.Библиотека  = "vkteams";
+    НоваяСтрока.Модуль      = "OPI_VKTeams";
+    НоваяСтрока.Метод       = "УстановитьОписаниеЧата";
+    НоваяСтрока.МетодПоиска = "УСТАНОВИТЬОПИСАНИЕЧАТА";
+    НоваяСтрока.Параметр    = "--chatid";
+    НоваяСтрока.Описание    = "ID чата";
+    НоваяСтрока.Область     = "Управление чатами";
+
+
+    НоваяСтрока = ТаблицаСостава.Добавить();
+    НоваяСтрока.Библиотека  = "vkteams";
+    НоваяСтрока.Модуль      = "OPI_VKTeams";
+    НоваяСтрока.Метод       = "УстановитьОписаниеЧата";
+    НоваяСтрока.МетодПоиска = "УСТАНОВИТЬОПИСАНИЕЧАТА";
+    НоваяСтрока.Параметр    = "--text";
+    НоваяСтрока.Описание    = "Текст описания";
+    НоваяСтрока.Область     = "Управление чатами";
+
+
+    НоваяСтрока = ТаблицаСостава.Добавить();
+    НоваяСтрока.Библиотека  = "vkteams";
+    НоваяСтрока.Модуль      = "OPI_VKTeams";
+    НоваяСтрока.Метод       = "УстановитьПравилаЧата";
+    НоваяСтрока.МетодПоиска = "УСТАНОВИТЬПРАВИЛАЧАТА";
+    НоваяСтрока.Параметр    = "--token";
+    НоваяСтрока.Описание    = "Токен бота";
+    НоваяСтрока.Область     = "Управление чатами";
+    НоваяСтрока.ОписаниеМетода   = "Устанавливает новые правила чата";
+
+
+    НоваяСтрока = ТаблицаСостава.Добавить();
+    НоваяСтрока.Библиотека  = "vkteams";
+    НоваяСтрока.Модуль      = "OPI_VKTeams";
+    НоваяСтрока.Метод       = "УстановитьПравилаЧата";
+    НоваяСтрока.МетодПоиска = "УСТАНОВИТЬПРАВИЛАЧАТА";
+    НоваяСтрока.Параметр    = "--chatid";
+    НоваяСтрока.Описание    = "ID чата";
+    НоваяСтрока.Область     = "Управление чатами";
+
+
+    НоваяСтрока = ТаблицаСостава.Добавить();
+    НоваяСтрока.Библиотека  = "vkteams";
+    НоваяСтрока.Модуль      = "OPI_VKTeams";
+    НоваяСтрока.Метод       = "УстановитьПравилаЧата";
+    НоваяСтрока.МетодПоиска = "УСТАНОВИТЬПРАВИЛАЧАТА";
+    НоваяСтрока.Параметр    = "--text";
+    НоваяСтрока.Описание    = "Текст правил";
+    НоваяСтрока.Область     = "Управление чатами";
+
     Возврат ТаблицаСостава;
 КонецФункции