Index: vhUnitTest/APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/Handel/Base.cls.xml
===================================================================
diff -u -r52558 -r53567
--- vhUnitTest/APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/Handel/Base.cls.xml	(.../Base.cls.xml)	(revision 52558)
+++ vhUnitTest/APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/Handel/Base.cls.xml	(.../Base.cls.xml)	(revision 53567)
@@ -77,13 +77,24 @@
 	Do OfferteStub.IndienMethodCall("GeefExterneId").DanReturn(..GeefExterneId())
 	Do OfferteStub.IndienMethodCall("GeefOfferteVanHandel").DanReturn(OfferteVanHandelDummy)
 	Do OfferteStub.IndienMethodCall("IsVhisie4").DanReturn($$$False)
+	Do OfferteStub.IndienMethodCall("GeefWinkelkarID").DanReturn("WinkelkarId")
 	
 	#dim MailApi As vhUnitTest.TECH.Mail.impl.MailAPIMock = ##class(vhUnitTest.TECH.Mail.impl.MailAPIMock).%New()
 	
 	#dim VertaalApiStub As vhTest.Mock.DOM.common.Transl.VertaalAPI = ##class(vhTest.Mock.DOM.common.Transl.VertaalAPI).%New()
 	do VertaalApiStub.IndienMethodCall("GeefVertaler", ..Personality.GeefTaal(), "Unishop").DanReturn(##class(vhTest.Utils.Vertaler).%New(""))
 	
-	#dim Rapporteur As APPS.EC.Rapporteur.Rapporteur = ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.Handel).%New(, MailApi, VertaalApiStub)
+	#dim WinkelkarMock as DOM.EC.Winkelkar.Winkelkar = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).StandaardWinkelkar()
+
+	Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
+	Do WinkelkarServiceMock.IndienMethodCall("OpenWinkelkar","WinkelkarId").DanReturn(WinkelkarMock)  
+	Set DoorHandelMeeleverensMelderMock = ##class(vhTest.Mock.APPS.VKP.Offerte.impl.DoorHandelMeeleverensMelder).%New()
+	Do DoorHandelMeeleverensMelderMock.IndienMethodCall("Init").DanDoeNiks()
+	Do DoorHandelMeeleverensMelderMock.IndienMethodCall("VerwerkGroepLijn",$$$ElkeWaarde).DanDoeNiks()
+	Do DoorHandelMeeleverensMelderMock.IndienMethodCall("Finalize").DanDoeNiks()	
+	Do DoorHandelMeeleverensMelderMock.IndienMethodCall("HeeftMeeleverens").DanReturn($$$False)
+	
+	#dim Rapporteur As APPS.EC.Rapporteur.Rapporteur = ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.Handel).%New(, MailApi, VertaalApiStub,,,WinkelkarServiceMock,DoorHandelMeeleverensMelderMock)
 	Do Rapporteur.Rapporteer(OfferteStub)
 	
 	If $$$AssertEquals(MailApi.GeefAantalVerzondenMails(), 1) {