Index: /ccr/trunk/p/C0CRNF.m
===================================================================
--- /ccr/trunk/p/C0CRNF.m	(revision 568)
+++ /ccr/trunk/p/C0CRNF.m	(revision 569)
@@ -295,4 +295,8 @@
  Q
  ;
+READCSV(PATH,NAME,GLB) ; READ A CSV FILE IN FROM UNIX TO GLB, PASSED BY NAME
+ ;
+ Q $$FTG^%ZISH(PATH,NAME,GLB,1)
+ ;
 FILE2CSV(FNUM,FVN)	; WRITES OUT A FILEMAN FILE TO CSV
  ;
Index: /ccr/trunk/p/C0CVITAL.m
===================================================================
--- /ccr/trunk/p/C0CVITAL.m	(revision 568)
+++ /ccr/trunk/p/C0CVITAL.m	(revision 569)
@@ -40,6 +40,6 @@
  ;
 VITVISTA	; EXTRACT VITALS FROM VISTA INTO PROVIDED XML TEMPLATE
- ;D VITALS^ORQQVI(.VITRSLT,DFN,C0CSDT,C0CEDT)
- D VITALS^ORQQVI(.VITRSLT,DFN,C0CVSTRT,C0CVLMT) ; GPL LET GMR HANDLE THE DATES
+ 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
  I $P(VITRSLT(1),U,2)="No vitals found." D  Q  ; NULL RESULT FROM RPC