Changeset 138 for ccr/trunk/p/GPLVITAL.m


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

made no vitals found silent unless debug

File:
1 edited

Legend:

Unmodified
Added
Removed
  • ccr/trunk/p/GPLVITAL.m

    r135 r138  
    3030          I '$D(VITRSLT(1)) S @VITOUTXML@(0)=0 Q  ; RETURN NOT FOUND AND QUIT
    3131          I $P(VITRSLT(1),U,2)="No vitals found." D  Q  ; NULL RESULT FROM RPC
    32           . W "NO VITALS FOUND FROM VITALS RPC",!
     32          . I DEBUG W "NO VITALS FOUND FROM VITALS RPC",!
    3333          . S @VITOUTXML@(0)=0
    3434          I $P(VITRSLT(1),U,2)="No vitals found." Q  ; QUIT
Note: See TracChangeset for help on using the changeset viewer.