Index: APPS/Halux/Planning/impl/BatchService.cls.xml
===================================================================
diff -u -r57004 -r57024
--- APPS/Halux/Planning/impl/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 57004)
+++ APPS/Halux/Planning/impl/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 57024)
@@ -14,6 +14,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ToeleveringAPI">
+<Type>DOM.AKP.ToeleveringAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>ProductieService:APPS.Halux.common.ProductieService=""</FormalSpec>
 <Private>1</Private>
@@ -23,6 +28,7 @@
 <Implementation><![CDATA[
 	set ..BatchService = ##class(APPS.Halux.common.impl.BatchService).%New()
 	set ..ProductieService = $$$Implementation(ProductieService, ##class(APPS.Halux.common.ProductieService).%New())
+	set ..ToeleveringAPI = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI()
 	
 	quit $$$OK
 ]]></Implementation>
@@ -141,14 +147,13 @@
 	#dim Batch As APPS.Halux.common.Batch = ..BatchService.GeefBatch(BatchID)
 	#dim MaatwerkBatch As APPS.Halux.Planning.dto.MaatwerkBatch = ..GeefMaatwerkBatch(Batch)
 	#dim GewijzigdeBatches As %ArrayOfObjects = ##class(%ArrayOfObjects).%New()
-	#dim ToeleveringAPI As DOM.AKP.ToeleveringAPI = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI()
 	#dim ToeleveringIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Toeleveringen)
 	#dim VerplaatsResultaat As APPS.Halux.Planning.dto.VerplaatsResultaat = ##class(APPS.Halux.Planning.dto.VerplaatsResultaat).%New()
 	
 	set VerplaatsResultaat.BatchOverzicht = ##class(APPS.Halux.Planning.dto.BatchOverzicht).%New()
 	
 	while (ToeleveringIterator.HasNext()) {
-		#dim Toelevering As DOM.AKP.Toelevering = ToeleveringAPI.GeefToelevering(ToeleveringIterator.Next())
+		#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringAPI.GeefToelevering(ToeleveringIterator.Next())
 		#dim VerplaatsProblemen As list of %String = ..ControleerToeleveringVoorVerplaatsing(Toelevering, MaatwerkBatch)
 		
 		do ##class(TECH.ListUtils).CopyListOfDataTypes(VerplaatsProblemen, VerplaatsResultaat.VerplaatsRapport)
@@ -322,7 +327,7 @@
 <Implementation><![CDATA[
 	#dim Resultaat As APPS.Halux.Planning.dto.ZoekToeleveringResultaat = ##class(APPS.Halux.Planning.dto.ZoekToeleveringResultaat).%New()
 
-	If $$$Not(##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().BestaatToelevering(ToeleveringID)) {
+	If $$$Not(..ToeleveringAPI.BestaatToelevering(ToeleveringID)) {
 		#dim BatchToFix As APPS.Halux.common.Batch = ..BatchService.GeefBijhorendeBatchViaID(ToeleveringID)
 		If $IsObject(BatchToFix) {
 			Do BatchToFix.WisOnbestaandeToeleveringen()
@@ -331,7 +336,7 @@
 	}
 	
 	try {
-		#dim Toelevering As DOM.AKP.Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(ToeleveringID)
+		#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringAPI.GeefToelevering(ToeleveringID)
 	} catch {
 		do ##class(TECH.ExceptionHandler).CatchAndRethrowAsInvalidUserInputException("TECH.Exceptions.InvalidInputException")
 	}
@@ -399,7 +404,7 @@
 <Private>1</Private>
 <ReturnType>%Date</ReturnType>
 <Implementation><![CDATA[
-	#dim Toelevering As DOM.AKP.Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(ToeleveringID)
+	#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringAPI.GeefToelevering(ToeleveringID)
 	#dim GeplandOpDatum As %Date = ##class(TECH.DateTime).HorologToDate(Toelevering.GeefDueOutTime())
 	
 	if (##class(APPS.Halux.Planning.impl.ToeleveringInfo).%ExistsId(ToeleveringID)) {