SSN (8) EMBOSSING DATA (39.2)
Name
Value
NAME
SSN
MUMPS CODE
S Y="" I $D(^DPT(DFN,0)) S Y=$P(^(0),"^",9) I Y'="" S Y=$E(Y,1,3)_" "_$E(Y,4,5)_" "_$E(Y,6,9)
