Index: vhUnitTest/DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenInfoDiverseBepaler/BepaalInfoDiverseItems/TestBase.cls.xml
===================================================================
diff -u -r33606 -r52470
--- vhUnitTest/DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenInfoDiverseBepaler/BepaalInfoDiverseItems/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 33606)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenInfoDiverseBepaler/BepaalInfoDiverseItems/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 52470)
@@ -14,9 +14,9 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim Taal As DOM.enu.Taal = ##class(DOM.enu.Taal).Nederlands()
-	#dim StandaardVertalerStub As vhTest.Utils.Vertaler = ##class(vhTest.Utils.Vertaler).%New("")
-	#dim KleurCodeVertalerStub As vhTest.Utils.Vertaler = ##class(vhTest.Utils.Vertaler).%New("")
-	#dim InfoDiverseBepaler As DOM.PM.Maatwerk.Calc.Common.impl.IngegevenKenmerkenInfoDiverseBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.IngegevenKenmerkenInfoDiverseBepaler).%New(Taal, StandaardVertalerStub, KleurCodeVertalerStub)
+	Set StandaardVertalerStub = ##class(vhTest.Utils.Vertaler).%New("")
+	Set KleurCodeVertalerStub = ##class(vhTest.Utils.Vertaler).%New("")
+	Set InfoDiverseBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.IngegevenKenmerkenInfoDiverseBepaler).%New(Taal, StandaardVertalerStub, KleurCodeVertalerStub)
 	#dim InfoDiverseItems As %ListOfDataTypes = InfoDiverseBepaler.BepaalInfoDiverseItems(IngegevenKenmerken)
 
 	Do $$$AssertInList(InfoDiverseItems, VerwachteInfoDiverseItem)