SSN (NO SPACES) (30)    EMBOSSING DATA (39.2)

Name Value
NAME SSN (NO SPACES)
MUMPS CODE S Y="" I $D(^DPT(DFN,0)) S Y=$P(^(0),"^",9)