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

update version to 17

This commit is contained in:
george 2009-02-24 18:15:55 +00:00
parent d486df2760
commit 2e3164b707
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
p/GPLCCR.m
View File

@ -39,7 +39,7 @@ XPAT(DFN,XPARMS,DIR,FN) ; EXPORT ONE PATIENT TO A FILE
D CCRRPC(.CCRGLO,DFN,XPARMS,"CCR")
S OARY=$NA(^TMP("GPLCCR",$J,DFN,"CCR",1))
S ONAM=UFN
I UFN="" S ONAM="PAT_"_DFN_"_CCR_V1_0_16.xml"
I UFN="" S ONAM="PAT_"_DFN_"_CCR_V1_0_17.xml"
S ODIRGLB=$NA(^TMP("GPLCCR","ODIR"))
I '$D(@ODIRGLB) D ; IF NOT ODIR HAS BEEN SET
. ;S @ODIRGLB="/home/glilly/CCROUT"