Changeset 138 for ccr/trunk/p/GPLVITAL.m
- Timestamp:
- Sep 4, 2008, 12:08:04 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ccr/trunk/p/GPLVITAL.m
r135 r138 30 30 I '$D(VITRSLT(1)) S @VITOUTXML@(0)=0 Q ; RETURN NOT FOUND AND QUIT 31 31 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",! 33 33 . S @VITOUTXML@(0)=0 34 34 I $P(VITRSLT(1),U,2)="No vitals found." Q ; QUIT
Note:
See TracChangeset
for help on using the changeset viewer.