Changeset 97 for ccr/trunk/p/GPLVITALS.m


Ignore:
Timestamp:
Aug 19, 2008, 8:47:22 PM (16 years ago)
Author:
George Lilly
Message:

killed value arrays at beginning of processing for Vitals and Problems

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/GPLVITALS.m

    r93 r97  
    3535          S VITTVMAP=$NA(^TMP("GPLCCR",$J,"VITALS"))
    3636          S VITTARYTMP=$NA(^TMP("GPLCCR",$J,"VITALARYTMP"))
     37          K @VITTVMAP,@VITTARYTMP ; KILL OLD ARRAY VALUES
    3738          F J=1:1:VITRSLT(1)  D  ; FOR EACH VITAL IN THE LIST
    3839          . I $D(VITRSLT(J)) D
Note: See TracChangeset for help on using the changeset viewer.