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


Ignore:
Timestamp:
Aug 12, 2008, 1:37:18 PM (16 years ago)
Author:
George Lilly
Message:

fixed handling of nul results from Vitals and Problems RPCs

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/GPLVITALS.m

    r74 r87  
    2828          N VITRSLT,J,K,VITPTMP,X,VITVMAP,TBUF
    2929          D VITALS^ORQQVI(.VITRSLT,DFN,"","")
    30           I '$D(VITRSLT(1)) W "ERROR RUNNINIG VITALS RPC",! Q
     30          I '$D(VITRSLT(1)) D  ; NULL RESULT FROM RPC
     31          . W "NULL RESULT FROM VITALS RPC",!
     32          . S @VITOUTXML@(0)=0
     33          . Q
    3134          ; ZWR RPCRSLT
    3235          S VITTVMAP=$NA(^TMP("GPLCCR",$J,"VITALS"))
Note: See TracChangeset for help on using the changeset viewer.