Создание обработки автоматической актуализации токена ИСМП
Файлы
ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний
Оформите подписку на компанию для решения рабочих задач
Оформить подписку и скачать решение со скидкойВы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».
- 0% комиссии — оплата напрямую исполнителю;
- Исполнители любого масштаба — от отдельных специалистов до команд под проект;
- Прямой обмен контактами между заказчиком и исполнителем;
- Безопасная сделка — при необходимости;
- Рейтинги, кейсы и прозрачная система откликов.
Создадим новую обработку, добавим форму. На форме ничего добавлять не будем.
В модуле формы инициализируем событие/процедуру "при открытии", дополнительно добавляем ещё две процедуры, указанные ниже. В процедуре "При открытии" в указанной строке укажите код своей организации: ДанныеТокена.Вставить("Организация", Справочники.Организации.НайтиПоКоду("0000001"));
Процедура ПриОткрытии()
ТокеныДляОбновления = Новый Массив;
ДанныеТокена = Новый Структура;
ДанныеТокена.Вставить("ТипТокенаАвторизации", Перечисления.ТипыТокеновАвторизации.ИСМП);
ДанныеТокена.Вставить("Организация", Справочники.Организации.НайтиПоКоду("0000001"));
ДанныеТокена.Вставить("ПроизводственныйОбъект", Справочники.Подразделения.ПустаяСсылка());
ТокеныДляОбновления.Добавить(ДанныеТокена);
АктуализироватьТокены(ТокеныДляОбновления);
КонецПроцедуры
Процедура ПослеПолученияКлючаСессии(РезультатПолученияКлючейСессийПоОрганизациям, ДополнительныеПараметры) Экспорт
ПрекратитьРаботуСистемы();
КонецПроцедуры
Процедура АктуализироватьТокены(ТокеныДляОбновления)
ДанныеТокена = ТокеныДляОбновления[0];
ТокеныДляОбновления.Удалить(0);
ДополнительныеПараметры = Новый Структура;
ДополнительныеПараметры.Вставить("ТокеныДляОбновления", ТокеныДляОбновления);
ПараметрыЗапросаКлючаСессии = ИнтерфейсИСМПКлиентСервер.ПараметрыЗапросаКлючаСессии(ДанныеТокена.Организация);
ИнтерфейсАвторизацииИСМПКлиент.ЗапроситьКлючСессии(
ПараметрыЗапросаКлючаСессии,
Новый ОписаниеОповещения("ПослеПолученияКлючаСессии", ЭтаФорма, ДополнительныеПараметры));
КонецПроцедуры
Всё. Обработка готова. Сохраняем.
Добавляем её в планировщик заданий.
enterprise /S"[ИмяСервера]\[ИмяБазы]" /NLoadingCurrency /N[ИмяПользователя] /P[ПарольПользователя] /Execute "c:\Scripts\[НазваниеОбработки].epf"
где в квадратных скобках указаны параметры, которые нужно заменить на ваши. В скрипте указывайте папку (путь), в которой лежит обработка у вас на компьютере/сервере.
Проверено на следующих конфигурациях и релизах:
- Управление торговлей, редакция 10.3, релизы 10.3.75.2
Вступайте в нашу телеграмм-группу Инфостарт
