RMPRNAME (179) FUNCTION (.5)
Name
Value
NAME
RMPRNAME
MUMPS CODE
S X=$P(^RMPR(665,DA,0),"^",2)_$P(^RMPR(665,DA,0),"^",1)
EXPLANATION
PUT LAST NAME LAST FOR PROST LETTERS
