RMPRS (178)    FUNCTION (.5)

Name Value
NAME RMPRS
MUMPS CODE S X=$S(X="M":"Mr.",X="F":"Ms.",1:"")
EXPLANATION letter