Index: DOM/Halux/AAP/DnaCodeRepository.cls.xml
===================================================================
diff -u -r57870 -r59272
--- DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 57870)
+++ DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 59272)
@@ -22,6 +22,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZoekViaToeleveringIdEnStatus">
+<FormalSpec>ToeleveringId:%String,Status:DOM.Halux.AAP.enu.DnaCodeStatus</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ..ZoekViaFilter("Toelevering = ? and Status = ?", $LB(ToeleveringId, Status))
+]]></Implementation>
+</Method>
+
 <Method name="ZoekViaToeleveringEnToeleveringLijnId">
 <FormalSpec>ToeleveringId:%String,ToeleveringLijnId:%String</FormalSpec>
 <ReturnType>TECH.Iterator</ReturnType>
Index: vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml
===================================================================
diff -u -r57870 -r59272
--- vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 57870)
+++ vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 59272)
@@ -46,6 +46,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZoekViaToeleveringIdEnStatus">
+<FormalSpec>ToeleveringId:%String,Status:DOM.Halux.AAP.enu.DnaCodeStatus</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="Dupliceer">
 <FormalSpec>Data:TECH.Persistent,Deep:%Boolean=0</FormalSpec>
 <ReturnType>TECH.Persistent</ReturnType>
Index: vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml
===================================================================
diff -u -r57870 -r59272
--- vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 57870)
+++ vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 59272)
@@ -119,6 +119,13 @@
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("ZoekViaToeleveringId",ToeleveringId)
 ]]></Implementation>
 </Method>
+
+<Method name="ZoekViaToeleveringIdEnStatus">
+<FormalSpec>ToeleveringId:%String,Status:DOM.Halux.AAP.enu.DnaCodeStatus</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZoekViaToeleveringIdEnStatus",ToeleveringId,Status)
+]]></Implementation>
+</Method>
 </Class>