Index: APPS/EC/Winkelkar/impl/AuthorisatieControleur.cls.xml
===================================================================
diff -u -r41337 -r41350
--- APPS/EC/Winkelkar/impl/AuthorisatieControleur.cls.xml	(.../AuthorisatieControleur.cls.xml)	(revision 41337)
+++ APPS/EC/Winkelkar/impl/AuthorisatieControleur.cls.xml	(.../AuthorisatieControleur.cls.xml)	(revision 41350)
@@ -1,8 +1,38 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.EC.Winkelkar.impl.AuthorisatieControleur">
-<Super>%RegisteredObject,APPS.EC.Winkelkar.AuthorisatieControleur</Super>
+<Super>TECH.RegisteredObject,APPS.EC.Winkelkar.AuthorisatieControleur</Super>
 
+<Property name="GebruikerApi">
+<Type>DOM.common.GebruikerAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="VerkoopApi">
+<Type>APPS.VKP.VerkoopAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="RuntimeContext">
+<Type>TECH.Context.RuntimeContext</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>GebruikerApi:DOM.common.GebruikerAPI</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..GebruikerApi = $$$Inject(GebruikerApi,##class(DOM.DomeinContext).Instance().GeefGebruikerAPI())
+	Set ..VerkoopApi = ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI()
+	Set ..RuntimeContext = ##class(TECH.Context.RuntimeContext).Instance()
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="ControleerWerkenMetWinkelkar">
 <FormalSpec>WinkelkarID:%String</FormalSpec>
 <Implementation><![CDATA[
@@ -37,7 +67,7 @@
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Offerte '"_OfferteID_"' bestaat niet."))	
 	}
 		
-	#dim Offerte As APPS.VKP.Offerte = ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefOfferteService().GeefOfferte(OfferteID)
+	#dim Offerte As APPS.VKP.Offerte = ..VerkoopApi.GeefOfferteService().GeefOfferte(OfferteID)
 	if $Length(Offerte.GeefExterneId()){
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Offerte '"_OfferteID_"' Is Vhisie4."))	
 	}
@@ -49,7 +79,7 @@
 <FormalSpec>Gebruiker:DOM.common.Gebruiker</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	#dim IsVanHoeckeMedewerker As %Boolean = ##class(DOM.DomeinContext).Instance().GeefGebruikerAPI().IsVanHoeckeMedewerker(Gebruiker)
+	#dim IsVanHoeckeMedewerker As %Boolean = ..GebruikerApi.IsVanHoeckeMedewerker(Gebruiker)
 	Quit IsVanHoeckeMedewerker &&(Gebruiker.GeefRollen().Count()'= 0)
 ]]></Implementation>
 </Method>
@@ -58,10 +88,8 @@
 <FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,BerichtSuffix:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim RuntimeContext As TECH.Context.RuntimeContext = ##class(TECH.Context.RuntimeContext).Instance()
-	#dim GebruikerID As %String = RuntimeContext.GeefGebruikerID()
-	#dim GebruikerAPI As DOM.common.GebruikerAPI = ##class(DOM.DomeinContext).Instance().GeefGebruikerAPI()
-	#dim Gebruiker As DOM.common.Gebruiker = GebruikerAPI.GeefGebruiker(GebruikerID)
+	#dim GebruikerID As %String = ..RuntimeContext.GeefGebruikerID()
+	#dim Gebruiker As DOM.common.Gebruiker = ..GebruikerApi.GeefGebruiker(GebruikerID)
 	If '(..IsEigenaar(Gebruiker,KlantID) || ..IsVanHoeckeMedewerker(Gebruiker)) {
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("U heeft geen toegang "_BerichtSuffix_" ("_KlantID_" niet beschikbaar voor '"_GebruikerID_"')"))
 	}
Index: vhUnitTest/APPS/EC/Winkelkar/impl/AuthorisatieControleur/IsWijzigenVanBesteldeWinkelkarLijnenToegelaten/Test.cls.xml
===================================================================
diff -u -r41340 -r41350
--- vhUnitTest/APPS/EC/Winkelkar/impl/AuthorisatieControleur/IsWijzigenVanBesteldeWinkelkarLijnenToegelaten/Test.cls.xml	(.../Test.cls.xml)	(revision 41340)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/AuthorisatieControleur/IsWijzigenVanBesteldeWinkelkarLijnenToegelaten/Test.cls.xml	(.../Test.cls.xml)	(revision 41350)
@@ -3,46 +3,37 @@
 <Class name="vhUnitTest.APPS.EC.Winkelkar.impl.AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Property name="AuthorisatieControleur">
-<Type>APPS.EC.Winkelkar.impl.AuthorisatieControleur</Type>
-<Private>1</Private>
-</Property>
-
-<Method name="OnBeforeOneTest">
-<FormalSpec>aTestName:%String</FormalSpec>
-<Implementation><![CDATA[
-	Do ##Super(aTestName)
-	set ..AuthorisatieControleur = ##class(APPS.EC.Winkelkar.impl.AuthorisatieControleur).%New()
-]]></Implementation>
-</Method>
-
 <Method name="TestNietVanHoeckeGebruiker">
 <Implementation><![CDATA[
 	set DummyGebruiker =  ##class(vhTest.Utils.APPS.EC.Winkelkar.impl.AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten.DummyGebruiker).%New()
-	#dim GebruikerAPIMock As vhTest.Mock.DOM.common.GebruikerAPI = ##class(vhTest.Mock.DOM.common.GebruikerAPI).MockInstance()
+	set GebruikerAPIMock = ##class(vhTest.Mock.DOM.common.GebruikerAPI).%New()
 	do GebruikerAPIMock.IndienMethodCall("IsVanHoeckeMedewerker", DummyGebruiker).DanReturn($$$False)
-	do $$$AssertFalse( ..AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten(DummyGebruiker))
+	
+	set AuthorisatieControleur = ##class(APPS.EC.Winkelkar.impl.AuthorisatieControleur).%New(GebruikerAPIMock)
+	do $$$AssertFalse(AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten(DummyGebruiker))
 ]]></Implementation>
 </Method>
 
 <Method name="TestVanHoeckeGebruikerMetRollen">
 <Implementation><![CDATA[
 	set DummyVanHoeckeGebruiker =  ##class(vhTest.Utils.APPS.EC.Winkelkar.impl.AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten.DummyGebruiker).%New()
 	Do DummyVanHoeckeGebruiker.VoegToeRol(##class(DOM.common.Authorizatie.enu.Rol).Orderverwerker())
-	#dim GebruikerAPIMock As vhTest.Mock.DOM.common.GebruikerAPI = ##class(vhTest.Mock.DOM.common.GebruikerAPI).MockInstance()
+	set GebruikerAPIMock = ##class(vhTest.Mock.DOM.common.GebruikerAPI).%New()
 	do GebruikerAPIMock.IndienMethodCall("IsVanHoeckeMedewerker", DummyVanHoeckeGebruiker).DanReturn($$$True)
 	
-	do $$$AssertTrue( ..AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten(DummyVanHoeckeGebruiker))
+	set AuthorisatieControleur = ##class(APPS.EC.Winkelkar.impl.AuthorisatieControleur).%New(GebruikerAPIMock)
+	do $$$AssertTrue(AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten(DummyVanHoeckeGebruiker))
 ]]></Implementation>
 </Method>
 
 <Method name="TestVanHoeckeGebruikerZonderRollen">
 <Implementation><![CDATA[
 	set DummyVanHoeckeGebruiker =  ##class(vhTest.Utils.APPS.EC.Winkelkar.impl.AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten.DummyGebruiker).%New()
-	#dim GebruikerAPIMock As vhTest.Mock.DOM.common.GebruikerAPI = ##class(vhTest.Mock.DOM.common.GebruikerAPI).MockInstance()
+	set GebruikerAPIMock = ##class(vhTest.Mock.DOM.common.GebruikerAPI).%New()
 	do GebruikerAPIMock.IndienMethodCall("IsVanHoeckeMedewerker", DummyVanHoeckeGebruiker).DanReturn($$$True)
 	
-	do $$$AssertFalse( ..AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten(DummyVanHoeckeGebruiker))
+	set AuthorisatieControleur = ##class(APPS.EC.Winkelkar.impl.AuthorisatieControleur).%New(GebruikerAPIMock)
+	do $$$AssertFalse(AuthorisatieControleur.IsWijzigenVanBesteldeWinkelkarLijnenToegelaten(DummyVanHoeckeGebruiker))
 ]]></Implementation>
 </Method>
 </Class>