testing

2008-06-21 23:19:38 +00:00 · 2008-06-21 23:19:38 +00:00 · 79bdb2872d
parent 6e246fc94f
commit 79bdb2872d
1 changed files with 1 additions and 1 deletions
--- a/p/GPLCCR.m
+++ b/p/GPLCCR.m
@ -4,7 +4,7 @@ GPLCCR ; CCDCCR/GPL - CCR MAIN PROCESSING; 6/6/08
 ; EXPORT A CCR
 ;
 EXPORT ; EXPORT ENTRY POINT FOR CCR
-        ; would like to call fileman routine here to select a patient
+        ; Select a patient.
        S DIC=2,DIC(0)="AEMQ" D ^DIC
        S DFN=$P(Y,U,1) ; SET THE PATIENT
        N CCRGLO