!Обновление от 12.03.2012!. Следующая версия обработки завершения работы пользователей. Обработка находится в alpha тестировании. На данный момент работает обычная форма. Управляемая форма создана, но на ней нет функционала. Обработку так же можно запускать как внешнюю, с ограниченным функционалом (описание см ниже). Решил выложить обработку, дабы не забросить проект, т.к. текущая работа забирает фактически все время, а определенные наработки по 2 версии уже есть. Буду рад тесту, любым комментариям и помощи. По мере выявления ошибок буду стараться их исправлять.
(86) Yashazz, там есть одно НО, только для клиент серверного варианта. Глубоко сомневаюсь что все кто качают обработки подобные моей, работают именно с клиент - сервером.
(87) Если используется файл-серверный вариант, то выход пользователя из базы реализуется путем убийства процесса 1С на стороне клиента - это аварийный вариант, он не очень хороший, но не требует вмешательства в конфигурацию
pencroff пишет:
Не совсем понятно как можно реализовать отключение пользователей без изменения конфигурации? Объясните концепцию.
тут видимо подразумеваются совсем минимальные изменения конфигурации ну или использование каких то сторонних средств, хотя и самому интересно услышать на будущее для новой версии )
Для УПП, КА, УТ придется изменить следующий код во всех модулях обработки
ТекПользователь = УправлениеПользователями.ОпределитьТекущегоПользователя(); на следующий:
ТекПользователь = глЗначениеПеременной("глТекущийПользователь");
Gasdrubal пишет: жаль. что не во все типовые конфигурации подобное внедряется, иногда приходится дописывать самому((
Код действительно некомпактный. Неплохо бы ужать.
Будет обязательно новая версия, переработанная, сейчас просто времени немного не хватает
Не выгоняет пользователей! Даже сообщения не выдает!
В чем может быть причина?
посмотреть отладчиком идет ли вызов из модуля Общий модуль "доОтключениеПользователей" процедуры ЦиклическийВызов. Проверьте добавлен ли код в процедуру ПередНачаломРаботыСистемы (СтартПроверкиОтключения(Отказ)) и в тот ли модуль он добавлен (управляемое или обычное приложение)
Проверил под отладчиком. Вызов идет. Проблема видимо в том что функция ОпределитьТекущегоПользователя() в БП возвращает либо "истину" либо "ложь" а не самого пользователя. привожу саму функцию из БП (сорри за оверквотинг если че ;) ):
// Процедура создания пользователя.
// Параметры:
// Нет.
//
Функция ОпределитьТекущегоПользователя(ОписаниеОшибкиОпределенияПользователя) Экспорт
Если ПустаяСтрока(ИмяПользователя) Тогда
// пользователь не авторизовался
ИмяПользователя = "НеАвторизован";
ПолноеИмяПользователя = "Не авторизован";
КонецЕсли;
// Если для пользователя не указано полное имя -
// устанавливаем его равным имени пользователя
Если ПустаяСтрока(ПолноеИмяПользователя) Тогда
ПолноеИмяПользователя = ИмяПользователя;
КонецЕсли;
ОписаниеОшибкиОпределенияПользователя = "Пользователь : " + ИмяПользователя + " не был найден в справочнике пользователей. Возникла ошибка при добавлении пользователя в справочник.
|" + ОписаниеОшибки();
Возврат Ложь;
ОписаниеОшибкиОпределенияПользователя = "Ошибка при записи настроек нового пользователя.
|" + ОписаниеОшибки();
Возврат Ложь;
КонецПопытки;
#Если Клиент Тогда
Если НЕ Константы.НомерВерсииКонфигурации.Получить() = "" Тогда
Сообщить("Пользователь зарегистрирован в справочнике пользователей.");
КонецЕсли;
#КонецЕсли
Обращаю внимание на то что:
Для УПП, КА, УТ, БП необходимо изменить следующий код во всех модулях обработки
ТекПользователь = УправлениеПользователями.ОпределитьТекущегоПользователя();
на следующий:
ТекПользователь = глЗначениеПеременной("глТекущийПользователь");
SinglCOOLer пишет: Тогда нужно руководствоваться вот этим:
Обращаю внимание на то что:
Для УПП, КА, УТ, БП необходимо изменить следующий код во всех модулях обработки
ТекПользователь = УправлениеПользователями.ОпределитьТекущегоПользователя();
на следующий:
ТекПользователь = глЗначениеПеременной("глТекущийПользователь");
ИМХО нужно этот код закинуть в Попытку Исключение
тогда обработка станет рабоочей в разных типовых конфах 1С
(18) ОФФ. Напишу В плане обучения как Модератор пользователю:
понравилась чья-то фраза или предложение, поощри человека плюсом, не ленись :)
ЗЫ сам на плюс не напрашиваюсь :)
Всегда рад помочь. Сейчас как раз собираю мнения людей что как лучше сделать и какие то варианты. Планирую сделать чтобы обработку можно было использовать и как только внешнею с ограниченными возможностями так и встраивать ее :)
Стоит добавить запрет на вход пока конфигурация не совпадает с конфигурацией базы данных: подгтовили обновление МД поросили всех выйти => внесли изменнеия => (можно входить) => запустили всех кого закрывали (если рабочее время)
Еще предложение заменить полосу регулировки с вариантами отключения на переключатели - аргумент: не видно что скрывается за положениями полосы, пока не переключишь не узнаеш.
еще просьба - установить привязки элементов формы - невозможно развернуть форму на весь экран а в оригинальном виде видны только 2,5 строки с пользователями
Еще предложение заменить полосу регулировки с вариантами отключения на переключатели - аргумент: не видно что скрывается за положениями полосы, пока не переключишь не узнаеш.
согласен, в новой версии сей механизм проработан по новому, все будет более наглядно и гибко
еще просьба - установить привязки элементов формы - невозможно развернуть форму на весь экран а в оригинальном виде видны только 2,5 строки с пользователями
эта недоработка уже устранена в новой версии, все растягиваемо во всех видах приложений
я аналогичную систему делал на 7.7. Очень устал выгонять пользователей по телефону, особенно когда они уходят на обед. Единственное -открытые документы не сохранялись. Другая проблема возникла: пока выгоняю одних - другие уже заходят. Поэтому пришлось - ставить блокировку на вход
Всем привет. Для тех кто ждет новый релиз: к сожалению он задерживается, работы ведутся но не так быстро как рассчитывал, очень много повседневной работы наволилось навалилось :(
+++++ Спасибо!!! месяц бегал по конторе, как ошарашенный вырубал всех.. а тут нажал и все.. спасибки удружил))) ну все.. бойся бухгалтер)))) всех поотрублю...............................)))))))))))))))))))))))
+++++ Спасибо!!! месяц бегал по конторе, как ошарашенный вырубал всех.. а тут нажал и все.. спасибки удружил))) ну все.. бойся бухгалтер)))) всех поотрублю...............................)))))))))))))))))))))))
ахаха )) скоро выйдет новая версия, еще более беспощадная :)
1. Оставшееся время отключенных пользователей меньше оставшегося времени пользователей которые на момент отключения в базе не работали.
2. Ставлю время отключения через 3 минуты, включение через 5 мин. по прошествии 10 минут захожу под отключенным пользователем , его состояние отключения "Не активно".
Общие пожелания:
Подразумевается, что список пользователей в базе не маленький, предлагаю расширить табличное поле "СписокАктивныхПользователей", а то больше 2-х пользователей не помещается.
Движок с выбором варианта запрета не очень удобен, для просмотра всех вариантов приходится его постоянно двигать.
1) Хорошее замечание, обязательно учту это
2) Сейчас механизм отключения перерабатывается, надеюсь подобных проблем удастся избежать
По пожеланиям. Сейчас все формы полностью растягиваемые, механизм выбора варианта завершения переработан. Над полями сообщений тоже поработал, теперь они гораздо больше, в т.ч. переработаны и кнопки. Управляемая форма будет, собственно сейчас в основном из за нее и замедляется процесс разработки, т.к. приходится отлаживать работу и для обычной формы и для управляемой + в управляемых формах есть определенные сложности.
Спасибо, автору + , жаль не работает в управляемом интерфейсе (Тип не определен Запрос) планируется ли расширить функционал для управляемого интерфейса и когда ждать обновлений?
спасибо за обработку...
помогите с решением проблемы, при открытии обработки выдает эту ошибку:
{ВнешняяОбработка.доОбработкаОтключения.МодульОбъекта(133)}: Поле объекта не обнаружено (доОтключениеПользователей)
ОтклПользователей = РегистрыСведений.доОтключениеПользователей;
День добрый, не было никак времени посмотреть, сегодня думаю посмотрю вечером что это такое. Времени свободного совсем нет. Самое главное избежать в новой версии подобного.
По большому счету такой функционал редко нужен, да и допиливать конфигурацию ради корректного выхода пользователей тоже лишнее, использую намного более простые вещи и доволен как слон.
Извращения, на мой взгляд, в правке конфиги и дальнейшей ее поддержке ( когда обслуживаешь не одну базу а неколько десятков организаций с разными конф), хотя я еще не смотрел твое творение
(74) Жолтокнижниг, по поводу правки конфигурации - каждому своё, хочешь правишь - хочешь нет. Для этого она умеет запускаться как внешняя обработка. Некоторые места действительно могут быть написаны не совсем оптимально, как говорится нет предела совершенству, да и я указал что это достаточно сырая alpha (не причесанная)версия. По поводу пожеланий буду делать список, по возможности добавлять.
...
Если НЕ ЗначениеЗаполнено(ВремяНачалаБлокировки)
ИЛИ ВремяНачалаБлокировки - ТекущийМомент <= ИнтервалПрекратить Тогда
ПрекратитьРаботуСистемы(Истина);
...
Не совсем про это понял, там есть возможность в настройках поставить выдерживание дополнительной паузы перед отключением.
первое замечание. как уже писалось почему в код не засунуть обработку конфиги или же попытка-исключение, также предусмотреть поддержку конф других поставщиков, надо создавать универсальные, легкие инструменты
и еще обрати внимание на такой код в
Процедура КонтрольРежимаЗавершенияРаботыПользователей() Экспорт
...
Если НЕ ЗначениеЗаполнено(ВремяНачалаБлокировки)
ИЛИ ВремяНачалаБлокировки - ТекущийМомент <= ИнтервалПрекратить Тогда
ПрекратитьРаботуСистемы(Истина);
...
те почти мгновенное отключение пользователей.
Еще одним пожеланием было бы, возможность выполнения какой либо операции после блокировки(обработка, скрипт и т.д) тогдаб цены ей не было ;)
Для конфигураций Управление торговлей, комплексная автоматизация и управление производственным предприятием необходимо будет изменить следующий код во всех-всех модулях обработки
ТекПользователь = УправлениеПользователями.ОпределитьТекущегоПользователя();
на следующий код:
ТекПользователь = глЗначениеПеременной("глТекущийПользователь");
81.
Программулькин
28715.03.12 06:25 Сейчас в теме
коменты не читал, сильно в нюансы не вникал. Скачал *.cf объединил со своей конфигурацией (добавил всё кроме свойств и справочника пользователей). и НЕ работает.Я в расстройстве. Не работают ни блокировки, ни сообщения.
Минус ставить не охота. Что не не так? моя конфа: Зарплата и Управление Персоналом, редакция 2.5 (2.5.47.1) клиент-серверная версия. SQL 2005
(81) Программулькин, справочник заполнили? обычно так не работает когда нет кода
Модуль обычного приложения
Процедура ПередНачаломРаботыСистемы(Отказ)
//какой то код
СтартПроверкиОтключения(Отказ);
КонецПроцедуры
Процедура ПриЗавершенииРаботыСистемы()
//какой то код
СтопПроверкиОтключения();
КонецПроцедуры
Показать
или не заполнен справочник "Варианты завершения работы" (см описание)
Сейчас специально скачал свой CF накатил его на нетиповую 1С:Предприятие 8.2 (8.2.13.205) Зарплата и Управление Персоналом, редакция 2.5 (2.5.31.4), все сработало.
Проверьте пожалуйста. За то, что не стали минус ставить сходу, спасибо :)
83.
Программулькин
28715.03.12 08:33 Сейчас в теме
да, справочник пустой. Вот рекомендация: либо в справке, либо ещё как добавить стандартное заполнение справочника, главное что бы было очевидно, как его заполнять,и можно было "на лету" (без разбора кода) разобраться (тупо нету времени, а вечером не охота...лень, лучше жене время уделить...). Есть шаблон заполнения справочника?
Идея, и функционал хорошие, (я бы по другому переделал, но лень, может потом на досуге), подобные видел, щупал, не устраивали, а это ничего так, нормально.
(83) Программулькин, шаблон есть в виде картинки в описании, а вообще идея хорошая, сделаю мехинзм, который будет проверять заполненность предопределенных элементов автоматически :)
Обращаю внимание на то что:
Для УПП, КА, УТ, БП необходимо изменить следующий код во всех модулях обработки
ТекПользователь = УправлениеПользователями.ОпределитьТекущегоПользователя();
на следующий:
ТекПользователь = глЗначениеПеременной("глТекущийПользователь");
Дело в том, что я просто бухгалтер и мне сложно самой это сделать. Но мне очень нужна данная обработка, так как часто приходится перепроводить и удалять документы в монопольном режиме. У меня Комплексная автоматизация...
В УПП 1.3 объединил конфигурации, заполнил обработкой шаблоны. В результате работает половина функций, а самая главная - выгонять пользователей НЕ РАБОТАЕТ!!!.
102.
Alexander.Dyatchenko
11.01.14 00:44 Сейчас в теме
Отчего это у меня?
{МодульОбычногоПриложения(181,3)}: Процедура или функция с указанным именем не определена (СтартПроверкиОтключения)
<<?>>СтартПроверкиОтключения(Отказ);
{МодульОбычногоПриложения(496,4)}: Процедура или функция с указанным именем не определена (СтопПроверкиОтключения)
<<?>>СтопПроверкиОтключения();
Отличная разработка. Спасибо автору!
Для КА пришлось сделать замену на глТекущийПользователь как описано в описании установки, а также сделал общий модуль привелигированным, т.к. были проблемы с правами на не стандартных интерфейсах.
Перенос данных КА 1.1 / УПП 1.3 => БП 3.0 (перенос остатков, документов и справочников из "1С:Комплексная автоматизация 1.1" / УПП 1.3 в "1С:Бухгалтерия 3.0")
Перенос данных КА 1.1 => ERP 2 (ЕРП) (обработка переноса документов, остатков и справочной информации из "1С:Комплексная автоматизация, ред. 1.1" в "1С:ERP Управление предприятием, ред 2")
Перенос данных КА 1.1 => ERP 2 (ЕРП) (обработка переноса документов, остатков и справочной информации из "1С:Комплексная автоматизация, ред. 1.1" в "1С:ERP Управление предприятием, ред 2")