Changeset 46

Timestamp:

Jul 5, 2008, 8:12:17 PM (16 years ago)

Author:

George Lilly

Message:

Actors unit test D ZTEST^{GPLCCR("ACTORS")}

File:

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

ccr/trunk/p/GPLCCR.m

@@ -158 +158 @@
  ;;>>>D QUERY^GPLXPATH(TGLOBAL,"//ContinuityOfCareRecord/Actors","G2")
  ;;>>>D EXTRACT^GPLACTORS("G2","ACTTEST","G3")
+ ;;>>?G3(G3(0))["</Actors>"
  ;;></TEST>