Name | Value |
---|---|
NAME | ORC OUTPT MED ACTIONS |
ITEM TEXT | Outpt Med action menu |
ITEM |
|
EXIT ACTION | D DESELECT^ORCHART(ORNMBR) S:$D(^TMP("OR",$J,"CURRENT","MENU")) XQORM("HIJACK")=^("MENU") |
ENTRY ACTION | S XQORM(0)="1AD",(XQORM("?"),XQORM("??"))="D ITEMHELP^ORCHART",VALMBCK="",ORNMBR=$P(XQORNOD(0),"=",2) D SELECT^ORCHART(ORNMBR) |
HEADER | W "" |
MENU PROMPT | Select Action: |
TYPE | menu |
COLUMN WIDTH | 20 |
MNEMONIC WIDTH | 4 |
CREATOR | USER,ONE |
TIMESTAMP | 2001-09-26 13:19:47 |