Index: vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml
===================================================================
diff -u -r62174 -r65245
--- vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml	(.../Sender.cls.xml)	(revision 62174)
+++ vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml	(.../Sender.cls.xml)	(revision 65245)
@@ -9,7 +9,7 @@
 <Inheritance>right</Inheritance>
 
 <Method name="%OnNew">
-<FormalSpec>FtpApi:TECH.Ftp.FtpAPI="",DateTimeApi:TECH.DateTime.DateTimeAPI="",FormatApi:TECH.Format.FormatAPI="",IntractoInformeerder:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.IntractoInformeerder="",KlantIdConverter:AXimpl.Utils.KlantIdConverter=""</FormalSpec>
+<FormalSpec>FtpApi:TECH.Ftp.FtpAPI="",DateTimeApi:TECH.DateTime.DateTimeAPI="",FormatApi:TECH.Format.FormatAPI="",IntractoInformeerder:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.IntractoInformeerder="",KlantIdConverter:AXimpl.Utils.KlantIdConverter="",ProjectSettingsAPI:DOM.common.ProjectSettingsAPI=""</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[	Quit $$$OK
 ]]></Implementation>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml
===================================================================
diff -u -r53553 -r65245
--- WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml	(.../Sender.cls.xml)	(revision 53553)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml	(.../Sender.cls.xml)	(revision 65245)
@@ -34,14 +34,24 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProjectSettingsAPI">
+<Type>DOM.common.ProjectSettingsAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>FtpApi:TECH.Ftp.FtpAPI="",DateTimeApi:TECH.DateTime.DateTimeAPI="",FormatApi:TECH.Format.FormatAPI="",IntractoInformeerder:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.IntractoInformeerder="",KlantIdConverter:AXimpl.Utils.KlantIdConverter=""</FormalSpec>
+<FormalSpec>FtpApi:TECH.Ftp.FtpAPI="",DateTimeApi:TECH.DateTime.DateTimeAPI="",FormatApi:TECH.Format.FormatAPI="",IntractoInformeerder:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.IntractoInformeerder="",KlantIdConverter:AXimpl.Utils.KlantIdConverter="",ProjectSettingsAPI:DOM.common.ProjectSettingsAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..FtpApi = $$$Inject(FtpApi, ##class(TECH.Context).Instance().GeefFtpAPI())
+	Set ..ProjectSettingsAPI = $$$Inject(ProjectSettingsAPI,##class(DOM.common.impl.ProjectSettingsAPI).%New())
+	If ..ProjectSettingsAPI.IsActiefBiztalkSFTP() {
+		Set ..FtpApi = $$$Inject(FtpApi, ##class(TECH.Ftp.impl.SFtpApiBiztalkBased).%New("BiztalkExportDirectory"))
+	} Else {
+		Set ..FtpApi = $$$Inject(FtpApi, ##class(TECH.Context).Instance().GeefFtpAPI())
+	}
 	Set ..DateTimeApi = $$$Inject(DateTimeApi, ##class(TECH.Context).Instance().GeefDateTimeAPI())
 	Set ..FormatApi = $$$Inject(FormatApi, ##class(TECH.Context).Instance().GeefFormatAPI())
 	Set ..IntractoInformeerder = $$$Inject(IntractoInformeerder, ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.IoCContainer).Instance().Resolve("IntractoInformeerder"))
@@ -63,8 +73,13 @@
 	Try {
 		Set Winkelkar.KlantId = ..KlantIdConverter.ConvertToAx(Winkelkar.KlantId, Winkelkar.PersonalityId)
 		
-		Set FtpConfiguratie = ##class(TECH.Ftp.FtpConfiguratie).%New(##class(TECH.Config.ConfigMgr).Instance().GeefString("Vhisie4.WinkelkarExport.FtpConfiguratie.ConnectionString"))
-		Set FtpConfiguratie.ServerBestandsLocatie = ##class(TECH.Config.ConfigMgr).Instance().GeefString("Vhisie4.WinkelkarExport.FtpConfiguratie.ServerBestandsLocatie")
+		if ..ProjectSettingsAPI.IsActiefBiztalkSFTP(){
+			Set FtpConfiguratie = ##class(TECH.Ftp.FtpConfiguratie).%New()
+			Set FtpConfiguratie.ServerBestandsLocatie = "EC Cart Migration"
+		} else {
+			Set FtpConfiguratie = ##class(TECH.Ftp.FtpConfiguratie).%New(##class(TECH.Config.ConfigMgr).Instance().GeefString("Vhisie4.WinkelkarExport.FtpConfiguratie.ConnectionString"))	 
+			Set FtpConfiguratie.ServerBestandsLocatie = ##class(TECH.Config.ConfigMgr).Instance().GeefString("Vhisie4.WinkelkarExport.FtpConfiguratie.ServerBestandsLocatie")
+		}
 		
 		Do ..Logger.Info("WinkelkarExport.Sender","Winkelkar '"_Winkelkar.Id_"' voor klantid '"_Winkelkar.KlantId_"' naar Personality '"_Winkelkar.PersonalityId_"' wordt verzonden via FTP naar :"_$$$CRLF _ FtpConfiguratie.ToString() )
 		Do ..FtpApi.Connecteer(FtpConfiguratie)
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml
===================================================================
diff -u -r50062 -r65245
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml	(.../Test.cls.xml)	(revision 50062)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml	(.../Test.cls.xml)	(revision 65245)
@@ -64,6 +64,46 @@
 	Do KlantIdConverterMock.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: SFTP via Biztalk Send plaatst een bestand op een ftp server en informeert daarna de client en gebruikt dat resultaat">
+<Implementation><![CDATA[
+	do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
+		
+	Set BezigResponse = ##class(WS.Vhisie4.WinkelkarExport.SendResponse).%New()
+	Set BezigResponse.Winkelkar.VanHoeckeId = "WinkelkarId"
+	Set BezigResponse.Winkelkar.Status = "Bezig"
+	
+	Set FtpApiMock = ##class(vhTest.Mock.TECH.Ftp.FtpAPI).%New()
+
+	Set FtpConfiguratie = ##class(TECH.Ftp.FtpConfiguratie).%New()
+	Set FtpConfiguratie.ServerBestandsLocatie = "EC Cart Migration"
+			
+	Do FtpApiMock.VerwachtMethodCall("Connecteer",..Matches.DataTransferObject(FtpConfiguratie)).DanDoeNiks()	
+	Do FtpApiMock.VerwachtMethodCall("VerzendStream",..Matches.Stream(##class(vhTest.Utils.WS.Vhisie4.WinkelkarExport.dto.Winkelkar).StandaardProductAsStream()),"VH-WinkelkarId-2011-06-30-091500.xml").DanDoeNiks()
+	Do FtpApiMock.VerwachtMethodCall("VerbreekVerbinding").DanDoeNiks()
+	
+	set IntractoInformeerderMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarExport.IntractoInformeerder).%New()
+	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)
+	
+	#dim ProjectSettingsAPIMock as DOM.common.ProjectSettingsAPI = ##class(vhTest.Mock.DOM.common.ProjectSettingsAPI).MockInstance()
+	
+	Do ProjectSettingsAPIMock.VerwachtMethodCall("IsActiefBiztalkSFTP").DanReturn($$$True)
+	
+	Set Sender = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Sender).%New(FtpApiMock,,,IntractoInformeerderMock,,ProjectSettingsAPIMock)
+	
+	#dim SendResponse As WS.Vhisie4.WinkelkarExport.SendResponse = Sender.Send(##class(vhTest.Utils.WS.Vhisie4.WinkelkarExport.dto.Winkelkar).StandaardProduct())
+    Do $$$AssertEquals(SendResponse.Winkelkar.VanHoeckeId,"VanHoeckeId")
+    Do $$$AssertEquals(SendResponse.Winkelkar.Status,"Geslaagd")
+    Do $$$AssertEquals(SendResponse.Winkelkar.Foutmelding.Read(),"")
+
+	Do FtpApiMock.Verifieer()
+	Do ProjectSettingsAPIMock.Verifieer()
+	Do IntractoInformeerderMock.Verifieer()
+]]></Implementation>
+</Method>
 </Class>