| SORT FIELD DATA |
-
- COMPUTED FIELD CODE: S Y(1)=$S($D(^IBA(354,D0,0)):^(0),1:"") S X=$S('$D(^IBE(354.2,+$P(Y(1),U,5),0)):"",1:$P(^(0),U,1)) I D0>0 S X(1)=X
- FROM VALUE INTERNAL: NO INCOME DAT@z
- FROM VALUE EXTERNAL: NO INCOME DATA
- TO VALUE INTERNAL: NO INCOME DATA
- TO VALUE EXTERNAL: NO INCOME DATA
-
- FROM VALUE INTERNAL: 2930406.99999
- FROM VALUE EXTERNAL: T-1
- TO VALUE INTERNAL: 2930408.9999
- TO VALUE EXTERNAL: T
- CROSS REFERENCE DATA: ^IBA(354,"AD",^IBA(354,^2
-
- COMPUTED FIELD CODE: S Y(1)=$S($D(^IBA(354,D0,0)):^(0),1:"") S X=$S('$D(^DPT(+$P(Y(1),U,1),0)):"",1:$P(^(0),U,1)) I D0>0 S X(3)=X
- FROM VALUE INTERNAL: @z
- FROM VALUE EXTERNAL: A
- TO VALUE INTERNAL: Z
- TO VALUE EXTERNAL: Z
|
