Index: ccr/trunk/p/C0CVITAL.m
===================================================================
--- ccr/trunk/p/C0CVITAL.m	(revision 404)
+++ ccr/trunk/p/C0CVITAL.m	(revision 405)
@@ -30,8 +30,8 @@
  S C0CVLMT=$$GET^C0CPARMS("VITLIMIT") ; GET THE LIMIT PARM
  S C0CVSTRT=$$GET^C0CPARMS("VITSTART") ; GET START PARM
- D DT^DILF(,C0CVLMT,.C0CSDT) ;
+ ;D DT^DILF(,C0CVLMT,.C0CEDT) ;
+ ;D DT^DILF(,C0CVSTRT,.C0CSDT) ; 
  W "VITALS START: ",C0CVSTRT," LIMIT: ",C0CVLMT,!
- D DT^DILF(,C0CVSTRT,.C0CEDT) ; END DATE TODAY - IMPLEMENT END DATE PARM
- D VITALS^ORQQVI(.VITRSLT,DFN,C0CSDT,C0CEDT)
+ D VITALS^ORQQVI(.VITRSLT,DFN,C0CVSTRT,C0CVLMT)
  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