Changeset 138
- Timestamp:
- Sep 4, 2008, 12:08:04 PM (16 years ago)
- Location:
- ccr/trunk/p
- Files:
-
- 2 edited
-
GPLCCR.m (modified) (1 diff)
-
GPLVITAL.m (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
ccr/trunk/p/GPLCCR.m
r136 r138 45 45 N ZY 46 46 S ZY=$$OUTPUT^GPLXPATH(OARY,ONAM,ODIR) 47 W !,$P(ZY,U,2) 47 W !,$P(ZY,U,2),! 48 48 Q 49 49 ; -
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.
