Changeset 321


Ignore:
Timestamp:
Jan 11, 2009, 2:02:28 AM (16 years ago)
Author:
Sam Habiel
Message:

Removed Size from XML and all references in Med files -- I changed my mind and think now that it is a useless field.

Location:
ccr/trunk/p
Files:
6 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/CCRMEDS.m

    r313 r321  
    117117 . S @MEDVMAP@("MEDCONCVALUE")=""
    118118 . S @MEDVMAP@("MEDCONCUNIT")=""
    119  . S @MEDVMAP@("MEDSIZETEXT")=""
    120119 . S @MEDVMAP@("MEDDOSEINDICATOR")=""
    121120 . S @MEDVMAP@("MEDDELIVERYMETHOD")=""

  • ccr/trunk/p/CCRMEDS1.m

    r319 r321  
    130130 . S @MAP@("MEDCONCVALUE")=$P(CONCDATA,U,3)
    131131 . S @MAP@("MEDCONCUNIT")=$P(CONCDATA,U,4)
    132  . S @MAP@("MEDSIZETEXT")=$P(NDFDATA(23),U,2)_" "_$P(NDFDATA(24),U,2)
    133132 . S @MAP@("MEDQUANTITYVALUE")=MED(7)
    134133 . ; Oddly, there is no easy place to find the dispense unit.

  • ccr/trunk/p/CCRMEDS2.m

    r319 r321  
    145145 . . S @MAP@("MEDCONCVALUE")=$P(CONCDATA,U,3)
    146146 . . S @MAP@("MEDCONCUNIT")=$P(CONCDATA,U,4)
    147  . . S @MAP@("MEDSIZETEXT")=$P(NDFDATA(23),U,2)_" "_$P(NDFDATA(24),U,2)
    148147 . . S @MAP@("MEDQUANTITYVALUE")=$$GET1^DIQ(52.41,RXIEN,12)
    149148 . . ; Oddly, there is no easy place to find the dispense unit.

  • ccr/trunk/p/CCRMEDS3.m

    r319 r321  
    138138 . . S @MAP@("MEDCONCVALUE")=$P(CONCDATA,U,3)
    139139 . . S @MAP@("MEDCONCUNIT")=$P(CONCDATA,U,4)
    140  . . S @MAP@("MEDSIZETEXT")=$P(NDFDATA(23),U,2)_" "_$P(NDFDATA(24),U,2)
    141140 . . S @MAP@("MEDQUANTITYVALUE")=""  ; not provided for in Non-VA meds.
    142141 . . ; Oddly, there is no easy place to find the dispense unit.

  • ccr/trunk/p/CCRMEDS4.m

    r227 r321  
    105105 . S @MAP@("MEDCONCVALUE")=$S($L(MEDIEN):$P(CONCDATA,U,3),1:"")
    106106 . S @MAP@("MEDCONCUNIT")=$S($L(MEDIEN):$P(CONCDATA,U,4),1:"")
    107  . S @MAP@("MEDSIZETEXT")=$S($L(MEDIEN):$P(NDFDATA(23),U,2)_" "_$P(NDFDATA(24),U,2),1:"")
    108107 . S @MAP@("MEDQUANTITYVALUE")=""  ; not provided for in Non-VA meds.
    109108 . ; Oddly, there is no easy place to find the dispense unit.

  • ccr/trunk/p/GPLCCR0.m

    r278 r321  
    325325 ;;</Units>
    326326 ;;</Concentration>
    327  ;;<Size>
    328  ;;<Text>@@MEDSIZETEXT@@</Text>
    329  ;;</Size>
    330327 ;;</Product>
    331328 ;;<Quantity>
Note: See TracChangeset for help on using the changeset viewer.