Index: vhUnitTest/AXimpl/Utils/ConvertReqGroupId/Test.cls.xml
===================================================================
diff -u -r46064 -r46275
--- vhUnitTest/AXimpl/Utils/ConvertReqGroupId/Test.cls.xml	(.../Test.cls.xml)	(revision 46064)
+++ vhUnitTest/AXimpl/Utils/ConvertReqGroupId/Test.cls.xml	(.../Test.cls.xml)	(revision 46275)
@@ -272,6 +272,58 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Stap 8a voor Van Hoecke is ReqGroupId Blum06d ND als LeveringsDagen 5 is">
+<Implementation><![CDATA[
+	#dim LegacyProductAPIStub As vhTest.Mock.DOM.PM.LegacyProductAPI = ##class(vhTest.Mock.DOM.PM.LegacyProductAPI).MockInstance()
+	Do LegacyProductAPIStub.IndienMethodCall("GeefLeverancierNummer",$$$ElkeWaarde).DanReturn(5005)
+	
+	#dim VoorraadInstelling As AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstelling = ..VoorraadInstellingCalculator.Calculate()
+	Set VoorraadInstelling.LeveringsDagen = "5"
+	
+	Set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
+	Do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
+	
+	#dim Firma As AXimpl.InterneFirmaInitialen = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv()
+	
+	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProduct()
+	Set AxProduct.Basis.LinkType = "H"
+	Set AxProduct.Basis.StockNietStock = "1"
+	Set AxProduct.Basis.ScanType = "0"
+	
+	#dim Converter As AXimpl.Utils = ..GeefConverter()
+	
+	#dim ReqGroupId As %String = Converter.ConvertReqGroupId(Firma,AxProduct)
+	
+	Do $$$AssertEquals(ReqGroupId,"Blum06d ND")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Stap 8a voor Van Hoecke is ReqGroupId Blum06d ND als het over Logsteuer gaat en ScanType dus L is">
+<Implementation><![CDATA[
+	#dim LegacyProductAPIStub As vhTest.Mock.DOM.PM.LegacyProductAPI = ##class(vhTest.Mock.DOM.PM.LegacyProductAPI).MockInstance()
+	Do LegacyProductAPIStub.IndienMethodCall("GeefLeverancierNummer",$$$ElkeWaarde).DanReturn(5005)
+	
+	#dim VoorraadInstelling As AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstelling = ..VoorraadInstellingCalculator.Calculate()
+	Set VoorraadInstelling.LeveringsDagen = "55"
+	
+	Set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
+	Do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
+	
+	#dim Firma As AXimpl.InterneFirmaInitialen = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv()
+	
+	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProduct()
+	Set AxProduct.Basis.LinkType = "H"
+	Set AxProduct.Basis.StockNietStock = "1"
+	Set AxProduct.Basis.ScanType = "L"
+	
+	#dim Converter As AXimpl.Utils = ..GeefConverter()
+	
+	#dim ReqGroupId As %String = Converter.ConvertReqGroupId(Firma,AxProduct)
+	
+	Do $$$AssertEquals(ReqGroupId,"Blum06d ND")
+]]></Implementation>
+</Method>
+
 <Method name="Test: Stap 9a voor Van Hoecke is ReqGroupId BTS Agofor">
 <Implementation><![CDATA[
 	#dim LegacyProductAPIStub As vhTest.Mock.DOM.PM.LegacyProductAPI = ##class(vhTest.Mock.DOM.PM.LegacyProductAPI).MockInstance()