Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder/Test.cls.xml
===================================================================
diff -u -r47340 -r47354
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder/Test.cls.xml	(.../Test.cls.xml)	(revision 47340)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder/Test.cls.xml	(.../Test.cls.xml)	(revision 47354)
@@ -3,14 +3,76 @@
 <Class name="vhUnitTest.AXimpl.Dynamics.SalesOrderIn.Converter.OrderlijnenSorteerder.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test : een order met productlijnen wordt gesorteerd en bewaart een order met de juiste orderlijnen.">
+<Method name="Test : een order zonder orderlijnen wordt gesorteerd en bewaart een order met de juiste orderlijnen">
 <Implementation><![CDATA[
-	#dim Order As DOM.VKP.impl.DataM.DataMOrder = ##class(vhTest.Utils.DOM.VKP.impl.DataM.DataMOrder).OrderMetProductLijnen()
-	Set OrderlijnenSorteerder = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.OrderlijnenSorteerder).%New()
-	;Do OrderlijnenSorteerder.SorteerGepersisteerdeOrderLijnen(Order)
-	; Controleren op volgorde.
+	#dim Order As DOM.VKP.impl.DataM.DataMOrder = ..GeefOrder()
+
+	Set OrderLijnenLijst = ##class(%ListOfObjects).%New()
+
+	Set OrderLijnenUpdaterMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.OrderLijnenUpdater).%New()
+	Do OrderLijnenUpdaterMock.VerwachtMethodCall("UpdateOrderMetGesorteerdeLijst", Order, ..Matches.List(OrderLijnenLijst)).ExactAantalKeer(1).DanDoeNiks()
+	
+	Set OrderlijnenSorteerder = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.OrderlijnenSorteerder).%New(OrderLijnenUpdaterMock)
+	Do OrderlijnenSorteerder.SorteerGepersisteerdeOrderLijnen(Order)
+	
+	Do OrderLijnenUpdaterMock.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="GeefOrder">
+<Private>1</Private>
+<ReturnType>vhTest.Mock.DOM.VKP.Order</ReturnType>
+<Implementation><![CDATA[
+	Set OrderMock = ##class(vhTest.Mock.DOM.VKP.Order).%New()
+	Do OrderMock.IndienMethodCall("ZetAfleveradres", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetDocumentReferenties", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("GeefDocumentReferenties").DanReturn("")
+	Do OrderMock.IndienMethodCall("ZetCreatieDatum", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetMunt", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetEDINummer", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetLeveringVoorwaarde", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetVerzendingWijze", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetIngegevenDoor", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetIngegevenOpTijdstip", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetOorsprong", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetStatus", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("ZetAxSalesId", $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("GeefKlantID").DanReturn("DummyKlantID")
+	Do OrderMock.IndienMethodCall("GeefID").DanReturn("DummyOrderID")
+	Do OrderMock.IndienMethodCall("ZetTextVoorAfdrukDocumentType", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do OrderMock.IndienMethodCall("GeefTextlijnenVoorAfdrukDocumentType", $$$ElkeWaarde).DanReturn(..GeefTextLijnen())
+	Do OrderMock.IndienMethodCall("GeefOrderLijnIterator").DanReturn(..GeefOrderlijnenIterator())
+	Do OrderMock.IndienMethodCall("GeefOrderLijnen").DanReturn(..GeefOrderlijnen())
+	Quit OrderMock
+]]></Implementation>
+</Method>
+
+<Method name="GeefTextLijnen">
+<Private>1</Private>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[
+	Set TextLijnen = ##class(%ListOfObjects).%New()
+	Quit TextLijnen
+]]></Implementation>
+</Method>
+
+<Method name="GeefOrderlijnenIterator">
+<Private>1</Private>
+<ReturnType>TECH.ListIterator</ReturnType>
+<Implementation><![CDATA[
+	Set OrderlijnenIterator = ##class(TECH.ListIterator).%New(##class(%ListOfObjects).%New(..GeefOrderlijnen()))
+	Quit OrderlijnenIterator
+]]></Implementation>
+</Method>
+
+<Method name="GeefOrderlijnen">
+<Private>1</Private>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[
+	Set Orderlijnen = ##class(%ListOfObjects).%New()
+	Quit Orderlijnen
+]]></Implementation>
+</Method>
 </Class>