Index: vhTest/Fake/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml
===================================================================
diff -u
--- vhTest/Fake/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml	(revision 0)
+++ vhTest/Fake/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml	(revision 44126)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</Super>
+
+<Method name="AdminNaarAx">
+<FormalSpec>PRNr:%String</FormalSpec>
+<ReturnType>AX.Uitgaand.PM.impl.Convertor.Sopr.AxProduct</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefBlumKunde">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefSOPRIterator">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>TECH.ListbuildIterator</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefVervangProductDoorSOPRInAX">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AXimpl/Controle/Order/Admin/AdminOrderLijnConverter.cls.xml
===================================================================
diff -u -r44124 -r44126
--- AXimpl/Controle/Order/Admin/AdminOrderLijnConverter.cls.xml	(.../AdminOrderLijnConverter.cls.xml)	(revision 44124)
+++ AXimpl/Controle/Order/Admin/AdminOrderLijnConverter.cls.xml	(.../AdminOrderLijnConverter.cls.xml)	(revision 44126)
@@ -8,6 +8,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="AxProductConvertor">
+<Type>AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Formatter">
 <Type>TECH.Format.FormatAPI</Type>
 <Private>1</Private>
@@ -19,13 +24,14 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>ProductRolApi:DOM.PM.ProductRolAPI</FormalSpec>
+<FormalSpec>ProductRolApi:DOM.PM.ProductRolAPI,AxProductConvertor:AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..ProductRolApi = $$$Inject(ProductRolApi,##class(DOM.DomeinContext).Instance().GeefProductRolAPI())
+	Set ..AxProductConvertor = $$$Inject(AxProductConvertor,##class(AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New())
 	Set ..AdminToAxUtils = ##class(AXimpl.AdminToAxUtils).%New()
 	Set ..Formatter = ##class(TECH.Context).Instance().GeefFormatAPI()
 
@@ -57,13 +63,30 @@
 	Set ConvertedAdminOrderLijn.Land = Adres.GeefLand().GeefIso3()
 	Set ConvertedAdminOrderLijn.OpenstaandeHoeveelheid = ""
 	Set ConvertedAdminOrderLijn.Postcode = Adres.GeefPostcode()
-	Set ConvertedAdminOrderLijn.Sopr = ""
+	Set ConvertedAdminOrderLijn.Sopr = ..BepaalSopr(AdminOrderLijn, KlantNummer)
 	Set ConvertedAdminOrderLijn.Stad = Adres.GeefGemeente()
 	Set ConvertedAdminOrderLijn.Straat = Adres.GeefStraat()
 	
 	Quit ConvertedAdminOrderLijn
 ]]></Implementation>
 </Method>
+
+<Method name="BepaalSopr">
+<FormalSpec>AdminOrderLijn:DOM.VKP.ProductOrderlijn,KlantNummer:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Sopr As %String
+	#dim ProductId As %String = AdminOrderLijn.GeefProductID()
+
+	If (KlantNummer '= "5005") {
+		Set Sopr = ""
+	} Else {
+		Set Sopr = ..AxProductConvertor.GeefBlumKunde(ProductId)
+	}
+	
+	Quit Sopr
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Dummy/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml
===================================================================
diff -u
--- vhTest/Dummy/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml	(revision 0)
+++ vhTest/Dummy/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml	(revision 44126)
@@ -0,0 +1,30 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Dummy.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>TECH.RegisteredObject,AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="GeefSOPRIterator">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>TECH.ListbuildIterator</ReturnType>
+</Method>
+
+<Method name="GeefVervangProductDoorSOPRInAX">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+</Method>
+
+<Method name="AdminNaarAx">
+<FormalSpec>PRNr:%String</FormalSpec>
+<ReturnType>AX.Uitgaand.PM.impl.Convertor.Sopr.AxProduct</ReturnType>
+</Method>
+
+<Method name="GeefBlumKunde">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/AXimpl/Controle/Order/Admin/AdminOrderLijnConverter/Test.cls.xml
===================================================================
diff -u -r44124 -r44126
--- vhUnitTest/AXimpl/Controle/Order/Admin/AdminOrderLijnConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 44124)
+++ vhUnitTest/AXimpl/Controle/Order/Admin/AdminOrderLijnConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 44126)
@@ -8,6 +8,11 @@
 <Default>1000</Default>
 </Parameter>
 
+<Property name="AxProductConvertor">
+<Type>AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="ProductRolApiStub">
 <Type>DOM.PM.ProductAPI</Type>
 <Private>1</Private>
@@ -29,6 +34,9 @@
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(aTestName)
+	
+	Set ..AxProductConvertor = ##class(vhTest.Dummy.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
+	
 	Set ..ProductRolApiStub = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).%New()
 	Set ..ProductOrderLijnStub = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn()
 	
@@ -140,6 +148,31 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Sopr is leeg als het NIET een Blumproduct is">
+<Implementation><![CDATA[
+	#dim ConvertedProductOrderLijn As AXimpl.Controle.Order.OrderLijn = ..GeefConverter().Convert(..ProductOrderLijnStub)
+	
+	do $$$AssertEquals(ConvertedProductOrderLijn.Sopr,"")
+]]></Implementation>
+</Method>
+
+<UDLText name="T">
+<Content><![CDATA[
+/*
+Method "Test: Sopr roept de AxProductConvertor op als het een Blumproduct betreft"()
+{
+	Set AxProductConvertorMock = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
+	Do AxProductConvertorMock.VerwachtMethodCall("GeefBlumKunde",$$$ElkeWaarde).DanDoeNiks()
+	Set ..AxProductConvertor = AxProductConvertorMock
+	
+	#dim ConvertedProductOrderLijn As AXimpl.Controle.Order.OrderLijn = ..GeefConverter().Convert(..ProductOrderLijnStub)
+	
+	do AxProductConvertorMock.Verifieer()
+}
+*/
+]]></Content>
+</UDLText>
+
 <Method name="Test: Stad bevat de Stad van de klant">
 <Implementation><![CDATA[
 	#dim ConvertedProductOrderLijn As AXimpl.Controle.Order.OrderLijn = ..GeefConverter().Convert(..ProductOrderLijnStub)
@@ -169,7 +202,7 @@
 <Method name="GeefConverter">
 <Private>1</Private>
 <ReturnType>AXimpl.Controle.Order.Admin.AdminOrderLijnConverter</ReturnType>
-<Implementation><![CDATA[	quit ##class(AXimpl.Controle.Order.Admin.AdminOrderLijnConverter).%New(..ProductRolApiStub)
+<Implementation><![CDATA[	quit ##class(AXimpl.Controle.Order.Admin.AdminOrderLijnConverter).%New(..ProductRolApiStub, ..AxProductConvertor)
 ]]></Implementation>
 </Method>
 </Class>
Index: AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml
===================================================================
diff -u -r43379 -r44126
--- AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml	(.../ProductConvertor.cls.xml)	(revision 43379)
+++ AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml	(.../ProductConvertor.cls.xml)	(revision 44126)
@@ -2,7 +2,7 @@
 <Export generator="Cache" version="24">
 <Class name="AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor">
 <IncludeCode>Prod.Product</IncludeCode>
-<Super>TECH.RegisteredObject</Super>
+<Super>TECH.RegisteredObject,TECH.Mockable</Super>
 
 <Property name="BlumKundeConvertor">
 <Type>AX.Uitgaand.PM.impl.Convertor.Sopr.BlumKunde</Type>
@@ -91,6 +91,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefBlumKunde">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim VHKLNr As %String
+	#dim BLKLNr As %String
+ 	Set VHKLNr=$O(^PRPUTZ("N",PRNr,""))
+ 	If VHKLNr=""
+ 	{
+	 	Set BLKLNr=212250
+	 }
+ 	Else
+ 	{
+		Set BLKLNr=$P($G(^PRPUTZ("N",PRNr,VHKLNr,0)),"\",1)
+ 	}
+	Quit BLKLNr
+]]></Implementation>
+</Method>
+
 <Method name="testone">
 <FormalSpec>PRNr:%String</FormalSpec>
 <Private>1</Private>
@@ -136,26 +155,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefBlumKunde">
-<FormalSpec>PRNr:%Integer</FormalSpec>
-<Private>1</Private>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	#dim VHKLNr As %String
-	#dim BLKLNr As %String
- 	Set VHKLNr=$O(^PRPUTZ("N",PRNr,""))
- 	If VHKLNr=""
- 	{
-	 	Set BLKLNr=212250
-	 }
- 	Else
- 	{
-		Set BLKLNr=$P($G(^PRPUTZ("N",PRNr,VHKLNr,0)),"\",1)
- 	}
-	Quit BLKLNr
-]]></Implementation>
-</Method>
-
 <Method name="GetVHProds">
 <FormalSpec>PRNr:%String</FormalSpec>
 <Private>1</Private>
Index: vhTest/Mock/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml
===================================================================
diff -u
--- vhTest/Mock/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml	(revision 0)
+++ vhTest/Mock/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml	(revision 44126)
@@ -0,0 +1,41 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="AdminNaarAx">
+<FormalSpec>PRNr:%String</FormalSpec>
+<ReturnType>AX.Uitgaand.PM.impl.Convertor.Sopr.AxProduct</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("AdminNaarAx",PRNr)
+]]></Implementation>
+</Method>
+
+<Method name="GeefBlumKunde">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefBlumKunde",PRNr)
+]]></Implementation>
+</Method>
+
+<Method name="GeefSOPRIterator">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>TECH.ListbuildIterator</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefSOPRIterator",PRNr)
+]]></Implementation>
+</Method>
+
+<Method name="GeefVervangProductDoorSOPRInAX">
+<FormalSpec>PRNr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVervangProductDoorSOPRInAX",PRNr)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>