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") D CCRRPC(.CCRGLO,DFN,"CCR")
S OARY=$NA(^TMP($J,DFN,"CCR",1)) S OARY=$NA(^TMP($J,DFN,"CCR",1))
S ONAM="PAT_"_DFN_"_CCR_V1.xml" S ONAM="PAT_"_DFN_"_CCR_V1.xml"
S ODIR="/home/glilly/CCROUT" S ODIR="/home/wvehr1/EHR/CCR"
D OUTPUT^GPLXPATH(OARY,ONAM,ODIR) D OUTPUT^GPLXPATH(OARY,ONAM,ODIR)
Q Q
; ;

12
p/GPLCCR0.m
View File

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