Index: APPS/VKP/Offerte/impl/HandelOfferteNaarVanHoeckeOfferteConverteerderVhisie4.cls.xml
===================================================================
diff -u -r42455 -r42477
--- APPS/VKP/Offerte/impl/HandelOfferteNaarVanHoeckeOfferteConverteerderVhisie4.cls.xml	(.../HandelOfferteNaarVanHoeckeOfferteConverteerderVhisie4.cls.xml)	(revision 42455)
+++ APPS/VKP/Offerte/impl/HandelOfferteNaarVanHoeckeOfferteConverteerderVhisie4.cls.xml	(.../HandelOfferteNaarVanHoeckeOfferteConverteerderVhisie4.cls.xml)	(revision 42477)
@@ -77,15 +77,17 @@
 	#dim Offerte = ..OfferteService.GeefOfferte(SendResponse.Winkelkar.VanHoeckeId)
 	#dim Bestelling As APPS.VKP.Offerte = ..OfferteService.GeefOfferte(SendResponse.Winkelkar.IntractoId)
 	
-	//Do ..OfferteService.KoppelAanOfferteVanHandel(Offerte, Bestelling)
+	Do ..OfferteService.KoppelAanOfferteVanHandel(Offerte, Bestelling)
 	
 	//Do ..BehoudOorspronkelijkLeveradresIndienHein(Offerte, Bestelling)
 	
 	//Do ..PasAanDocumentReferenties(Offerte, Bestelling)
 	
-	//Do ..PasAanVHWinkelKar(Offerte, Bestelling)
+	Do ..PasAanVHWinkelKar(Offerte, Bestelling)
 	
 	Do ..OfferteService.GeefOfferteBewaarder().Bewaar(Offerte)
+	
+	Do ..OfferteService.VerwijderOfferte(OfferteVanHandel)
 		
 	Quit Offerte
 ]]></Implementation>
@@ -138,16 +140,6 @@
 	Do VanHoeckeOfferte.PrijzenWerdenHerberekend()
 ]]></Implementation>
 </Method>
-
-<Method name="MaakGekoppeldeVanHoeckeOfferte">
-<FormalSpec>OfferteVanHandel:APPS.VKP.Offerte</FormalSpec>
-<Private>1</Private>
-<ReturnType>APPS.VKP.Offerte</ReturnType>
-<Implementation><![CDATA[
-	#dim VanHoeckeKlant As %String = OfferteVanHandel.GeefPersonality().GeefKlantID()
-	Quit ..OfferteKopieerder.KopieerOfferte(OfferteVanHandel, VanHoeckeKlant, ##class(DOM.common.enu.Personality).VanHoecke())
-]]></Implementation>
-</Method>
 </Class>