From 0172c538be1b39caa753cbe6563d4a0653195780 Mon Sep 17 00:00:00 2001 From: kashey Date: Tue, 27 May 2025 18:16:38 +0300 Subject: [PATCH] =?UTF-8?q?-=20=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=B8=D0=BB?= =?UTF-8?q?=20=D0=B4=D0=BE=D1=80=D0=B0=D0=B1=D0=BE=D1=82=D0=BA=D0=B8?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/cf/Catalogs/ТелеграмПользователь.xml | 84 +++++++++ .../Ext/Module.bsl | 125 +++++++++++++ .../ТелеграмОбщегоНазначения/Ext/Module.bsl | 36 +++- .../ТелеграмРаботаСКлавиатурой/Ext/Module.bsl | 32 +++- .../Forms/Форма/Ext/Form/Module.bsl | 164 +++++++++++++----- .../HTTPСервис_Telegram/Ext/Module.bsl | 3 +- src/cf/Subsystems/Обновления.xml | 2 + src/cf/Subsystems/ТелеграмБот.xml | 2 + src/cf/VERSION | 2 +- 9 files changed, 397 insertions(+), 53 deletions(-) diff --git a/src/cf/Catalogs/ТелеграмПользователь.xml b/src/cf/Catalogs/ТелеграмПользователь.xml index 3d6ff8d..eaa5158 100644 --- a/src/cf/Catalogs/ТелеграмПользователь.xml +++ b/src/cf/Catalogs/ТелеграмПользователь.xml @@ -220,6 +220,90 @@ Use + + + СтатусДиалога + + + ru + Статус диалога + + + + + cfg:EnumRef.ТелеграмСтатусДиалога + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + ForItem + DontIndex + Use + Use + + + + + ДополнительнаяИнформация + + + ru + Дополнительная информация + + + + + xs:string + + 0 + Variable + + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + ForItem + DontIndex + Use + Use + + \ No newline at end of file diff --git a/src/cf/CommonModules/РаботаСОбновлениямиВызовСервера/Ext/Module.bsl b/src/cf/CommonModules/РаботаСОбновлениямиВызовСервера/Ext/Module.bsl index 0f6da70..d9292ef 100644 --- a/src/cf/CommonModules/РаботаСОбновлениямиВызовСервера/Ext/Module.bsl +++ b/src/cf/CommonModules/РаботаСОбновлениямиВызовСервера/Ext/Module.bsl @@ -52,6 +52,50 @@ КонецФункции +Функция СписокКонфигураций(ИдЧата) Экспорт + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ РАЗЛИЧНЫЕ + | ОтслеживаниеВерсийКонфигураций.Конфигурация КАК Конфигурация, + | ОтслеживаниеВерсийКонфигураций.Конфигурация.Наименование КАК КонфигурацияНаименование, + | ОтслеживаниеВерсийКонфигураций.Конфигурация.Имя КАК КонфигурацияИмя, + | ИСТИНА КАК Подписка + |ПОМЕСТИТЬ ВТ_ОтслеживаемыеКонфигурации + |ИЗ + | РегистрСведений.ОтслеживаниеВерсийКонфигураций КАК ОтслеживаниеВерсийКонфигураций + |ГДЕ + | ОтслеживаниеВерсийКонфигураций.ИдЧата = &ИдЧата + |; + | + |//////////////////////////////////////////////////////////////////////////////// + |ВЫБРАТЬ + | Конфигурации.Наименование КАК Наименование, + | Конфигурации.Имя КАК Имя, + | ЕСТЬNULL(ВТ_ОтслеживаемыеКонфигурации.Подписка, ЛОЖЬ) КАК Подписка + |ИЗ + | Справочник.Конфигурации КАК Конфигурации + | ЛЕВОЕ СОЕДИНЕНИЕ ВТ_ОтслеживаемыеКонфигурации КАК ВТ_ОтслеживаемыеКонфигурации + | ПО (ВТ_ОтслеживаемыеКонфигурации.Конфигурация = Конфигурации.Ссылка) + | + |УПОРЯДОЧИТЬ ПО + | Подписка УБЫВ"; + + Запрос.УстановитьПараметр("ИдЧата", ИдЧата); + РезультатЗапроса = Запрос.Выполнить(); + ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); + МассивКонфигураций = Новый Массив; + + Пока ВыборкаДетальныеЗаписи.Следующий() Цикл + Конфигурация = Новый Структура("Наименование, Имя, Подписка", ВыборкаДетальныеЗаписи.Наименование, + ВыборкаДетальныеЗаписи.Имя, ВыборкаДетальныеЗаписи.Подписка); + + МассивКонфигураций.Добавить(Конфигурация); + КонецЦикла; + + Возврат МассивКонфигураций; + +КонецФункции Функция АктуализироватьВерсииКонфигураций()Экспорт @@ -101,6 +145,87 @@ КонецФункции +Функция КонфигурацияПоИмени(ИмяКонфигурации) Экспорт + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ + | Конфигурации.Ссылка КАК Конфигурация + |ИЗ + | Справочник.Конфигурации КАК Конфигурации + |ГДЕ + | Конфигурации.Имя = &Имя"; + + Запрос.УстановитьПараметр("Имя", ИмяКонфигурации); + + РезультатЗапроса = Запрос.Выполнить(); + + ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); + + Если ВыборкаДетальныеЗаписи.Следующий() Тогда + Возврат ВыборкаДетальныеЗаписи.Конфигурация; + КонецЕсли; + + Возврат Неопределено; + +КонецФункции + +Процедура УстановитьСтатусДиалога(ИдЧата, НовыйСтатус, ДополнительнаяИнформация) Экспорт + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ + | ТелеграмПользователь.Ссылка КАК Ссылка, + | ТелеграмПользователь.СтатусДиалога КАК СтатусДиалога + |ИЗ + | Справочник.ТелеграмПользователь КАК ТелеграмПользователь + |ГДЕ + | ТелеграмПользователь.id = &ИдЧата"; + + Запрос.УстановитьПараметр("ИдЧата", ИдЧата); + + РезультатЗапроса = Запрос.Выполнить(); + + ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); + + Если ВыборкаДетальныеЗаписи.Следующий() Тогда + ПользовательОбъект = ВыборкаДетальныеЗаписи.Ссылка.ПолучитьОбъект(); + Если ПользовательОбъект <> Неопределено Тогда + ПользовательОбъект.СтатусДиалога = НовыйСтатус; + ПользовательОбъект.ДополнительнаяИнформация = ДополнительнаяИнформация; + ПользовательОбъект.Записать(); + КонецЕсли; + КонецЕсли; + +КонецПроцедуры + +Функция ПолучитьДанныеПользователя(ИдЧата) Экспорт + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ + | ТелеграмПользователь.СтатусДиалога КАК СтатусДиалога, + | ТелеграмПользователь.ДополнительнаяИнформация КАК ДополнительнаяИнформация + |ИЗ + | Справочник.ТелеграмПользователь КАК ТелеграмПользователь + |ГДЕ + | ТелеграмПользователь.id = &ИдЧата"; + + Запрос.УстановитьПараметр("ИдЧата", ИдЧата); + + РезультатЗапроса = Запрос.Выполнить(); + + ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); + + Если ВыборкаДетальныеЗаписи.Следующий() Тогда + Возврат Новый Структура("СтатусДиалога, ДополнительнаяИнформация", ВыборкаДетальныеЗаписи.СтатусДиалога, + ВыборкаДетальныеЗаписи.ДополнительнаяИнформация); + КонецЕсли; + + Возврат Неопределено; + +КонецФункции + #КонецОбласти #Область СлужебныеПроцедурыИФункции diff --git a/src/cf/CommonModules/ТелеграмОбщегоНазначения/Ext/Module.bsl b/src/cf/CommonModules/ТелеграмОбщегоНазначения/Ext/Module.bsl index 115c103..fbc96e6 100644 --- a/src/cf/CommonModules/ТелеграмОбщегоНазначения/Ext/Module.bsl +++ b/src/cf/CommonModules/ТелеграмОбщегоНазначения/Ext/Module.bsl @@ -66,7 +66,11 @@ МассивСообщенийТелеграм.Добавить(ПараметрыСообщения) КонецЦикла; ИначеЕсли ЭтоОдиночноеОбновление(ДанныеОбновления) Тогда - ПараметрыСообщения = СтруктураСообщенияТелеграм(Обновление); + Если ДанныеОбновления.Получить("message") <> Неопределено Тогда + ПараметрыСообщения = СтруктураСообщенияТелеграм(ДанныеОбновления); + ИначеЕсли ДанныеОбновления.Получить("callback_query") <> Неопределено Тогда + ПараметрыСообщения = СтруктураКоллбэкЗапроса(ДанныеОбновления); + КонецЕсли; МассивСообщенийТелеграм.Добавить(ПараметрыСообщения) КонецЕсли; @@ -96,6 +100,33 @@ КонецФункции +Функция СтруктураКоллбэкЗапроса(Обновление) + + ДанныеСообщения = Обновление["callback_query"]; + + ПараметрыСообщения = Новый Структура; + ПараметрыСообщения.Вставить("ИдКоллбэкЗапроса", Обновление["update_id"]); + + Автор = АвторСообщения(ДанныеСообщения["from"]); + ПараметрыСообщения.Вставить("Автор", Автор); + + Если ДанныеСообщения.Получить("message") <> Неопределено Тогда + НовоеСообщение = ТелеграмСообщение(ДанныеСообщения["message"], Автор); + ПараметрыСообщения.Вставить("Сообщение", НовоеСообщение); + КонецЕсли; + + ПараметрыСообщения.Вставить("Дата", ТекущаяДатаСеанса()); + + ИдЧата = Автор.id; + ПараметрыСообщения.Вставить("ИдЧата", ИдЧата); + + ДанныеКоллбэка = ДанныеСообщения["data"]; + ПараметрыСообщения.Вставить("ДанныеКоллбэка", ДанныеКоллбэка); + + Возврат ПараметрыСообщения; + +КонецФункции + Процедура СохранитьСообщениеВБазу(СтруктураСообщения) Экспорт МенеджерЗаписи = РегистрыСведений.ТелеграмСообщения.СоздатьМенеджерЗаписи(); @@ -144,8 +175,9 @@ ИдОбновления = СоответствиеОбновления.Получить("update_id"); Сообщение = СоответствиеОбновления.Получить("message"); + КоллбэкЗапрос = СоответствиеОбновления.Получить("callback_query"); - Если ИдОбновления <> Неопределено И Сообщение <> Неопределено Тогда + Если ИдОбновления <> Неопределено И (Сообщение <> Неопределено ИЛИ КоллбэкЗапрос <> Неопределено) Тогда Возврат Истина; КонецЕсли; diff --git a/src/cf/CommonModules/ТелеграмРаботаСКлавиатурой/Ext/Module.bsl b/src/cf/CommonModules/ТелеграмРаботаСКлавиатурой/Ext/Module.bsl index 91fa2f3..3ca7c76 100644 --- a/src/cf/CommonModules/ТелеграмРаботаСКлавиатурой/Ext/Module.bsl +++ b/src/cf/CommonModules/ТелеграмРаботаСКлавиатурой/Ext/Module.bsl @@ -16,7 +16,35 @@ КонецФункции -Функция КнопкаКлавиатуры(Надпись) Экспорт +Функция КлавиатураВстроенная(Клавиатура) Экспорт + + СоответствиеКлавиатуры = Новый Соответствие(); + + СоответствиеКлавиатуры.Вставить("inline_keyboard", Клавиатура); + + Возврат СоответствиеКлавиатуры; + +КонецФункции + + +Функция КнопкаКлавиатурыВстроенной(Надпись, Url = Неопределено, CallbackData = Неопределено) Экспорт + + СоответствиеКнопка = Новый Соответствие; + СоответствиеКнопка.Вставить("text", ?(НЕ ЗначениеЗаполнено(Надпись), "", Надпись)); + + Если Url <> Неопределено Тогда + СоответствиеКнопка.Вставить("url", Url); + КонецЕсли; + + Если CallbackData <> Неопределено Тогда + СоответствиеКнопка.Вставить("callback_data", CallbackData); + КонецЕсли; + + Возврат СоответствиеКнопка; + +КонецФункции + +Функция КнопкаКлавиатурыОтвета(Надпись) Экспорт СоответствиеКнопка = Новый Соответствие; СоответствиеКнопка.Вставить("text", ?(НЕ ЗначениеЗаполнено(Надпись), "", Надпись)); @@ -34,7 +62,7 @@ КонецЕсли; Для каждого НадписьКнопки Из МассивНаименованийКнопок Цикл - Результат.Добавить(КнопкаКлавиатуры(НадписьКнопки)); + Результат.Добавить(КнопкаКлавиатурыОтвета(НадписьКнопки)); КонецЦикла; Возврат Результат; diff --git a/src/cf/DataProcessors/РаботаССообщениями/Forms/Форма/Ext/Form/Module.bsl b/src/cf/DataProcessors/РаботаССообщениями/Forms/Форма/Ext/Form/Module.bsl index aa61bd9..86ea983 100644 --- a/src/cf/DataProcessors/РаботаССообщениями/Forms/Форма/Ext/Form/Module.bsl +++ b/src/cf/DataProcessors/РаботаССообщениями/Forms/Форма/Ext/Form/Module.bsl @@ -3,55 +3,124 @@ Ответ = ПолучитьСообщенияНаСервере(); ВывестиОтвет(Ответ); - + КонецПроцедуры &НаСервереБезКонтекста Функция ПолучитьСообщенияНаСервере() - + Ответ = ТелеграмМетодыВызовСервера.GetUpdates(); - Если Ответ.Успех Тогда - //МассивРядов = Новый Массив; - //МассивКнопок = ТелеграмРаботаСКлавиатурой.РядКнопок("один;два;три"); - //МассивРядов.Добавить(МассивКнопок); - //МассивКнопок = ТелеграмРаботаСКлавиатурой.РядКнопок("Выбрать конфигурацию;Актуальная версия;Калькулятор обновлений"); - //МассивРядов.Добавить(МассивКнопок); - //Клавиатура = ТелеграмРаботаСКлавиатурой.КлавиатураОтвета(МассивРядов, Истина, Истина); - // - //МассивСообщенийТелеграм = ТелеграмОбщегоНазначения.ОбновленияТелеграм(Ответ.Тело); - //Для каждого СообщениеТелеграм Из МассивСообщенийТелеграм Цикл - // ТелеграмОбщегоНазначения.СохранитьСообщениеВБазу(СообщениеТелеграм); - // ТелеграмМетодыВызовСервера.SendMessage(СообщениеТелеграм.ИдЧата, СообщениеТелеграм.Сообщение.text, Клавиатура); - //КонецЦикла; - - МассивСообщенийТелеграм = ТелеграмОбщегоНазначения.ОбновленияТелеграм(Ответ.Тело); - Для каждого СообщениеТелеграм Из МассивСообщенийТелеграм Цикл - ТелеграмОбщегоНазначения.СохранитьСообщениеВБазу(СообщениеТелеграм); - Если СообщениеТелеграм.Сообщение.text = "Конфигурации" Тогда - ТекстОтвета = "Комплексная автоматизация" + Символы.ПС + - "Бухгалтерия предприятия" + Символы.ПС + - "Зарплата и управление персоналом" + Символы.ПС + - "Управление торговлей"; - - ТелеграмМетодыВызовСервера.SendMessage(СообщениеТелеграм.ИдЧата, ТекстОтвета); - ИначеЕсли СообщениеТелеграм.Сообщение.text = "Подписки" Тогда - МассивПодписок = РаботаСОбновлениямиВызовСервера.КонфигурацииИзПодписки(СообщениеТелеграм.ИдЧата); - ТекстОтвета = ""; - Для каждого Конфигурация Из МассивПодписок Цикл - ТекстОтвета = ТекстОтвета + СтрШаблон("%1(%2)%3",Конфигурация.Наименование, Конфигурация.ТекущаяВерсия, Символы.ПС); - КонецЦикла; - ТелеграмМетодыВызовСервера.SendMessage(СообщениеТелеграм.ИдЧата, ТекстОтвета); - КонецЕсли; - //ТелеграмМетодыВызовСервера.SendMessage(СообщениеТелеграм.ИдЧата, СообщениеТелеграм.Сообщение.text); - КонецЦикла; - - КонецЕсли; + БотОбщегоНазначения.ОбработкаКомандыБота(Ответ); + + //Если Ответ.Успех Тогда + // МассивСообщенийТелеграм = ТелеграмОбщегоНазначения.ОбновленияТелеграм(Ответ.Тело); + // Для каждого СообщениеТелеграм Из МассивСообщенийТелеграм Цикл + // ТелеграмОбщегоНазначения.СохранитьСообщениеВБазу(СообщениеТелеграм); + // + // Если СообщениеТелеграм.Сообщение.text = "/start" Тогда + // ТекстОтвета = "Привет! Я бот, который поможет тебе следить за обновлениями конфигураций 1С." + Символы.ПС + + // Символы.ВК + Символы.ПС + + // "Что я умею:" + Символы.ПС + + // "- Отслеживать новые релизы" + Символы.ПС + + // "- Присылать уведомления о выходе обновлений" + Символы.ПС + + // "- Показывать текущую версию" + Символы.ПС + + // Символы.ВК + Символы.ПС + + // "/subscribe - Список конфигураций для отслеживания" + Символы.ПС + + // "/add - Добавить конфигурацию в список отслеживания" + Символы.ПС + + // "/delete - Удалить конфигурацию из списка отслеживания" + Символы.ПС + + // Символы.ВК + Символы.ПС + + // "/help — Помощь"; + // + // ТелеграмМетодыВызовСервера.SendMessage(СообщениеТелеграм.ИдЧата, ТекстОтвета,,); + // ИначеЕсли СообщениеТелеграм.Сообщение.text = "/subscribe" Тогда + // КонфигурацииДляВыбора = РаботаСОбновлениямиВызовСервера.КонфигурацииДляВыбора(СообщениеТелеграм.ИдЧата); + // + // Если КонфигурацииДляВыбора.Количество() = 0 Тогда + // ТекстОтвета = "Не удалось получить список конфигураций"; + // Иначе + // ТекстОтвета = ""; + // Для каждого ПунктМенюПодписки Из КонфигурацииДляВыбора Цикл + // ТекстОтвета = ТекстОтвета + СтрШаблон("%1 %2%3", ?(ПунктМенюПодписки.Подписка, "[X]", "[ ]"), + // ПунктМенюПодписки.Наименование,Символы.ПС); + // КонецЦикла; + // КонецЕсли; + // + // ТелеграмМетодыВызовСервера.SendMessage(СообщениеТелеграм.ИдЧата, ТекстОтвета,,); + // ИначеЕсли СообщениеТелеграм.Сообщение.text = "/add" Тогда + // КонфигурацииДляВыбора = РаботаСОбновлениямиВызовСервера.КонфигурацииДляВыбора(СообщениеТелеграм.ИдЧата); + // + // Если КонфигурацииДляВыбора.Количество() = 0 Тогда + // ТекстОтвета = "Не удалось получить список конфигураций"; + // Иначе + // МассивРядов = Новый Массив; + // ТекстОтвета = "Выберите нужную конфигурацию для отслеживания обновлений"; + // Для каждого ПунктМенюПодписки Из КонфигурацииДляВыбора Цикл + // Если НЕ ПунктМенюПодписки.Подписка Тогда + // МассивКнопок = Новый Массив; + // МассивКнопок.Добавить(ТелеграмРаботаСКлавиатурой.КнопкаКлавиатуры + // ("/add_conf " + ПунктМенюПодписки.Наименование)); + // МассивРядов.Добавить(МассивКнопок); + // КонецЕсли; + // КонецЦикла; + // КонецЕсли; + // + // Клавиатура = ТелеграмРаботаСКлавиатурой.КлавиатураОтвета(МассивРядов, Истина, Истина); + // ТелеграмМетодыВызовСервера.SendMessage(СообщениеТелеграм.ИдЧата, ТекстОтвета,,Клавиатура); + // ИначеЕсли СтрНачинаетсяС(СообщениеТелеграм.Сообщение.text, "/add_conf") Тогда + // Результат = ДобавитьКонфигурациюВСписокОтслеживания(СообщениеТелеграм.Сообщение.text, СообщениеТелеграм.ИдЧата); + // КонецЕсли; + // КонецЦикла; + //КонецЕсли; Возврат Ответ; КонецФункции +//&НаСервереБезКонтекста +//Функция ДобавитьКонфигурациюВСписокОтслеживания(ТекстСообщения, ИдЧата) +// +// КомандаДобавленияКонфигурации = "/add_conf"; +// +// Если НЕ СтрНачинаетсяС(ТекстСообщения, КомандаДобавленияКонфигурации) Тогда +// Возврат Ложь; +// КонецЕсли; +// +// НаименованиеКонфигурации = СокрЛП(Сред(ТекстСообщения, СтрДлина(КомандаДобавленияКонфигурации) + 1, +// СтрДлина(ТекстСообщения) - СтрДлина(КомандаДобавленияКонфигурации)+ 1)); +// +// Запрос = Новый Запрос; +// Запрос.Текст = +// "ВЫБРАТЬ +// | Конфигурации.Ссылка КАК Конфигурация, +// | &ИдЧата КАК ИдЧата, +// | &ТекущаяВерсия КАК ТекущаяВерсия, +// | &АктуальнаяВерсия КАК АктуальнаяВерсия +// |ИЗ +// | Справочник.Конфигурации КАК Конфигурации +// |ГДЕ +// | Конфигурации.Наименование ПОДОБНО ""%"" + &Наименование + ""%"""; +// +// Запрос.УстановитьПараметр("Наименование", НаименованиеКонфигурации); +// Запрос.УстановитьПараметр("ИдЧата", ИдЧата); +// Запрос.УстановитьПараметр("ТекущаяВерсия", "1.1.1.1"); +// Запрос.УстановитьПараметр("АктуальнаяВерсия", "1.2.3.4"); +// +// РезультатЗапроса = Запрос.Выполнить(); +// +// ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); +// +// Если ВыборкаДетальныеЗаписи.Следующий() Тогда +// МенеджерЗаписи = РегистрыСведений.ОтслеживаниеВерсийКонфигураций.СоздатьМенеджерЗаписи(); +// ЗаполнитьЗначенияСвойств(МенеджерЗаписи, ВыборкаДетальныеЗаписи); +// МенеджерЗаписи.Записать(); +// Возврат Истина; +// КонецЕсли; +// +// Возврат Ложь; +// +//КонецФункции + &НаКлиенте Процедура getWebhookInfo(Команда) @@ -89,10 +158,10 @@ //ВторойРядКнопок.Добавить(ТелеграмРаботаСКлавиатурой.КнопкаКлавиатуры(Эмоджи)); //МассивРядов.Добавить(ВторойРядКнопок); Клавиатура = ТелеграмРаботаСКлавиатурой.КлавиатураОтвета(МассивРядов, Истина, Истина); - + Ответ = ТелеграмМетодыВызовСервера.SendMessage(ИдЧата, СообщениеДляОтправки, - ПредопределенноеЗначение("Перечисление.ТелеграмРежимРазметки.HTML"), Клавиатура); + ПредопределенноеЗначение("Перечисление.ТелеграмРежимРазметки.HTML"), Клавиатура); Если НЕ Ответ = Неопределено Тогда ВывестиОтвет(Ответ); КонецЕсли; @@ -123,7 +192,7 @@ &НаКлиенте Процедура СкачатьФайл(Команда) - + СкачатьФайлНаСервере(ИдФайла); @@ -134,16 +203,16 @@ // ////Ответ = СкачатьФайлНаСервере(ПутьКФайлуНаСервере); //Ответ = СкачатьФайлНаСервере(ПутьКФайлуНаСервереТелеграм); - + //Если НЕ Ответ = Неопределено Тогда // //ВывестиОтвет(Ответ); //КонецЕсли; - + КонецПроцедуры &НаСервереБезКонтекста Процедура СкачатьФайлНаСервере(ИдФайла) - + НовыйДокумент = Справочники.ТелеграмДокумент.СоздатьЭлемент(); НовыйДокумент.Наименование = "Тестовый документ"; НовыйДокумент.id = "AgADLXoAAmMlIUk"; @@ -158,11 +227,11 @@ КонецЕсли; НовыйДокумент.Записать(); - + Сообщение = Новый СообщениеПользователю; Сообщение.Текст = СтрШаблон("Документ %1 успешно записан", НовыйДокумент.Ссылка); Сообщение.Сообщить(); - + КонецПроцедуры &НаКлиенте @@ -175,7 +244,7 @@ &НаСервереБезКонтекста Функция ДанныеДокументаСервер() - + Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ @@ -208,3 +277,4 @@ Возврат БиблиотекаКартинок.КартинкаБот.ПолучитьДвоичныеДанные(); КонецФункции + diff --git a/src/cf/HTTPServices/HTTPСервис_Telegram/Ext/Module.bsl b/src/cf/HTTPServices/HTTPСервис_Telegram/Ext/Module.bsl index 94eec5d..9512044 100644 --- a/src/cf/HTTPServices/HTTPСервис_Telegram/Ext/Module.bsl +++ b/src/cf/HTTPServices/HTTPСервис_Telegram/Ext/Module.bsl @@ -2,7 +2,8 @@ Функция ШаблонURL1PostGetUpdate(Запрос) Попытка - ТелеграмОбщегоНазначения.ОбработатьИСохранитьОбновленияТелеграм(Запрос.ПолучитьТелоКакСтроку()); + //ТелеграмОбщегоНазначения.ОбработатьИСохранитьОбновленияТелеграм(Запрос.ПолучитьТелоКакСтроку()); + БотОбщегоНазначения.ОбработкаКомандыБота(Запрос.ПолучитьТелоКакСтроку()); Ответ = HttpОбщегоНазначения.ОтветУспех(); Возврат Ответ; Исключение diff --git a/src/cf/Subsystems/Обновления.xml b/src/cf/Subsystems/Обновления.xml index a9b82c1..b52c1fc 100644 --- a/src/cf/Subsystems/Обновления.xml +++ b/src/cf/Subsystems/Обновления.xml @@ -19,6 +19,8 @@ DataProcessor.РаботаСОбновлениями InformationRegister.ОтслеживаниеВерсийКонфигураций Catalog.Конфигурации + Enum.ТелеграмСтатусДиалога + Enum.ВидыДанныхКоллбэков diff --git a/src/cf/Subsystems/ТелеграмБот.xml b/src/cf/Subsystems/ТелеграмБот.xml index 311f1b6..d272472 100644 --- a/src/cf/Subsystems/ТелеграмБот.xml +++ b/src/cf/Subsystems/ТелеграмБот.xml @@ -29,6 +29,8 @@ Catalog.ТелеграмДокумент CommonPicture.КартинкаБот Enum.ТелеграмРежимРазметки + Enum.ТелеграмСтатусДиалога + Enum.ВидыДанныхКоллбэков diff --git a/src/cf/VERSION b/src/cf/VERSION index b82891c..66caf1d 100644 --- a/src/cf/VERSION +++ b/src/cf/VERSION @@ -1,2 +1,2 @@  -7 +8