ESP CASE ASSIGNMENT ALL (520) SORT TEMPLATE (.401)
Name
Value
NAME
ESP CASE ASSIGNMENT ALL
SORT FIELD DATA
FROM VALUE INTERNAL: 2921000.99999
FROM VALUE EXTERNAL: 10 1 92
TO VALUE INTERNAL: z
CROSS REFERENCE DATA: ^ESP(912,"C",^ESP(912,^2
COMPUTED FIELD CODE: S Y(2)=$C(59)_$S($D(^DD(912,5.05,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^ESP(912,D0,5)):^(5),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,5)_":",2),$C(59),1)="NONE OF THE ABOVE" I D0>0 S X(2)=X
