source: ccr/trunk/p/GPLCCR0.m@ 77

Last change on this file since 77 was 77, checked in by George Lilly, 17 years ago

Variable assigned in Results section of CCR template
File size: 18.5 KB
RevLine 
[40]1GPLCCR0 ; CCDCCR/GPL - CCR TEMPLATE AND ACCESS ROUTINES; 5/31/08
[61]2 ;;0.1;CCDCCR;nopatch;noreleasedate
3 ;Copyright 2008 WorldVistA. Licensed under the terms of the GNU
4 ;General Public License See attached copy of the License.
5 ;
6 ;This program is free software; you can redistribute it and/or modify
7 ;it under the terms of the GNU General Public License as published by
8 ;the Free Software Foundation; either version 2 of the License, or
9 ;(at your option) any later version.
10 ;
11 ;This program is distributed in the hope that it will be useful,
12 ;but WITHOUT ANY WARRANTY; without even the implied warranty of
13 ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 ;GNU General Public License for more details.
15 ;
16 ;You should have received a copy of the GNU General Public License along
17 ;with this program; if not, write to the Free Software Foundation, Inc.,
18 ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19 ;
[40]20 W "This is a CCR TEMPLATE with processing routines",!
21 W !
22 Q
23 ;
[42]24ZT(ZARY,BAT,LINE) ; private routine to add a line to the ZARY array
[40]25 ; ZARY IS PASSED BY NAME
26 ; BAT is a string identifying the section
27 ; LINE is a test which will evaluate to true or false
28 ; I '$G(@ZARY) D
29 . S @ZARY@(0)=0 ; initially there are no elements
30 . W "GOT HERE LOADING "_LINE,!
31 N CNT ; count of array elements
32 S CNT=@ZARY@(0) ; contains array count
33 S CNT=CNT+1 ; increment count
34 S @ZARY@(CNT)=LINE ; put the line in the array
35 ; S @ZARY@(BAT,CNT)="" ; index the test by battery
36 S @ZARY@(0)=CNT ; update the array counter
37 Q
38 ;
[42]39ZLOAD(ZARY,ROUTINE) ; load tests into ZARY which is passed by reference
[40]40 ; ZARY IS PASSED BY NAME
41 ; ZARY = name of the root, closed array format (e.g., "^TMP($J)")
42 ; ROUTINE = NAME OF THE ROUTINE - PASSED BY VALUE
43 K @ZARY S @ZARY=""
44 S @ZARY@(0)=0 ; initialize array count
45 N LINE,LABEL,BODY
46 N INTEST S INTEST=0 ; switch for in the TEMPLATE section
47 N SECTION S SECTION="[anonymous]" ; NO section LABEL
48 ;
49 N NUM F NUM=1:1 S LINE=$T(+NUM^@ROUTINE) Q:LINE="" D
50 . I LINE?." "1";<TEMPLATE>".E S INTEST=1 ; entering section
51 . I LINE?." "1";</TEMPLATE>".E S INTEST=0 ; leaving section
52 . I INTEST D ; within the section
53 . . I LINE?." "1";><".E D ; sub-section name found
54 . . . S SECTION=$P($P(LINE,";><",2),">",1) ; pull out name
55 . . I LINE?." "1";;".E D ; line found
56 . . . D ZT(ZARY,SECTION,$P(LINE,";;",2)) ; put the line in the array
57 Q
58 ;
[42]59LOAD(ARY) ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME
[40]60 D ZLOAD(ARY,"GPLCCR0")
61 ; ZWR @ARY
62 Q
63 ;
[53]64 ;<TEMPLATE>
65 ;;<?xml version="1.0" encoding="UTF-8"?>
[63]66 ;;<?xml-stylesheet type="text/xsl" href="ccr.xsl"?>
[53]67 ;;<ContinuityOfCareRecord xmlns="urn:astm-org:CCR">
68 ;;<CCRDocumentObjectID>871bd605-e8f8-4b80-9918-4b03f781129e</CCRDocumentObjectID>
69 ;;<Language>
70 ;;<Text>English</Text>
71 ;;</Language>
72 ;;<Version>V1.0</Version>
73 ;;<DateTime>
74 ;;<ExactDateTime>@@DATETIME@@</ExactDateTime>
75 ;;</DateTime>
76 ;;<Patient>
77 ;;<ActorID>@@ACTORPATIENT@@</ActorID>
78 ;;</Patient>
79 ;;<From>
80 ;;<ActorLink>
81 ;;<ActorID>@@ACTORFROM@@</ActorID>
82 ;;</ActorLink>
83 ;;<ActorLink>
84 ;;<ActorID>@@ACTORFROM2@@</ActorID>
85 ;;</ActorLink>
86 ;;</From>
87 ;;<To>
88 ;;<ActorLink>
89 ;;<ActorID>@@ACTORTO@@</ActorID>
90 ;;<ActorRole>
91 ;;<Text>@@ACTORTOTEXT@@</Text>
92 ;;</ActorRole>
93 ;;</ActorLink>
94 ;;</To>
95 ;;<Purpose>
96 ;;<Description>
97 ;;<Text>@@PURPOSEDESCRIPTION@@</Text>
98 ;;</Description>
99 ;;</Purpose>
100 ;;<Body>
101 ;;<Problems>
102 ;;<Problem>
103 ;;<CCRDataObjectID>@@PROBLEMOBJECTID@@</CCRDataObjectID>
104 ;;<Type>
105 ;;<Text>Problem</Text>
106 ;;</Type>
107 ;;<Description>
108 ;;<Text>@@PROBLEMDESCRIPTION@@</Text>
109 ;;<Code>
110 ;;<Value>@@PROBLEMCODEVALUE@@</Value>
111 ;;<CodingSystem>ICD9CM</CodingSystem>
112 ;;<Version>@@PROBLEMCODINGVERSION@@</Version>
113 ;;</Code>
114 ;;</Description>
115 ;;<Source>
116 ;;<Actor>
117 ;;<ActorID>@@PROBLEMSOURCEACTORID@@</ActorID>
118 ;;</Actor>
119 ;;</Source>
120 ;;</Problem>
121 ;;</Problems>
122 ;;<FamilyHistory>
123 ;;<FamilyProblemHistory>
124 ;;<CCRDataObjectID>@@FAMILYHISTORYOBJECTID@@</CCRDataObjectID>
125 ;;<Source>
126 ;;<Actor>
127 ;;<ActorID>@@FAMILYHISTORYACTORID@@</ActorID>
128 ;;</Actor>
129 ;;</Source>
130 ;;<FamilyMember>
131 ;;<ActorID>@@FAMILYMEMBERACTORID@@</ActorID>
132 ;;<ActorRole>
133 ;;<Text>@@FAMILYMEMBERACTORROLETEXT@@</Text>
134 ;;</ActorRole>
135 ;;<Source>
136 ;;<Actor>
137 ;;<ActorID>@@FAMILYMEMBERSOURCACTORID@@</ActorID>
138 ;;</Actor>
139 ;;</Source>
140 ;;</FamilyMember>
141 ;;<Problem>
142 ;;<Type>
143 ;;<Text>Problem</Text>
144 ;;</Type>
145 ;;<Description>
[71]146 ;;<Text>@@FAMILYMEMBERPROBLEMDESCRIPTION@@</Text>
[53]147 ;;<Code>
[71]148 ;;<Value>@@FAMILYMEMBERPROBLEMCODE@@</Value>
149 ;;<CodingSystem>@@FAMILYMEMBERCODESYSTEM@@</CodingSystem>
150 ;;<Version>@@FAMILYMEMBERCODEVERSION@@</Version>
[53]151 ;;</Code>
152 ;;</Description>
153 ;;<Source>
154 ;;<Actor>
[71]155 ;;<ActorID>@@FAMILYMEMBERPROBLEMSOURCEID@@</ActorID>
[53]156 ;;</Actor>
157 ;;</Source>
158 ;;</Problem>
159 ;;</FamilyProblemHistory>
160 ;;</FamilyHistory>
161 ;;<SocialHistory>
162 ;;<SocialHistoryElement>
163 ;;<CCRDataObjectID>@@SOCIALHISTORYOBJECTID@@</CCRDataObjectID>
164 ;;<Type>
165 ;;<Text>@@SOCIALHISTORYTYPETEXT@@</Text>
166 ;;</Type>
167 ;;<Description>
168 ;;<Text>@@SOCIALHISTORYDESCRIPTIONTEXT@@</Text>
169 ;;</Description>
170 ;;<Source>
171 ;;<Actor>
172 ;;<ActorID>@@SOCIALHISTORYSOURCACTORID@@</ActorID>
173 ;;</Actor>
174 ;;</Source>
175 ;;</SocialHistoryElement>
176 ;;<SocialHistoryElement>
177 ;;<CCRDataObjectID>BB0005</CCRDataObjectID>
178 ;;<Type>
179 ;;<Text>Ethnic Origin</Text>
180 ;;</Type>
181 ;;<Description>
182 ;;<Text>Not Hispanic or Latino</Text>
183 ;;</Description>
184 ;;<Source>
185 ;;<Actor>
186 ;;<ActorID>AA0001</ActorID>
187 ;;</Actor>
188 ;;</Source>
189 ;;</SocialHistoryElement>
190 ;;<SocialHistoryElement>
191 ;;<CCRDataObjectID>BB0006</CCRDataObjectID>
192 ;;<Type>
193 ;;<Text>Race</Text>
194 ;;</Type>
195 ;;<Description>
196 ;;<Text>White</Text>
197 ;;</Description>
198 ;;<Source>
199 ;;<Actor>
200 ;;<ActorID>AA0001</ActorID>
201 ;;</Actor>
202 ;;</Source>
203 ;;</SocialHistoryElement>
204 ;;<SocialHistoryElement>
205 ;;<CCRDataObjectID>BB0007</CCRDataObjectID>
206 ;;<Type>
207 ;;<Text>Occupation</Text>
208 ;;</Type>
209 ;;<Description>
210 ;;<Text>Physician</Text>
211 ;;</Description>
212 ;;<Source>
213 ;;<Actor>
214 ;;<ActorID>AA0001</ActorID>
215 ;;</Actor>
216 ;;</Source>
217 ;;</SocialHistoryElement>
218 ;;</SocialHistory>
[72]219 ;;<Alerts>
220 ;;<Alert>
221 ;;<CCRDataObjectID>@@ALERTOBJECTID@@</CCRDataObjectID>
222 ;;<Description>
223 ;;<Text>@@ALERTDESCRIPTIONTEXT@@</Text>
224 ;;<Code>
225 ;;<Value>@@ALERTCODEVALUE@@</Value>
226 ;;<CodingSystem>@@ALERTCODESYSTEM@@</CodingSystem>
227 ;;</Code>
228 ;;</Description>
229 ;;<Status>
230 ;;<Text>@@ALERTSTATUSTEXT@@</Text>
231 ;;</Status>
232 ;;<Source>
233 ;;<Actor>
234 ;;<ActorID>@@ALERTSOURCEID@@</ActorID>
235 ;;</Actor>
236 ;;</Source>
237 ;;<Agent>
238 ;;<Products>
239 ;;<Product>
240 ;;<CCRDataObjectID>@@ALERTAGENTPRODUCTOBJECTID@@</CCRDataObjectID>
241 ;;<Source>
242 ;;<Actor>
243 ;;<ActorID>@@ALERTAGENTPRODUCTSOURCEID@@</ActorID>
244 ;;</Actor>
245 ;;</Source>
246 ;;<Product>
247 ;;<ProductName>
248 ;;<Text>@@ALERTAGENTPRODUCTNAMETEXT@@</Text>
249 ;;<Code>
250 ;;<Value>@@ALERTAGENTPRODUCTCODEVALUE@@</Value>
251 ;;<CodingSystem>@@ALERTAGENTPRODUCTCODESYSTEM@@</CodingSystem>
252 ;;</Code>
253 ;;</ProductName>
254 ;;</Product>
255 ;;</Product>
256 ;;</Products>
257 ;;</Agent>
258 ;;<Reaction>
259 ;;<Description>
260 ;;<Text>@@ALERTREACTIOINDESCRIPTIONTEXT@@</Text>
261 ;;<Code>
262 ;;<Value>@@ALERTREACTIONCODEVALUE@@</Value>
263 ;;<CodingSystem>@@ALERTREACTIONCODESYSTEM@@</CodingSystem>
264 ;;</Code>
265 ;;</Description>
266 ;;</Reaction>
267 ;;</Alert>
268 ;;</Alerts>
[53]269 ;;<Medications>
270 ;;<Medication>
271 ;;<CCRDataObjectID>@@MEDICATIONOBJECTID@@</CCRDataObjectID>
272 ;;<DateTime>
273 ;;<Type>
274 ;;<Text>@@MEDICATIONDATETIMETEXT@@</Text>
275 ;;</Type>
276 ;;<Age>
277 ;;<Value>@@MEDICATIONDATETIMEAGE@@</Value>
278 ;;<Units>
279 ;;<Unit>@@MEDICATIONDATETIMEAGEUNITS@@</Unit>
280 ;;</Units>
281 ;;</Age>
282 ;;</DateTime>
283 ;;<Type>
284 ;;<Text>@@MEDICATIONTYPETEXT@@</Text>
285 ;;</Type>
286 ;;<Status>
287 ;;<Text>@@MEDICATIONSTATUSTEXT@@</Text>
288 ;;</Status>
289 ;;<Source>
290 ;;<Actor>
291 ;;<ActorID>@@MEDICATIONSOURCEACTORID@@</ActorID>
292 ;;</Actor>
293 ;;</Source>
294 ;;<Product>
295 ;;<ProductName>
296 ;;<Text>@@MEDICATIONPRODUCTNAMETEXT@@</Text>
297 ;;<Code>
298 ;;<Value>@@MEDICATIONPRODUCTNAMECODEVALUE@@</Value>
299 ;;<CodingSystem>@@MEDICATIONPRODUCTNAMECODINGINGSYSTEM@@</CodingSystem>
300 ;;<Version>@@MEDICATIONPRODUCTNAMECODEVERSION@@</Version>
301 ;;</Code>
302 ;;</ProductName>
303 ;;<BrandName>
304 ;;<Text>@@MEDICATIONBRANDNAMETEXT@@</Text>
305 ;;<Code>
306 ;;<Value>@@MEDICATIONBRANDNAMECODEVALUE@@</Value>
307 ;;<CodingSystem>@@MEDICATIONBRANDNAMECODINGSYSTEM@@</CodingSystem>
308 ;;<Version>@@MEDICATIONBRANDNAMECODEVERSION@@</Version>
309 ;;</Code>
310 ;;</BrandName>
311 ;;<Strength>
312 ;;<Value>@@MEDICATIONSTRENGTHVALUE@@</Value>
313 ;;<Units>
314 ;;<Unit>@@MEDICATIONSTRENGTHUNIT@@</Unit>
315 ;;</Units>
316 ;;</Strength>
317 ;;<Form>
318 ;;<Text>@@MEDICATIONFORMTEXT@@</Text>
319 ;;</Form>
320 ;;</Product>
321 ;;<Directions>
322 ;;<Direction>
323 ;;<Description>
324 ;;<Text>@@MEDICATIONDIRECTIONDESCRIPTIONTEXT@@</Text>
325 ;;</Description>
326 ;;<Dose>
327 ;;<Value>@@MEDICATIONDIRECTIONDOSEVALUE@@</Value>
328 ;;</Dose>
329 ;;<Route>
330 ;;<Text>@@MEDICATIONDIRECTIONROUTETEXT@@</Text>
331 ;;</Route>
332 ;;<Frequency>
333 ;;<Value>@@MEDICATIONDIRECTIONFREQUENCYVALUE@@</Value>
334 ;;</Frequency>
335 ;;</Direction>
336 ;;</Directions>
337 ;;</Medication>
338 ;;</Medications>
339 ;;<VitalSigns>
340 ;;<Result>
341 ;;<CCRDataObjectID>@@VITALSIGNSDATAOBJECTID@@</CCRDataObjectID>
342 ;;<DateTime>
343 ;;<Type>
344 ;;<Text>@@VITALSIGNSDATETIMETYPETEXT@@</Text>
345 ;;</Type>
346 ;;<ExactDateTime>@@VITALSIGNSEXACTDATETIME@@</ExactDateTime>
347 ;;</DateTime>
348 ;;<Description>
349 ;;<Text>@@VITALSIGNSDESCRIPTIONTEXT@@</Text>
350 ;;</Description>
351 ;;<Source>
352 ;;<Actor>
353 ;;<ActorID>@@VITALSIGNSSOURCEACTORID@@</ActorID>
354 ;;</Actor>
355 ;;</Source>
356 ;;<Test>
357 ;;<CCRDataObjectID>@@VITALSIGNSTESTOBJECTID@@</CCRDataObjectID>
358 ;;<Type>
359 ;;<Text>@@VITALSIGNSTESTTYPETEXT@@</Text>
360 ;;</Type>
361 ;;<Description>
362 ;;<Text>@@VITALSIGNSDESCRIPTIONTEXT@@</Text>
363 ;;<Code>
364 ;;<Value>@@VITALSIGNSDESCRIPTIONCODEVALUE@@</Value>
365 ;;<CodingSystem>@@VITALSIGNSDESCRIPTIONCODINGSYSTEM@@</CodingSystem>
366 ;;<Version>@@VITALSIGNSCODEVERSION@@</Version>
367 ;;</Code>
368 ;;</Description>
369 ;;<Source>
370 ;;<Actor>
371 ;;<ActorID>@@VITALSIGNSTESTSOURCEACTORID@@</ActorID>
372 ;;</Actor>
373 ;;</Source>
374 ;;<TestResult>
375 ;;<Value>@@VITALSIGNSTESTRESULTVALUE@@</Value>
376 ;;<Units>
377 ;;<Unit>@@VITALSIGNSTESTRESULTUNIT@@</Unit>
378 ;;</Units>
379 ;;</TestResult>
380 ;;</Test>
381 ;;</Result>
382 ;;</VitalSigns>
[63]383 ;;<Results>
384 ;;<Result>
[77]385 ;;<CCRDataObjectID>@@RESULTOBJECTID@@</CCRDataObjectID>
[63]386 ;;<DateTime>
387 ;;<Type>
388 ;;<Text>Assessment Time</Text>
389 ;;</Type>
[77]390 ;;<ExactDateTime>@@RESULTASSESSMENTDATETIME@@</ExactDateTime>
[63]391 ;;</DateTime>
392 ;;<Description>
[77]393 ;;<Text>@@RESULTDESCRIPTIONTEXT@@</Text>
[63]394 ;;<Code>
[77]395 ;;<Value>@@RESULTCODE@@</Value>
396 ;;<CodingSystem>@@RESULTCODINGSYSTEM@@</CodingSystem>
[63]397 ;;</Code>
398 ;;</Description>
399 ;;<Status>
[77]400 ;;<Text>@@RESULTSTATUS@@</Text>
[63]401 ;;</Status>
402 ;;<Source>
403 ;;<Actor>
[77]404 ;;<ActorID>@@RESULTSOURCEACTORID@@</ActorID>
[63]405 ;;</Actor>
406 ;;</Source>
[77]407 ;;<TEST_NORMALDESCRIPTION>
408 ;;<Test>
409 ;;<CCRDataObjectID>@@RESULTTESTOBJECTID@@</CCRDataObjectID>
[63]410 ;;<DateTime>
411 ;;<Type>
412 ;;<Text>Assessment Time</Text>
413 ;;</Type>
[77]414 ;;<ExactDateTime>@@RESULTTESTDATETIME@@</ExactDateTime>
[63]415 ;;</DateTime>
416 ;;<Description>
[77]417 ;;<Text>@@RESULTTESTDESCRIPTIONTEXT@@</Text>
[63]418 ;;<Code>
[77]419 ;;<Value>@@RESULTTESTCODE@@</Value>
420 ;;<CodingSystem>@@RESULTTESTCODINGSYSTEM@@</CodingSystem>
[63]421 ;;</Code>
422 ;;</Description>
423 ;;<Status>
[77]424 ;;<Text>@@RESULTTESTSTATUSTEXT@@</Text>
[63]425 ;;</Status>
426 ;;<Source>
427 ;;<Actor>
[77]428 ;;<ActorID>@@RESULTTESTSOURCEACTORID@@</ActorID>
[63]429 ;;</Actor>
430 ;;</Source>
431 ;;<TestResult>
[77]432 ;;<Value>@@RESULTTESTVALUE@@</Value>
[63]433 ;;<Units>
[77]434 ;;<Unit>@@RESULTTESTUNITS@@</Unit>
[63]435 ;;</Units>
436 ;;</TestResult>
437 ;;<NormalResult>
438 ;;<Normal>
439 ;;<Description>
[77]440 ;;<Text>@@RESULTTESTNORMALDESCRIPTIONTEXT@@</Text>
[63]441 ;;</Description>
442 ;;<Source>
443 ;;<Actor>
[77]444 ;;<ActorID>@@RESULTTESTNORMALSOURCEACTORID@@</ActorID>
[63]445 ;;</Actor>
446 ;;</Source>
447 ;;</Normal>
448 ;;</NormalResult>
449 ;;<Flag>
[77]450 ;;<Text>@@RESULTTESTFLAG@@</Text>
[63]451 ;;</Flag>
452 ;;</Test>
[77]453 ;;</TEST_NORMALDESCRIPTION>
454 ;;<TEST_NORMALSEQUENCE>
[63]455 ;;<Test>
[77]456 ;;<CCRDataObjectID>@@RESULTTESTOBJECTID@@</CCRDataObjectID>
[63]457 ;;<DateTime>
458 ;;<Type>
459 ;;<Text>Assessment Time</Text>
460 ;;</Type>
[77]461 ;;<ExactDateTime>@@RESULTTESTDATETIME@@</ExactDateTime>
[63]462 ;;</DateTime>
463 ;;<Description>
[77]464 ;;<Text>@@RESULTTESTDESCRIPTIONTEXT@@</Text>
[63]465 ;;<Code>
[77]466 ;;<Value>@@RESULTTESTVALUE@@</Value>
467 ;;<CodingSystem>@@RESULTTESTCODINGSYSTEM@@</CodingSystem>
[63]468 ;;</Code>
469 ;;</Description>
470 ;;<Status>
[77]471 ;;<Text>@@RESULTTESTSTATUSTEXT@@</Text>
[63]472 ;;</Status>
473 ;;<Source>
474 ;;<Actor>
[77]475 ;;<ActorID>@@RESULTTESTSOURCEACTORID@@</ActorID>
[63]476 ;;</Actor>
477 ;;</Source>
478 ;;<TestResult>
[77]479 ;;<Value>@@RESULTTESTVALUE@@</Value>
[63]480 ;;<Units>
[77]481 ;;<Unit>@@RESULTTESTUNITS@@</Unit>
[63]482 ;;</Units>
483 ;;</TestResult>
484 ;;<NormalResult>
485 ;;<Normal>
[77]486 ;;<Value>@@RESULTTESTNORMALVALUESEQ1@@</Value>
[63]487 ;;<Units>
[77]488 ;;<Unit>@@RESULTTESTNORMALUNITSEQ1@@</Unit>
[63]489 ;;</Units>
490 ;;<ValueSequencePosition>1</ValueSequencePosition>
491 ;;<Source>
492 ;;<Actor>
[77]493 ;;<ActorID>@@RESULTTESTNORMALSOURCEACTORID@@</ActorID>
[63]494 ;;</Actor>
495 ;;</Source>
496 ;;</Normal>
497 ;;<Normal>
[77]498 ;;<Value>@@RESULTTESTNORMALVALUESEQ2@@</Value>
[63]499 ;;<Units>
[77]500 ;;<Unit>@@RESULTTESTNORMALUNITSEQ2@@</Unit>
[63]501 ;;</Units>
502 ;;<ValueSequencePosition>2</ValueSequencePosition>
503 ;;<VariableNomalModifier>
[77]504 ;;<Text>@@RESULTTESTNORMALMODIFIER@@</Text>
[63]505 ;;</VariableNomalModifier>
506 ;;<Source>
507 ;;<Actor>
[77]508 ;;<ActorID>@@RESULTTESTNORMALSOURCEACTORID@@</ActorID>
[63]509 ;;</Actor>
510 ;;</Source>
511 ;;</Normal>
512 ;;</NormalResult>
513 ;;<Flag>
[77]514 ;;<Text>@@RESULTTESTFLAG@@</Text>
[63]515 ;;</Flag>
516 ;;</Test>
[77]517 ;;</TEST_NORMALSEQUENCE>
[63]518 ;;</Result>
519 ;;</Results>
[53]520 ;;<HealthCareProviders>
521 ;;<Provider>
522 ;;<ActorID>AA0005</ActorID>
523 ;;<ActorRole>
524 ;;<Text>Primary Provider</Text>
525 ;;</ActorRole>
526 ;;</Provider>
527 ;;</HealthCareProviders>
528 ;;</Body>
529 ;;<Actors>
530 ;;<ACTOR-PATIENT>
531 ;;<Actor>
532 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
533 ;;<Person>
534 ;;<Name>
535 ;;<CurrentName>
536 ;;<Given>@@ACTORGIVENNAME@@</Given>
537 ;;<Middle>@@ACTORMIDDLENAME@@</Middle>
538 ;;<Family>@@ACTORFAMILYNAME@@</Family>
539 ;;</CurrentName>
540 ;;</Name>
541 ;;<DateOfBirth>
542 ;;<ExactDateTime>@@ACTORDATEOFBIRTH@@</ExactDateTime>
543 ;;</DateOfBirth>
544 ;;<Gender>
[68]545 ;;<Text>@@ACTORGENDER@@</Text>
[53]546 ;;<Code>
547 ;;<Value>@@ACTORGENDER@@</Value>
548 ;;<CodingSystem>2.16.840.1.113883.5.1</CodingSystem>
549 ;;</Code>
550 ;;</Gender>
551 ;;</Person>
552 ;;<IDs>
553 ;;<Type>
554 ;;<Text>SSN</Text>
555 ;;</Type>
556 ;;<ID>@@ACTORSSN@@</ID>
557 ;;<Source>
558 ;;<Actor>
559 ;;<ActorID>@@ACTORSSNSOURCEID@@</ActorID>
560 ;;</Actor>
561 ;;</Source>
562 ;;</IDs>
563 ;;<Address>
564 ;;<Type>
565 ;;<Text>@@ACTORADDRESSTYPE@@</Text>
566 ;;</Type>
567 ;;<Line1>@@ACTORADDRESSLINE1@@</Line1>
568 ;;<Line2>@@ACTORADDRESSLINE2@@</Line2>
569 ;;<City>@@ACTORADDRESSCITY@@</City>
570 ;;<State>@@ACTORADDRESSSTATE@@</State>
571 ;;<PostalCode>@@ACTORADDRESSZIPCODE@@</PostalCode>
572 ;;</Address>
573 ;;<Telephone>
574 ;;<Value>@@ACTORRESTEL@@</Value>
575 ;;<Type>
576 ;;<Text>Residential Telephone</Text>
577 ;;</Type>
578 ;;</Telephone>
579 ;;<Telephone>
580 ;;<Value>@@ACTORWORKTEL@@</Value>
581 ;;<Type>
582 ;;<Text>Work Telephone</Text>
583 ;;</Type>
584 ;;</Telephone>
585 ;;<Telephone>
586 ;;<Value>@@ACTORCELLTEL@@</Value>
587 ;;<Type>
588 ;;<Text>Cell phone</Text>
589 ;;</Type>
590 ;;</Telephone>
591 ;;<EMail>
592 ;;<Value>@@ACTOREMAIL@@</Value>
593 ;;</EMail>
594 ;;<Source>
595 ;;<Actor>
596 ;;<ActorID>@@ACTORADDRESSSOURCEID@@</ActorID>
597 ;;</Actor>
598 ;;</Source>
599 ;;</Actor>
600 ;;</ACTOR-PATIENT>
601 ;;<ACTOR-SYSTEM>
602 ;;<Actor>
603 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
604 ;;<InformationSystem>
605 ;;<Name>@@ACTORINFOSYSNAME@@</Name>
606 ;;<Version>@@ACTORINFOSYSVER@@</Version>
607 ;;</InformationSystem>
608 ;;<Source>
609 ;;<Actor>
610 ;;<ActorID>@@ACTORINFOSYSSOURCEID@@</ActorID>
611 ;;</Actor>
612 ;;</Source>
613 ;;</Actor>
614 ;;</ACTOR-SYSTEM>
615 ;;<ACTOR-NOK>
616 ;;<Actor>
617 ;;<ActorObjectID>AA0003</ActorObjectID>
618 ;;<Person>
619 ;;<Name>
620 ;;<DisplayName>@@ACTORDISPLAYNAME@@</DisplayName>
621 ;;</Name>
622 ;;</Person>
623 ;;<Relation>
624 ;;<Text>@@ACTORRELATION@@</Text>
625 ;;</Relation>
626 ;;<Source>
627 ;;<Actor>
628 ;;<ActorID>@@ACTORRELATIONSOURCEID@@</ActorID>
629 ;;</Actor>
630 ;;</Source>
631 ;;</Actor>
632 ;;</ACTOR-NOK>
633 ;;<ACTOR-PROVIDER>
634 ;;<Actor>
635 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
636 ;;<Person>
637 ;;<Name>
638 ;;<CurrentName>
639 ;;<Given>@@ACTORGIVENNAME@@</Given>
[54]640 ;;<Middle>@@ACTORMIDDLENAME@@</Middle>
[53]641 ;;<Family>@@ACTORFAMILYNAME@@</Family>
[54]642 ;;<Title>@@ACTORTITLE@@</Title>
[53]643 ;;</CurrentName>
644 ;;</Name>
645 ;;</Person>
[54]646 ;;<IDs>
[55]647 ;;<Type>
[58]648 ;;<Text>@@IDTYPE@@</Text>
[55]649 ;;</Type>
[58]650 ;;<ID>@@ID@@</ID>
651 ;;<IssuedBy>
652 ;;<Description>
653 ;;<Text>@@IDDESC@@</Text>
654 ;;</Description>
655 ;;</IssuedBy>
[54]656 ;;</IDs>
[53]657 ;;<Specialty>
658 ;;<Text>@@ACTORSPECIALITY@@</Text>
659 ;;</Specialty>
660 ;;<Address>
661 ;;<Type>
662 ;;<Text>@@ACTORADDRESSTYPE@@</Text>
663 ;;</Type>
664 ;;<Line1>@@ACTORADDRESSLINE1@@</Line1>
[54]665 ;;<City>@@ACTORADDRESSCITY@@</City>
[53]666 ;;<State>@@ACTORADDRESSSTATE@@</State>
[54]667 ;;<PostalCode>@@ACTORPOSTALCODE@@</PostalCode>
[53]668 ;;</Address>
[54]669 ;;<Telephone>
670 ;;<Value>@@ACTORTELEPHONE@@</Value>
[55]671 ;;<Type>
[68]672 ;;<Text>@@ACTORTELEPHONETYPE@@</Text>
[55]673 ;;</Type>
[54]674 ;;</Telephone>
675 ;;<Email>
676 ;;<Value>@@ACTOREMAIL@@</Value>
677 ;;</Email>
[53]678 ;;<Source>
679 ;;<Actor>
680 ;;<ActorID>@@ACTORSOURCEID@@</ActorID>
681 ;;</Actor>
682 ;;</Source>
683 ;;</Actor>
684 ;;</ACTOR-PROVIDER>
[57]685 ;;<ACTOR-ORG>
686 ;;<Actor>
687 ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
688 ;;<Organization>
689 ;;<Name>@@ORGANIZATIONNAME@@</Name>
690 ;;</Organization>
691 ;;<Source>
692 ;;<Actor>
693 ;;<ActorID>@@ACTORSOURCEID</ActorID>
694 ;;</Actor>
695 ;;</Source>
696 ;;</Actor>
697 ;;</ACTOR-ORG>
[53]698 ;;</Actors>
699 ;;<Signatures>
700 ;;<CCRSignature>
701 ;;<SignatureObjectID>S0001</SignatureObjectID>
702 ;;<ExactDateTime>2008-03-18T23:10:58Z</ExactDateTime>
703 ;;<Source>
704 ;;<ActorID>AA0001</ActorID>
705 ;;</Source>
706 ;;<Signature>
707 ;;<Signature xmlns="http://www.w3.org/2000/09/xmldsig#">
708 ;;<SignedInfo>
709 ;;<CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/>
710 ;;<SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/>
711 ;;<Reference URI="">
712 ;;<Transforms>
713 ;;<Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/>
714 ;;</Transforms>
715 ;;<DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/>
716 ;;<DigestValue>YFveLLyo+75P7rSciv0/m1O6Ot4=</DigestValue>
717 ;;</Reference>
718 ;;</SignedInfo>
719 ;;<SignatureValue>Bj6sACXl74hrlbUYnu8HqnRab5VGy69BOYjOH7dETxgppXMEd7AoVYaePZvgJft78JR4oQY76hbFyGcIslYauPpJxx2hCd5d56xFeaQg01R6AQOvGnhjlq63TbpFdUq0B4tYsmiibJPbQJhTQe+TcWTBvWaQt8Fkk5blO571YvI=</SignatureValue>
720 ;;<KeyInfo>
721 ;;<KeyValue>
722 ;;<RSAKeyValue>
723 ;;<Modulus>meH817QYol+/uUEg6j8Mg89s7GTlaN9B+/CGlzrtnQH+swMigZRnEPxHVO8PhEymP/W9nlhAjTScV/CUzA9yJ9WiaOn17c+KReKhfBqL24DX9BpbJ+kLYVz7mBO5Qydk5AzUT2hFwW93irD8iRKP+/t+2Mi2CjNfj8VTjJpHpm0=</Modulus>
724 ;;<Exponent>AQAB</Exponent>
725 ;;</RSAKeyValue>
726 ;;</KeyValue>
727 ;;</KeyInfo>
728 ;;</Signature>
729 ;;</Signature>
730 ;;</CCRSignature>
731 ;;</Signatures>
732 ;;</ContinuityOfCareRecord>
733 ;</TEMPLATE>
Note: See TracBrowser for help on using the repository browser.