Index: APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml
===================================================================
diff -u -r36804 -r36838
--- APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml	(.../VerkoopService.cls.xml)	(revision 36804)
+++ APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml	(.../VerkoopService.cls.xml)	(revision 36838)
@@ -3,13 +3,8 @@
 <Class name="APPS.EC.Verkoop.impl.Externe.VerkoopService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>TECH.RegisteredObject,APPS.EC.Verkoop.ExterneVerkoopService</Super>
+<Super>APPS.EC.Verkoop.impl.VerkoopService,APPS.EC.Verkoop.ExterneVerkoopService</Super>
 
-<Property name="OfferteService">
-<Type>APPS.VKP.OfferteService</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="OfferteHerberekening">
 <Type>APPS.EC.Verkoop.impl.OfferteHerberekenaar</Type>
 <Private>1</Private>
@@ -20,27 +15,22 @@
 <Private>1</Private>
 </Property>
 
-<Property name="WinkelkarService">
-<Type>APPS.EC.Winkelkar.WinkelkarService</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="Applicatie">
 <Type>APPS.common.dto.Applicatie</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>OfferteService:APPS.VKP.OfferteService,WinkelkarService:APPS.EC.Winkelkar.WinkelkarService=""</FormalSpec>
+<FormalSpec>OfferteService:APPS.VKP.OfferteService="",WinkelkarService:APPS.EC.Winkelkar.WinkelkarService=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
+	Do ##super(OfferteService, WinkelkarService)
 	Set ..Applicatie = ..GeefApplicatie()
-	Set ..OfferteService = $$$Inject(OfferteService, ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefOfferteService())
 	Set ..WinkelkarService = $$$Inject(WinkelkarService, ##class(APPS.EC.Winkelkar.impl.ExterneWinkelkarService).%New())
-	Set ..OfferteHerberekening = ##class(APPS.EC.Verkoop.impl.OfferteHerberekenaar).%New()
+	Set ..OfferteHerberekening = ##class(APPS.EC.Verkoop.impl.OfferteHerberekenaar).%New(,,,..WinkelkarService)
 	Set ..GeldigheidVermeldingBepaler = ##class(APPS.EC.Verkoop.impl.GeldigheidVermeldingBepaler).%New()
 	
 	Quit $$$OK
@@ -107,20 +97,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="WisOfferte">
-<FormalSpec>OfferteID:%String</FormalSpec>
-<Implementation><![CDATA[
-	#dim Offerte As APPS.VKP.Offerte = ..OfferteService.GeefOfferte(OfferteID)
-
-	If (Offerte.IsBesteld()) {
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidUserInputException).%New("De offerte '"_OfferteID_"' is reeds besteld, en mag daarom niet gewist worden."))	
-	} Else {
-		Do ##class(DOM.EC.Winkelkar.Winkelkar).DeleteId( Offerte.WinkelkarID )
-		Do ##class(APPS.VKP.impl.Offerte).DeleteId( OfferteID )
-	}
-]]></Implementation>
-</Method>
-
 <Method name="GeefOfferteSamenvattingenVoorKlant">
 <FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>