NAMEXUPROTOCOL EDIT
DESCRIPTIONThis option is used to create or edit a protocol.
CREATORUSER,ONE
DIC {DIC}ORD(101,
DIC(0)AEMQL
DIC(A)Select PROTOCOL to edit:
DIEORD(101,
DR {DIE}[XUPRTL INPUT]
E ACTION PRESENTYES
ENTRY ACTIONS DLAYGO=101
EXIT ACTIONK DLAYGO I $D(NAME) S XQORM=$O(^ORD(101,"B",NAME,0))_";ORD(101," D XREF^XQORM K XQORM,NAME
MENU TEXTEdit a Protocol
PACKAGEKERNEL
TYPEedit
UPPERCASE MENU TEXTEDIT A PROTOCOL
X ACTION PRESENTYES