Index: APPS/Halux/Planning/impl/EventCatcher.cls.xml
===================================================================
diff -u -r56419 -r56441
--- APPS/Halux/Planning/impl/EventCatcher.cls.xml	(.../EventCatcher.cls.xml)	(revision 56419)
+++ APPS/Halux/Planning/impl/EventCatcher.cls.xml	(.../EventCatcher.cls.xml)	(revision 56441)
@@ -15,6 +15,7 @@
 		#dim ProductLijn As DOM.AKP.ProductToeleveringLijn = EventData.GeefProductToeleveringLijn()
 		Set Calculator = ##class(APPS.Halux.Planning.impl.ResourceGebruikCalculator).%New(ProductLijn.GeefToelevering())
 		Do Calculator.VoegToeProductToeleveringLijn(ProductLijn)
+		
 		Set DnaCodeService = ##class(APPS.Halux.AAP.DnaCodeService).%New()
 		Do DnaCodeService.BewaarDnaCodes(DnaCodeService.MaakDnaCodesVoorToeleveringLijn(ProductLijn))
 	}
@@ -33,6 +34,10 @@
 		Do ##class(APPS.Halux.Planning.impl.ResourceGebruikCalculator).VerwijderProductToeleveringLijn(Toelevering.GeefID(),ProductLijn.GeefID())
 		Set Calculator = ##class(APPS.Halux.Planning.impl.ResourceGebruikCalculator).%New(Toelevering)
 		Do Calculator.VoegToeProductToeleveringLijn(ProductLijn)
+		
+		Set DnaCodeService = ##class(APPS.Halux.AAP.DnaCodeService).%New()
+		Do DnaCodeService.WijzigAantalDnaCodesVoorToeleveringLijn(ProductLijn)
+		
 	}
 ]]></Implementation>
 </Method>