Index: ccr/trunk/p/CCRMEDS.m
===================================================================
--- ccr/trunk/p/CCRMEDS.m	(revision 196)
+++ ccr/trunk/p/CCRMEDS.m	(revision 197)
@@ -53,5 +53,5 @@
  . E  D CP^GPLXPATH(PENDINGXML,MEDOUTXML) ; NO ACTIVE MEDS, JUST COPY
  . S MEDCNT=MEDCNT+@MEDTVMAP@(0) ; SAVE COUNT TO KNOW HOW TO ADD TO MAP
- . W MEDCNT,!
+ . ; W MEDCNT,!
  . W "HAS OP PENDING MEDS",!
  N MEDRSLT,I,J,K,MEDPTMP,X,MEDVMAP,TBUF
@@ -83,5 +83,5 @@
  F ZI=1:1:ZA(0) D  ; FOR EACH MED
  . I DEBUG W "ZI IS ",ZI,!
- . W ZI," ",MEDCNT,!
+ . ; W ZI," ",MEDCNT,!
  . S ZJ=$P(ZA(ZI),U,1) ; INDEX OF FIRST LINE OF MED IN MEDRSLT
  . S MEDPTMP=MEDRSLT(ZJ) ; PULL OUT FIRST LINE OF MED