NAME |
USR SHOW USER MEMBERSHIP MENU |
ITEM TEXT |
Show User Class Membership Menu |
ITEM |
|
PACKAGE |
AUTHORIZATION/SUBSCRIPTION |
ENTRY ACTION |
S XQORM("SH")=0 S:$G(VALMSG)'["*" VALMSG="+ Next Screen - Prev Screen ?? More Actions",VALM("MAX")=+$G(VALMCNT) |
SCREEN |
I 1 X:$D(^ORD(101,+$P(^ORD(101,DA(1),10,DA,0),"^"),24)) ^(24) |
HEADER |
S XQORM("#")=$G(^TMP("USRUSER",$J,"#")) D RESIZE^USRLM((IOSL-2),18),SHOW^VALM K XQORM("XLATE","FIND") |
MENU PROMPT |
Select Action: |
DESCRIPTION |
Menu of action to show user class memberships.
|
TYPE |
menu |
CREATOR |
USER,ONE |
TIMESTAMP |
2000-11-27 17:18:00 |