Index: WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel.cls.xml
===================================================================
diff -u -r37131 -r37132
--- WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel.cls.xml	(.../BepalerVoorLadeOnderdeel.cls.xml)	(revision 37131)
+++ WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel.cls.xml	(.../BepalerVoorLadeOnderdeel.cls.xml)	(revision 37132)
@@ -52,9 +52,8 @@
 		#dim Plaat As DOM.PM.Maatwerk.LadeInfo.Plaat = LadeOnderdeel.GeefPlaten().GetAt(1)
 
 		Set Plaat = LadeOnderdeel.GeefPlaten().GetAt(1)
-		
-		Do ProductData.GewichtSetInMilligrams(Plaat.GeefGewicht())
-		Do ProductData.TolerantieSetInMilligrams(Plaat.GeefGewicht() * ..TolerantieBepaler.GeefTolerantie(Plaat))
+		Set ProductData.Gewicht = Plaat.GeefGewicht()
+		Set ProductData.Tolerantie = Plaat.GeefGewicht() * ..TolerantieBepaler.GeefTolerantie(Plaat)
 
 		Do Onderdelen.Insert(..OnderdeelFactory.GeefOnderdeel(Rol, "", 1, "", Rol, KleurcodeString, ProductData))
 	}
Index: vhUnitTest/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel/Test.cls.xml
===================================================================
diff -u -r37131 -r37132
--- vhUnitTest/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel/Test.cls.xml	(.../Test.cls.xml)	(revision 37131)
+++ vhUnitTest/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel/Test.cls.xml	(.../Test.cls.xml)	(revision 37132)
@@ -30,7 +30,7 @@
 	Set ..Aantal = 1
 	
 	Set ..DummyRol = "DummyRol"
-	Set ..DummyGewicht = 100
+	Set ..DummyGewicht = 100000
 	Set ..DummyKleurCode = "DummyKleurCode"
 ]]></Implementation>
 </Method>
@@ -79,7 +79,7 @@
 
 <Method name="Test: Berekende Tolerantie op ProductData op basis van Gewicht">
 <Implementation><![CDATA[
-	#dim Tolerantie As TECH.Decimal = 0.50
+	#dim Tolerantie As TECH.Decimal = 0.05
 	
 	#dim PlaatStub As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Plaat = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Plaat).%New()
 	Do PlaatStub.IndienMethodCall("GeefGewicht").DanReturn(..DummyGewicht)
@@ -108,7 +108,7 @@
 	#dim Onderdeel As WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Onderdeel = Onderdelen.GetAt(1)
 	#dim VerwachteTolerantie As TECH.Weight = ..DummyGewicht * Tolerantie
 	
-	Do $$$AssertEquals(Onderdeel.Tolerantie, VerwachteTolerantie)
+	Do $$$AssertEquals(Onderdeel.Tolerantie, 5000000, "Tolerantie in milligram")
 ]]></Implementation>
 </Method>
 </Class>