ORC ORELSE ORDER ACTIONS (2374)    PROTOCOL (101)

View in ViViaN Menu
Name Value
NAME ORC ORELSE ORDER ACTIONS
ITEM TEXT Order action menu for ORELSE key holders
ITEM
EXIT ACTION D DESELECT^ORCHART(ORNMBR):'$G(OREBUILD)
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 2
CREATOR USER,ONE
TIMESTAMP 2002-12-09 17:26:38