| View previous topic :: View next topic |
| Author |
Message |
PiSoft
Joined: 25 Mar 2005
Posts: 17
Location: ПЕТРОВ Олег Алексеевич
Occupation: ООО ПЕТРОПЕН Плюс, сист. прогр.
Interests: СПб
|
 Posted: 24 Jul 2007 19:21 Post subject: Плагин "на вход в реестр" |
 |
|
Добрый вечер, Господа Программеры!
Никак не могу справиться, как казалось, с простой задачей - при входе в "Книгу учета заказов" необходимо установить скоп по коду оператора (включена авторизация), чтобы он видел только свои заказы (код оператора = коду торгового агента), как это делается в "Настройках параметров подсистемы" для рабочей станции.
При входе в реестр индекс устанавливается по тэгу RBOOKT = status+UPPER(agentcod+dopcode). Вариант
| Code: |
MDOC->(SETSCOPE())
MDOC->(SETSCOPE("Status+UPPER(AgentCod)",'1'+_USER_CODE")) |
(по аналогии с "настроечным" скопом) не проходит.
При выходе из плагина все остается без изменения.
Может, системные настройки применяются после него?
Или требуется изменить какие-то системные переменные (какие)?
Спасибо. |
|
| Back to top |
|
 |
nordk
Joined: 27 Jun 2005
Posts: 1000
Location: Горбунов Константин
Occupation: БЭСТ-Партнер
Interests: СПб
|
| Posted: 24 Jul 2007 20:23 Post subject: |
|
|
Перед стартом заказов запускается
| Code: | STATIC FUNCTION MakeScope()
IF GlobalTask='05'.AND.!EMPTY(m->RAgentCod_[1]).AND.!m->RAgentCod_[2] .AND. !m->lI_Net
ORDSETFOCUS(7)
SetScope('Status+UPPER(AgentCod)',pStatus+UPPER(m->RAgentCod_[1]))
ELSE
ORDSETFOCUS(2)
SetScope('Status',pStatus)
ENDIF
RETURN(NIL) |
|
|
| Back to top |
|
|
nordk
Joined: 27 Jun 2005
Posts: 1000
Location: Горбунов Константин
Occupation: БЭСТ-Партнер
Interests: СПб
|
| Posted: 24 Jul 2007 20:26 Post subject: |
|
|
Но перед этим по этому массиву много чего прорисовывается
на экране !!! а перед стартом RBOOK массив не существует.
Честно говоря так и не смог найти где он инициализирует |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
