Changeset 42

Timestamp:

Jul 4, 2008, 9:49:05 PM (16 years ago)

Author:

George Lilly

Message:

Changes to template for types of actors

File:

• ccr/trunk/p/GPLCCR0.m (modified) (9 diffs)

ccr/trunk/p/GPLCCR0.m

@@ -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 +20 @@
           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 +40 @@
           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 +46 @@
           ;
 ;<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 +422 @@
 ;;</Body>
 ;;<Actors>
+;;<ACTOR-PATIENT>
 ;;<Actor>
 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
@@ -475 +476 @@
 ;;</Source>
 ;;</Actor>
+;;</ACTOR-PATIENT>
+;;<ACTOR-SYSTEM>
 ;;<Actor>
 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
@@ -487 +490 @@
 ;;</Source>
 ;;</Actor>
+;;</ACTOR-SYSTEM>
+;;<ACTOR-NOK>
 ;;<Actor>
 ;;<ActorObjectID>AA0003</ActorObjectID>
@@ -503 +508 @@
 ;;</Source>
 ;;</Actor>
+;;</ACTOR-NOK>
+;;<ACTOR-PROVIDER>
 ;;<Actor>
 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
@@ -530 +537 @@
 ;;</Source>
 ;;</Actor>
+;;</ACTOR-PROVIDER>
 ;;</Actors>
 ;;<Signatures>