Запрет произвольной цены

0. 52 06.09.20 15:00 Сейчас в теме
Расширение для запрета произвольной цены в документе Заказ клиента и обработке Подбор товаров в документ продажи.

Перейти к публикации

Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. user780335 07.10.20 15:57 Сейчас в теме
2. user1209971 52 07.10.20 22:54 Сейчас в теме
(1) "не работает" это в чём выражается?
Подключено ли расширение?
назначена ли роль пользователю?

Какая конфигурация и платформа?
3. user780335 08.10.20 10:19 Сейчас в теме
(2) Конфигурация УТ 11.4.12
Не работает - означает не работает: "При подключенном расширении не убирается произвольная цена." Разумеется роль подключена.
4. user1209971 52 09.10.20 01:39 Сейчас в теме
(3) Скорее всего проверял под пользователем с полными правами.
Там ньюанс Функция РольДоступна возвращает для пользователя с полными правами Ложь.
Надо заменить условие в Общем модуле кИТ_ОграничениеДоступа

Вместо
Если РольДоступна("кИТ_ЗапретПроизвольнойЦены") Тогда

На
Если УправлениеДоступом.ЕстьРоль("кИТ_ЗапретПроизвольнойЦены") тогда
5. user1209971 52 09.10.20 01:45 Сейчас в теме
(3) Перезалил файл си исправлениемю.
Пиши в личку, отправлю на почту
6. user1209971 52 13.10.20 23:29 Сейчас в теме
Написао свою функцию для проверки наличия роли, так как типовые варианты (реагириуют на полные права):
Пользователи.РолиДоступны("кИТ_ЗапретПроизвольнойЦены");
УправлениеДоступом.ЕстьРоль("кИТ_ЗапретПроизвольнойЦены");
РольДоступна("кИТ_ЗапретПроизвольнойЦены");

Функция ЕстьРоль(ИмяРоли, Пользователь = Неопределено)

	Если Пользователь = Неопределено Тогда
		Пользователь = ПараметрыСеанса.ТекущийПользователь;
	КонецЕсли;
	
	Запрос = Новый Запрос(
		"ВЫБРАТЬ РАЗРЕШЕННЫЕ 1 
		|ИЗ Справочник.ГруппыДоступа.Пользователи КАК ГруппыДоступаПользователи
		|		ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.ПрофилиГруппДоступа.Роли КАК ПрофилиГруппДоступаРоли
		|		ПО ГруппыДоступаПользователи.Ссылка.Профиль = ПрофилиГруппДоступаРоли.Ссылка
		|ГДЕ ПрофилиГруппДоступаРоли.Роль.Имя = &Роль
		|	И ГруппыДоступаПользователи.Пользователь = &Пользователь");
	
	Запрос.УстановитьПараметр("Пользователь", Пользователь);
	Запрос.УстановитьПараметр("Роль", ИмяРоли);
	
	УстановитьПривилегированныйРежим(Истина);
	РезультатЗапроса = Запрос.Выполнить();
	УстановитьПривилегированныйРежим(Ложь);
	
	Возврат Не РезультатЗапроса.Пустой();
	
КонецФункции
Показать
7. Brawler 479 30.11.20 23:18 Сейчас в теме
А всего-та и нужно у юзеров отнять роль отклонений от условий продаж и тогда они полностью обязаны будут продавать, так как это прописано в соглашениях, шаг влево, шаг вправо и пошли делать согласование изменения цены в документе через встроенную систему согласования.
8. user1209971 52 01.12.20 01:40 Сейчас в теме
(7) Написано же:
Не используется Роль Отклонение от условий продаж. Она запрещает любой другой вид цены от указанного в Соглашении. Это же расширение запрещает только произвольную цены, все остальные виды цен менеджеру доступны
Оставьте свое сообщение
Вопросы с вознаграждением