Index: AX/Uitgaand/PM/KostPrijs/impl/KostPrijsDixfConverter.cls.xml
===================================================================
diff -u -r46467 -r46500
--- AX/Uitgaand/PM/KostPrijs/impl/KostPrijsDixfConverter.cls.xml	(.../KostPrijsDixfConverter.cls.xml)	(revision 46467)
+++ AX/Uitgaand/PM/KostPrijs/impl/KostPrijsDixfConverter.cls.xml	(.../KostPrijsDixfConverter.cls.xml)	(revision 46500)
@@ -9,7 +9,7 @@
 </Property>
 
 <Method name="Convert">
-<FormalSpec>Product:AX.Uitgaand.PM.Product.impl.Product</FormalSpec>
+<FormalSpec>Product:AX.Uitgaand.PM.Product.impl.Product,Vestiging:AXimpl.InterneFirmaInitialen</FormalSpec>
 <ReturnType>AXdixf.KostEnLijstPrijs.KostEnLijstPrijs</ReturnType>
 <Implementation><![CDATA[
 	Set ..AxProduct = ##class(AXdixf.KostEnLijstPrijs.KostEnLijstPrijs).%New()
@@ -22,7 +22,7 @@
 	Set ..AxProduct.PriceUnit = "100"
 	Set ..AxProduct.UnitID = "STK"
 	Set ..AxProduct.ItemId = Product.Basis.IdentNummer
-	Set ..AxProduct.InventDimId = "AllBlank"
+	Set ..AxProduct.InventDimId = $$$If(Vestiging=##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv(),"0000001","0000861")
 	Set ..AxProduct.VersionId = "std"
 	
 	Quit ..AxProduct
Index: AX/Uitgaand/PM/LijstPrijs/impl/LijstPrijsDixfConverter.cls.xml
===================================================================
diff -u -r46467 -r46500
--- AX/Uitgaand/PM/LijstPrijs/impl/LijstPrijsDixfConverter.cls.xml	(.../LijstPrijsDixfConverter.cls.xml)	(revision 46467)
+++ AX/Uitgaand/PM/LijstPrijs/impl/LijstPrijsDixfConverter.cls.xml	(.../LijstPrijsDixfConverter.cls.xml)	(revision 46500)
@@ -9,7 +9,7 @@
 </Property>
 
 <Method name="Convert">
-<FormalSpec>Product:AX.Uitgaand.PM.Product.impl.Product</FormalSpec>
+<FormalSpec>Product:AX.Uitgaand.PM.Product.impl.Product,Vestiging:AXimpl.InterneFirmaInitialen</FormalSpec>
 <ReturnType>AXdixf.KostEnLijstPrijs.KostEnLijstPrijs</ReturnType>
 <Implementation><![CDATA[
 	#dim GrootteOrdeVerkoop As %String = $$GRORDE^PRODUKT2(Product.Basis.ProductNr,,"N")
@@ -23,7 +23,7 @@
 	Set ..AxProduct.PriceUnit = ..BepaalPriceUnit(GrootteOrdeVerkoop)
 	Set ..AxProduct.UnitID = "STK"
 	Set ..AxProduct.ItemId = Product.Basis.IdentNummer
-	Set ..AxProduct.InventDimId = "AllBlank"
+	Set ..AxProduct.InventDimId = $$$If(Vestiging=##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv(),"0000001","0000861")
 	Set ..AxProduct.VersionId = "std"
 	
 	Quit ..AxProduct
Index: AX/Uitgaand/PM/KostPrijs/impl/KostPrijsIterator.cls.xml
===================================================================
diff -u -r46448 -r46500
--- AX/Uitgaand/PM/KostPrijs/impl/KostPrijsIterator.cls.xml	(.../KostPrijsIterator.cls.xml)	(revision 46448)
+++ AX/Uitgaand/PM/KostPrijs/impl/KostPrijsIterator.cls.xml	(.../KostPrijsIterator.cls.xml)	(revision 46500)
@@ -78,7 +78,7 @@
 <ReturnType>AXdixf.KostEnLijstPrijs.KostEnLijstPrijs</ReturnType>
 <Implementation><![CDATA[
 	Set KostPrijsProduct = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..DynIterator.Next().GetData(1))
-	#dim ConvertedKostPrijsProduct As AXdixf.KostEnLijstPrijs.KostEnLijstPrijs = ..Converter.Convert(KostPrijsProduct)
+	#dim ConvertedKostPrijsProduct As AXdixf.KostEnLijstPrijs.KostEnLijstPrijs = ..Converter.Convert(KostPrijsProduct, ..Vestiging)
 	
 	#dim ProductNr As %String = KostPrijsProduct.Basis.ProductNr
 	#dim AxEntiteit As %String = "KostPrijs"
Index: AX/Uitgaand/PM/LijstPrijs/impl/LijstPrijsIterator.cls.xml
===================================================================
diff -u -r46449 -r46500
--- AX/Uitgaand/PM/LijstPrijs/impl/LijstPrijsIterator.cls.xml	(.../LijstPrijsIterator.cls.xml)	(revision 46449)
+++ AX/Uitgaand/PM/LijstPrijs/impl/LijstPrijsIterator.cls.xml	(.../LijstPrijsIterator.cls.xml)	(revision 46500)
@@ -77,7 +77,7 @@
 <ReturnType>AXdixf.KostEnLijstPrijs.KostEnLijstPrijs</ReturnType>
 <Implementation><![CDATA[
 	Set LijstPrijsProduct = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..DynIterator.Next().GetData(1))
-	#dim ConvertedLijstPrijsProduct As AXdixf.KostEnLijstPrijs.KostEnLijstPrijs = ..Converter.Convert(LijstPrijsProduct)
+	#dim ConvertedLijstPrijsProduct As AXdixf.KostEnLijstPrijs.KostEnLijstPrijs = ..Converter.Convert(LijstPrijsProduct, ..Vestiging)
 	
 	#dim ProductNr As %String = LijstPrijsProduct.Basis.ProductNr
 	#dim AxEntiteit As %String = "LijstPrijs"