make template from variable

2009-12-15 22:04:03 +00:00 · 2009-12-15 22:04:03 +00:00 · fac7922749
parent 86b5d4fbbf
commit fac7922749
1 changed files with 5 additions and 1 deletions
--- a/p/C0CMXP.m
+++ b/p/C0CMXP.m
@ -79,7 +79,11 @@ GETXML(OUTXML,TEMPID,FARY) ;GET THE XML FROM TEMPLATE TEMPID
 MKTPLATE(OUTT,INXML,REDUX) ;MAKE A TEMPLATE FROM INXML, RETURNED IN OUTT
 ; BOTH PASSED BY NAME
 ;
- S C0CDOCID=$$PARSE^C0CMXML(INXML,"C0CMKT")
+ S C0CXLOC=$NA(^TMP("C0CXML",$J))
+ K @C0CXLOC
+ M @C0CXLOC=@INXML
+ S C0CDOCID=$$PARSE^C0CMXML(C0CXLOC,"C0CMKT")
+ K @C0CXLOC
 S C0CDOM=$NA(^TMP("MXMLDOM",$J,C0CDOCID)) 
 ;N GIDX,GIDX2,GARY,GARY2
 I '$D(REDUX) S REDUX=""