Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml
===================================================================
diff -u -r47274 -r47300
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 47274)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 47300)
@@ -125,6 +125,41 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Een standaard order met SOPR product wordt verwerkt en bewaard">
+<Implementation><![CDATA[
+	#dim StandaardOrder As AXif.Dynamics.SalesOrderIn.Envelope = ##class(vhTest.Utils.AXif.Dynamics.SalesOrderIn.Envelope).StandaardOrderMetSOPRProduct()
+	
+	#dim OrderMock As vhTest.Mock.DOM.VKP.Order = ..GeefOrder()
+	
+	Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False)
+	Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID")
+	
+	#dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetMunt","EUR").DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetLeverdag", $$INTDATE^vhLib.DataTypes("19-07-2017")).DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetEenheidPrijsExclBTW", 25).DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetTotaalNettoExclBTW", 250).DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxConfigId", "").DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetTextVoorAfdrukDocumentType", "PackingSlipBody", ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()).DanDoeNiks()
+
+	Set OrderLevenCyclusServiceMock = ##class(vhTest.Mock.APPS.VKP.OrderLevenCyclusService).%New()
+	Do OrderLevenCyclusServiceMock.IndienMethodCall("MaakOrderMetKlantGegevens", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(OrderMock)
+	Do OrderLevenCyclusServiceMock.VerwachtMethodCall("VoegToeProductVoorKlant",OrderMock,"DummyKlantID","DummyProductID",10).DanReturn(ProductOrderlijnMock).ExactAantalKeer(1)
+	
+	Set ProductBepalerMock = ##class(vhTest.Mock.AXimpl.Admin.Common.ProductBepaler).%New()
+	Do ProductBepalerMock.VerwachtMethodCall("GeefProductIdVoorLeverancierId","0.741.108.3",##class(DOM.AKP.enu.Leverancier).Blum(),"SOPRContractId").DanReturn("DummyProductID")
+	
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock), OrderLevenCyclusServiceMock,,ProductBepalerMock,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder())
+	Do SalesOrderConverter.Convert(StandaardOrder)
+	
+	Do OrderMock.Verifieer()
+	Do OrderLevenCyclusServiceMock.Verifieer()
+	Do ProductBepalerMock.Verifieer()
+	Do ProductOrderlijnMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: Geeft foutmelding bij nieuw order als het orderID lager is dan 01000">
 <Implementation><![CDATA[
 	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Het orderID 100999 is ongeldig. Een ID tussen 101000-199999 wordt verwacht.")
Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r47292 -r47300
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml	(.../SalesOrderConverter.cls.xml)	(revision 47292)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml	(.../SalesOrderConverter.cls.xml)	(revision 47300)
@@ -200,7 +200,7 @@
 <FormalSpec>OrderLine:AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderLine</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit $$$HasLength(..GeefAttributeValue(OrderLine.Attribute,"SOPRContractId"))
+<Implementation><![CDATA[	Quit $$$HasLength(OrderLine.SOPRContractId)
 ]]></Implementation>
 </Method>
 
Index: vhTest/Utils/AXif/Dynamics/SalesOrderIn/Envelope.cls.xml
===================================================================
diff -u -r47072 -r47300
--- vhTest/Utils/AXif/Dynamics/SalesOrderIn/Envelope.cls.xml	(.../Envelope.cls.xml)	(revision 47072)
+++ vhTest/Utils/AXif/Dynamics/SalesOrderIn/Envelope.cls.xml	(.../Envelope.cls.xml)	(revision 47300)
@@ -84,6 +84,29 @@
 	Quit StandaardOrder
 ]]></Implementation>
 </Method>
+
+<Method name="StandaardOrderMetSOPRProduct">
+<ClassMethod>1</ClassMethod>
+<ReturnType>AXif.Dynamics.SalesOrderIn.Envelope</ReturnType>
+<Implementation><![CDATA[
+	#dim StandaardOrder As AXif.Dynamics.SalesOrderIn.Envelope = ..StandaardOrder()
+	#dim OrderHeader As AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderHeader = StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1)
+	
+	Set AxdEntityOrderLine = ##class(AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderLine).%New()
+	Set AxdEntityOrderLine.ItemId = "0.741.108.3"
+	Set AxdEntityOrderLine.QtyOrdered = 10
+	Set AxdEntityOrderLine.LineAmount = 250
+	Set AxdEntityOrderLine.InventTransId = "000019541"
+	Set AxdEntityOrderLine.CurrencyCode = "EUR"
+	Set AxdEntityOrderLine.ReceiptDateConfirmed = $$INTDATE^vhLib.DataTypes("19-07-2017")
+	Set AxdEntityOrderLine.PackingSlipBody = "PackingSlipBody"
+	Set AxdEntityOrderLine.SOPRContractId = "SOPRContractId"
+	
+	Do OrderHeader.OrderLine.Insert(AxdEntityOrderLine)
+	
+	Quit StandaardOrder
+]]></Implementation>
+</Method>
 </Class>