Index: vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenConverter/Test.cls.xml
===================================================================
diff -u -r51835 -r56751
--- vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 51835)
+++ vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 56751)
@@ -73,12 +73,13 @@
 
 <Method name="Test: Aantal wordt berekend indien bewerkte halffabricaten">
 <Implementation><![CDATA[
-	#dim RandomWerkvloerGrootteNetto As %Integer = 100
-	#dim RandomDimensieMetUitval As %Integer = 40
+	#dim RandomWerkvloerGrootteNetto As %Integer = 2820
+	#dim RandomDimensieNetto As %Integer = 829
+	#dim AantalVanBouwsteen As %Integer = 2
 	
 	#dim BewerkteProductBouwsteen As DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim = ##class(DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim).%New()
-	Set BewerkteProductBouwsteen.DimensieMetUitval = RandomDimensieMetUitval
-	Set BewerkteProductBouwsteen.Aantal = 2
+	Set BewerkteProductBouwsteen.DimensieNetto = RandomDimensieNetto
+	Set BewerkteProductBouwsteen.Aantal = AantalVanBouwsteen
 	
 	#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
 	Do ProductStub.IndienMethodCall("GeefWerkvloerGrootteNetto").DanReturn(RandomWerkvloerGrootteNetto)
@@ -87,12 +88,37 @@
 	Do ProductApiStub.IndienMethodCall("GeefProduct", "").DanReturn(ProductStub)
 	
 	#dim BouwsteenConverter As AXimpl.Admin.DOM.PM.BouwsteenConverter = ##class(AXimpl.Admin.DOM.PM.BouwsteenConverter).%New(ProductApiStub)	
-	#dim VerwachtAantal As %Decimal = RandomDimensieMetUitval / RandomWerkvloerGrootteNetto * 2
+	#dim VerwachtAantal As %Decimal = (RandomDimensieNetto / RandomWerkvloerGrootteNetto * AantalVanBouwsteen)
 	
 	Do $$$AssertEquals(BouwsteenConverter.Convert(BewerkteProductBouwsteen, "").Aantal, VerwachtAantal)
 ]]></Implementation>
 </Method>
 
+<Method name="Test: UitvalPercentage wordt berekend indien bewerkte halffabricaten">
+<Implementation><![CDATA[
+	#dim RandomWerkvloerGrootteNetto As %Integer = 2820
+	#dim RandomDimensieMetUitval As %Integer = 1015
+	#dim RandomDimensieNetto As %Integer = 829
+	#dim AantalVanBouwsteen As %Integer = 2
+	
+	#dim BewerkteProductBouwsteen As DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim = ##class(DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim).%New()
+	Set BewerkteProductBouwsteen.DimensieMetUitval = RandomDimensieMetUitval
+	Set BewerkteProductBouwsteen.DimensieNetto = RandomDimensieNetto
+	Set BewerkteProductBouwsteen.Aantal = AantalVanBouwsteen
+	
+	#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do ProductStub.IndienMethodCall("GeefWerkvloerGrootteNetto").DanReturn(RandomWerkvloerGrootteNetto)
+	
+	#dim ProductApiStub As vhTest.Mock.DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
+	Do ProductApiStub.IndienMethodCall("GeefProduct", "").DanReturn(ProductStub)
+	
+	#dim BouwsteenConverter As AXimpl.Admin.DOM.PM.BouwsteenConverter = ##class(AXimpl.Admin.DOM.PM.BouwsteenConverter).%New(ProductApiStub)	
+	#dim VerwachtAantal As %Decimal = (((RandomDimensieMetUitval - RandomDimensieNetto) / RandomDimensieNetto) * 100)
+	
+	Do $$$AssertEquals(BouwsteenConverter.Convert(BewerkteProductBouwsteen, "").UitvalPercentage, VerwachtAantal)
+]]></Implementation>
+</Method>
+
 <Method name="GeefProductBouwsteenDummy">
 <Private>1</Private>
 <ReturnType>DOM.PM.Bouwstenen.Bouwsteen</ReturnType>