iSharkFly-Open
/
VistA-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added variable names for header variables

This commit is contained in:
george 2008-06-24 23:36:55 +00:00
parent 713b17cdd9
commit c770ea51cc
2 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
p/GPLCCR.m
View File

@ -11,7 +11,7 @@ EXPORT ; EXPORT ENTRY POINT FOR CCR
D CCRRPC(.CCRGLO,DFN,"CCR")
S OARY=$NA(^TMP($J,DFN,"CCR",1))
S ONAM="PAT_"_DFN_"_CCR_V1.xml"
S ODIR="/home/glilly/CCROUT"
S ODIR="/home/wvehr1/EHR/CCR"
D OUTPUT^GPLXPATH(OARY,ONAM,ODIR)
Q
;

12
p/GPLCCR0.m
View File

@ -53,22 +53,22 @@ LOAD(ARY) ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME
;;</Language>
;;<Version>V1.0</Version>
;;<DateTime>
;;<ExactDateTime>2008-03-18T23:10:58Z</ExactDateTime>
;;<ExactDateTime>@@DATETIME@@2008-03-18T23:10:58Z</ExactDateTime>
;;</DateTime>
;;<Patient>
;;<ActorID>AA0001</ActorID>
;;<ActorID>@@ACTORPATIENT@@</ActorID>
;;</Patient>
;;<From>
;;<ActorLink>
;;<ActorID>AA0001</ActorID>
;;<ActorID>@@ACTORFROM@@</ActorID>
;;</ActorLink>
;;<ActorLink>
;;<ActorID>AA0002</ActorID>
;;<ActorID>@@ACTORFROM2@@</ActorID>
;;</ActorLink>
;;</From>
;;<To>
;;<ActorLink>
;;<ActorID>AA0005</ActorID>
;;<ActorID>@@ACTORTO@@</ActorID>
;;<ActorRole>
;;<Text>Primary Provider</Text>
;;</ActorRole>
@ -76,7 +76,7 @@ LOAD(ARY) ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME
;;</To>
;;<Purpose>
;;<Description>
;;<Text>CEND PHR</Text>
;;<Text>@@PURPOSEDESCRIPTION@@CEND PHR</Text>
;;</Description>
;;</Purpose>
;;<Body>