Index: AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter.cls.xml
===================================================================
diff -u -r47315 -r47480
--- AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter.cls.xml	(.../GenVrijgegProductDixfConverter.cls.xml)	(revision 47315)
+++ AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter.cls.xml	(.../GenVrijgegProductDixfConverter.cls.xml)	(revision 47480)
@@ -3,6 +3,11 @@
 <Class name="AX.Uitgaand.PM.GenVrijgegProduct.impl.GenVrijgegProductDixfConverter">
 <Super>TECH.RegisteredObject</Super>
 
+<Property name="ArtikelGroepBepaler">
+<Type>AX.Uitgaand.PM.VrijgegProduct.impl.ArtikelGroepBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="AXimplFormatter">
 <Type>AXimpl.Formatter</Type>
 <Private>1</Private>
@@ -19,14 +24,15 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>AXimplFormatter:AXimpl.Formatter,IsBasisProductFilter:AX.Uitgaand.PM.impl.IsBasisProductFilter</FormalSpec>
+<FormalSpec>AXimplFormatter:AXimpl.Formatter,IsBasisProductFilter:AX.Uitgaand.PM.impl.IsBasisProductFilter,ArtikelGroepBepaler:AX.Uitgaand.PM.VrijgegProduct.impl.ArtikelGroepBepaler</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..AXimplFormatter = $$$Inject(AXimplFormatter,##class(AXimpl.Formatter).%New())
 	Set ..IsBasisProductFilter = $$$Inject(IsBasisProductFilter,##class(AX.Uitgaand.PM.impl.IsBasisProductFilter).%New())
+	Set ..ArtikelGroepBepaler = $$$Inject(ArtikelGroepBepaler,##class(AX.Uitgaand.PM.VrijgegProduct.impl.ArtikelGroepBepaler).%New())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -117,7 +123,7 @@
 	Set ..AxProduct.InventTableModuleSalesUnitId = "STK"
 	Set ..AxProduct.ItemBuyerGroupId = ""
 	Set ..AxProduct.ItemDimCostPrice = "Ja"
-	Set ..AxProduct.ItemGroupId = "HG"
+	Set ..AxProduct.ItemGroupId = $$$If(Vestiging = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv(),..ArtikelGroepBepaler.GeefArtikelGroep(Product.Basis.ProductNr,##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv()),..ArtikelGroepBepaler.GeefArtikelGroep(Product.Basis.ProductNr,##class(AXimpl.InterneFirmaInitialen).HaluxNv()))
 	Set ..AxProduct.ItemId = Product.Basis.IdentNummer
 	Set ..AxProduct.ItemInventLocationId = "CACHE"
 	Set ..AxProduct.ItemType = "Artikel"
Index: vhUnitTest/AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter/Test.cls.xml
===================================================================
diff -u -r47315 -r47480
--- vhUnitTest/AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 47315)
+++ vhUnitTest/AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 47480)
@@ -8,6 +8,11 @@
 <Default>1000</Default>
 </Parameter>
 
+<Property name="ArtikelGroepBepaler">
+<Type>AX.Uitgaand.PM.VrijgegProduct.impl.ArtikelGroepBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="AXimplFormatter">
 <Type>AXimpl.Formatter</Type>
 <Private>1</Private>
@@ -32,6 +37,7 @@
 	Do ##super(aTestName)
 	Set ..AXimplFormatter = ##class(vhTest.Dummy.AXimpl.Formatter).%New()
 	Set ..IsBasisProductFilter = ##class(vhTest.Fake.AX.Uitgaand.PM.impl.IsBasisProductFilter).%New()
+	Set ..ArtikelGroepBepaler = ##class(vhTest.Fake.AX.Uitgaand.PM.VrijgegProduct.impl.ArtikelGroepBepaler).%New()
 ]]></Implementation>
 </Method>
 
@@ -264,6 +270,27 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Voor ItemGroupId wordt met ProductNr en Vestiging GeefArtikelGroep van de ArtikelGroepBepaler opgeroepen">
+<Implementation><![CDATA[
+	#dim LegacyProductAPIStub As vhTest.Mock.DOM.PM.LegacyProductAPI = ##class(vhTest.Mock.DOM.PM.LegacyProductAPI).MockInstance()
+	do LegacyProductAPIStub.IndienMethodCall("GeefLeverancierNummer",$$$ElkeWaarde).DanReturn(6051)
+	
+	#dim Firma As AXimpl.InterneFirmaInitialen = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv()
+	
+	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProduct()
+	
+	#dim ArtikelGroepBepaler As AX.Uitgaand.PM.VrijgegProduct.impl.ArtikelGroepBepaler = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.ArtikelGroepBepaler).%New()
+	Do ArtikelGroepBepaler.IndienMethodCall("GeefArtikelGroep",..#ProductId,Firma).DanReturn("ItemGroupId")
+	Set ..ArtikelGroepBepaler = ArtikelGroepBepaler
+	
+	#dim Converter As AX.Uitgaand.PM.GenVrijgegProduct.impl.GenVrijgegProductDixfConverter = ..GeefConverter()
+	
+	#dim ConvertedProduct As %String = Converter.Convert(AxProduct,Firma)
+	
+	Do $$$AssertEquals(ConvertedProduct.ItemGroupId,"ItemGroupId")
+]]></Implementation>
+</Method>
+
 <Method name="GeefTeConverterenProduct">
 <Private>1</Private>
 <ReturnType>AX.Uitgaand.PM.Product.impl.Product</ReturnType>
@@ -277,7 +304,7 @@
 <Method name="GeefConverter">
 <Private>1</Private>
 <ReturnType>AX.Uitgaand.PM.GenVrijgegProduct.impl.GenVrijgegProductDixfConverter</ReturnType>
-<Implementation><![CDATA[	Quit ##class(AX.Uitgaand.PM.GenVrijgegProduct.impl.GenVrijgegProductDixfConverter).%New(..AXimplFormatter, ..IsBasisProductFilter)
+<Implementation><![CDATA[	Quit ##class(AX.Uitgaand.PM.GenVrijgegProduct.impl.GenVrijgegProductDixfConverter).%New(..AXimplFormatter, ..IsBasisProductFilter, ..ArtikelGroepBepaler)
 ]]></Implementation>
 </Method>
 </Class>