Index: vhUnitTest/APPS/Halux/Planning/impl/BatchStarter/StartBatch/Test.cls.xml
===================================================================
diff -u -r70542 -r72803
--- vhUnitTest/APPS/Halux/Planning/impl/BatchStarter/StartBatch/Test.cls.xml	(.../Test.cls.xml)	(revision 70542)
+++ vhUnitTest/APPS/Halux/Planning/impl/BatchStarter/StartBatch/Test.cls.xml	(.../Test.cls.xml)	(revision 72803)
@@ -72,6 +72,7 @@
 	Do BatchStub.IndienMethodCall("GeefStatus").DanReturn(##class(APPS.Halux.common.enu.BatchStatus).Gecontroleerd())
 	Do BatchStub.IndienMethodCall("ZetStatus", ##class(APPS.Halux.common.enu.BatchStatus).BezigMetStarten()).DanDoeNiks()
 	Do BatchStub.IndienMethodCall("ZetStatus", ##class(APPS.Halux.common.enu.BatchStatus).Gestart()).DanDoeNiks()
+	Do BatchStub.IndienMethodCall("GeefToeleveringIterator").DanReturn(##class(TECH.ListIterator).%New(##class(%ListOfObjects).%New()))
 	
 	#dim EventRaiserSpy As vhTest.Spy.TECH.PubSub.EventRaiser = ##class(vhTest.Spy.TECH.PubSub.EventRaiser).PushedInstance()
 		
@@ -127,6 +128,7 @@
 	Do BatchStub.IndienMethodCall("ZetStatus",##class(APPS.Halux.common.enu.BatchStatus).Gestart()).DanDoeNiks()
 	Do BatchStub.IndienMethodCall("GeefID").DanReturn($$$DummyString)
 	Do BatchStub.IndienMethodCall("ZetStatus",##class(APPS.Halux.common.enu.BatchStatus).StartenGefaald()).DanDoeNiks()
+	Do BatchStub.IndienMethodCall("GeefToeleveringIterator").DanReturn(##class(TECH.ListIterator).%New(##class(%ListOfObjects).%New()))
 
 	Set SequentieServiceStub = ##class(vhUnitTest.APPS.Halux.Planning.impl.BatchStarter.StartBatch.SequentieServiceMock).%New()
 	Do SequentieServiceStub.IndienMethodCall("GenereerSequentie", BatchStub).DanException($$$DummyMajorException)
Index: APPS/Halux/common/impl/BatchService.cls.xml
===================================================================
diff -u -r57115 -r72803
--- APPS/Halux/common/impl/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 57115)
+++ APPS/Halux/common/impl/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 72803)
@@ -135,6 +135,24 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAantalBijhorendeBatchesVoorToelevering">
+<FormalSpec>ToeleveringID:%String</FormalSpec>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[
+	#dim BatchID As %String = ""
+	
+	Set QueryApi = ##class(TECH.Query.impl.QueryAPI).%New()
+
+	#dim qStatement As %String = "SELECT COUNT(ID) as Aantal FROM APPS_Halux_common_impl.BatchImpl WHERE FOR SOME %ELEMENT(Toeleveringen) (%VALUE = ?) "
+	#dim qParams As %List = $listbuild(ToeleveringID)
+	#dim ResultSet As TECH.ResultSet = QueryApi.GetResultSet(##class(TECH.DynamicQuery).%New(qStatement,qParams))
+	If ResultSet.Next() {
+		Set BatchID = ResultSet.Data("Aantal")
+	}
+	Quit BatchID
+]]></Implementation>
+</Method>
+
 <Method name="VerwijderToeleveringenUitBatches">
 <FormalSpec>TeVerwijderenToeleveringenInBatch:%ArrayOfDataTypes</FormalSpec>
 <Implementation><![CDATA[
Index: APPS/Halux/Planning/impl/BatchStarter.cls.xml
===================================================================
diff -u -r70541 -r72803
--- APPS/Halux/Planning/impl/BatchStarter.cls.xml	(.../BatchStarter.cls.xml)	(revision 70541)
+++ APPS/Halux/Planning/impl/BatchStarter.cls.xml	(.../BatchStarter.cls.xml)	(revision 72803)
@@ -38,8 +38,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="BatchService">
+<Type>APPS.Halux.common.impl.BatchService</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>BatchBewaarder:APPS.Halux.Planning.BatchBewaarder,BatchSequentieService:APPS.Halux.common.impl.SequentieService,BatchSequentieVerwijderaar:APPS.Halux.Planning.impl.BatchSequentieVerwijderaar,Logger:vhLib.Logger,DnaCodeService:APPS.Halux.AAP.DnaCodeService,MatService:APPS.Halux.PPS.MatService,DocumentGeneratorService:APPS.Halux.PPS.DocumentGeneratorService</FormalSpec>
+<FormalSpec>BatchBewaarder:APPS.Halux.Planning.BatchBewaarder,BatchSequentieService:APPS.Halux.common.impl.SequentieService,BatchSequentieVerwijderaar:APPS.Halux.Planning.impl.BatchSequentieVerwijderaar,Logger:vhLib.Logger,DnaCodeService:APPS.Halux.AAP.DnaCodeService,MatService:APPS.Halux.PPS.MatService,DocumentGeneratorService:APPS.Halux.PPS.DocumentGeneratorService,BatchService:APPS.Halux.common.impl.BatchService=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -52,6 +57,7 @@
 	Set ..DnaCodeService =  $$$Inject(DnaCodeService,##class(APPS.Halux.PPS.Activiteit.impl.TBX.KlantEtiketIoCContainer).Instance().Resolve("DnaCodeService"))
 	Set ..MatService = $$$Inject(MatService, ##class(APPS.Halux.PPS.MatService).%New())
 	Set ..DocumentGeneratorService = $$$Inject(DocumentGeneratorService, ##class(APPS.Halux.PPS.DocumentGeneratorService).%New())
+	Set ..BatchService = $$$Inject(BatchService, ##class(APPS.Halux.common.impl.BatchService).%New())
 
 	Quit $$$OK
 ]]></Implementation>
@@ -72,6 +78,7 @@
 <FormalSpec>Batch:APPS.Halux.common.Batch</FormalSpec>
 <Implementation><![CDATA[
 	Quit:$$$Not(..ControleerBatchStatus(Batch))
+	Quit:$$$Not(..ControleerToeleveringenSlechtsInEenBatch(Batch))
 
 	Try {
 		Do ..Logger.Info("StartBatch", "Starten van batch ("_Batch.GeefID()_") is begonnen.")
@@ -112,6 +119,27 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ControleerToeleveringenSlechtsInEenBatch">
+<FormalSpec>Batch:APPS.Halux.common.Batch</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim Result As %Boolean = $$$True
+	#dim ToeleveringIterator As TECH.Iterator = Batch.GeefToeleveringIterator()
+	#dim Toelevering As DOM.AKP.Toelevering
+	
+	While ToeleveringIterator.HasNext()
+	{
+		Set Toelevering = ToeleveringIterator.Next()
+		If (..BatchService.GeefAantalBijhorendeBatchesVoorToelevering(Toelevering.GeefID()) > 1) {
+			Do ..Logger.ErrorMail("StartBatch","Batch "_Batch.GeefID()_" kan niet starten want toelevering " _ Toelevering.GeefID() _ "zit in meerdere batchen, dit zorgt voor fouten. Zie query SELECT ID as BatchID FROM APPS_Halux_common_impl.BatchImpl WHERE FOR SOME %ELEMENT(Toeleveringen) (%VALUE = <PlaceholderToeleveringID>)")
+			Set Result = $$$False
+		}
+	}
+	Quit Result
+]]></Implementation>
+</Method>
+
 <Method name="GeefBatchOverzicht">
 <FormalSpec>MaatWerkBatch:APPS.Halux.Planning.dto.MaatwerkBatch</FormalSpec>
 <ReturnType>APPS.Halux.Planning.dto.BatchOverzicht</ReturnType>