INPUT TRANSFORM: S DIC("S")="N RETURN I $$VDEA^XUSER(.RETURN,Y)" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: NOV 07, 2012
HELP-PROMPT: Select the user for which ePCS is enabled.
DESCRIPTION:
User for which ePCS is enabled.
SCREEN: S DIC("S")="N RETURN I $$VDEA^XUSER(.RETURN,Y)"
EXPLANATION: Only active users that hold the ORES security key, are authorized to write medication orders, and have a valid DEA/VA number are selectable.