Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml	(revision 39670)
@@ -0,0 +1,42 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.Sender.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test : Send doet ftp bestand en zet status op Bezig">
+<Implementation><![CDATA[
+	do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
+	
+	Set ExportStatusServiceMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusService).%New()
+	
+	Set BezigResponse = ##class(WS.Vhisie4.WinkelkarExport.SendResponse).%New()
+	Set BezigResponse.Winkelkar.VanHoeckeId = "WinkelkarId"
+	Set BezigResponse.Winkelkar.Status = "Bezig"
+	Do ExportStatusServiceMock.VerwachtMethodCall("Registreer",..Matches.DataTransferObject(BezigResponse)).ExactAantalKeer(1)
+	
+	Set GeslaagdResponse = ##class(WS.Vhisie4.WinkelkarExport.SendResponse).%New()
+	Set GeslaagdResponse.Winkelkar.VanHoeckeId = "WinkelkarId"
+	Set GeslaagdResponse.Winkelkar.Status = "Geslaagd"
+	Do ExportStatusServiceMock.VerwachtMethodCall("Registreer",..Matches.DataTransferObject(GeslaagdResponse)).ExactAantalKeer(1)
+	
+	Set FtpApiMock = ##class(vhTest.Mock.TECH.Ftp.FtpAPI).%New()
+	Set FtpConfiguratie = ##class(TECH.Ftp.FtpConfiguratie).%New("username:passworword@ftp.com")
+	Do FtpApiMock.VerwachtMethodCall("Connecteer",..Matches.DataTransferObject(FtpConfiguratie)).DanDoeNiks()
+	
+	Do FtpApiMock.VerwachtMethodCall("VerzendStream",..Matches.Stream(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.dto.Winkelkar).StandaardProductAsStream()),"VH-WinkelkarId-2011-06-30-091500.xml").DanDoeNiks()
+	Do FtpApiMock.VerwachtMethodCall("VerbreekVerbinding").DanDoeNiks()
+	
+	Set Sender = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Sender).%New(FtpApiMock,ExportStatusServiceMock)
+	
+	#dim SendResponse As WS.Vhisie4.WinkelkarExport.SendResponse = Sender.Send(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.dto.Winkelkar).StandaardProduct())
+    Do $$$AssertEquals(SendResponse.Winkelkar.VanHoeckeId,"WinkelkarId")
+    Do $$$AssertEquals(SendResponse.Winkelkar.Status,"Geslaagd")
+
+	Do FtpApiMock.Verifieer()
+	Do ExportStatusServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
FishEye: Tag 39670 refers to a dead (removed) revision in file `vhUnitTest/WSimpl/Vhisie4/Winkelkar/FlowWinkelkarConverter/Sender/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?