Index: DW/StockWaarde.cls.xml
===================================================================
diff -u -r47061 -r47062
--- DW/StockWaarde.cls.xml	(.../StockWaarde.cls.xml)	(revision 47061)
+++ DW/StockWaarde.cls.xml	(.../StockWaarde.cls.xml)	(revision 47062)
@@ -309,7 +309,7 @@
 <FormalSpec><![CDATA[&arHist,MinAantalWeken:%Decimal]]></FormalSpec>
 <Implementation><![CDATA[
 	; Gemiddelde
-	#dim SomKwadraat,Som,Aantal,AantalStuks,IdxDate As %Numeric
+	New SomKwadraat,Som,Aantal,AantalStuks,IdxDate
 	Set SomKwadraat=0,Som=0,Aantal=0
 	Set IdxDate=$O(arHist(""))
 	While IdxDate'=""