Доступ к справочникам

RAN

19.04.2009 - 18:58

Ломаю голову над следующей проблемой. Есть конф. ТиС 9, в настоящее время предполагается подключение удаленных торговых точек к основной базе офиса. В связи с этим необходимо организовать некоторые ограничения.В частности большая проблема со справочником контрагенты. Нужно сделать так, чтобы при открытии справочника менеджер каждой торговой точки попадал сразу в свою папку справочника и не имел возможности перехода в другие папки справочника. Может быть кто сталкивался с реализацией такого ограничения?

К списку тем

1 >

К списку форумов

Интересные темы

odines.ru

24.04.2024 - 16:03

Смотри также:
Господа! Посоветуйте что выбрать? КПК или нетбук для торговых агентов?
Не знаю что сказать.
Реализация (купля-продажа) VS Реализация (Розница)

Re: Доступ к справочникам

MAXXL

1 - 19.04.2009 - 19:00

Тогда нужно еще запрещать отключение режима групп в справочнике. А так... ИспользоватьРодителя() Вам в помощь

Re: Доступ к справочникам

RAN

2 - 19.04.2009 - 19:04

Не получается с Родителем. Вот код:
Спр=СоздатьОбъект(Справочник.Контрагенты);
Спр.НайтиПоКоду(ххх);
Спр.ИспользоватьРодителя(Спр.ТекущийЭлемен());
Все равно в корне справочника оказываюсь.

Re: Доступ к справочникам

RAN

3 - 19.04.2009 - 19:06

И еще про отображение режима групп справочника, совсем про эту кнопку забыл, как можно ее отключить, она же вроде системная?

Re: Доступ к справочникам

pit

4 - 19.04.2009 - 19:31

Все делается элементарна... Ватсон....

Новая форма списка справочника (Без дерева, чтобы не видел других групп)

предопределенные процедуры

UseParent
OnSetParent
OnMoveIntoOtherGroup
OnHierarchyChange
HierarchicalList
OnSetSelection - на всякий случай.....
ActivateObj

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

Re: Доступ к справочникам

pit

5 - 19.04.2009 - 19:35

Для каждого юзера в справочнике Пользователи добавляем -

реквизит - группу-родителя в контрагентах, которая устанавливается при открытии. Не заполнен реквизит - ничего не делаем (для обычных юзеров).
Заполнен - получи, фашист, гранату....

и не надо никаких НайтиПоКоду.....

Интересные темы

odines.ru

24.04.2024 - 16:03

Смотри также:
Реально ли переделать ТиС 7.7 под автосервис?
Свертка базы
Как забрать данные из терминала Psion Workabout mx 2mb

Re: Доступ к справочникам

RAN

6 - 19.04.2009 - 19:43

pit прошу прощения, можно названия процедур по-русски, а то я зумучался уже искать аналогию.:) все время в 1С только на русском программирую.
Со справочника "Пользователя" я и начал, завел параметр, в котором указывается группа в справочнике, а вот дальше и ступор!:)

Re: Доступ к справочникам

RAN

7 - 19.04.2009 - 19:48

Вот эти две функции по-русски как называются? Остальные вроде сообразил.
OnSetSelection
ActivateObj

Re: Доступ к справочникам

ЖКК

8 - 19.04.2009 - 19:53

(6) что за выражения? программирую...

Re: Доступ к справочникам

RAN

9 - 19.04.2009 - 19:55

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

Re: Доступ к справочникам

ЖКК

10 - 19.04.2009 - 19:56

И?

Re: Доступ к справочникам

RAN

11 - 19.04.2009 - 20:02

ЖКК. я часто пользуюсь данным форумом для получения советов, так вот всегда находятся такие ЖКК-и, которые дают советы такого типа:
- ну это ж и так понятно как делать, че спрашивать-то.
- а что это ты так написал КонецПроцедуры; - надо писать КонецПроцедуры
и т.д., :):)
так вот, какой совет способны дать Вы, я уже догадался, можно не давать....
если только очень хочется выделиться!!!!!!

Re: Доступ к справочникам

Cthulhu

12 - 19.04.2009 - 20:15

Форма списка для юзверей.
1) в "ПриОткрытии" находи нужного родителя и "ИспользоватьРодителя(<НужныйРодитель>,1);" (чтобы можно было по вложенным папкам лазить)
2) там же: "ИерархическийСписок(1,0);"
3) Процедура ПриВыбореРодителя(НовыйРодитель) ... Если НовыйРодитель.ПринадлежитьГруппе(<НужныйРодитель>)=0 Тогда СтатусВозврата(0); Возврат; КонецЕсли; ... КонецПроцедуры //ПриВыбореРодителя
усё.

Re: Доступ к справочникам

RAN

13 - 19.04.2009 - 20:34

ПриОткрытии

ТТ=СоздатьОбъект("Справочник.Контрагенты");
ТТ.НайтиПоКоду(343);
ИспользоватьРодителя(ТТ.ТекущийЭлемент(),1);

Все равно переходит в корень справочника.