| SORT FIELD DATA |
-
- COMPUTED FIELD CODE: S Y(1)=$S($D(^LRE(D0,5,D1,0)):^(0),1:"") S X=$S('$D(^LAB(65.4,+$P(Y(1),U,6),0)):"",1:$P(^(0),U,1)) I D1>0 S X(1)=X
- FROM VALUE INTERNAL: ?z
- TO VALUE INTERNAL: @
-
- COMPUTED FIELD CODE: S Y(1)=$S($D(^LRE(D0,5,D1,0)):^(0),1:"") S X=$S('$D(^LAB(65.4,+$P(Y(1),U,7),0)):"",1:$P(^(0),U,1)) I D1>0 S X(2)=X
-
- FROM VALUE INTERNAL: ?z
- TO VALUE INTERNAL: @
|
