Changeset 321 for ccr/trunk/p/CCRMEDS2.m
- Timestamp:
- Jan 11, 2009, 2:02:28 AM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ccr/trunk/p/CCRMEDS2.m
r319 r321 145 145 . . S @MAP@("MEDCONCVALUE")=$P(CONCDATA,U,3) 146 146 . . S @MAP@("MEDCONCUNIT")=$P(CONCDATA,U,4) 147 . . S @MAP@("MEDSIZETEXT")=$P(NDFDATA(23),U,2)_" "_$P(NDFDATA(24),U,2)148 147 . . S @MAP@("MEDQUANTITYVALUE")=$$GET1^DIQ(52.41,RXIEN,12) 149 148 . . ; Oddly, there is no easy place to find the dispense unit.
Note:
See TracChangeset
for help on using the changeset viewer.