VET TYPE (23) EMBOSSING DATA (39.2)
Name
Value
NAME
VET TYPE
MUMPS CODE
S Y=$S($P($G(^DPT(DFN,"VET")),"^",1)'="Y":"NON",$P($G(^DPT(DFN,.3)),"^",1)'="Y":"NSC",1:" SC")
