Changeset 416 for ccr/trunk/p/C0CUNIT.m

Timestamp:

Mar 22, 2009, 3:26:00 PM (15 years ago)

Author:

George Lilly

Message:

Changed CCRMEDS* to C0CMED*

File:

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

ccr/trunk/p/C0CUNIT.m

@@ -166 +166 @@
  W "QUERY^GPLXPATH(T,XPATH,""INXML"")",!!
  D QUERY^GPLXPATH(T,XPATH,"INXML")
- W "Executing EXTRACT^CCRMEDS(INXML,DFN,OUTXML)",!
+ W "Executing EXTRACT^C0CMED(INXML,DFN,OUTXML)",!
  W "OUTXML will be ^TMP($J,""OUT"")",!
  N OUTXML S OUTXML=$NA(^TMP($J,"OUT"))
- D EXTRACT^CCRMEDS6("INXML",DFN,OUTXML)
+ D EXTRACT^C0CMED6("INXML",DFN,OUTXML)
  D FILEOUT^C0CRNF(OUTXML,"TESTMEDS.xml")
  Q