FishEye: Tag 43679 refers to a dead (removed) revision in file `vhTest/Fake/WSimpl/AX/CalculatedProduct/InterneFirmaBepaler.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/ProductData.cls.xml
===================================================================
diff -u -r43357 -r43679
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/ProductData.cls.xml	(.../ProductData.cls.xml)	(revision 43357)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/ProductData.cls.xml	(.../ProductData.cls.xml)	(revision 43679)
@@ -8,11 +8,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="DummyFirma">
-<Type>%String</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="RandomItemId">
 <Type>%String</Type>
 <Private>1</Private>
@@ -35,7 +30,6 @@
 	#dim BouwstenenIteratorDummy As TECH.Iterator = ##class(TECH.ListIterator).%New(##class(%ListOfObjects).%New())
 	
 	Set ..RandomItemId = "RandomItemId"
-	Set ..DummyFirma = "DummyFirma"
 	Set ..ProductStub = ##class(vhTest.Mock.DOM.PM.Product).%New()
 	
 	Do ..ProductStub.IndienMethodCall("GeefEANCode")
@@ -51,13 +45,10 @@
 	Do ProductApiStub.IndienMethodCall("BestaatProduct", ..RandomItemId).DanReturn($$$True)
 	Do ProductApiStub.IndienMethodCall("GeefProduct", ..RandomItemId).DanReturn(..ProductStub)
 	
-	#dim InterneFirmaBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New()
-	Do InterneFirmaBepalerStub.IndienMethodCall("Bepaal", ..RandomItemId).DanReturn(..DummyFirma)
-	
 	#dim VariantDescriptionBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
 	Do VariantDescriptionBepalerStub.IndienMethodCall("Bepaal", ..ProductStub, ..RandomItemId).DanReturn(##class(%ListOfObjects).%New())
 	
-	Set ..RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiStub, InterneFirmaBepalerStub, VariantDescriptionBepalerStub)
+	Set ..RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiStub, VariantDescriptionBepalerStub)
 ]]></Implementation>
 </Method>
 
@@ -68,11 +59,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: RequestConverter vult SourcingDataAreaId in met EAN-code van het gevonden product">
-<Implementation><![CDATA[	Do ..AssertSourcingDataAreaId(..DummyFirma)
-]]></Implementation>
-</Method>
-
 <Method name="Test: RequestConverter vult ProductName in met de Korttekst van het gevonden product">
 <Implementation><![CDATA[
 	Do ..AssertProductName("")
@@ -101,16 +87,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="AssertSourcingDataAreaId">
-<FormalSpec>Firma:%String</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = ..RequestConverter.Convert(..DummyRequest, "RandomMessageId")
-	
-	Do $$$AssertEquals(ConfigVariant.SourcingDataAreaId, Firma)
-]]></Implementation>
-</Method>
-
 <Method name="AssertProductName">
 <FormalSpec>Korttekst:%String</FormalSpec>
 <Private>1</Private>
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/RequestData.cls.xml
===================================================================
diff -u -r43322 -r43679
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/RequestData.cls.xml	(.../RequestData.cls.xml)	(revision 43322)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/RequestData.cls.xml	(.../RequestData.cls.xml)	(revision 43679)
@@ -33,13 +33,10 @@
 	Do ProductApiStub.IndienMethodCall("BestaatProduct", $$$ElkeWaarde).DanReturn(BestaatProduct)
 	Do ProductApiStub.IndienMethodCall("GeefProduct", $$$ElkeWaarde).DanReturn(ProductDummy)
 	
-	#dim InterneFirmaBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New()
-	Do InterneFirmaBepalerStub.IndienMethodCall("Bepaal", $$$ElkeWaarde).DanReturn($$$DummyString)
-	
 	#dim VariantDescriptionBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
 	Do VariantDescriptionBepalerStub.IndienMethodCall("Bepaal", ProductDummy, RandomItemId).DanReturn(##class(%ListOfObjects).%New())
 		
-	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiStub, InterneFirmaBepalerStub, VariantDescriptionBepalerStub)
+	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiStub, VariantDescriptionBepalerStub)
 	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(DummyRequest, "RandomMessageId")
 
 	Do $$$AssertEquals(ConfigVariant.ItemId, RandomItemId)
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml
===================================================================
diff -u -r43632 -r43679
--- vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 43632)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/BouwsteenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 43679)
@@ -8,11 +8,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="RandomFirma">
-<Type>%String</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="RandomAantal">
 <Type>%Integer</Type>
 <Private>1</Private>
@@ -23,51 +18,28 @@
 <Private>1</Private>
 </Property>
 
-<Property name="InterneFirmaBepalerStub">
-<Type>vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="OnBeforeAllTests">
 <Implementation><![CDATA[
 	Do ##super()
 	
 	Set ..RandomProductNummer = "RandomProductNummer"
-	Set ..RandomFirma = "RandomFirma"
 	Set ..RandomAantal = 5
 	Set ..HalffabricaatBouwsteenDummy = ..MaakHalffabricaatBouwsteenDummy()
-	Set ..InterneFirmaBepalerStub = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New()
-	
-	Do ..InterneFirmaBepalerStub.IndienMethodCall("Bepaal", ..RandomProductNummer).DanReturn(..RandomFirma)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: BouwsteenConverter vult ItemId van de BomLine in met het ProductNummer van het Halffabricaat">
 <Implementation><![CDATA[
-	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New(..InterneFirmaBepalerStub)
+	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New()
 	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = Converter.Convert(..HalffabricaatBouwsteenDummy)
 	
 	Do $$$AssertEquals(BomLine.ItemId, ..RandomProductNummer)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: BouwsteenConverter vult SourcingDataAreaId van de BomLine in met een interne firma">
-<Implementation><![CDATA[
-	#dim InterneFirmaBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New()
-	Do InterneFirmaBepalerMock.VerwachtMethodCall("Bepaal", ..RandomProductNummer).DanReturn(..RandomFirma)
-	
-	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New(InterneFirmaBepalerMock)
-	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = Converter.Convert(..HalffabricaatBouwsteenDummy)
-	
-	Do $$$AssertEquals(BomLine.SourcingDataAreaId, ..RandomFirma)
-	
-	Do InterneFirmaBepalerMock.Verifieer()
-]]></Implementation>
-</Method>
-
 <Method name="Test: BouwsteenConverter vult BOMQty van de BomLine in met het aantal van het Halffabricaat">
 <Implementation><![CDATA[
-	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New(..InterneFirmaBepalerStub)
+	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New()
 	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = Converter.Convert(..HalffabricaatBouwsteenDummy)
 	
 	Do $$$AssertEquals(BomLine.BOMQty, ..RandomAantal)
@@ -76,7 +48,7 @@
 
 <Method name="Test: BouwsteenConverter vult BOMQtySerie van de BomLine in met 1">
 <Implementation><![CDATA[
-	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New(..InterneFirmaBepalerStub)
+	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New()
 	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = Converter.Convert(..HalffabricaatBouwsteenDummy)
 	
 	Do $$$AssertEquals(BomLine.BOMQtySerie, 1)
@@ -85,7 +57,7 @@
 
 <Method name="Test: BouwsteenConverter laat velden leeg">
 <Implementation><![CDATA[
-	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New(..InterneFirmaBepalerStub)
+	#dim Converter As WSimpl.AX.CalculatedProduct.BouwsteenConverter = ##class(WSimpl.AX.CalculatedProduct.BouwsteenConverter).%New()
 	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = Converter.Convert(..HalffabricaatBouwsteenDummy)
 	
 	Do $$$AssertEquals(BomLine.BOMDataAreaId, "")
@@ -96,6 +68,7 @@
 	Do $$$AssertEquals(BomLine.InventStyleId, "")
 	Do $$$AssertEquals(BomLine.RoundUp, "")
 	Do $$$AssertEquals(BomLine.RoundUpQty, "")
+	Do $$$AssertEquals(BomLine.SourcingDataAreaId, "")
 	Do $$$AssertEquals(BomLine.SourcingRouteId, "")
 	Do $$$AssertEquals(BomLine.ScrapConst, "")
 	Do $$$AssertEquals(BomLine.ScrapVar, "")
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml
===================================================================
diff -u -r43633 -r43679
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 43633)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 43679)
@@ -20,8 +20,7 @@
 <Method name="Test: RequestConverter converteert een AxdEntityRequest naar een AxdEntityConfigVariant">
 <Implementation><![CDATA[
 	#dim RandomItemId As %String = "RandomItemId"
-	#dim DummyFirma As %String = "DummyFirma"
-
+	
 	Set ..DummyRequest.ItemId = RandomItemId
 	
 	#dim BouwstenenIteratorDummy As TECH.Iterator = ##class(TECH.ListIterator).%New(##class(%ListOfObjects).%New())
@@ -36,24 +35,19 @@
 	Do ProductApiMock.VerwachtMethodCall("BestaatProduct", RandomItemId).DanReturn($$$True)
 	Do ProductApiMock.VerwachtMethodCall("GeefProduct", RandomItemId).DanReturn(ProductStub)
 	
-	#dim InterneFirmaBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New()
-	Do InterneFirmaBepalerMock.VerwachtMethodCall("Bepaal", RandomItemId).DanReturn(DummyFirma)
-	
 	#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
 	Do VariantDescriptionBepalerMock.VerwachtMethodCall("Bepaal", ProductStub, RandomItemId).DanReturn(##class(%ListOfObjects).%New())
 	
 	#dim BouwstenenConverterMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.BouwstenenConverter = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.BouwstenenConverter).%New()
 	Do BouwstenenConverterMock.VerwachtMethodCall("Convert", BouwstenenIteratorDummy).DanReturn(##class(%ListOfObjects).%New())
 	
-	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiMock, InterneFirmaBepalerMock, VariantDescriptionBepalerMock, BouwstenenConverterMock)
+	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiMock, VariantDescriptionBepalerMock, BouwstenenConverterMock)
 	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(..DummyRequest, "RandomMessageId")
 	
 	Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
-	Do $$$AssertEquals(ConfigVariant.SourcingDataAreaId, DummyFirma)
 	
 	Do BouwstenenConverterMock.Verifieer()
 	Do VariantDescriptionBepalerMock.Verifieer()
-	Do InterneFirmaBepalerMock.Verifieer()
 	Do ProductApiMock.Verifieer()
 ]]></Implementation>
 </Method>
@@ -91,13 +85,11 @@
 	Do ProductApiStub.IndienMethodCall("BestaatProduct", $$$ElkeWaarde).DanReturn($$$True)
 	Do ProductApiStub.IndienMethodCall("GeefProduct", $$$ElkeWaarde).DanReturn(ProductDummy)
 	
-	#dim InterneFirmaBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New()
-	Do InterneFirmaBepalerStub.IndienMethodCall("Bepaal", $$$ElkeWaarde).DanReturn($$$DummyString)
-	
 	#dim RandomMessageId As %String = "RandomMessageId"
-	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiStub, InterneFirmaBepalerStub)
+	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiStub)
 	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(..DummyRequest, RandomMessageId)
 	
+	Do $$$AssertEquals(ConfigVariant.SourcingDataAreaId, "")
 	Do $$$AssertEquals(ConfigVariant.SourcingRouteId, "")
 ]]></Implementation>
 </Method>
FishEye: Tag 43679 refers to a dead (removed) revision in file `WSimpl/AX/CalculatedProduct/InterneFirmaBepaler.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 43679 refers to a dead (removed) revision in file `vhUnitTest/WSimpl/AX/CalculatedProduct/InterneFirmaBepaler/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 43679 refers to a dead (removed) revision in file `vhTest/Mock/WSimpl/AX/CalculatedProduct/InterneFirmaBepaler.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml
===================================================================
diff -u -r43365 -r43679
--- WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml	(.../RequestConverter.cls.xml)	(revision 43365)
+++ WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml	(.../RequestConverter.cls.xml)	(revision 43679)
@@ -8,11 +8,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="InterneFirmaBepaler">
-<Type>WSimpl.AX.CalculatedProduct.InterneFirmaBepaler</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="VariantDescriptionBepaler">
 <Type>WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler</Type>
 <Private>1</Private>
@@ -24,14 +19,13 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>ProductApi:DOM.PM.ProductAPI="",InterneFirmaBepaler:WSimpl.AX.CalculatedProduct.InterneFirmaBepaler="",VariantDescriptionBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler="",BouwstenenConverter:WSimpl.AX.CalculatedProduct.BouwstenenConverter=""</FormalSpec>
+<FormalSpec>ProductApi:DOM.PM.ProductAPI="",VariantDescriptionBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler="",BouwstenenConverter:WSimpl.AX.CalculatedProduct.BouwstenenConverter=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.DomeinContext).Instance().GeefProductAPI())
-	Set ..InterneFirmaBepaler = $$$Inject(InterneFirmaBepaler, ##class(WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New())
 	Set ..VariantDescriptionBepaler = $$$Inject(VariantDescriptionBepaler, ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New())
 	Set ..BouwstenenConverter = $$$Inject(BouwstenenConverter, ##class(WSimpl.AX.CalculatedProduct.BouwstenenConverter).%New())
 	
@@ -56,7 +50,6 @@
 		#dim Product As DOM.PM.Product = ..ProductApi.GeefProduct(Request.ItemId)
 
 		Set ConfigVariant.GTIN = Product.GeefEANCode()
-		Set ConfigVariant.SourcingDataAreaId = ..InterneFirmaBepaler.Bepaal(Product.GeefPRNr())
 		Set ConfigVariant.ProductName = Product.GeefKorttekst()
 		Set ConfigVariant.CostPrice = Product.GeefNettoAankoopPrijsInclCif()
 		Set ConfigVariant.VariantDescription = ..VariantDescriptionBepaler.Bepaal(Product, ConfigVariant.ConfigVariantId)
Index: WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml
===================================================================
diff -u -r43630 -r43679
--- WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 43630)
+++ WSimpl/AX/CalculatedProduct/BouwsteenConverter.cls.xml	(.../BouwsteenConverter.cls.xml)	(revision 43679)
@@ -3,32 +3,13 @@
 <Class name="WSimpl.AX.CalculatedProduct.BouwsteenConverter">
 <Super>TECH.Mockable</Super>
 
-<Property name="InterneFirmaBepaler">
-<Type>WSimpl.AX.CalculatedProduct.InterneFirmaBepaler</Type>
-<Private>1</Private>
-</Property>
-
-<Method name="%OnNew">
-<FormalSpec>InterneFirmaBepaler:WSimpl.AX.CalculatedProduct.InterneFirmaBepaler=""</FormalSpec>
-<Private>1</Private>
-<ProcedureBlock>1</ProcedureBlock>
-<ReturnType>%Status</ReturnType>
-<ServerOnly>1</ServerOnly>
-<Implementation><![CDATA[
-	Set ..InterneFirmaBepaler = $$$Inject(InterneFirmaBepaler, ##class(WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New())
-	
-	Quit $$$OK
-]]></Implementation>
-</Method>
-
 <Method name="Convert">
 <FormalSpec>HalffabricaatBouwsteen:DOM.PM.Bouwstenen.BouwsteenHalfFabr</FormalSpec>
 <ReturnType>AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine</ReturnType>
 <Implementation><![CDATA[
 	#dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = ##class(AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine).%New()
 	
 	Set BomLine.ItemId = HalffabricaatBouwsteen.KindProduct.ProductNr
-	Set BomLine.SourcingDataAreaId = ..InterneFirmaBepaler.Bepaal(HalffabricaatBouwsteen.KindProduct.ProductNr)
 	Set BomLine.BOMQty = HalffabricaatBouwsteen.Aantal
 	Set BomLine.BOMQtySerie = 1