SORT FIELD DATA |
-
- FROM VALUE INTERNAL: 2910100.99999
- FROM VALUE EXTERNAL: 2910101
- TO VALUE INTERNAL: z
- CROSS REFERENCE DATA: ^DGCR(399,"APD",^DGCR(399,^2
-
- COMPUTED FIELD CODE: S Y(1)=$S($D(^DGCR(399,D0,"S")):^("S"),1:"") S X=$S('$D(^VA(200,+$P(Y(1),U,2),0)):"",1:$P(^(0),U,1)) I D0>0 S X(2)=X
- FROM VALUE INTERNAL: .99999
- FROM VALUE EXTERNAL: 1
- TO VALUE INTERNAL: z
-
- COMPUTED FIELD CODE: S Y(1)=$S($D(^DGCR(399,D0,0)):^(0),1:"") S X=$S('$D(^DGCR(399.3,+$P(Y(1),U,7),0)):"",1:$P(^(0),U,1)) I D0>0 S X(3)=X
- FROM VALUE INTERNAL: .99999
- FROM VALUE EXTERNAL: 1
- TO VALUE INTERNAL: z
-
- CROSS REFERENCE DATA: ^DGCR(399,"APD",^DGCR(399,^2
|