Index: vhTestFiles/UnitTests/WSimpl.Vhisie4.Winkelkar.FlowWinkelkarConverter.Converter/Test/TestConvertconverteertOfferteHoofdingmetLijnProductennaarWinkelKarExport/Result.txt
===================================================================
diff -u -r39687 -r39721
--- vhTestFiles/UnitTests/WSimpl.Vhisie4.Winkelkar.FlowWinkelkarConverter.Converter/Test/TestConvertconverteertOfferteHoofdingmetLijnProductennaarWinkelKarExport/Result.txt	(.../Result.txt)	(revision 39687)
+++ vhTestFiles/UnitTests/WSimpl.Vhisie4.Winkelkar.FlowWinkelkarConverter.Converter/Test/TestConvertconverteertOfferteHoofdingmetLijnProductennaarWinkelKarExport/Result.txt	(.../Result.txt)	(revision 39721)
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Winkelkar>
-  <ID>403323</ID>
+  <ID>Beslag_403323</ID>
   <KlantID>3912</KlantID>
   <Lijnen>
     <WinkelkarLijn xsi:type="ProductLijn" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
@@ -24,5 +24,5 @@
   </Lijnen>
   <Datum>2017-01-05</Datum>
   <Referentie></Referentie>
-  <Status></Status>
+  <Status>Offerte</Status>
 </Winkelkar>
\ No newline at end of file
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarExport/FlowWinkelkarConverter.cls.xml
===================================================================
diff -u -r39688 -r39721
--- WSimpl/Vhisie4/Winkelkar/WinkelkarExport/FlowWinkelkarConverter.cls.xml	(.../FlowWinkelkarConverter.cls.xml)	(revision 39688)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarExport/FlowWinkelkarConverter.cls.xml	(.../FlowWinkelkarConverter.cls.xml)	(revision 39721)
@@ -60,7 +60,7 @@
 	Set OfferteIterator = ##class(TECH.ListIterator).%New(..Retriever.ZoekViaKlantId(KlantId))
 	while OfferteIterator.HasNext() {
 		#dim Offerte As Flow.Offerte.Hoofding = OfferteIterator.Next()
-		If $$$Not(..ExportStatusService.IsWinkelKarSuccesvolGeexporteerd(Offerte.ID)) {	
+		If $$$Not(..ExportStatusService.IsWinkelKarSuccesvolGeexporteerd("Beslag_"_Offerte.ID)) {	
 			Do ..ExportStatusService.Registreer( ..Sender.Send(..Converter.Convert(Offerte)))
 		}
 	}
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/FlowWinkelkarConverter/Test.cls.xml
===================================================================
diff -u -r39671 -r39721
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/FlowWinkelkarConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 39671)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/FlowWinkelkarConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 39721)
@@ -26,8 +26,8 @@
 	#Dim Winkelkar as WS.Vhisie4.Winkelkar.dto.Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
 
 	Do RetrieverMock.VerwachtMethodCall("ZoekViaKlantId","xx").DanReturn(OfferteList)
-	Do ExportStatusServiceMock.VerwachtMethodCall("IsWinkelKarSuccesvolGeexporteerd",123456).DanReturn(0)
-	Do ExportStatusServiceMock.VerwachtMethodCall("IsWinkelKarSuccesvolGeexporteerd",654321).DanReturn(1)
+	Do ExportStatusServiceMock.VerwachtMethodCall("IsWinkelKarSuccesvolGeexporteerd","Beslag_"_123456).DanReturn(0)
+	Do ExportStatusServiceMock.VerwachtMethodCall("IsWinkelKarSuccesvolGeexporteerd","Beslag_"_654321).DanReturn(1)
 	
 	Do ConverterMock.VerwachtMethodCall("Convert", Offerte1).DanReturn(Winkelkar).ExactAantalKeer(1)
 	Do ConverterMock.VerwachtMethodCall("Convert", Offerte2).Nooit()
@@ -65,8 +65,8 @@
 	Set Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
 
 	Do RetrieverMock.VerwachtMethodCall("ZoekViaKlantId","xx").DanReturn(OfferteList)
-	Do ExportStatusServiceMock.VerwachtMethodCall("IsWinkelKarSuccesvolGeexporteerd",123456).DanReturn(1)
-	Do ExportStatusServiceMock.VerwachtMethodCall("IsWinkelKarSuccesvolGeexporteerd",654321).DanReturn(1)
+	Do ExportStatusServiceMock.VerwachtMethodCall("IsWinkelKarSuccesvolGeexporteerd","Beslag_"_123456).DanReturn(1)
+	Do ExportStatusServiceMock.VerwachtMethodCall("IsWinkelKarSuccesvolGeexporteerd","Beslag_"_654321).DanReturn(1)
 	
 	Do FlowWinkelkarConverter.ConvertCustomer("xx")
 	Do $$$AssertEquals(ConverterSpy.GeefConvertAangeroepen(),0)	
@@ -76,12 +76,12 @@
 </Method>
 
 <Method name="GeefSendResponse">
-<FormalSpec>VanHoeckId:%String,Status:%String</FormalSpec>
+<FormalSpec>VanHoeckeId:%String,Status:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>WS.Vhisie4.WinkelkarExport.SendResponse</ReturnType>
 <Implementation><![CDATA[
 	#Dim SendResponse as WS.Vhisie4.WinkelkarExport.SendResponse = ##class(WS.Vhisie4.WinkelkarExport.SendResponse).%New()
-	Set SendResponse.Winkelkar.VanHoeckeId = VanHoeckId
+	Set SendResponse.Winkelkar.VanHoeckeId = "Beslag_"_VanHoeckeId
 	Set SendResponse.Winkelkar.Status = Status
 	quit SendResponse
 ]]></Implementation>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarExport/FlowWinkelkarConverter/Converter.cls.xml
===================================================================
diff -u -r39687 -r39721
--- WSimpl/Vhisie4/Winkelkar/WinkelkarExport/FlowWinkelkarConverter/Converter.cls.xml	(.../Converter.cls.xml)	(revision 39687)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarExport/FlowWinkelkarConverter/Converter.cls.xml	(.../Converter.cls.xml)	(revision 39721)
@@ -9,11 +9,11 @@
 <Implementation><![CDATA[
 	Set Winkelkar = ##class(WS.Vhisie4.WinkelkarExport.dto.Winkelkar).%New()
 	
-	Set Winkelkar.Id = Hoofding.ID
+	Set Winkelkar.Id = "Beslag_"_Hoofding.ID
 	Set Winkelkar.Datum = Hoofding.Datum
 	Set Winkelkar.KlantId = Hoofding.Klant.Nummer
 	Set Winkelkar.Referentie = Hoofding.Referentie
-	Set Winkelkar.Status = Hoofding.Status
+	Set Winkelkar.Status = "Offerte"
 	
 	Set LijnIterator = ##class(TECH.ListIterator).%New(Hoofding.Lijnen)
 	while LijnIterator.HasNext(){
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarExport/TbxWinkelkarConverter.cls.xml
===================================================================
diff -u -r39686 -r39721
--- WSimpl/Vhisie4/Winkelkar/WinkelkarExport/TbxWinkelkarConverter.cls.xml	(.../TbxWinkelkarConverter.cls.xml)	(revision 39686)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarExport/TbxWinkelkarConverter.cls.xml	(.../TbxWinkelkarConverter.cls.xml)	(revision 39721)
@@ -60,7 +60,7 @@
 	#dim WebOrders As TECH.ListIterator = ##class(TECH.ListIterator).%New(..Retriever.ZoekViaKlantId(KlantId))
 	while WebOrders.HasNext() {
 		#dim WebOrder As WS.TBX.Order = WebOrders.Next()
-		If $$$Not(..ExportStatusService.IsWinkelKarSuccesvolGeexporteerd(WebOrder.mID)) {	
+		If $$$Not(..ExportStatusService.IsWinkelKarSuccesvolGeexporteerd("Tbx_"_WebOrder.mID)) {	
 			Do ..ExportStatusService.Registreer(..Sender.Send(..Converter.Convert(WebOrder)))
 		}
 	}
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml
===================================================================
diff -u -r39697 -r39721
--- WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml	(.../Sender.cls.xml)	(revision 39697)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarExport/Sender.cls.xml	(.../Sender.cls.xml)	(revision 39721)
@@ -36,7 +36,7 @@
 	set ..DateTimeApi = $$$Inject(DateTimeApi,##class(TECH.Context).Instance().GeefDateTimeAPI())
 	set ..FormatApi = $$$Inject(FormatApi,##class(TECH.Context).Instance().GeefFormatAPI())
 	
-	Quit $$$OK
+	quit $$$OK
 ]]></Implementation>
 </Method>
 
@@ -49,7 +49,7 @@
 	Do ..ExportStatusService.Registreer(Response)
 	try {
 		set FtpConfiguratie = ##class(TECH.Ftp.FtpConfiguratie).%New("ftpuser:fE2_hpfYFXc-6H78@192.168.100.60")
-		set FtpConfiguratie.ServerBestandsLocatie = "Carts"
+		set FtpConfiguratie.ServerBestandsLocatie = "carts"
 		Do ..FtpAPI.Connecteer(FtpConfiguratie)
 		
 		Do ..FtpAPI.VerzendStream(..GeefXMLStream(Winkelkar),..GeefBestandNaam(Winkelkar) )
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarExport/TbxWinkelkarConverter/Converter.cls.xml
===================================================================
diff -u -r39686 -r39721
--- WSimpl/Vhisie4/Winkelkar/WinkelkarExport/TbxWinkelkarConverter/Converter.cls.xml	(.../Converter.cls.xml)	(revision 39686)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarExport/TbxWinkelkarConverter/Converter.cls.xml	(.../Converter.cls.xml)	(revision 39721)
@@ -50,7 +50,7 @@
 	do ..Streams.Clear()
 	
 	set Winkelkar = ##class(WS.Vhisie4.WinkelkarExport.dto.Winkelkar).%New()
-	Set Winkelkar.Id = TbxOrder.mID
+	Set Winkelkar.Id = "Tbx_"_TbxOrder.mID
 	Set Winkelkar.KlantId = TbxOrder.KLNummer
 	Set Winkelkar.Datum = ##class(TECH.DateTime).TimestampToDate(TbxOrder.IngaveTijdStip)
 	set Winkelkar.Referentie = TbxOrder.Commissie
@@ -131,9 +131,11 @@
 	Do ..AddToStream(EdiKenmerken,WinkelkarLijn.Id_" EdiKenmerken_2",BerekendeVerkoopprijs)
 	Do ..AddToStream(EconKenmerken,WinkelkarLijn.Id_" EconKenmerken_2",BerekendeVerkoopprijs)
 	
-	if $$$Not(+BerekendeVerkoopprijs = +WinkelkarLijn.EenheidPrijs)  {
+	if $$$Not((+BerekendeVerkoopprijs)=(+WinkelkarLijn.EenheidPrijs)) && $$$Not(WinkelkarLijn.EenheidPrijs = 0) {
 		do ..DumpStreams()
 	}
+	
+	if (+BerekendeVerkoopprijs=0) Do ..DumpStreams()
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml
===================================================================
diff -u -r39697 -r39721
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml	(.../Test.cls.xml)	(revision 39697)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/Sender/Test.cls.xml	(.../Test.cls.xml)	(revision 39721)
@@ -17,7 +17,7 @@
 	Set FtpApiMock = ##class(vhTest.Mock.TECH.Ftp.FtpAPI).%New()
 	
 	Set FtpConfiguratie = ##class(TECH.Ftp.FtpConfiguratie).%New("ftpuser:fE2_hpfYFXc-6H78@192.168.100.60")
-	Set FtpConfiguratie.ServerBestandsLocatie = "Carts"
+	Set FtpConfiguratie.ServerBestandsLocatie = "carts"
 
 	Do FtpApiMock.VerwachtMethodCall("Connecteer",..Matches.DataTransferObject(FtpConfiguratie)).DanDoeNiks()