Index: vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml
===================================================================
diff -u -r46904 -r47139
--- vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 46904)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 47139)
@@ -62,15 +62,16 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Formatter wordt opgeroepen een formatteerd tot 2 cijfers na de komma">
+<Method name="Test: Formatter wordt opgeroepen en formatteert tot 2 cijfers na de komma">
 <Implementation><![CDATA[
+	#dim AantalDecimalen As %Integer = 2
 	#dim RandomAantal As %String = "RandomAantal"
 	#dim RandomResultaat As %String = "RandomResultaat"
 	
 	#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-	Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomAantal, 2).DanReturn(RandomResultaat)
+	Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomAantal, AantalDecimalen).DanReturn(RandomResultaat)
 	
-	#dim BouwsteenDummy = ..GeefBouwsteenDummy()
+	#dim BouwsteenDummy As AXimpl.Admin.DOM.PM.Bouwsteen = ..GeefBouwsteenDummy()
 	Set BouwsteenDummy.Aantal = RandomAantal
 	
 	#dim BouwsteenConverter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New(FormatterMock)
@@ -82,6 +83,37 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: SoprProductConvertor wordt opgeroepen en geeft voor SOPR&apos;s een AX-compatibel IdentNummer terug">
+<Implementation><![CDATA[
+	#dim BouwsteenDummy As AXimpl.Admin.DOM.PM.Bouwsteen = ..GeefBouwsteenDummy()
+	#dim SoprProductIdGekendInAx As %String = "SoprProductIdGekendInAx"
+	#dim SoprIdentNummer As %String = "SoprIdentNummer"
+	
+	Do ..AssertItemId(BouwsteenDummy, $$$True, SoprProductIdGekendInAx, SoprIdentNummer)
+	Do ..AssertItemId(BouwsteenDummy, $$$False, "", BouwsteenDummy.IdentNummer)
+]]></Implementation>
+</Method>
+
+<Method name="AssertItemId">
+<FormalSpec>Bouwsteen:AXimpl.Admin.DOM.PM.Bouwsteen,IsSoprInCache:%Boolean,SoprProductIdGekendInAx:%String,SoprIdentNummer:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim SoprProductConvertorMock As vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
+	Do SoprProductConvertorMock.VerwachtMethodCall("IsSOPRInCache", Bouwsteen.ProductId).DanReturn(IsSoprInCache)
+	Do SoprProductConvertorMock.IndienMethodCall("GeefVervangProductDoorSOPRInAX", Bouwsteen.ProductId).DanReturn(SoprProductIdGekendInAx)
+	
+	#dim ProductApiStub As vhTest.Mock.DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
+	Do ProductApiStub.IndienMethodCall("GeefIdentNummerVoorProductId", SoprProductIdGekendInAx).DanReturn(SoprIdentNummer)
+	
+	#dim BouwsteenConverter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New("", SoprProductConvertorMock, ProductApiStub)
+	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = BouwsteenConverter.Convert(Bouwsteen, ..RandomConfigVariantId)
+	
+	Do $$$AssertEquals(BomLine.ItemId, SoprIdentNummer)
+	
+	Do SoprProductConvertorMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="GeefBouwsteenDummy">
 <Private>1</Private>
 <ReturnType>AXimpl.Admin.DOM.PM.Bouwsteen</ReturnType>
Index: WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml
===================================================================
diff -u -r46904 -r47139
--- WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 46904)
+++ WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 47139)
@@ -8,14 +8,26 @@
 <Private>1</Private>
 </Property>
 
+<Property name="SoprProductConvertor">
+<Type>AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ProductApi">
+<Type>DOM.PM.ProductAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>Formatter:AXimpl.Formatter</FormalSpec>
+<FormalSpec>Formatter:AXimpl.Formatter="",SoprProductConvertor:AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor="",ProductApi:DOM.PM.ProductAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..Formatter = $$$Inject(Formatter, ##class(AXimpl.Formatter).%New())
+	Set ..SoprProductConvertor = $$$Inject(SoprProductConvertor, ##class(AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New())
+	Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.PM.impl.ProductAPI).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -31,14 +43,30 @@
 	Set BomLine.BOMQty = ..Formatter.FormatNumber(Bouwsteen.Aantal, 2)
 	Set BomLine.BOMQtySerie = 1
 	Set BomLine.ConfigVariantId = ConfigVariantId
-	Set BomLine.ItemId = Bouwsteen.IdentNummer
+	Set BomLine.ItemId = ..GeefItemId(Bouwsteen)
 	Set BomLine.ParentBOMLine = Bouwsteen.ParentId
 	
 	Set BomLine.class = "entity"
 	
 	Quit BomLine
 ]]></Implementation>
 </Method>
+
+<Method name="GeefItemId">
+<FormalSpec>Bouwsteen:AXimpl.Admin.DOM.PM.Bouwsteen</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim ItemId As %String = Bouwsteen.IdentNummer
+	
+	If (..SoprProductConvertor.IsSOPRInCache(Bouwsteen.ProductId)) {
+		#dim SoprProductId As %String = ..SoprProductConvertor.GeefVervangProductDoorSOPRInAX(Bouwsteen.ProductId)
+		Set ItemId = ..ProductApi.GeefIdentNummerVoorProductId(SoprProductId)
+	}
+	
+	Quit ItemId
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Integratie/WSimpl/AX/CalculatedProduct/TestSopr.cls.xml
===================================================================
diff -u
--- vhTest/Integratie/WSimpl/AX/CalculatedProduct/TestSopr.cls.xml	(revision 0)
+++ vhTest/Integratie/WSimpl/AX/CalculatedProduct/TestSopr.cls.xml	(revision 47139)
@@ -0,0 +1,14 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Integratie.WSimpl.AX.CalculatedProduct.TestSopr">
+<Super>vhTest.Integratie.WSimpl.AX.CalculatedProduct.TestBase</Super>
+
+<Method name="GeefProductId">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "1765622"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenIterator/Test.cls.xml
===================================================================
diff -u -r47058 -r47139
--- vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 47058)
+++ vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 47139)
@@ -120,6 +120,40 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Geconverteerde Bouwstenen krijgen een oplopende Id">
+<Implementation><![CDATA[
+	#dim StartId As %Integer = 1
+	#dim HalffabricaatBouwstenen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
+	Do HalffabricaatBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenHalfFabr).%New())
+	
+	#dim KindHalffabricaatBouwstenen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
+	Do KindHalffabricaatBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenKind).%New())
+	Do KindHalffabricaatBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenKind).%New())
+	Do KindHalffabricaatBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenKind).%New())
+	
+	#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do ProductStub.IndienMethodCall("GeefHFBouwstenenIterator").DanReturn(##class(TECH.ListIterator).%New(HalffabricaatBouwstenen))
+	Do ProductStub.IndienMethodCall("GeefKindBouwstenenIterator").DanReturn(##class(TECH.ListIterator).%New(KindHalffabricaatBouwstenen))
+	
+	#dim KindProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do KindProductStub.IndienMethodCall("GeefHFBouwstenenIterator").DanReturn(..EmptyIterator())
+	Do KindProductStub.IndienMethodCall("GeefKindBouwstenenIterator").DanReturn(..EmptyIterator())
+	
+	#dim ProductApiStub As vhTest.Mock.DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
+	Do ProductApiStub.IndienMethodCall("GeefProduct", $$$ElkeWaarde).DanReturn(KindProductStub)
+	
+	#dim BouwsteenConverterMock As vhTest.Mock.AXimpl.Admin.DOM.PM.BouwsteenConverter = ##class(vhTest.Mock.AXimpl.Admin.DOM.PM.BouwsteenConverter).%New()
+	Do BouwsteenConverterMock.VerwachtMethodCall("Convert", HalffabricaatBouwstenen.GetAt(1), StartId, "").DanReturn(..GeefBouwsteenDummy())
+	Do BouwsteenConverterMock.VerwachtMethodCall("Convert", KindHalffabricaatBouwstenen.GetAt(1), StartId + 1, "").DanReturn(..GeefBouwsteenDummy())
+	Do BouwsteenConverterMock.VerwachtMethodCall("Convert", KindHalffabricaatBouwstenen.GetAt(2), StartId + 2, "").DanReturn(..GeefBouwsteenDummy())
+	Do BouwsteenConverterMock.VerwachtMethodCall("Convert", KindHalffabricaatBouwstenen.GetAt(3), StartId + 3, "").DanReturn(..GeefBouwsteenDummy())
+
+	#dim BouwsteenIterator As AXimpl.Admin.DOM.PM.BouwsteenIterator = ##class(AXimpl.Admin.DOM.PM.BouwsteenIterator).%New(ProductStub, "", BouwsteenConverterMock, ProductApiStub)
+
+	Do BouwsteenConverterMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: Beperking op BOM-lijnen via filter">
 <Implementation><![CDATA[
 	#dim BouwsteenDummy As AXimpl.Admin.DOM.PM.Bouwsteen = ..GeefBouwsteenDummy()
Index: vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestSopr/1765622.xml
===================================================================
diff -u -r47138 -r47139
--- vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestSopr/1765622.xml	(.../1765622.xml)	(revision 47138)
+++ vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestSopr/1765622.xml	(.../1765622.xml)	(revision 47139)
@@ -23,14 +23,14 @@
       <BOMQty>1.00</BOMQty>
       <BOMQtySerie>1</BOMQtySerie>
       <ConfigVariantId>DummyInventTransId</ConfigVariantId>
-      <ItemId>A.651.451.2</ItemId>
+      <ItemId>0.651.451.2</ItemId>
     </BOMLine>
     <BOMLine class="entity">
       <BOMLine>3</BOMLine>
       <BOMQty>1.00</BOMQty>
       <BOMQtySerie>1</BOMQtySerie>
       <ConfigVariantId>DummyInventTransId</ConfigVariantId>
-      <ItemId>A.651.228.1</ItemId>
+      <ItemId>0.651.228.1</ItemId>
     </BOMLine>
     <BOMLine class="entity">
       <BOMLine>4</BOMLine>
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/BouwstenenConverter/Test.cls.xml
===================================================================
diff -u -r46390 -r47139
--- vhUnitTest/WSimpl/AX/CalculatedProduct/BouwstenenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 46390)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/BouwstenenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 47139)
@@ -18,43 +18,27 @@
 <Private>1</Private>
 </Property>
 
-<Method name="Test: BomLines krijgen een volgnummer">
+<Method name="Test: BouwsteenConverter wordt opgeroepen voor elk item in de BouwsteenIterator">
 <Implementation><![CDATA[
 	#dim RandomConfigVariantId As %String = "RandomConfigVariantId"
+
+	#dim Bouwstenen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
+	Do Bouwstenen.Insert(##class(AXimpl.Admin.DOM.PM.Bouwsteen).%New())
+	Do Bouwstenen.Insert(##class(AXimpl.Admin.DOM.PM.Bouwsteen).%New())
+	Do Bouwstenen.Insert(##class(AXimpl.Admin.DOM.PM.Bouwsteen).%New())
 	
-	#dim HalffabricaatBouwstenen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
-	Do HalffabricaatBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenHalfFabr).%New())
-	Do HalffabricaatBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenHalfFabr).%New())
-	Do HalffabricaatBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenHalfFabr).%New())
+	#dim BouwsteenIteratorDummy As TECH.Iterator = ##class(TECH.ListIterator).%New(Bouwstenen)
+	#dim BomLineDummy As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = ##class(AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine).%New()
 	
-	#dim KindBouwstenen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
-	Do KindBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenKind).%New())
-	Do KindBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenKind).%New())
-	Do KindBouwstenen.Insert(##class(DOM.PM.Bouwstenen.BouwsteenKind).%New())
+	#dim BouwsteenConverterMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New()
+	Do BouwsteenConverterMock.VerwachtMethodCall("Convert", Bouwstenen.GetAt(1), RandomConfigVariantId).DanReturn(BomLineDummy)
+	Do BouwsteenConverterMock.VerwachtMethodCall("Convert", Bouwstenen.GetAt(2), RandomConfigVariantId).DanReturn(BomLineDummy)
+	Do BouwsteenConverterMock.VerwachtMethodCall("Convert", Bouwstenen.GetAt(3), RandomConfigVariantId).DanReturn(BomLineDummy)
+
+	#dim BouwstenenConverter As WSimpl.AX.CalculatedProduct.BouwstenenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwstenenConverter).%New(BouwsteenIteratorDummy, BouwsteenConverterMock)
+	#dim BomLines As %ListOfDataTypes = BouwstenenConverter.Convert("EenProduct", RandomConfigVariantId)
 	
-	#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-	Do ProductStub.IndienMethodCall("GeefHFBouwstenenIterator").DanReturn(##class(TECH.ListIterator).%New(HalffabricaatBouwstenen))
-	Do ProductStub.IndienMethodCall("GeefKindBouwstenenIterator").DanReturn(##class(TECH.ListIterator).%New(KindBouwstenen))
-	
-	#dim KindProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-	Do KindProductStub.IndienMethodCall("GeefHFBouwstenenIterator").DanReturn(..EmptyIterator())
-	Do KindProductStub.IndienMethodCall("GeefKindBouwstenenIterator").DanReturn(..EmptyIterator())
-	
-	#dim ProductApiStub As vhTest.Mock.DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
-	Do ProductApiStub.IndienMethodCall("GeefProduct", $$$ElkeWaarde).DanReturn(KindProductStub)
-	
-	#dim BouwsteenConverter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New()
-	#dim BouwsteenIterator As AXimpl.Admin.DOM.PM.BouwsteenIterator = ##class(AXimpl.Admin.DOM.PM.BouwsteenIterator).%New(ProductStub, "", "", ProductApiStub)
-	#dim BouwstenenConverter As WSimpl.AX.CalculatedProduct.BouwstenenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwstenenConverter).%New(BouwsteenIterator, BouwsteenConverter)
-	
-	#dim BomLines As %ListOfDataTypes = BouwstenenConverter.Convert(ProductStub, RandomConfigVariantId)
-	
-	Do $$$AssertEquals(BomLines.GetAt(1).BOMLine, 1)
-	Do $$$AssertEquals(BomLines.GetAt(2).BOMLine, 2)
-	Do $$$AssertEquals(BomLines.GetAt(3).BOMLine, 3)
-	Do $$$AssertEquals(BomLines.GetAt(4).BOMLine, 4)
-	Do $$$AssertEquals(BomLines.GetAt(5).BOMLine, 5)
-	Do $$$AssertEquals(BomLines.GetAt(6).BOMLine, 6)
+	Do BouwsteenConverterMock.Verifieer()
 ]]></Implementation>
 </Method>
 </Class>