Changeset 189 for ccr/trunk/p


Ignore:
Timestamp:
Oct 7, 2008, 10:33:52 AM (16 years ago)
Author:
George Lilly
Message:

meds merge bug

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/CCRMEDS.m

    r188 r189  
    5858 S MEDTVMAP=$NA(^TMP("GPLCCR",$J,"MEDMAP"))
    5959 S MEDTARYTMP=$NA(^TMP("GPLCCR",$J,"MEDARYTMP"))
    60  K @MEDTVMAP,@MEDTARYTMP
     60 I 'HASOP K @MEDTVMAP,@MEDTARYTMP
    6161 ; FIRST GO THROUGH MEDRSLT ARRAY AND COUNT MEDS AND LINES IN MEDS
    6262 ; ZA(0) IS TOTAL NUMBER OF MEDS ZA(ZI) IS LINES IN MED ZI
Note: See TracChangeset for help on using the changeset viewer.