DATE (5)    FUNCTION (.5)

Name Value
NAME DATE
MUMPS CODE S X=$P(X,".",1)
DATE-VALUED YES