Index: /ccr/trunk/p/GPLCCR.m
===================================================================
--- /ccr/trunk/p/GPLCCR.m	(revision 137)
+++ /ccr/trunk/p/GPLCCR.m	(revision 138)
@@ -45,5 +45,5 @@
        N ZY
        S ZY=$$OUTPUT^GPLXPATH(OARY,ONAM,ODIR)
-       W !,$P(ZY,U,2)
+       W !,$P(ZY,U,2),!
        Q
        ;
Index: /ccr/trunk/p/GPLVITAL.m
===================================================================
--- /ccr/trunk/p/GPLVITAL.m	(revision 137)
+++ /ccr/trunk/p/GPLVITAL.m	(revision 138)
@@ -30,5 +30,5 @@
           I '$D(VITRSLT(1)) S @VITOUTXML@(0)=0 Q  ; RETURN NOT FOUND AND QUIT
           I $P(VITRSLT(1),U,2)="No vitals found." D  Q  ; NULL RESULT FROM RPC
-          . W "NO VITALS FOUND FROM VITALS RPC",!
+          . I DEBUG W "NO VITALS FOUND FROM VITALS RPC",!
           . S @VITOUTXML@(0)=0
           I $P(VITRSLT(1),U,2)="No vitals found." Q  ; QUIT