Index: APPS/EC/Winkelkar/impl/Logger.cls.xml
===================================================================
diff -u -r33667 -r45862
--- APPS/EC/Winkelkar/impl/Logger.cls.xml	(.../Logger.cls.xml)	(revision 33667)
+++ APPS/EC/Winkelkar/impl/Logger.cls.xml	(.../Logger.cls.xml)	(revision 45862)
@@ -8,6 +8,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="DataService">
+<Type>APPS.EC.impl.DataService</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
 <Private>1</Private>
@@ -16,6 +21,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..Winkelkar = Winkelkar
+	Set ..DataService = ##class(APPS.EC.impl.DataService).%New()
 	quit $$$OK
 ]]></Implementation>
 </Method>
@@ -24,8 +30,8 @@
 <FormalSpec>OorspronkelijkAantalVanLijn:%Integer,IngegevenKenmerkenStream:%Stream,GewijzigdeKenmerkenStream:%Stream,Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
 <Implementation><![CDATA[
 	#dim VolledigeOmschrijving As %Stream = ##class(%GlobalCharacterStream).%New()
-	#dim DataService As APPS.common.DataService = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefDataService(..Winkelkar.GeefPersonalityID())
-	#dim KlantData As DOM.common.dto.KlantData = DataService.GeefKlantData(..Winkelkar.GeefKlantID())
+	
+	#dim KlantData As DOM.common.dto.KlantData = ..DataService.GeefKlantData(..Winkelkar.GeefPersonalityID(),..Winkelkar.GeefKlantID())
 	#dim WinkelkarParent As APPS.EC.Winkelkar.Parent = ..GeefParent()
 	
 	Do VolledigeOmschrijving.WriteLine("Klant : "_KlantData.Naam_" ("_..Winkelkar.GeefKlantID()_")")