Index: AXimpl/Utils.cls.xml
===================================================================
diff -u -r48569 -r48571
--- AXimpl/Utils.cls.xml	(.../Utils.cls.xml)	(revision 48569)
+++ AXimpl/Utils.cls.xml	(.../Utils.cls.xml)	(revision 48571)
@@ -208,10 +208,10 @@
 			Set PrimaryVendorId = ##class(TECH.StringUtils).AddLeadingChar(LeverancierNummer,"0",5)
 		}
 	} ElseIf Firma = ##class(AXimpl.InterneFirmaInitialen).HaluxNv(){
-		If ((LinkType '= "HH") && (LinkType '= "HHZ")){
-			Set PrimaryVendorId = "05497"
-		} ElseIf (DefaultOrderType = "Productie"){
+		If (DefaultOrderType = "Productie"){
 			Set PrimaryVendorId = ""
+		} ElseIf ((LinkType '= "HH") && (LinkType '= "HHZ")){
+			Set PrimaryVendorId = "05497"
 		} Else {
 			Set LeverancierNummer = ..ConvertorLeveranciersnummerVanHoeckeNaarHalux.ConvertorLeveranciersnummerVanHoeckeNaarHalux(LeverancierNummer)
 			Set PrimaryVendorId = ##class(TECH.StringUtils).AddLeadingChar(LeverancierNummer,"0",5)
Index: vhUnitTest/AXimpl/Utils/ConvertPrimaryVendorId/Test.cls.xml
===================================================================
diff -u -r45821 -r48571
--- vhUnitTest/AXimpl/Utils/ConvertPrimaryVendorId/Test.cls.xml	(.../Test.cls.xml)	(revision 45821)
+++ vhUnitTest/AXimpl/Utils/ConvertPrimaryVendorId/Test.cls.xml	(.../Test.cls.xml)	(revision 48571)
@@ -165,39 +165,39 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Voor Halux moet PrimaryVendorId 05497 zijn als LinkType NIET HH of HHZ is">
+<Method name="Test: Voor Halux moet PrimaryVendorId leeg zijn als LinkType HH is en DefaultOrderType Productie is">
 <Implementation><![CDATA[
 	#dim LegacyProductAPIStub As vhTest.Mock.DOM.PM.LegacyProductAPI = ##class(vhTest.Mock.DOM.PM.LegacyProductAPI).MockInstance()
 	do LegacyProductAPIStub.IndienMethodCall("GeefLeverancierNummer",$$$ElkeWaarde).DanReturn(6332)
 	
 	#dim Firma As AXimpl.InterneFirmaInitialen = ##class(AXimpl.InterneFirmaInitialen).HaluxNv()
 	
 	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProduct()
-	Set AxProduct.Basis.LinkType = "A"
+	Set AxProduct.Basis.LinkType = "HH"
 	
 	#dim Converter As AXimpl.Utils = ..GeefConverter()
-		
+	
 	#dim PrimaryVendorId As %String = Converter.ConvertPrimaryVendorId(Firma,AxProduct)
 	
-	Do $$$AssertEquals(PrimaryVendorId,"05497")
+	Do $$$AssertEquals(PrimaryVendorId,"")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Voor Halux moet PrimaryVendorId leeg zijn als LinkType HH is en DefaultOrderType Productie is">
+<Method name="Test: Voor Halux moet PrimaryVendorId 05497 zijn als LinkType NIET HH of HHZ is">
 <Implementation><![CDATA[
 	#dim LegacyProductAPIStub As vhTest.Mock.DOM.PM.LegacyProductAPI = ##class(vhTest.Mock.DOM.PM.LegacyProductAPI).MockInstance()
-	do LegacyProductAPIStub.IndienMethodCall("GeefLeverancierNummer",$$$ElkeWaarde).DanReturn(6332)
+	do LegacyProductAPIStub.IndienMethodCall("GeefLeverancierNummer",$$$ElkeWaarde).DanReturn(7407)
 	
 	#dim Firma As AXimpl.InterneFirmaInitialen = ##class(AXimpl.InterneFirmaInitialen).HaluxNv()
 	
 	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProduct()
-	Set AxProduct.Basis.LinkType = "HH"
+	Set AxProduct.Basis.LinkType = "A"
 	
 	#dim Converter As AXimpl.Utils = ..GeefConverter()
-	
+		
 	#dim PrimaryVendorId As %String = Converter.ConvertPrimaryVendorId(Firma,AxProduct)
 	
-	Do $$$AssertEquals(PrimaryVendorId,"")
+	Do $$$AssertEquals(PrimaryVendorId,"05497")
 ]]></Implementation>
 </Method>