Index: vhUnitTest/AXimpl/Controle/Order/Admin/AdminOrderLijnConverter/Test.cls.xml
===================================================================
diff -u -r45507 -r48428
--- vhUnitTest/AXimpl/Controle/Order/Admin/AdminOrderLijnConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 45507)
+++ vhUnitTest/AXimpl/Controle/Order/Admin/AdminOrderLijnConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 48428)
@@ -18,7 +18,7 @@
 <Private>1</Private>
 </Property>
 
-<Property name="ProductRolApiStub">
+<Property name="ProductApiStub">
 <Type>DOM.PM.ProductAPI</Type>
 <Private>1</Private>
 </Property>
@@ -42,13 +42,13 @@
 	
 	Set ..AxProductConvertor = ##class(vhTest.Dummy.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
 	
-	Set ..ProductRolApiStub = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).%New()
+	Set ..ProductApiStub = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
 	Set ..ProductOrderLijnStub = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn()
 	
 	#dim ProductId As %String = ..ProductOrderLijnStub.GeefProductID()
 	#dim Product As DOM.PM.impl.ProductImpl = ..GeefTeConverterenProduct()
 	
-	Do ..ProductRolApiStub.IndienMethodCall("GeefAdministratiefProduct",ProductId).DanReturn(Product)
+	Do ..ProductApiStub.IndienMethodCall("GeefProduct",ProductId).DanReturn(Product)
 	
 	Set ..PartijApiStub = ##class(vhTest.Mock.DOM.PARTIJ.PartijAPI).%New()
 	Do ..PartijApiStub.IndienMethodCall("GeefPartij","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
@@ -101,6 +101,29 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Voor Product wordt nagegaan of het een Sopr is in Cache en niet in Ax en wordt dan de principaal opgehaald">
+<Implementation><![CDATA[
+	Do ..ProductOrderLijnStub.GeefOrder().IndienMethodCall("GeefKlantID").DanReturn("K||5005")
+	Do ..PartijApiStub.IndienMethodCall("GeefPartij","K||5005").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
+	
+	Set AxProductConvertorMock = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
+	Do AxProductConvertorMock.IndienMethodCall("GeefBlumKunde",..#ProductId).DanDoeNiks()
+	Do AxProductConvertorMock.VerwachtMethodCall("IsSOPRInCache",..#ProductId).DanReturn($$$True).ExactAantalKeer(1)
+	Do AxProductConvertorMock.VerwachtMethodCall("IsSOPRInAX",..#ProductId).DanReturn($$$False).ExactAantalKeer(1)
+	Do AxProductConvertorMock.IndienMethodCall("GeefVervangProductDoorSOPRInAX",..#ProductId).DanReturn("PrincipaalPRNr")
+	
+	#dim Product As DOM.PM.impl.ProductImpl = ..GeefTeConverterenProduct()
+	
+	Do ..ProductApiStub.IndienMethodCall("GeefProduct","PrincipaalPRNr").DanReturn(Product)
+	
+	Set ..AxProductConvertor = AxProductConvertorMock
+	
+	#dim ConvertedProductOrderLijn As AXimpl.Controle.Order.OrderLijn = ..GeefConverter().Convert(..ProductOrderLijnStub)
+	
+	Do AxProductConvertorMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: VerkochtAantal bevat het Aantal met komma als DecimalSeperator en tot op 16 cijfers na de komma">
 <Implementation><![CDATA[
 	#dim ConvertedProductOrderLijn As AXimpl.Controle.Order.OrderLijn = ..GeefConverter().Convert(..ProductOrderLijnStub)
@@ -170,6 +193,7 @@
 	Do ..PartijApiStub.IndienMethodCall("GeefPartij","K||5005").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
 	
 	Set AxProductConvertorMock = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
+	Do AxProductConvertorMock.IndienMethodCall("IsSOPRInCache",..#ProductId).DanReturn($$$False)
 	Do AxProductConvertorMock.VerwachtMethodCall("GeefBlumKunde",..#ProductId).DanDoeNiks()
 	Set ..AxProductConvertor = AxProductConvertorMock
 	
@@ -208,7 +232,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, ..AxProductConvertor, ..PartijApiStub)
+<Implementation><![CDATA[	Quit ##class(AXimpl.Controle.Order.Admin.AdminOrderLijnConverter).%New(..ProductApiStub, ..AxProductConvertor, ..PartijApiStub)
 ]]></Implementation>
 </Method>
 </Class>