Changeset 167 for ccr/trunk/p/GPLRIMA.m


Ignore:
Timestamp:
Sep 22, 2008, 4:12:52 PM (16 years ago)
Author:
George Lilly
Message:

intergrated CCRMEDS processing with GPLMEDS to get PENDING and Non-VA meds

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/GPLRIMA.m

    r166 r167  
    101101    I $D(@SBASE@("VITALS",1)) D APOST("SATTR","RIMTBL","VITALS")
    102102    I $D(@SBASE@("MEDS",1)) D APOST("SATTR","RIMTBL","MEDS")
     103    ; D PATD^GPLRIMA(2,"MEDS","MEDPRODUCTNAMECODEVALUE") CHECK FOR MED CODES
    103104    D APOST("SATTR","RIMTBL","NOTEXTRACTED") ; OUTPUT NOT YET PRODUCED
    104105    W "ATTRIBUTES: ",SATTR,!
Note: See TracChangeset for help on using the changeset viewer.