Index: AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml
===================================================================
diff -u -r45156 -r56788
--- AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 45156)
+++ AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 56788)
@@ -3,6 +3,30 @@
 <Class name="AXimpl.Admin.DOM.PM.BouwsteenConverter">
 <Super>TECH.Mockable</Super>
 
+<Property name="ProductApi">
+<Type>DOM.PM.ProductAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="AantalBeperker">
+<Type>AXimpl.Admin.DOM.PM.BouwsteenConverter.AantalBeperker</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>ProductApi:DOM.PM.ProductAPI="",AantalBeperker:AXimpl.Admin.DOM.PM.BouwsteenConverter.AantalBeperker=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.PM.impl.ProductAPI).%New())
+	Set ..AantalBeperker = $$$Inject(AantalBeperker, ##class(AXimpl.Admin.DOM.PM.BouwsteenConverter.AantalBeperker).%New())
+	
+	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>
@@ -12,12 +36,66 @@
 	Set Bouwsteen.Id = Id
 	Set Bouwsteen.IdentNummer = ProductBouwsteen.KindProduct.IdentNummer
 	Set Bouwsteen.ProductId = ProductBouwsteen.KindProduct.ProductNr
-	Set Bouwsteen.Aantal = ProductBouwsteen.Aantal
+	Set Bouwsteen.Aantal = ..GeefAantal(ProductBouwsteen)
+	Set Bouwsteen.UitvalPercentage = ..GeefUitvalPercentage(ProductBouwsteen)
 	Set Bouwsteen.ParentId = ParentId
+	Set Bouwsteen.IsMeeTeRekenenVoorVoorraad = ..IsMeeTeRekenenVoorVoorraad(ProductBouwsteen)
 	
 	Quit Bouwsteen
 ]]></Implementation>
 </Method>
+
+<Method name="IsMeeTeRekenenVoorVoorraad">
+<FormalSpec>ProductBouwsteen:DOM.PM.Bouwstenen.Bouwsteen</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim IsMeeTeRekenenVoorVoorraad As %Boolean = $$$True
+	
+	If (ProductBouwsteen.%Extends("DOM.PM.Bouwstenen.BouwsteenHalfFabr")) {
+		Set IsMeeTeRekenenVoorVoorraad = $$$Not(ProductBouwsteen.IsNietMeeTeRekenenVoorVoorraad)
+	}
+	
+	Quit IsMeeTeRekenenVoorVoorraad
+]]></Implementation>
+</Method>
+
+<Method name="GeefAantal">
+<FormalSpec>ProductBouwsteen:DOM.PM.Bouwstenen.Bouwsteen</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Decimal</ReturnType>
+<Implementation><![CDATA[
+	#dim Aantal As %Decimal = ProductBouwsteen.Aantal
+	
+	If (ProductBouwsteen.%Extends("DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim")) {
+		#dim BouwsteenHalfFabr1Dim As DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim = ProductBouwsteen
+		#dim HalffabricaatProduct As DOM.PM.Product = ..ProductApi.GeefProduct(BouwsteenHalfFabr1Dim.KindProduct.ProductNr)
+
+		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
+
+		If ($$$Not(+BouwsteenHalfFabr1Dim.DimensieNetto = 0)){
+			Set UitvalPercentage = (((BouwsteenHalfFabr1Dim.DimensieMetUitval - BouwsteenHalfFabr1Dim.DimensieNetto) / BouwsteenHalfFabr1Dim.DimensieNetto) * 100)
+		}
+	}
+	
+	Quit UitvalPercentage
+]]></Implementation>
+</Method>
 </Class>