Index: vhUnitTest/AXimpl/Controle/Order/Admin/AdminOrderLijnConverter/Test.cls.xml
===================================================================
diff -u -r49402 -r49413
--- vhUnitTest/AXimpl/Controle/Order/Admin/AdminOrderLijnConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 49402)
+++ vhUnitTest/AXimpl/Controle/Order/Admin/AdminOrderLijnConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 49413)
@@ -53,6 +53,7 @@
 		
 	Set ..AxProductConvertorMock = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
 	Do ..AxProductConvertorMock.IndienMethodCall("GeefBlumKunde",..#ProductId).DanDoeNiks()
+	Do ..AxProductConvertorMock.IndienMethodCall("IsSOPRInCache",..#ProductId).DanReturn($$$False)
 	Do ..AxProductConvertorMock.IndienMethodCall("GeefVervangProductDoorSOPRInAX",..#ProductId).DanReturn(..#ProductId)
 	
 	#dim LeverAdresMock As DOM.common.Adres = ##class(vhTest.Utils.DOM.VKP.LeverAdres).Belgisch()
@@ -127,12 +128,11 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Als er geen AxConfigId op de OrderLijn staat wordt de principaal opgehaald">
+<Method name="Test: Als er geen AxConfigId op de OrderLijn staat en het leverancierNummer is 5005 en het is een SoprInCache wordt de principaal opgehaald">
 <Implementation><![CDATA[
-	Do ..Product.ZetLeverancierId("L||4321")
-	
 	Do ..ProductOrderLijnStub.IndienMethodCall("GeefAxConfigId").DanReturn("")
 	
+	Do ..AxProductConvertorMock.IndienMethodCall("IsSOPRInCache",..#ProductId).DanReturn($$$True)
 	Do ..AxProductConvertorMock.VerwachtMethodCall("GeefVervangProductDoorSOPRInAX",..#ProductId).DanReturn("PrincipaalPRNr").ExactAantalKeer(1)
 	
 	Do ..ProductApiStub.IndienMethodCall("GeefProduct","PrincipaalPRNr").DanReturn(..GeefTeConverterenProduct())
@@ -143,6 +143,30 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Als er geen AxConfigId op de OrderLijn staat en het leverancierNummer is niet 5005 bevat Product het IdentNummer">
+<Implementation><![CDATA[
+	Do ..Product.ZetLeverancierId("L||4321")
+	
+	Do ..ProductOrderLijnStub.IndienMethodCall("GeefAxConfigId").DanReturn("")
+	
+	#dim ConvertedProductOrderLijn As AXimpl.Controle.Order.OrderLijn = ..GeefConverter().Convert(..ProductOrderLijnStub, ..Aantal)
+	
+	Do $$$AssertEquals(ConvertedProductOrderLijn.Product,"0.123.451.0")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Als er geen AxConfigId op de OrderLijn staat en het leverancierNummer is 5005 en het is geen SoprInCache bevat Product het IdentNummer">
+<Implementation><![CDATA[
+	Do ..ProductOrderLijnStub.IndienMethodCall("GeefAxConfigId").DanReturn("")
+	
+	Do ..AxProductConvertorMock.IndienMethodCall("IsSOPRInCache",..#ProductId).DanReturn($$$False)
+	
+	#dim ConvertedProductOrderLijn As AXimpl.Controle.Order.OrderLijn = ..GeefConverter().Convert(..ProductOrderLijnStub, ..Aantal)
+	
+	Do $$$AssertEquals(ConvertedProductOrderLijn.Product,"0.123.451.0")
+]]></Implementation>
+</Method>
+
 <Method name="Test: VerkoopOrderId bevat het AxSalesId">
 <Implementation><![CDATA[
 	Do ..AxProductConvertorMock.IndienMethodCall("GeefBlumKunde",..#ProductId).DanDoeNiks()
Index: AXimpl/Controle/Order/Admin/AdminOrderLijnConverter.cls.xml
===================================================================
diff -u -r49390 -r49413
--- AXimpl/Controle/Order/Admin/AdminOrderLijnConverter.cls.xml	(.../AdminOrderLijnConverter.cls.xml)	(revision 49390)
+++ AXimpl/Controle/Order/Admin/AdminOrderLijnConverter.cls.xml	(.../AdminOrderLijnConverter.cls.xml)	(revision 49413)
@@ -8,6 +8,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="LegacyPartijAPI">
+<Type>DOM.PARTIJ.LegacyPartijAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="AxProductConvertor">
 <Type>AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</Type>
 <Private>1</Private>
@@ -44,6 +49,7 @@
 	Set ..AxProductConvertor = $$$Inject(AxProductConvertor,##class(AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New())
 	Set ..PartijApi = $$$Inject(PartijApi,##class(DOM.DomeinContext).Instance().GeefPartijAPI())
 	Set ..AdminToAxUtils = ##class(AXimpl.AdminToAxUtils).%New()
+	Set ..LegacyPartijAPI = ##class(DOM.PARTIJ.impl.LegacyPartijAPI).%New()
 	Set ..Formatter = ##class(TECH.Context).Instance().GeefFormatAPI()
 	Set ..SoprContractIdConverter = ##class(AX.Uitgaand.PM.impl.Convertor.Sopr.SoprContractIdConverter).%New()
 
@@ -55,60 +61,56 @@
 <FormalSpec>AdminOrderLijn:DOM.VKP.ProductOrderlijn,Aantal:%String</FormalSpec>
 <ReturnType>AXimpl.Controle.Order.OrderLijn</ReturnType>
 <Implementation><![CDATA[
+	#dim Order As DOM.VKP.Order = AdminOrderLijn.GeefOrder()
+	#dim Adres As DOM.common.Adres = Order.GeefAfleveradres()
+	#dim ProductId As %String = AdminOrderLijn.GeefProductID()
+	#dim Product As DOM.PM.Product = ..ProductApi.GeefProduct(ProductId)
+	
 	Set ConvertedAdminOrderLijn = ##class(AXimpl.Controle.Order.OrderLijn).%New()
+	Set ConvertedAdminOrderLijn.VerkoopOrderId = Order.GeefAxSalesId()
+	Set ConvertedAdminOrderLijn.VerkoopOrderLijnId = AdminOrderLijn.GeefAxInventTransId()
+	Set ConvertedAdminOrderLijn.ConfigId = AdminOrderLijn.GeefAxConfigId()
+	Set ConvertedAdminOrderLijn.LeverDatum = ..Formatter.FormatHorolog(AdminOrderLijn.GeefLeverdag(),"JJJJ-MM-DD")
+	Set ConvertedAdminOrderLijn.Hoeveelheid = Aantal
+	Set ConvertedAdminOrderLijn.Klant = ..AdminToAxUtils.ConvertCustomerID(Order.GeefKlantID())
+	Set ConvertedAdminOrderLijn.Land = Adres.GeefLand().GeefIso3()
+	Set ConvertedAdminOrderLijn.Postcode = Adres.GeefPostcode()
+	Set ConvertedAdminOrderLijn.Stad = Adres.GeefGemeente()
+	Set ConvertedAdminOrderLijn.Straat = Adres.GeefStraat()
+	Set ConvertedAdminOrderLijn.Product = ..BepaalProduct(AdminOrderLijn, ConvertedAdminOrderLijn.ConfigId, ProductId, Product)
+	Set ConvertedAdminOrderLijn.Sopr = ..BepaalSopr(AdminOrderLijn, ProductId, Product)
 	
-	try {
-		#dim Order As DOM.VKP.Order = AdminOrderLijn.GeefOrder()
-		#dim Klant As DOM.PARTIJ.Partij = ..PartijApi.GeefPartij(Order.GeefKlantID())
-		#dim Adres As DOM.common.Adres = Order.GeefAfleveradres()
-		
-		Set ConvertedAdminOrderLijn.Klant = ..AdminToAxUtils.ConvertCustomerID(Order.GeefKlantID())
-		Set ConvertedAdminOrderLijn.LeverDatum = ..Formatter.FormatHorolog(AdminOrderLijn.GeefLeverdag(),"JJJJ-MM-DD")
-		Set ConvertedAdminOrderLijn.VerkoopOrderId = Order.GeefAxSalesId()
-		Set ConvertedAdminOrderLijn.VerkoopOrderLijnId = AdminOrderLijn.GeefAxInventTransId()
-		Set ConvertedAdminOrderLijn.ConfigId = AdminOrderLijn.GeefAxConfigId()
-		Set ConvertedAdminOrderLijn.Product = ..BepaalProduct(AdminOrderLijn, ConvertedAdminOrderLijn.ConfigId)
-		Set ConvertedAdminOrderLijn.Hoeveelheid = Aantal
-		Set ConvertedAdminOrderLijn.Land = Adres.GeefLand().GeefIso3()
-		Set ConvertedAdminOrderLijn.Postcode = Adres.GeefPostcode()
-		Set ConvertedAdminOrderLijn.Sopr = ..BepaalSopr(AdminOrderLijn)
-		Set ConvertedAdminOrderLijn.Stad = Adres.GeefGemeente()
-		Set ConvertedAdminOrderLijn.Straat = Adres.GeefStraat()	
-	} catch {
-		Set ConvertedAdminOrderLijn.VerkoopOrderId = "GEEN ORDER GEVONDEN"
-		#dim ZoekeOrderLijn As DOM.VKP.ProductOrderlijn = AdminOrderLijn
-	}
-	
 	Quit ConvertedAdminOrderLijn
 ]]></Implementation>
 </Method>
 
 <Method name="BepaalProduct">
-<FormalSpec>AdminOrderLijn:DOM.VKP.ProductOrderlijn,ConfigId:%String</FormalSpec>
+<FormalSpec>AdminOrderLijn:DOM.VKP.ProductOrderlijn,ConfigId:%String,ProductId:%String,Product:DOM.PM.Product</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim ProductIdentNummer As %String = ""
+	#dim ProductIdentNummer, ProductNr As %String = ""
 	
 	If ($$$HasLength(ConfigId)) {
 		Set ProductIdentNummer = AdminOrderLijn.GeefAxMaatwerkGenerischItemId()
 	} Else {
-		Set ProductIdentNummer = ..ProductApi.GeefProduct(..AxProductConvertor.GeefVervangProductDoorSOPRInAX(AdminOrderLijn.GeefProductID())).GeefIdentNr()
+		If ((..LegacyPartijAPI.GeefLeverancierNummerVoorPartijID(Product.GeefLeverancierID()) = "5005") && (..AxProductConvertor.IsSOPRInCache(ProductId))) {
+			Set ProductNr = ..AxProductConvertor.GeefVervangProductDoorSOPRInAX(ProductId)
+		} Else {
+			Set ProductNr = ProductId
+		}
+		Set ProductIdentNummer = ..ProductApi.GeefProduct(ProductNr).GeefIdentNr()
 	}
 	
 	Quit ProductIdentNummer
 ]]></Implementation>
 </Method>
 
 <Method name="BepaalSopr">
-<FormalSpec>AdminOrderLijn:DOM.VKP.ProductOrderlijn</FormalSpec>
+<FormalSpec>AdminOrderLijn:DOM.VKP.ProductOrderlijn,ProductId:%String,Product:DOM.PM.Product</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	#dim ProductNr As %String = AdminOrderLijn.GeefProductID()
-	#dim Product As DOM.PM.Product = ..ProductApi.GeefProduct(ProductNr)
-	
-	Quit $$$If($Extract(Product.GeefLeverancierID(),4,*)="5005",..SoprContractIdConverter.AdminNaarAx(..AxProductConvertor.GeefBlumKunde(ProductNr)),"")
+<Implementation><![CDATA[	Quit $$$If(..LegacyPartijAPI.GeefLeverancierNummerVoorPartijID(Product.GeefLeverancierID())="5005",..SoprContractIdConverter.AdminNaarAx(..AxProductConvertor.GeefBlumKunde(ProductId)),"")
 ]]></Implementation>
 </Method>
 </Class>