SORT FIELD DATA |
-
- COMPUTED FIELD CODE: S Y(1)=$S($D(^PSRX(D0,0)):^(0),1:"") S X=$S('$D(^PSDRUG(+$P(Y(1),U,6),0)):"",1:$P(^(0),U,1)) I D0>0 S X(1)=X
- FROM VALUE INTERNAL: CHEMSTRIPRz
- TO VALUE INTERNAL: CHEMSTRIPSZ
-
- CROSS REFERENCE DATA: ^PSRX("B",^PSRX(^2
-
- TO VALUE INTERNAL: z
|