Changeset 265 for ccr/trunk/p/GPLLABS.m

Timestamp:

Nov 8, 2008, 11:43:41 PM (16 years ago)

Author:

George Lilly

Message:

changed number of parameters to EXTRACT^GPLLABS(DFN)

File:

• ccr/trunk/p/GPLLABS.m (modified) (2 diffs)

ccr/trunk/p/GPLLABS.m

@@ -18 +18 @@
  ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
            ;
-EXTRACT(LABXML,DFN,LABOUTXML) ; EXTRACT LABS INTO PROVIDED XML TEMPLATE
+EXTRACT(DFN) ; EXTRACT LABS INTO PROVIDED XML TEMPLATE
  ;
  ; LABXML AND LABOUTXML ARE PASSED BY NAME SO GLOBALS CAN BE USED
@@ -46 +46 @@
  ;
  ; N C0CI,C0CJ,C0COBT,C0CHB,C0CVAR
- ; D EXTRACT^GPLLABS(,1,)
+ ; D EXTRACT^GPLLABS(1)
  I '$D(C0CLB) S C0CLB=$NA(^TMP("GPLCCR",$J,"LABS")) ; BASE GLB FOR LABS VARS
  I '$D(C0CSILENT) S C0CSILENT=0