Index: APPS/Halux/Planning/impl/BatchResetter.cls.xml
===================================================================
diff -u -r29059 -r31264
--- APPS/Halux/Planning/impl/BatchResetter.cls.xml	(.../BatchResetter.cls.xml)	(revision 29059)
+++ APPS/Halux/Planning/impl/BatchResetter.cls.xml	(.../BatchResetter.cls.xml)	(revision 31264)
@@ -8,25 +8,31 @@
 <Private>1</Private>
 </Property>
 
-<Property name="BatchStarter">
-<Type>APPS.Halux.Planning.BatchStarter</Type>
+<Property name="BatchSequentieVerwijderaar">
+<Type>APPS.Halux.Planning.BatchSequentieVerwijderaar</Type>
 <Private>1</Private>
 </Property>
 
-<Property name="BatchSequentieVerwijderaar">
-<Type>APPS.Halux.Planning.BatchSequentieVerwijderaar</Type>
+<Property name="BatchService">
+<Type>APPS.Halux.Planning.BatchService</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="BatchBewaarder">
+<Type>APPS.Halux.Planning.BatchBewaarder</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>BatchStarter:APPS.Halux.Planning.BatchStarter,BatchSequentieVerwijderaar:APPS.Halux.Planning.BatchSequentieVerwijderaar</FormalSpec>
+<FormalSpec>BatchService:APPS.Halux.Planning.BatchService,BatchSequentieVerwijderaar:APPS.Halux.Planning.BatchSequentieVerwijderaar,BatchBewaarder:APPS.Halux.Planning.BatchBewaarder</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..BatchStarter = $$$Implementation(BatchStarter,##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchStarter())
 	set ..BatchSequentieVerwijderaar = $$$Implementation(BatchSequentieVerwijderaar,##class(APPS.Halux.Planning.impl.BatchSequentieVerwijderaar).%New())
+	Set ..BatchService = $$$Implementation(BatchService,##class(APPS.Halux.Planning.impl.BatchService).%New())
+	set ..BatchBewaarder = $$$Implementation(BatchBewaarder,##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchBewaarder())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -36,8 +42,10 @@
 <Implementation><![CDATA[
 	do ..BatchSequentieVerwijderaar.VerwijderBatchSequentie(Batch)
 	do Batch.ZetStatus(##class(APPS.Halux.common.enu.BatchStatus).Gecontroleerd())
-	do ##class(APPS.Halux.common.event.BatchEventRaiser).RaiseBatchGeresetEvent(Batch.GeefID())
-	do ..BatchStarter.StartBatch(Batch)
+	Do ..BatchBewaarder.BewaarBatch(Batch)
+	#dim BatchID As TECH.String = Batch.GeefID()
+	do ##class(APPS.Halux.common.event.BatchEventRaiser).RaiseBatchGeresetEvent(BatchID)
+	Do ..BatchService.StartBatch(BatchID)
 ]]></Implementation>
 </Method>
 </Class>