Показаны различия между двумя версиями страницы.
| Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
|
delivery_designer_utcup_3_5 [2025/03/12 16:23] webmaster [Редактирование общего модуля "ШаблоныСообщенийСервер"] |
delivery_designer_utcup_3_5 [2025/03/13 16:29] (текущий) webmaster [Редактирование модуля "ОтправкаSMSЧерезTURBO"] |
||
|---|---|---|---|
| Строка 145: | Строка 145: | ||
| + | ==== Редактирование модуля " | ||
| + | |||
| + | === Метод " | ||
| + | Приведем код к следующему виду: | ||
| + | < | ||
| + | УстановитьПривилегированныйРежим(Истина); | ||
| + | НастройкиОтправкиSMS = НастройкиОтправкиSMS(); | ||
| + | УстановитьПривилегированныйРежим(Ложь); | ||
| + | |||
| + | //++ | ||
| + | //Если ИмяОтправителя = Неопределено Тогда | ||
| + | Если ИмяОтправителя = Неопределено ИЛИ ИмяОтправителя = " " Тогда | ||
| + | //-- | ||
| + | ИмяОтправителя = НастройкиОтправкиSMS.ИмяОтправителя; | ||
| + | КонецЕсли; | ||
| + | </ | ||
| ==== Редактирование модуля " | ==== Редактирование модуля " | ||
| Строка 186: | Строка 202: | ||
| === Метод " | === Метод " | ||
| - | Приведем код к следующему | + | Заменим метод " |
| < | < | ||
| + | Функция СтатусДоставки(ИдентификаторСообщения, | ||
| + | |||
| + | Авторизация = АвторизацияНаСайте(НастройкиОтправкиSMS.Логин, | ||
| + | |||
| + | sXML = | ||
| + | "< | ||
| + | | < | ||
| | < | | < | ||
| | < | | < | ||
| Строка 195: | Строка 218: | ||
| | </ | | </ | ||
| | </ | | </ | ||
| - | </code> | + | |</soapenv: |
| - | < | + | Соединение = Новый HTTPСоединение(" |
| - | + | Заголовки | |
| - | //++ | + | Заголовки.Вставить("COOKIE", Авторизация); |
| - | //Баланс | + | Запрос = Новый HTTPЗапрос(" |
| - | //УдалитьФайлы(ФайлОтвета); | + | Запрос.УстановитьТелоИзСтроки(sXML); |
| - | + | ФайлОтвета | |
| - | //Ответ = Неопределено; | + | Ответ = Соединение.ОтправитьДляОбработки(Запрос, ФайлОтвета); |
| - | //Запрос | + | Если Ответ.КодСостояния <> 200 Тогда |
| - | //Соединение = Неопределено; | + | Возврат |
| - | + | КонецЕсли; | |
| - | //Возврат | + | |
| СтатусДоставки = ПреобразоватьОтвет(ФайлОтвета, | СтатусДоставки = ПреобразоватьОтвет(ФайлОтвета, | ||
| Строка 213: | Строка 235: | ||
| Возврат СтатусДоставкиSMS(СтатусДоставки); | Возврат СтатусДоставкиSMS(СтатусДоставки); | ||
| - | //-- | ||
| + | КонецФункции | ||
| </ | </ | ||
| Строка 289: | Строка 311: | ||
| </ | </ | ||
| - | ==== Общая форма " | ||
| - | Добавим на форму реквизит " | ||
| - | === Метод " | ||
| - | < | ||
| - | ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(Владелец, | ||
| - | //++ | ||
| - | ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(Владелец, | ||
| - | //-- | ||
| - | УстановитьПривилегированныйРежим(Ложь); | ||
| - | </ | ||
| - | |||
| - | === Метод " | ||
| - | < | ||
| - | ПарольИЛогин = ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(Владелец, | ||
| - | УстановитьПривилегированныйРежим(Ложь); | ||
| - | ЛогинДляОтправкиSMS = ПарольИЛогин.Логин; | ||
| - | ПарольДляОтправкиSMS = ? | ||
| - | ИмяОтправителя = ПарольИЛогин.ИмяОтправителя; | ||
| - | </ | ||
| - | |||
| - | ==== Общий модуль " | ||
| - | |||
| - | === Метод " | ||
| - | |||
| - | < | ||
| - | Результат = Новый Структура(" | ||
| - | Если ОбщегоНазначенияПовтИсп.ДоступноИспользованиеРазделенныхДанных() Тогда | ||
| - | Владелец = ОбщегоНазначения.ИдентификаторОбъектаМетаданных(" | ||
| - | УстановитьПривилегированныйРежим(Истина); | ||
| - | ПарольИЛогин = ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(Владелец, | ||
| - | УстановитьПривилегированныйРежим(Ложь); | ||
| - | Результат.Логин = ПарольИЛогин.Логин; | ||
| - | Результат.Пароль = ПарольИЛогин.Пароль; | ||
| - | Результат.ИмяОтправителя = ПарольИЛогин.ИмяОтправителя; | ||
| - | Результат.Провайдер =Константы.ПровайдерSMS.Получить(); | ||
| - | КонецЕсли; | ||
| - | </ | ||
| - | |||
| - | === Метод " | ||
| - | |||
| - | < | ||
| - | НастройкиОтправкиSMS = НастройкиОтправкиSMS(); | ||
| - | |||
| - | Если НастройкиОтправкиSMS.Провайдер = Перечисления.ПровайдерыSMS.TURBO Тогда // TURBOSMS | ||
| - | Результат = ОтправкаSMSЧерезTURBO.ОтправитьSMS(НомераПолучателей, | ||
| - | НастройкиОтправкиSMS.Логин, | ||
| - | </ | ||