Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml
===================================================================
diff -u -r51025 -r52581
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 51025)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 52581)
@@ -230,6 +230,28 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Indien VH-klant (nog) niet bestaat in Admin, dan wordt een exceptie gesmeten">
+<Implementation><![CDATA[
+	#dim BereidVoorBestellingRequest As WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest = ""
+	Set BereidVoorBestellingRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).StandaardRequest()
+	Set BereidVoorBestellingRequest.Header.KlantId = "UT_OnbestaandeKlantId"
+	
+	#dim WinkelkarRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Do WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", 1).DanReturn("InterneId")
+	
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("BestaatKlant", "K||UT_OnbestaandeKlantId").DanReturn($$$False)
+	
+	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(, WinkelkarRepositoryMock, , , , , , VerkoopApiStub)
+	
+	#dim Substrings as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Klant met nr 'UT_OnbestaandeKlantId' bestaat niet","Mogelijke reden : synchronisatie met AX nog niet klaar")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings))
+	
+	#dim Response As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse
+	Set Response = Service.BereidVoorBestelling(BereidVoorBestellingRequest)
+]]></Implementation>
+</Method>
+
 <Method name="GeefTweeMogelijkeLeverdatums">
 <Private>1</Private>
 <ReturnType>%ListOfDataTypes</ReturnType>