Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml
===================================================================
diff -u -r39822 -r39900
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 39822)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 39900)
@@ -17,7 +17,7 @@
 	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceMock, WinkelkarRepositoryStub, LegacyPartijAPIStub)
 
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest
-	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).BestelWinkelkarRequest()
+	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
 	
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("DummyException")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException", Substrings))
@@ -42,7 +42,8 @@
 	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceMock, WinkelkarRepositoryStub, LegacyPartijAPIStub)
 
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest
-	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).BestelWinkelkarRequest()
+	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
+	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
 	
 	Do Service.BestelWinkelkar(BestelWinkelkarRequest)
 
@@ -62,9 +63,8 @@
 	Do VerkoopServiceMock.IndienMethodCall("BestelOfferte",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanDoeNiks()
 
 	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
-	Set HoofdingMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(VerwachteHoofding)
 	
-	Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","DummyID", HoofdingMatcher).DanDoeNiks()
+	Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","DummyID",..Matches.DataTransferObject(VerwachteHoofding)).DanDoeNiks()
 
 	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceMock, WinkelkarRepositoryStub, LegacyPartijAPIStub)
 	
@@ -119,7 +119,7 @@
 	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceStub, WinkelkarRepositoryMock, LegacyPartijAPIStub)
 
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest
-	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).BestelWinkelkarRequest()
+	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
 	Do Service.BestelWinkelkar(BestelWinkelkarRequest)
 
 	Do WinkelkarRepositoryMock.Verifieer()
@@ -131,11 +131,11 @@
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Winkelkar met id 'Onbestaande_WinkelkarId' bestaat niet.")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", Substrings))
 	
-	#dim Request As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).BestelWinkelkarRequest()
+	#dim Request As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
 	Set Request.Winkelkar.Id = "Onbestaande_WinkelkarId"
-	
 	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New()
 	
+	
 	Do Service.BestelWinkelkar(Request)
 ]]></Implementation>
 </Method>