COUNTY (4) EMBOSSING DATA (39.2)
Name
Value
NAME
COUNTY
MUMPS CODE
S Y="" I $D(^DPT(DFN,.11)) S X=$P(^(.11),"^",5),Z=$P(^(.11),"^",7) I X,Z,$D(^DIC(5,X,1,Z,0)) S Y=$P(^(0),"^",3)
