Index: vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml
===================================================================
diff -u -r57102 -r57870
--- vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 57102)
+++ vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 57870)
@@ -54,6 +54,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwijderDnaCodesVoorBatchId">
+<FormalSpec>BatchId:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwijderDnaCodesVoorBatchId",BatchId)
+]]></Implementation>
+</Method>
+
 <Method name="VerwijderNieuweCodesVoorToeleveringId">
 <FormalSpec>ToeleveringId:%String</FormalSpec>
 <ReturnType>TECH.Iterator</ReturnType>
Index: vhTest/Mock/APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r57868 -r57870
--- vhTest/Mock/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 57868)
+++ vhTest/Mock/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 57870)
@@ -42,6 +42,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwijderDnaCodesVoorBatch">
+<FormalSpec>Batch:APPS.Halux.common.impl.BatchImpl</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwijderDnaCodesVoorBatch",Batch)
+]]></Implementation>
+</Method>
+
 <Method name="VerwijderDnaCodesVoorToeleveringLijn">
 <FormalSpec>ToeleveringId:%String,ToeleveringLijnCode:%String</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("VerwijderDnaCodesVoorToeleveringLijn",ToeleveringId,ToeleveringLijnCode)
Index: APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r57868 -r57870
--- APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 57868)
+++ APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 57870)
@@ -59,6 +59,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwijderDnaCodesVoorBatch">
+<FormalSpec>Batch:APPS.Halux.common.impl.BatchImpl</FormalSpec>
+<Implementation><![CDATA[	Do ..DnaCodeRepository.VerwijderDnaCodesVoorBatchId(Batch.GeefId)
+]]></Implementation>
+</Method>
+
 <Method name="MaakDnaCodesVoorToeleveringLijn">
 <FormalSpec>ToeleveringLijn:DOM.AKP.ProductToeleveringLijn,BatchId:%String=""</FormalSpec>
 <ReturnType>%ListOfDataTypes</ReturnType>
Index: vhTest/Fake/APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r57868 -r57870
--- vhTest/Fake/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 57868)
+++ vhTest/Fake/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 57870)
@@ -26,6 +26,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwijderDnaCodesVoorBatch">
+<FormalSpec>Batch:APPS.Halux.common.impl.BatchImpl</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
 <Method name="MaakDnaCodesVoorToeleveringLijn">
 <FormalSpec>ToeleveringLijn:DOM.AKP.ProductToeleveringLijn</FormalSpec>
 <ReturnType>%ListOfDataTypes</ReturnType>
Index: vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml
===================================================================
diff -u -r57102 -r57870
--- vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 57102)
+++ vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 57870)
@@ -19,6 +19,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwijderDnaCodesVoorBatchId">
+<FormalSpec>BatchId:%String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
 <Method name="VerwijderNieuweCodesVoorToeleveringLijnCode">
 <FormalSpec>ToeleveringId:%String,ToeleveringLijnCode:%String</FormalSpec>
 <ReturnType>TECH.Iterator</ReturnType>
Index: DOM/Halux/AAP/DnaCodeRepository.cls.xml
===================================================================
diff -u -r57105 -r57870
--- DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 57105)
+++ DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 57870)
@@ -55,6 +55,12 @@
 <Implementation><![CDATA[	Do ..VerwijderViaFilter("Toelevering = ? and DnaCode = ?", $LB(ToeleveringId, DnaCode))
 ]]></Implementation>
 </Method>
+
+<Method name="VerwijderDnaCodesVoorBatchId">
+<FormalSpec>BatchId:%String</FormalSpec>
+<Implementation><![CDATA[	Do ..VerwijderViaFilter("BatchId = ? and Status = ?",$LB(BatchId, ##class(DOM.Halux.AAP.enu.DnaCodeStatus).Nieuw()))
+]]></Implementation>
+</Method>
 </Class>