Index: vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml	(revision 43370)
@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.AX.CalculatedProduct.BouwsteenConverter.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: BouwsteenConverter vult ItemId van de BomLine in met het ProductNummer van het Halffabricaat">
+<Implementation><![CDATA[
+	#dim RandomProductNummer As %Integer = "RandomProductNummer"
+	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New()
+	#dim HalffabricaatBouwsteenDummy As DOM.PM.Bouwstenen.BouwsteenHalfFabr = ..MaakHalffabricaatBouwsteenDummy(RandomProductNummer)
+	
+	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = Converter.Convert(HalffabricaatBouwsteenDummy)
+	
+	Do $$$AssertEquals(BomLine.ItemId, RandomProductNummer)
+]]></Implementation>
+</Method>
+
+<Method name="MaakHalffabricaatBouwsteenDummy">
+<FormalSpec>ProductNummer:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Bouwstenen.BouwsteenHalfFabr</ReturnType>
+<Implementation><![CDATA[
+ 	#dim HalffabricaatBouwsteenDummy As DOM.PM.Bouwstenen.BouwsteenHalfFabr = ##class(DOM.PM.Bouwstenen.BouwsteenHalfFabr).%New()
+ 	
+ 	Set HalffabricaatBouwsteenDummy.KindProduct = ##class(Prod.Product).%New()
+ 	Set HalffabricaatBouwsteenDummy.KindProduct.ProductNr = ProductNummer
+ 	
+ 	Quit HalffabricaatBouwsteenDummy
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml
===================================================================
diff -u -r43361 -r43370
--- WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 43361)
+++ WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 43370)
@@ -9,6 +9,8 @@
 <Implementation><![CDATA[
 	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = ##class(AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine).%New()
 	
+	Set BomLine.ItemId = HalffabricaatBouwsteen.KindProduct.ProductNr
+	
 	Quit BomLine
 ]]></Implementation>
 </Method>