Index: vhUnitTest/APPS/Halux/Planning/impl/BatchStarter/StartBatch/Test.cls.xml
===================================================================
diff -u -r57886 -r59094
--- vhUnitTest/APPS/Halux/Planning/impl/BatchStarter/StartBatch/Test.cls.xml	(.../Test.cls.xml)	(revision 57886)
+++ vhUnitTest/APPS/Halux/Planning/impl/BatchStarter/StartBatch/Test.cls.xml	(.../Test.cls.xml)	(revision 59094)
@@ -120,6 +120,8 @@
 	Set ..BatchSequentieVerwijderaar = BatchSequentieVerwijderaarStub
 	
 	Do ..DnaCodeServiceMock.IndienMethodCall("VerwijderDnaCodesVoorBatch", BatchStub).DanDoeNiks()
+	Do ..DnaCodeServiceMock.IndienMethodCall("BewaarDnaCodes",$$$ElkeWaarde).DanDoeNiks()
+	Do ..DnaCodeServiceMock.IndienMethodCall("MaakDnaCodesVoorBatch",$$$ElkeWaarde).DanDoeNiks()
 	
 	Do ..InitImplementation()
 	Do ..BatchStarterImpl.StartBatch(BatchStub)
Index: APPS/Halux/Planning/impl/BatchStarter.cls.xml
===================================================================
diff -u -r57886 -r59094
--- APPS/Halux/Planning/impl/BatchStarter.cls.xml	(.../BatchStarter.cls.xml)	(revision 57886)
+++ APPS/Halux/Planning/impl/BatchStarter.cls.xml	(.../BatchStarter.cls.xml)	(revision 59094)
@@ -64,8 +64,8 @@
 		Do ..Logger.Info("StartBatch", "Starten van batch ("_Batch.GeefID()_") is begonnen.")
 		Do Batch.ZetStatus(##class(APPS.Halux.common.enu.BatchStatus).BezigMetStarten())
 		Do ..BatchBewaarder.BewaarBatch(Batch)
-		Do ..BatchSequentieService.GenereerSequentie(Batch)
 		Do ..DnaCodeService.BewaarDnaCodes(..DnaCodeService.MaakDnaCodesVoorBatch(Batch))
+		Do ..BatchSequentieService.GenereerSequentie(Batch)
 		Do Batch.ZetStatus(##class(APPS.Halux.common.enu.BatchStatus).Gestart())
 		Do ..BatchBewaarder.BewaarBatch(Batch)
 		Do ##class(APPS.Halux.common.event.BatchEventRaiser).RaiseBatchGeslotenEvent(Batch.GeefID())