SORT FIELD DATA |
-
- COMPUTED FIELD CODE: S Y(1)=$S($D(^ESP(914,D0,0)):^(0),1:"") S X=$S('$D(^VA(200,+$P(Y(1),U,6),0)):"",1:$P(^(0),U,1)) I D0>0 S X(1)=X
- FROM VALUE INTERNAL: WAIBEKz
- FROM VALUE EXTERNAL: WAIBEL
- TO VALUE INTERNAL: WAIBELZ
- TO VALUE EXTERNAL: WAIBELZ
-
- FROM VALUE INTERNAL: 2931000.99999
- FROM VALUE EXTERNAL: 10 1 93
- TO VALUE INTERNAL: z
- CROSS REFERENCE DATA: ^ESP(914,"C",^ESP(914,^2
-
- COMPUTED FIELD CODE: S Y(1)=$S($D(^ESP(914,D0,0)):^(0),1:"") S X=$S('$D(^ESP(915,+$P(Y(1),U,4),0)):"",1:$P(^(0),U,1)) I D0>0 S X(3)=X
- FROM VALUE INTERNAL: RAPDz
- FROM VALUE EXTERNAL: RAPE
- TO VALUE INTERNAL: z
|