From 8e0ee0561fa86a565da2dd52c754d1b4aa756ae4 Mon Sep 17 00:00:00 2001 From: george Date: Tue, 3 Feb 2009 19:24:48 +0000 Subject: [PATCH] removed break debugging command --- p/GPLIMMU.m | 1 - 1 file changed, 1 deletion(-) diff --git a/p/GPLIMMU.m b/p/GPLIMMU.m index 2216824..538bae9 100644 --- a/p/GPLIMMU.m +++ b/p/GPLIMMU.m @@ -26,7 +26,6 @@ MAP(IPXML,DFN,OUTXML) ; MAP IMMUNIZATIONS N C0CZT ; TMP ARRAY OF MAPPED XML S C0CZV=$NA(^TMP("GPLCCR",$J,"IMMUNE")) ; TEMP STORAGE FOR VARIABLES D EXTRACT(IPXML,DFN,OUTXML) ;EXTRACT THE VARIABLES - B N C0CZI,C0CZIC ; COUNT OF IMMUNIZATIONS S C0CZIC=@C0CZV@(0) ; TOTAL FROM VARIABLE ARRAY F C0CZI=1:1:C0CZIC D ;FOR EACH IMMUNIZATION