Index: ccr/trunk/p/GPLCCR0.m
===================================================================
--- ccr/trunk/p/GPLCCR0.m	(revision 41)
+++ ccr/trunk/p/GPLCCR0.m	(revision 42)
@@ -5,5 +5,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
@@ -20,5 +20,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)")
@@ -40,5 +40,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,"GPLCCR0")
           ; ZWR @ARY
@@ -46,5 +46,5 @@
           ;
 ;<TEMPLATE>
-;;<?xml	version="1.0" encoding="UTF-8"?>
+;;<?xml version="1.0" encoding="UTF-8"?>
 ;;<?xml-stylesheet type="text/xsl" href="ccr_20060420.xsl"?>
 ;;<ContinuityOfCareRecord xmlns="urn:astm-org:CCR">
@@ -422,4 +422,5 @@
 ;;</Body>
 ;;<Actors>
+;;<ACTOR-PATIENT>
 ;;<Actor>
 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
@@ -475,4 +476,6 @@
 ;;</Source>
 ;;</Actor>
+;;</ACTOR-PATIENT>
+;;<ACTOR-SYSTEM>
 ;;<Actor>
 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
@@ -487,4 +490,6 @@
 ;;</Source>
 ;;</Actor>
+;;</ACTOR-SYSTEM>
+;;<ACTOR-NOK>
 ;;<Actor>
 ;;<ActorObjectID>AA0003</ActorObjectID>
@@ -503,4 +508,6 @@
 ;;</Source>
 ;;</Actor>
+;;</ACTOR-NOK>
+;;<ACTOR-PROVIDER>
 ;;<Actor>
 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
@@ -530,4 +537,5 @@
 ;;</Source>
 ;;</Actor>
+;;</ACTOR-PROVIDER>
 ;;</Actors>
 ;;<Signatures>