Index: vhTest/Dummy/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Dummy/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml	(revision 0)
+++ vhTest/Dummy/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml	(revision 37136)
@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Dummy.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler">
+<Super>APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler</Super>
+
+<Method name="GeefKleurcodeString">
+<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel,Delimiter:%String="-"</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "DummyKleurcode"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Dummy/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/WegingBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Dummy/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/WegingBepaler.cls.xml	(revision 0)
+++ vhTest/Dummy/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/WegingBepaler.cls.xml	(revision 37136)
@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Dummy.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.WegingBepaler">
+<Super>WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.WegingBepaler</Super>
+
+<Method name="GeefWeging">
+<FormalSpec>Rol:DOM.PM.Maatwerk.Calc.HF.enu.TAORRol</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "DummyWeging"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel/Test.cls.xml
===================================================================
diff -u -r37134 -r37136
--- vhUnitTest/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel/Test.cls.xml	(.../Test.cls.xml)	(revision 37134)
+++ vhUnitTest/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel/Test.cls.xml	(.../Test.cls.xml)	(revision 37136)
@@ -18,11 +18,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="DummyKleurCode">
-<Type>TECH.String</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="OnBeforeAllTests">
 <Implementation><![CDATA[
 	Do ##super()
@@ -31,14 +26,14 @@
 	Set ..Gewicht = 100000
 	
 	Set ..DummyRol = "DummyRol"
-	Set ..DummyKleurCode = "DummyKleurCode"
 ]]></Implementation>
 </Method>
 
 <Method name="Test: Methods worden opgeroepen door GeefOnderdelen-method">
 <Implementation><![CDATA[
 	#dim Code As TECH.String = ""
 	#dim Locatie As TECH.String = ""
+	#dim DummyKleurcode As TECH.String = "DummyKleurCode"
 	
 	#dim PlaatMock As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Plaat = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Plaat).%New()	
 	Do PlaatMock.VerwachtMethodCall("GeefGewicht").DanReturn(..Gewicht)
@@ -57,10 +52,10 @@
 	Do ProductDataRepositoryMock.VerwachtMethodCall("Maak").DanReturn(ProductData)
 	
 	#dim OnderdeelFactoryMock As vhTest.Mock.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.OnderdeelFactory = ##class(vhTest.Mock.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.OnderdeelFactory).%New()
-	Do OnderdeelFactoryMock.VerwachtMethodCall("GeefOnderdeel", ..DummyRol, Code, ..Aantal, Locatie, ..DummyRol, ..DummyKleurCode, ProductData).DanReturn("bla")
+	Do OnderdeelFactoryMock.VerwachtMethodCall("GeefOnderdeel", ..DummyRol, Code, ..Aantal, Locatie, ..DummyRol, DummyKleurcode, ProductData).DanReturn("bla")
 	
 	#dim KleurcodeStringBepalerMock As vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler = ##class(vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler).%New()
-	Do KleurcodeStringBepalerMock.VerwachtMethodCall("GeefKleurcodeString", LadeOnderdeelMock, $$$ElkeWaarde).DanReturn(..DummyKleurCode) // elke waarde ier oplossen met nen matcher?
+	Do KleurcodeStringBepalerMock.VerwachtMethodCall("GeefKleurcodeString", LadeOnderdeelMock, $$$ElkeWaarde).DanReturn(DummyKleurcode) // elke waarde ier oplossen met nen matcher?
 	
 	#dim TolerantieBepalerMock As vhTest.Mock.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.TolerantieBepaler = ##class(vhTest.Mock.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.TolerantieBepaler).%New()	
 	Do TolerantieBepalerMock.VerwachtMethodCall("GeefTolerantie", PlaatMock).DanReturn(1)
@@ -92,18 +87,15 @@
 	
 	#dim Iterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(LadeOnderdeelStub)
 	
-	#dim WegingBepalerStub As vhTest.Mock.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.WegingBepaler = ##class(vhTest.Mock.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.WegingBepaler).%New()
-	Do WegingBepalerStub.IndienMethodCall("GeefWeging", ..DummyRol)
+	#dim DummyKleurcodeStringBepaler As vhTest.Dummy.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler = ##class(vhTest.Dummy.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler).%New()
+	#dim DummyWegingBepaler As vhTest.Dummy.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.WegingBepaler = ##class(vhTest.Dummy.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.WegingBepaler).%New()
 	
-	#dim OnderdeelFactory As WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.OnderdeelFactory = ##class(WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.OnderdeelFactory).%New(WegingBepalerStub)
-	
-	#dim KleurcodeStringBepalerStub As vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler = ##class(vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler).%New()
-	Do KleurcodeStringBepalerStub.IndienMethodCall("GeefKleurcodeString", LadeOnderdeelStub, $$$ElkeWaarde).DanReturn(..DummyKleurCode) // elke waarde ier oplossen met nen matcher?
-	
+	#dim OnderdeelFactory As WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.OnderdeelFactory = ##class(WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.OnderdeelFactory).%New(DummyWegingBepaler)
+
 	#dim TolerantieBepalerStub As vhTest.Mock.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.TolerantieBepaler = ##class(vhTest.Mock.WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.TolerantieBepaler).%New()	
 	Do TolerantieBepalerStub.IndienMethodCall("GeefTolerantie", PlaatStub).DanReturn(Tolerantie)
 	
-	#dim BepalerVoorLadeOnderdeel As WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.BepalerVoorLadeOnderdeel = ##class(WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.BepalerVoorLadeOnderdeel).%New(OnderdeelFactory, "", KleurcodeStringBepalerStub, TolerantieBepalerStub)
+	#dim BepalerVoorLadeOnderdeel As WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.BepalerVoorLadeOnderdeel = ##class(WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.BepalerVoorLadeOnderdeel).%New(OnderdeelFactory, "", DummyKleurcodeStringBepaler, TolerantieBepalerStub)
 	#dim Onderdelen As %ListOfObjects = BepalerVoorLadeOnderdeel.GeefOnderdelen(Iterator, ..DummyRol)
 	#dim Onderdeel As WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Onderdeel = Onderdelen.GetAt(1)