Index: vhUnitTest/AX/Uitgaand/PM/ExtArtOmschrLev/impl/ExtArtOmschrLevDixfConverter/Test.cls.xml
===================================================================
diff -u -r44972 -r44974
--- vhUnitTest/AX/Uitgaand/PM/ExtArtOmschrLev/impl/ExtArtOmschrLevDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 44972)
+++ vhUnitTest/AX/Uitgaand/PM/ExtArtOmschrLev/impl/ExtArtOmschrLevDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 44974)
@@ -18,6 +18,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="SoprConverter">
+<Type>AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Utils">
 <Type>AXimpl.Utils</Type>
 <Private>1</Private>
@@ -37,6 +42,7 @@
 	Do ##super(aTestName)
 	Set ..BestelreferentieSamensteller = ##class(vhTest.Dummy.AX.Uitgaand.PM.impl.SamenstellingBestelreferentieProductenInEenString).%New()
 	Set ..ConvertorLeveranciersnummerVanHoeckeNaarHalux = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.ConvertorLeveranciersnummerVanHoeckeNaarHalux).%New()
+	Set ..SoprConverter = ##class(vhTest.Fake.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
 	Set ..Utils = ##class(vhTest.Mock.AXimpl.Utils).%New()
 ]]></Implementation>
 </Method>
@@ -70,7 +76,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Voor Van Hoecke is CustVendRelation Blum als het LeverancierNummer 5005 is">
+<Method name="Test: Voor Van Hoecke is CustVendRelation Blum als het LeverancierNummer 5005 is en het een Sopr 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)
@@ -82,7 +88,11 @@
 	Set UtilsStub = ##class(vhTest.Mock.AXimpl.Utils).%New()
 	Do UtilsStub.IndienMethodCall("ConvertDefaultOrderType",Firma,AxProduct).DanReturn("DefaultOrderType")
 	
+	Set SoprConverterStub = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
+	Do SoprConverterStub.IndienMethodCall("IsSOPRInCache",..#ProductId).DanReturn($$$True)
+	
 	Set ..Utils = UtilsStub
+	Set ..SoprConverter = SoprConverterStub
 	
 	#dim Converter As AX.Uitgaand.PM.ExtArtOmschrLev.impl.ExtArtOmschrLevDixfConverter = ..GeefConverter()
 	
@@ -92,6 +102,32 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Voor Van Hoecke is CustVendRelation het LeverancierNummer met indien minder dan 4 cijfers een voorloopnul als het LeverancierNummer 5005 is en het GEEN Sopr 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 Firma As AXimpl.InterneFirmaInitialen = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv()
+	
+	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProduct()
+	
+	Set UtilsStub = ##class(vhTest.Mock.AXimpl.Utils).%New()
+	Do UtilsStub.IndienMethodCall("ConvertDefaultOrderType",Firma,AxProduct).DanReturn("DefaultOrderType")
+	
+	Set SoprConverterStub = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
+	Do SoprConverterStub.IndienMethodCall("IsSOPRInCache",..#ProductId).DanReturn($$$False)
+	
+	Set ..Utils = UtilsStub
+	Set ..SoprConverter = SoprConverterStub
+	
+	#dim Converter As AX.Uitgaand.PM.ExtArtOmschrLev.impl.ExtArtOmschrLevDixfConverter = ..GeefConverter()
+	
+	#dim ConvertedProduct As AXdixf.ExtArtOmschr.ExtArtOmschr = Converter.Convert(AxProduct,Firma)
+	
+	Do $$$AssertEquals(ConvertedProduct.CustVendRelation,"05005")
+]]></Implementation>
+</Method>
+
 <Method name="Test: Voor Halux is CustVendRelation het LeverancierNummer omgezet naar het AXLeverancierNummer met indien minder dan 4 cijfers een voorloopnul">
 <Implementation><![CDATA[
 	#dim LegacyProductAPIStub As vhTest.Mock.DOM.PM.LegacyProductAPI = ##class(vhTest.Mock.DOM.PM.LegacyProductAPI).MockInstance()
@@ -383,7 +419,7 @@
 <Method name="GeefConverter">
 <Private>1</Private>
 <ReturnType>AX.Uitgaand.PM.ExtArtOmschrLev.impl.ExtArtOmschrLevDixfConverter</ReturnType>
-<Implementation><![CDATA[	Quit ##class(AX.Uitgaand.PM.ExtArtOmschrLev.impl.ExtArtOmschrLevDixfConverter).%New(..Utils, ..ConvertorLeveranciersnummerVanHoeckeNaarHalux, ..BestelreferentieSamensteller)
+<Implementation><![CDATA[	Quit ##class(AX.Uitgaand.PM.ExtArtOmschrLev.impl.ExtArtOmschrLevDixfConverter).%New(..Utils, ..ConvertorLeveranciersnummerVanHoeckeNaarHalux, ..BestelreferentieSamensteller, ..SoprConverter)
 ]]></Implementation>
 </Method>
 </Class>
Index: AX/Uitgaand/PM/ExtArtOmschrLev/impl/ExtArtOmschrLevDixfConverter.cls.xml
===================================================================
diff -u -r44972 -r44974
--- AX/Uitgaand/PM/ExtArtOmschrLev/impl/ExtArtOmschrLevDixfConverter.cls.xml	(.../ExtArtOmschrLevDixfConverter.cls.xml)	(revision 44972)
+++ AX/Uitgaand/PM/ExtArtOmschrLev/impl/ExtArtOmschrLevDixfConverter.cls.xml	(.../ExtArtOmschrLevDixfConverter.cls.xml)	(revision 44974)
@@ -28,6 +28,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="SoprConverter">
+<Type>AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Utils">
 <Type>AXimpl.Utils</Type>
 <Private>1</Private>
@@ -39,7 +44,7 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>Utils:AXimpl.Utils,ConvertorLeveranciersnummerVanHoeckeNaarHalux:AX.Uitgaand.PM.impl.Convertor.ConvertorLeveranciersnummerVanHoeckeNaarHalux,BestelreferentieSamensteller:AX.Uitgaand.PM.impl.SamenstellingBestelreferentieProductenInEenString</FormalSpec>
+<FormalSpec>Utils:AXimpl.Utils,ConvertorLeveranciersnummerVanHoeckeNaarHalux:AX.Uitgaand.PM.impl.Convertor.ConvertorLeveranciersnummerVanHoeckeNaarHalux,BestelreferentieSamensteller:AX.Uitgaand.PM.impl.SamenstellingBestelreferentieProductenInEenString,SoprConverter:AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -48,6 +53,7 @@
 	Set ..Utils = $$$Inject(Utils,##class(AXimpl.Utils).%New())
 	Set ..ConvertorLeveranciersnummerVanHoeckeNaarHalux = $$$Inject(ConvertorLeveranciersnummerVanHoeckeNaarHalux,##class(AX.Uitgaand.PM.impl.Convertor.ConvertorLeveranciersnummerVanHoeckeNaarHalux).%New())
 	Set ..BestelreferentieSamensteller = $$$Inject(BestelreferentieSamensteller,##class(AX.Uitgaand.PM.impl.SamenstellingBestelreferentieProductenInEenString).%New())
+	Set ..SoprConverter = $$$Inject(SoprConverter,##class(AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New())
 
 	Quit $$$OK
 ]]></Implementation>
@@ -82,10 +88,11 @@
 <Implementation><![CDATA[
 	#dim CustVendRelation As %String
 	#dim LeverancierNummer As %String = Product.Basis.LeverancierNummer
+	#dim PRNr As %String = Product.Basis.ProductNr
 	
 	If Vestiging = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv() {
-		If (LeverancierNummer = "5005") {
-			Set CustVendRelation = "Blum"
+		If ((LeverancierNummer = "5005") && (..SoprConverter.IsSOPRInCache(PRNr))) {
+				Set CustVendRelation = "Blum"
 		} Else {
 			Set CustVendRelation = ##class(TECH.StringUtils).AddLeadingChar(LeverancierNummer,"0",5)
 		}