Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml
===================================================================
diff -u -r40812 -r40815
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml	(.../Test.cls.xml)	(revision 40812)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml	(.../Test.cls.xml)	(revision 40815)
@@ -26,13 +26,16 @@
 	Do FtpApiMock.VerwachtMethodCall("VerbreekVerbinding").DanDoeNiks()
 	
 	set IntractoInformeerderMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarExport.IntractoInformeerder).%New()
-	do IntractoInformeerderMock.VerwachtMethodCall("Registreer","VH-WinkelkarId-2011-06-30-091500.xml")
+	set VerwachteResponse = ##class(WS.Vhisie4.WinkelkarExport.SendResponse).%New()
+	set VerwachteResponse.Winkelkar.VanHoeckeId = "VanHoeckeId"
+	set VerwachteResponse.Winkelkar.Status = "Geslaagd"
+	do IntractoInformeerderMock.VerwachtMethodCall("Registreer","VH-WinkelkarId-2011-06-30-091500.xml").DanReturn(VerwachteResponse)
 	
 	Set Sender = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Sender).%New(FtpApiMock,,,IntractoInformeerderMock)
 	
 	#dim SendResponse As WS.Vhisie4.WinkelkarExport.SendResponse = Sender.Send(##class(vhTest.Utils.WS.Vhisie4.WinkelkarExport.dto.Winkelkar).StandaardProduct())
-    Do $$$AssertEquals(SendResponse.Winkelkar.VanHoeckeId,"WinkelkarId")
-    Do $$$AssertEquals(SendResponse.Winkelkar.Status,"Bezig")
+    Do $$$AssertEquals(SendResponse.Winkelkar.VanHoeckeId,"VanHoeckeId")
+    Do $$$AssertEquals(SendResponse.Winkelkar.Status,"Geslaagd")
     Do $$$AssertEquals(SendResponse.Winkelkar.Foutmelding.Read(),"")
 
 	Do FtpApiMock.Verifieer()
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml
===================================================================
diff -u -r40812 -r40815
--- WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml	(.../Sender.cls.xml)	(revision 40812)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml	(.../Sender.cls.xml)	(revision 40815)
@@ -57,7 +57,7 @@
 		Do ..FtpAPI.VerzendStream(..GeefXMLStream(Winkelkar), BestandNaam )
 		Do ..FtpAPI.VerbreekVerbinding()
 		
-		Do ..IntractoInformeerder.Registreer(BestandNaam)
+		set Response = ..IntractoInformeerder.Registreer(BestandNaam)
 		
 	} catch {
 		#Dim Exception as TECH.IException = ##class(TECH.ExceptionHandler).Catch()