Changeset 601 for ccr/trunk/p/C0CVITAL.m

Timestamp:

Nov 11, 2009, 1:04:41 AM (14 years ago)

Author:

George Lilly

Message:

support for incoming CCDs

File:

• ccr/trunk/p/C0CVITAL.m (modified) (1 diff)

ccr/trunk/p/C0CVITAL.m

@@ -40 +40 @@
  ;
 VITVISTA ; EXTRACT VITALS FROM VISTA INTO PROVIDED XML TEMPLATE
- D VITALS^ORQQVI(.VITRSLT,DFN,C0CSDT,C0CEDT)
+ D VITALS^ORQQVI(.VITRSLT,DFN,C0CEDT,C0CSDT)
+ ;D VITALS^ORQQVI(.VITRSLT,DFN,C0CSDT,C0CEDT)
  ;D VITALS^ORQQVI(.VITRSLT,DFN,C0CVSTRT,C0CVLMT) ; GPL LET GMR HANDLE THE DATES
  I '$D(VITRSLT(1)) S @VITOUTXML@(0)=0 Q  ; RETURN NOT FOUND AND QUIT