Changeset 648 for ccr/trunk

Timestamp:

Dec 15, 2009, 5:04:03 PM (15 years ago)

Author:

George Lilly

Message:

make template from variable

File:

• ccr/trunk/p/C0CMXP.m (modified) (1 diff)

ccr/trunk/p/C0CMXP.m

@@ -80 +80 @@
  ; 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