Index: WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml
===================================================================
diff -u -r56655 -r56751
--- WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 56655)
+++ WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 56751)
@@ -51,6 +51,7 @@
 	Set BomLine.ConfigVariantId = ConfigVariantId
 	Set BomLine.ItemId = ..GeefItemId(Bouwsteen)
 	Set BomLine.ParentBOMLine = ""
+	Set BomLine.ScrapVar = ..Formatter.FormatNumber(Bouwsteen.UitvalPercentage, 2)
 	
 	Set BomLine.class = "entity"
 	
Index: AXimpl/Admin/DOM/PM/Bouwsteen.cls.xml
===================================================================
diff -u -r47983 -r56751
--- AXimpl/Admin/DOM/PM/Bouwsteen.cls.xml	(.../Bouwsteen.cls.xml)	(revision 47983)
+++ AXimpl/Admin/DOM/PM/Bouwsteen.cls.xml	(.../Bouwsteen.cls.xml)	(revision 56751)
@@ -30,6 +30,10 @@
 <Property name="HeeftKindBouwstenen">
 <Type>%Boolean</Type>
 </Property>
+
+<Property name="UitvalPercentage">
+<Type>%Decimal</Type>
+</Property>
 </Class>
 
 
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml
===================================================================
diff -u -r56655 -r56751
--- vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 56655)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 56751)
@@ -38,6 +38,7 @@
 	Do $$$AssertEquals(BomLine.ConfigVariantId, ..RandomConfigVariantId)
 	Do $$$AssertEquals(BomLine.ItemId, ..BouwsteenDummy.IdentNummer)
 	Do $$$AssertEquals(BomLine.ParentBOMLine, "")
+	Do $$$AssertEquals(BomLine.ScrapVar, "0.00")
 	Do $$$AssertEquals(BomLine.class, "entity")
 ]]></Implementation>
 </Method>
@@ -54,25 +55,26 @@
 	Do $$$AssertEquals(BomLine.RoundUp, "")
 	Do $$$AssertEquals(BomLine.RoundUpQty, "")
 	Do $$$AssertEquals(BomLine.ScrapConst, "")
-	Do $$$AssertEquals(BomLine.ScrapVar, "")
 	Do $$$AssertEquals(BomLine.SourcingDataAreaId, "")
 	Do $$$AssertEquals(BomLine.SourcingRouteId, "")
 	Do $$$AssertEquals(BomLine.UnitID, "")
 	Do $$$AssertEquals(BomLine.action, "")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Formatter wordt opgeroepen en formatteert tot 4 cijfers na de komma">
+<Method name="Test: Formatter wordt opgeroepen voor BOMQty en formatteert tot 4 cijfers na de komma">
 <Implementation><![CDATA[
 	#dim AantalDecimalen As %Integer = 4
-	#dim Aantal As %String = "5.123456789"
+	#dim AantalBOMQty As %String = "5.123456789"
+	#dim AantalScrapVar As %String = 0
 	#dim VerwachtResultaat As %String = "5.1234"
 	
 	#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-	Do FormatterMock.VerwachtMethodCall("FormatNumber", Aantal, AantalDecimalen).ExactAantalKeer(1).DanReturn(VerwachtResultaat)
+	Do FormatterMock.VerwachtMethodCall("FormatNumber", AantalBOMQty, AantalDecimalen).ExactAantalKeer(1).DanReturn(VerwachtResultaat)
+	Do FormatterMock.VerwachtMethodCall("FormatNumber", AantalScrapVar, 2).ExactAantalKeer(1).DanReturn("0.00")
 	
 	#dim BouwsteenDummy As AXimpl.Admin.DOM.PM.Bouwsteen = ..GeefBouwsteenDummy()
-	Set BouwsteenDummy.Aantal = Aantal
+	Set BouwsteenDummy.Aantal = AantalBOMQty
 	
 	#dim BouwsteenConverter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New(FormatterMock)
 	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = BouwsteenConverter.Convert(BouwsteenDummy, ..RandomConfigVariantId)
@@ -83,6 +85,30 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Formatter wordt opgeroepen voor ScrapVar en formatteert tot 2 cijfers na de komma">
+<Implementation><![CDATA[
+	#dim AantalDecimalen As %Integer = 2
+	#dim AantalBOMQty As %String = "5.123456789"
+	#dim AantalScrapVar As %String = "22.012345"
+	#dim VerwachtResultaat As %String = "22.01"
+	
+	#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
+	Do FormatterMock.VerwachtMethodCall("FormatNumber", AantalBOMQty, 4).ExactAantalKeer(1).DanReturn("5.1234")
+	Do FormatterMock.VerwachtMethodCall("FormatNumber", AantalScrapVar, AantalDecimalen).ExactAantalKeer(1).DanReturn(VerwachtResultaat)
+	
+	#dim BouwsteenDummy As AXimpl.Admin.DOM.PM.Bouwsteen = ..GeefBouwsteenDummy()
+	Set BouwsteenDummy.UitvalPercentage = AantalScrapVar
+	Set BouwsteenDummy.Aantal = AantalBOMQty
+	
+	#dim BouwsteenConverter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New(FormatterMock)
+	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = BouwsteenConverter.Convert(BouwsteenDummy, ..RandomConfigVariantId)
+	
+	Do $$$AssertEquals(BomLine.ScrapVar, VerwachtResultaat)
+	
+	Do FormatterMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: Aantal wordt gedefault op 0,0001 indien BouwsteenAantal &lt; 0,0001">
 <Implementation><![CDATA[
 	#dim AantalDecimalen As %Integer = 2
@@ -101,8 +127,8 @@
 
 <Method name="Test: Aantal wordt bepaald door AantalBeperker indien product gedefinieerd in AantalBeperker">
 <Implementation><![CDATA[
-	#dim AantalDecimalen As %Integer = 4
-	#dim RandomAantal As %String = "RandomAantal"
+	#dim AantalBOMQty As %String = "RandomAantal"
+	#dim AantalScrapVar As %String = 0
 	#dim RandomResultaat As %String = "RandomResultaat"
 	
 	#dim BouwsteenDummy As AXimpl.Admin.DOM.PM.Bouwsteen = ..GeefBouwsteenDummy()
@@ -111,10 +137,11 @@
 	
 	#dim AantalBeperkerStub As vhTest.Mock.AXimpl.Admin.DOM.PM.BouwsteenConverter.AantalBeperker = ##class(vhTest.Mock.AXimpl.Admin.DOM.PM.BouwsteenConverter.AantalBeperker).%New()
 	Do AantalBeperkerStub.IndienMethodCall("IsBeperkt", BouwsteenDummy.IdentNummer).DanReturn($$$True)
-	Do AantalBeperkerStub.IndienMethodCall("GeefAantal", BouwsteenDummy.IdentNummer).DanReturn(RandomAantal)
+	Do AantalBeperkerStub.IndienMethodCall("GeefAantal", BouwsteenDummy.IdentNummer).DanReturn(AantalBOMQty)
 	
 	#dim FormatterStub As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-	Do FormatterStub.IndienMethodCall("FormatNumber", RandomAantal, AantalDecimalen).DanReturn(RandomResultaat)
+	Do FormatterStub.IndienMethodCall("FormatNumber", AantalBOMQty, 4).DanReturn(RandomResultaat)
+	Do FormatterStub.IndienMethodCall("FormatNumber", AantalScrapVar, 2).DanReturn("0.00")
 	
 	#dim BouwsteenConverter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New(FormatterStub, "", "", AantalBeperkerStub)
 	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = BouwsteenConverter.Convert(BouwsteenDummy, ..RandomConfigVariantId)	
@@ -164,7 +191,8 @@
 	Set BouwsteenDummy.ParentId = $$$DummyInteger
 	Set BouwsteenDummy.IdentNummer = $$$DummyString
 	Set BouwsteenDummy.ProductId = $$$DummyString
-	Set BouwsteenDummy.Aantal = $$$DummyInteger
+	Set BouwsteenDummy.Aantal = $$$DummyDecimal
+	Set BouwsteenDummy.UitvalPercentage = $$$DummyDecimal
 	
 	Quit BouwsteenDummy
 ]]></Implementation>
Index: vhTest/Mock/AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml
===================================================================
diff -u -r45156 -r56751
--- vhTest/Mock/AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 45156)
+++ vhTest/Mock/AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 56751)
@@ -8,6 +8,13 @@
 <Super>AXimpl.Admin.DOM.PM.BouwsteenConverter,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
+<Method name="%OnNew">
+<FormalSpec>ProductApi:DOM.PM.ProductAPI="",AantalBeperker:AXimpl.Admin.DOM.PM.BouwsteenConverter.AantalBeperker=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="Convert">
 <FormalSpec>ProductBouwsteen:DOM.PM.Bouwstenen.Bouwsteen,Id:%Integer,ParentId:%Integer=""</FormalSpec>
 <ReturnType>AXimpl.Admin.DOM.PM.Bouwsteen</ReturnType>
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>
Index: AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml
===================================================================
diff -u -r51818 -r56751
--- AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 51818)
+++ AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 56751)
@@ -37,6 +37,7 @@
 	Set Bouwsteen.IdentNummer = ProductBouwsteen.KindProduct.IdentNummer
 	Set Bouwsteen.ProductId = ProductBouwsteen.KindProduct.ProductNr
 	Set Bouwsteen.Aantal = ..GeefAantal(ProductBouwsteen)
+	Set Bouwsteen.UitvalPercentage = ..GeefUitvalPercentage(ProductBouwsteen)
 	Set Bouwsteen.ParentId = ParentId
 	Set Bouwsteen.IsMeeTeRekenenVoorVoorraad = ..IsMeeTeRekenenVoorVoorraad(ProductBouwsteen)
 	
@@ -70,12 +71,29 @@
 		#dim BouwsteenHalfFabr1Dim As DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim = ProductBouwsteen
 		#dim HalffabricaatProduct As DOM.PM.Product = ..ProductApi.GeefProduct(BouwsteenHalfFabr1Dim.KindProduct.ProductNr)
 
-		Set Aantal = BouwsteenHalfFabr1Dim.DimensieMetUitval / HalffabricaatProduct.GeefWerkvloerGrootteNetto() * BouwsteenHalfFabr1Dim.Aantal
+		Set Aantal = (BouwsteenHalfFabr1Dim.DimensieNetto / HalffabricaatProduct.GeefWerkvloerGrootteNetto() * BouwsteenHalfFabr1Dim.Aantal)
 	}
 	
 	Quit Aantal
 ]]></Implementation>
 </Method>
+
+<Method name="GeefUitvalPercentage">
+<FormalSpec>ProductBouwsteen:DOM.PM.Bouwstenen.Bouwsteen</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Decimal</ReturnType>
+<Implementation><![CDATA[
+	#dim UitvalPercentage As %Decimal = 0
+	
+	If (ProductBouwsteen.%Extends("DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim")) {
+		#dim BouwsteenHalfFabr1Dim As DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim = ProductBouwsteen
+
+		Set UitvalPercentage = (((BouwsteenHalfFabr1Dim.DimensieMetUitval - BouwsteenHalfFabr1Dim.DimensieNetto) / BouwsteenHalfFabr1Dim.DimensieNetto) * 100)
+	}
+	
+	Quit UitvalPercentage
+]]></Implementation>
+</Method>
 </Class>