diff --git a/src/cf/CommonForms/ТелеграмВебХук/Ext/Form.xml b/src/cf/CommonForms/ТелеграмВебХук/Ext/Form.xml index 2507edc..3a11f59 100644 --- a/src/cf/CommonForms/ТелеграмВебХук/Ext/Form.xml +++ b/src/cf/CommonForms/ТелеграмВебХук/Ext/Form.xml @@ -4,8 +4,6 @@ ПослеЗаписи - ПриОткрытии - ПриСозданииНаСервере diff --git a/src/cf/CommonForms/ТелеграмВебХук/Ext/Form/Module.bsl b/src/cf/CommonForms/ТелеграмВебХук/Ext/Form/Module.bsl index 1bc4edc..14bf427 100644 --- a/src/cf/CommonForms/ТелеграмВебХук/Ext/Form/Module.bsl +++ b/src/cf/CommonForms/ТелеграмВебХук/Ext/Form/Module.bsl @@ -1,27 +1,26 @@ - +#Область ОбработчикиСобытийФормы + &НаКлиенте Процедура ПослеЗаписи(ПараметрыЗаписи) Ответ = ТелеграмМетодыВызовСервера.SetWebHook(ТелеграмВебХук()); - ТекстСообщения = СтрШаблон(?(Ответ.Успех, "Успешно: %1","Ошибка: %1"), Ответ.Описание); + ТекстСообщения = СтрШаблон(?(Ответ.Успех, "Успешно: %1", "Ошибка: %1"), Ответ.Описание); Сообщение = Новый СообщениеПользователю; Сообщение.Текст = ТекстСообщения; Сообщение.Сообщить(); КонецПроцедуры -&НаСервереБезКонтекста -Функция ТелеграмВебХук() +#КонецОбласти - Возврат Константы.ТелеграмВебХук.Получить(); -КонецФункции +#Область ОбработчикиКомандФормы &НаКлиенте Процедура УдалитьВебХук(Команда) Ответ = ТелеграмМетодыВызовСервера.DeleteWebhook(); - ТекстСообщения = СтрШаблон(?(Ответ.Успех, "Успешно: %1","Ошибка: %1"), Ответ.Описание); + ТекстСообщения = СтрШаблон(?(Ответ.Успех, "Успешно: %1", "Ошибка: %1"), Ответ.Описание); Сообщение = Новый СообщениеПользователю; Сообщение.Текст = ТекстСообщения; Сообщение.Сообщить(); @@ -33,11 +32,25 @@ Ответ = ТелеграмМетодыВызовСервера.GetWebhookInfo(); Если Ответ.Успех И ЗначениеЗаполнено(Ответ.Тело) Тогда - Для каждого ПараметрОтвета из Ответ.Тело["result"] Цикл + Для каждого ПараметрОтвета Из Ответ.Тело["result"] Цикл Сообщение = Новый СообщениеПользователю; Сообщение.Текст = "" + ПараметрОтвета.Ключ + "=" + ПараметрОтвета.Значение; Сообщение.Сообщить(); КонецЦикла; - КонецЕсли + КонецЕсли; КонецПроцедуры + +#КонецОбласти + +#Область СлужебныеПроцедурыИФункции + +&НаСервереБезКонтекста +Функция ТелеграмВебХук() + + Возврат Константы.ТелеграмВебХук.Получить(); + +КонецФункции + +#КонецОбласти + diff --git a/src/cf/VERSION b/src/cf/VERSION index b3f7e9e..29182d7 100644 --- a/src/cf/VERSION +++ b/src/cf/VERSION @@ -1,2 +1,2 @@  -17 +18