Index: /ccr/trunk/p/C0CCCR0.m
===================================================================
--- /ccr/trunk/p/C0CCCR0.m	(revision 576)
+++ /ccr/trunk/p/C0CCCR0.m	(revision 577)
@@ -1,4 +1,4 @@
-C0CCCR0	; CCDCCR/GPL - CCR TEMPLATE AND ACCESS ROUTINES; 5/31/08
- ;;1.0;C0C;;May 19, 2009;
+C0CCCR0 ; CCDCCR/GPL - CCR TEMPLATE AND ACCESS ROUTINES; 5/31/08
+ ;;1.0;C0C;;May 19, 2009;Build 32
  ;Copyright 2008,2009 George Lilly, University of Minnesota.
  ;Licensed under the terms of the GNU General Public License.
@@ -23,5 +23,5 @@
  Q
  ;
-ZT(ZARY,BAT,LINE)	      ; private routine to add a line to the ZARY array
+ZT(ZARY,BAT,LINE)       ; private routine to add a line to the ZARY array
  ; ZARY IS PASSED BY NAME
  ; BAT is a string identifying the section
@@ -38,5 +38,5 @@
  Q
  ;
-ZLOAD(ZARY,ROUTINE)	     ; load tests into ZARY which is passed by reference
+ZLOAD(ZARY,ROUTINE)      ; load tests into ZARY which is passed by reference
  ; ZARY IS PASSED BY NAME
  ; ZARY = name of the root, closed array format (e.g., "^TMP($J)")
@@ -58,5 +58,5 @@
  Q
  ;
-LOAD(ARY)	      ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME
+LOAD(ARY)       ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME
  D ZLOAD(ARY,"C0CCCR0")
  ; ZWR @ARY
@@ -103,21 +103,21 @@
  ;;<Problem>
  ;;<CCRDataObjectID>@@PROBLEMOBJECTID@@</CCRDataObjectID>
+ ;;<DateTime>
+ ;;<ExactDateTime>@@PROBLEMDATEMOD@@</ExactDateTime>
+ ;;</DateTime>
  ;;<Type>
  ;;<Text>Problem</Text>
  ;;</Type>
+ ;;<Description>
+ ;;<Text>@@PROBLEMDESCRIPTION@@</Text>
+ ;;<Code>
+ ;;<Value>@@PROBLEMCODEVALUE@@</Value>
+ ;;<CodingSystem>ICD9CM</CodingSystem>
+ ;;<Version>@@PROBLEMCODINGVERSION@@</Version>
+ ;;</Code>
+ ;;</Description>
  ;;<Status>
  ;;<Text>@@PROBLEMSTATUS@@</Text>
  ;;</Status>
- ;;<Description>
- ;;<Text>@@PROBLEMDESCRIPTION@@</Text>
- ;;<Code>
- ;;<Value>@@PROBLEMCODEVALUE@@</Value>
- ;;<CodingSystem>ICD9CM</CodingSystem>
- ;;<Version>@@PROBLEMCODINGVERSION@@</Version>
- ;;</Code>
- ;;</Description>
- ;;<DateTime>
- ;;<ExactDateTime>@@PROBLEMDATEMOD@@</ExactDateTime>
- ;;</DateTime>
  ;;<Source>
  ;;<Actor>
@@ -248,20 +248,20 @@
  ;;<Alert>
  ;;<CCRDataObjectID>@@ALERTOBJECTID@@</CCRDataObjectID>
+ ;;<DateTime>
+ ;;<ExactDateTime>@@ALERTDATETIME@@</ExactDateTime>
+ ;;</DateTime>
  ;;<Type>
  ;;<Text>@@ALERTTYPE@@</Text>
  ;;</Type>
- ;;<Description>
- ;;<Text>@@ALERTDESCRIPTIONTEXT@@</Text>
- ;;<Code>
- ;;<Value>@@ALERTCODEVALUE@@</Value>
- ;;<CodingSystem>@@ALERTCODESYSTEM@@</CodingSystem>
- ;;</Code>
- ;;</Description>
  ;;<Status>
  ;;<Text>@@ALERTSTATUSTEXT@@</Text>
  ;;</Status>
- ;;<DateTime>
- ;;<ExactDateTime>@@ALERTDATETIME@@</ExactDateTime>
- ;;</DateTime>
+ ;;<Description>
+ ;;<Text>@@ALERTDESCRIPTIONTEXT@@</Text>
+ ;;<Code>
+ ;;<Value>@@ALERTCODEVALUE@@</Value>
+ ;;<CodingSystem>@@ALERTCODESYSTEM@@</CodingSystem>
+ ;;</Code>
+ ;;</Description>
  ;;<Source>
  ;;<Actor>
@@ -275,7 +275,8 @@
  ;;<Source>
  ;;<Actor>
- ;;<ActorID>@@ALERTAGENTPRODUCTSOURCEID@@</ActorID>
- ;;</Actor>
- ;;</Source>
+ ;;<ActorID>@@ALERTSOURCEID@@</ActorID>
+ ;;</Actor>
+ ;;</Source>
+ ;;<Product>
  ;;<ProductName>
  ;;<Text>@@ALERTAGENTPRODUCTNAMETEXT@@</Text>
@@ -285,4 +286,5 @@
  ;;</Code>
  ;;</ProductName>
+ ;;</Product>
  ;;</Product>
  ;;</Products>