XUSER (100) FUNCTION (.5)
Name
Value
NAME
XUSER
MUMPS CODE
S X=$S($D(^VA(200,+DUZ,0)):$P(^(0),U,1),1:"")
EXPLANATION
RETURNS THE CURRENT USER'S NAME
DATE-VALUED
NO
