MONTH (3) FUNCTION (.5)
Name
Value
NAME
MONTH
MUMPS CODE
S X=$E(X,1,5)_0_0 S:'X X=""
DATE-VALUED
YES
