Освобождение лицензий. Регламентное задание

22 Comments

1. sergathome 15.05.2018 at 15:06

   Эх ребяты, где ж вы были года 3 назад, когда нас угораздило вляпаться в релиз платформы, который не освобождал лицензии…

   Reply ↓
2. spezc 15.05.2018 at 15:16

   А штатное время засыпания и время завершения спящего? Чем хуже.

   Reply ↓
3. o4karek 15.05.2018 at 15:26

   А каким образом формируется анализируемый регистр сведений?
   
   ЗЫ: С ДО не знаком

   Reply ↓
4. aabogachev 15.05.2018 at 16:00

   (3) ну хотя бы тем, что виджеты постоянно обновляются и сеанс никогда не станет спящим. кроме виджетов куча всяких штук которые проверяют уведомления и т.п. поэтому приложение будучи свёрнутым все равно остается живым днями, ночами, неделями, месяцами, годами. как угодно. нас это не устраивает. нам хочется чтобы пользователи поработали и закрыли приложение. если надо свернули, но были готовы к тому, что оно прекратит работу само. на этом мы экономим большие деньги.

   настройки в базе по освобождению зависших/спящих сеансов сделаны, но таковыми сеансы становятся только тогда, когда приложение завершило свою работу «некорректно»

   Reply ↓
5. aabogachev 15.05.2018 at 16:11

   (4) есть общий модуль «ПротоколированиеРаботыПользователей». Там куча функций и процедур, которые пишут в этот РС в зависимости от тех или иных событий и действий пользователя в системе (кстати, чтобы это происходило должна быть включена настройка «Настройка и Администрирование» — «Настройка прав доступа» — «Протоколировать работу пользователей»)

   Например когда пользователь открывает приложение происходит это

   ПротоколированиеРаботыПользователей.ЗаписатьВходВСистему();

   и т.п.

   вот (скриншот) список событий которые РС протоколирует

   Reply ↓
6. o4karek 15.05.2018 at 16:20

   (6) Понял. Т.е. это не совсем честная активность? Это так активность, которую отслеживает подсистема ДО?
   
   Т.е. если я решу доработать ДО и воткну туда что-то, что этим общим модулем не пользуется, предложенное регламентное задание может этот сеанс выстричь даже во время работы. Я правильно понял?

   Reply ↓
7. herfis 15.05.2018 at 16:22

   Идея проста и понятна. Весь дьявол — в критериях определения активности.
   
   Если пользователь, скажем, в течение получаса заполняет новый документ — это как зафиксируется в протоколе?

   Reply ↓
8. aabogachev 15.05.2018 at 16:44

   (7) если вы доработаете и будете отслеживать «свои» действия, которые запихнете в этот РС — то конечно оно отработает запрос, найдет их и не выкинет пользователя. выборка то будет не пустой. только вид действия надо будет добавить в Перечисление, скриншот которого я положил выше. все просто.

   Reply ↓
9. aabogachev 15.05.2018 at 16:46

   (8) никак. как только мы столкнемся с подобного рода проблемами — мы передвинем планку, то есть рег задание будет стартовать не раз в 30 минут, а раз в час и т.п.
   
   но и в приведенном вами примере, на сколько я помню, если открыть файл «на редактирование» а потом закрыть приложение, потом снова открыть, оно «поймет» что файл захвачен на редактирование и попробует поискать в темповой папке ваш файл, который вы «так долго редактировали». так что пример не совсем удачный, но я понял что вы имеете в виду, пока для нас это не проблема.

   Reply ↓
10. o4karek 15.05.2018 at 17:13

    (9) Ну тогда (ИМХО) стоит откорректировать заголовок и/или начало статьи. Я подумал, что сделано некоторое универсальное регламентное задание, которое для примера вклеено в ДО.
    
    А у вас сделано специализированный вариант для конкретной конфы. Он не становится от этого плохим, просто стоит сразу об этом сказать 🙂

    Reply ↓
11. herfis 15.05.2018 at 17:25

    (10) Мне показалось, что вы позиционировали решение как универсальное.
    
    Если речь об учетной системе предприятия, то подобные сценарии не являются чем-то невероятным.
    
    «Честную» активность, к сожалению, можно будет определять только если соответствующую возможность добавят в платформу.
    
    Как промежуточный вариант, в принципе, можно реализовать такое: выдавать пользователю предупреждение о завершении сеанса с большим таймаутом при длительном отсутствии активности по протоколу а при отмене предупреждения пользователем — записывать это событие в протокол.
    
    ЗЫ. Правда, при такой схеме нет особой необходимости в регламентном задании 🙂 Зависшие сеансы и так станут спящими и перестанут «есть» лицензию. Остаются только сеансы с какими-нить висящими модальными окошками. Но ими, в принципе, можно пренебречь, так как они вряд ли сделают погоду.

    Reply ↓
12. aabogachev 15.05.2018 at 17:45

    (12) вы правы, если делать «универсально», то так и следует поступить, но это можно оставить для тех, кто захочет оптимизировать данное решение, у меня «это» работает уже полгода, как в том анекдоте про сисадмина — «работает и работает, не надо ничего трогать».

    Reply ↓
13. kolya_tlt 16.05.2018 at 14:41

    как и все разработчики 1С:ДО решение наполнено запросами в цикле, очень жаль …
    
    зы у вас реально Елен Николаевн так много в компании?

    Reply ↓
14. aabogachev 16.05.2018 at 15:13

    (14) я к сожалению не разработчик, я просто временно решаю проблемы. так сказать создаю костыли. и мне за это платят.
    
    Елен Николавн да, много.

    Reply ↓
15. teller 17.05.2018 at 09:46

    (15)

    так сказать создаю костыли. и мне за это платят

    — тут все такие, никто блокчейны не изобретает

    Reply ↓
16. kolya_tlt 17.05.2018 at 14:13

    (15) вообще сложно человека перед конфигуратором назвать разработчиком, но мы все эти делаем, а в резюме пишим — программист 🙂

    Reply ↓
17. androgin 19.05.2018 at 00:19

    Вот это запускается у каждого пользователя само каждые 20 мин (подписка или через обработчик ожидания — сами решите, как вам угодно!):

    // на клиенте
    Процедура ЗавершитьНеактивныйСеансКлиент() Экспорт
    СеансНеАктивен = ПростойСеансаПоЖурналуРегистрации();
    Если СеансНеАктивен Тогда
    ЗавершитьРаботуСистемы();
    КонецЕсли;
    КонецПроцедуры
    
    // на сервере
    Функция ПростойСеансаПоЖурналуРегистрации() Экспорт
    
    СеансНеАктивен = Ложь;
    
    // только последние 20 минут
    ДатаНачала = ТекущаяДата()-1200;
    ДатаОкончания = ТекущаяДата();
    
    МассивСобытий = Новый Массив;
    МассивСобытий.Добавить(«_$Data$_.New»);
    МассивСобытий.Добавить(«_$Data$_.Update»);
    МассивСобытий.Добавить(«_$Data$_.Delete»);
    МассивСобытий.Добавить(«_$Data$_.Post»);
    МассивСобытий.Добавить(«_$Data$_.Unpost»);
    
    ПользовательИБ = ПользователиИнформационнойБазы.НайтиПоУникальномуИдентификатору(Пользователи.ИдентификаторПользователяИБ());
    Фильтр = Новый Structure(«ДатаНачала, ДатаОкончания, Пользователь, Событие», ДатаНачала, ДатаОкончания, ПользовательИБ, МассивСобытий);
    
    ТЗ = Новый ТаблицаЗначений;
    ТЗ.Колонки.Добавить(«Дата»);
    ТЗ.Колонки.Добавить(«Пользователь»);
    ТЗ.Колонки.Добавить(«ИмяПользователя»);
    ТЗ.Колонки.Добавить(«Компьютер»);
    ТЗ.Колонки.Добавить(«Событие»);
    ТЗ.Колонки.Добавить(«ПредставлениеДанных»);
    
    ВыгрузитьЖурналРегистрации(ТЗ, Фильтр,»Дата, ИмяПользователя, Компьютер, Событие, ПредставлениеСобытия , ПредставлениеДанных»);
    
    Если ТЗ.Количество() = 0 Тогда
    СеансНеАктивен = Истина;
    КонецЕсли;
    
    Возврат СеансНеАктивен;
    
    КонецФункции
    

    Показать

    Меня устраивает )))

    Reply ↓
18. androgin 23.05.2018 at 03:39

    (13) а чем журнал регистрации не устраивает?

    Reply ↓
19. mikolamail 28.05.2018 at 22:34

    (19)

    подписка

    Не понятно как можно Подписку использовать. Ведь она срабатывает на определенные события. А раз есть событие, значит сеанс еще активен…

    Reply ↓
20. androgin 29.05.2018 at 00:41

    (21) это я так выразился, давая понять, что «пихайте куда хотите» )))

    Reply ↓
21. ildary 29.05.2018 at 07:28

    (19) спасибо за интересную реализацию. Жалко что в БСП такого нет.

    Reply ↓
22. Svet_Serg 28.01.2019 at 14:27

    Для этого вам понадобится две учетных записи: администратор кластера,

    У нас нет администратора кластера. Совсем. Что можно вписать вместо учётки админа кластера?

    Reply ↓