Index: APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r61364 -r61365
--- APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 61364)
+++ APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 61365)
@@ -249,7 +249,7 @@
 <Implementation><![CDATA[
 	Try {
 		Do ..Logger.Info("APPS.Halux.AAP.DnaCodeService", "VulInSequentieId voor "_SequentieId_ "/" _BatchId_" / "_ToeleveringId_" / "_ToeleveringlijnId_".")
-		If ..SequentieService.HeeftSequentie(BatchId) {
+		If ((..SequentieService.HeeftSequentie(BatchId)) || (..SequentieService.HeeftProductieSequentie(BatchId))) {
 			#dim DnaCodeIterator = ..DnaCodeRepository.ZoekVolgendeMetLeegSequentieItem(BatchId, ToeleveringId, ToeleveringlijnId)
 			If DnaCodeIterator.HasNext() {
 				#dim DnaCode As DOM.Halux.AAP.DnaCode = DnaCodeIterator.Next()