Index: DOM/Halux/AAP/DnaCodeRepository.cls.xml
===================================================================
diff -u -r71438 -r72411
--- DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 71438)
+++ DOM/Halux/AAP/DnaCodeRepository.cls.xml	(.../DnaCodeRepository.cls.xml)	(revision 72411)
@@ -15,13 +15,27 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZoekViaLpnCode">
+<FormalSpec>LpnCode:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ..ZoekViaFilter("LpnCode = ? ", $LB(LpnCode))
+]]></Implementation>
+</Method>
+
 <Method name="ZoekViaPalletCodeEnRecent">
 <FormalSpec>PalletCode:%String</FormalSpec>
 <ReturnType>TECH.Iterator</ReturnType>
 <Implementation><![CDATA[	Quit ..ZoekViaFilter("PalletCode = ? and not status = ? and (AanmaakTijdstip > current_date - 30)", $LB(PalletCode, ##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBuffer()))
 ]]></Implementation>
 </Method>
 
+<Method name="ZoekViaLpnCodeEnRecent">
+<FormalSpec>LpnCode:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ..ZoekViaFilter("LpnCode = ? and (AanmaakTijdstip > current_date - 30)", $LB(LpnCode))
+]]></Implementation>
+</Method>
+
 <Method name="ZoekVoorProboxEtiket">
 <FormalSpec>PalletCode:%String</FormalSpec>
 <ReturnType>TECH.Iterator</ReturnType>
@@ -220,6 +234,13 @@
 <Implementation><![CDATA[	Quit ..ZoekViaFilter("ParentDnaCode = ? ", $LB(ParentDnaCode))
 ]]></Implementation>
 </Method>
+
+<Method name="ZoekViaStatusEnRecent">
+<FormalSpec>Status:DOM.Halux.AAP.enu.DnaCodeStatus</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ..ZoekViaFilter("Status = ? and (AanmaakTijdstip > current_date - 2)", $LB(Status))
+]]></Implementation>
+</Method>
 </Class>