Index: vhUnitTest/DOM/VKP/Order/impl/OrderKlantService/GeefKlantID/Test.cls.xml
===================================================================
diff -u -r33359 -r33559
--- vhUnitTest/DOM/VKP/Order/impl/OrderKlantService/GeefKlantID/Test.cls.xml	(.../Test.cls.xml)	(revision 33359)
+++ vhUnitTest/DOM/VKP/Order/impl/OrderKlantService/GeefKlantID/Test.cls.xml	(.../Test.cls.xml)	(revision 33559)
@@ -25,6 +25,24 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestGeefKlantNummerxxViaOrderMock">
+<Implementation><![CDATA[
+	#dim OrderAPIMock As vhTest.Mock.DOM.VKP.OrderAPI = ##class(vhTest.Mock.DOM.VKP.OrderAPI).MockInstance()
+
+	#dim KlantID As %String = "K||UT_KlantID"
+	#dim OrderMock As vhTest.Mock.DOM.VKP.Order = ##class(vhTest.Mock.DOM.VKP.Order).%New()
+	Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn(KlantID)
+	Do OrderAPIMock.VerwachtMethodCall("GeefOrder",..#OrderID).DanReturn(OrderMock)
+	
+	Set OrderKlantService = ##class(DOM.VKP.Order.impl.OrderKlantService).%New()
+	Do $$$AssertEquals(OrderKlantService.GeefKlantNummer(..#OrderID),"UT_KlantID")
+	
+	Do OrderAPIMock.Verifieer()
+	Do OrderMock.Verifieer()
+	Do ##class(DOM.DomeinContext).Instance().PopOrderAPIClassName()
+]]></Implementation>
+</Method>
+
 <Method name="TestGeefKlantID">
 <Implementation><![CDATA[
 	Set OrderKlantService = ##class(DOM.VKP.Order.impl.OrderKlantService).%New()