Index: APPS/VKP/impl/OfferteService.cls.xml
===================================================================
diff -u -r33748 -r33765
--- APPS/VKP/impl/OfferteService.cls.xml	(.../OfferteService.cls.xml)	(revision 33748)
+++ APPS/VKP/impl/OfferteService.cls.xml	(.../OfferteService.cls.xml)	(revision 33765)
@@ -8,11 +8,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="WinkelkarService">
-<Type>APPS.EC.Winkelkar.WinkelkarService</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="%OnNew">
 <FormalSpec>OfferteRepository:APPS.VKP.Offerte.OfferteRepository,WinkelkarService:APPS.EC.Winkelkar.WinkelkarService=""</FormalSpec>
 <Private>1</Private>
@@ -21,12 +16,26 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	set ..OfferteRepository = $$$Inject(OfferteRepository,##class(APPS.VKP.Offerte.impl.OfferteRepository).%New())
-	set ..WinkelkarService = $$$LazyLoad(WinkelkarService,##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New())
+	set ..WinkelkarService = WinkelkarService
 	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
+<Property name="WinkelkarService">
+<Type>APPS.EC.Winkelkar.WinkelkarService</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="WinkelkarServiceGet">
+<Private>1</Private>
+<ReturnType>APPS.EC.Winkelkar.WinkelkarService</ReturnType>
+<Implementation><![CDATA[
+	set r%WinkelkarService = $$$LazyLoad(r%WinkelkarService,##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New())
+	quit r%WinkelkarService
+]]></Implementation>
+</Method>
+
 <Method name="GeefDocument">
 <FormalSpec>OfferteID:%String</FormalSpec>
 <ReturnType>APPS.VKP.impl.Offerte</ReturnType>