SERVICE Y/N (26) EMBOSSING DATA (39.2)
Name
Value
NAME
SERVICE Y/N
MUMPS CODE
S Y=$S($P($G(^DPT(DFN,.3)),"^",1)="Y":"Y",$P($G(^DPT(DFN,.3)),"^",1)="N":"N",1:"N")
