Index: DOM/Halux/AAP/DnaCodeRepository.cls.xml =================================================================== diff -u -r60318 -r60344 --- DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 60318) +++ DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 60344) @@ -39,10 +39,17 @@ ToeleveringId:%String TECH.Iterator - current_date - 30)", $LB(ToeleveringId, ##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBuffer())) + current_date - 30)", $LB(ToeleveringId)) ]]> + +ToeleveringId:%String,Status:DOM.Halux.AAP.enu.DnaCodeStatus +TECH.Iterator + current_date - 30)", $LB(ToeleveringId, Status)) +]]> + + ToeleveringId:%String,Status:DOM.Halux.AAP.enu.DnaCodeStatus TECH.Iterator Index: BL/MB/UGLYPicking/Receptie.cls.xml =================================================================== diff -u -r60318 -r60344 --- BL/MB/UGLYPicking/Receptie.cls.xml (.../Receptie.cls.xml) (revision 60318) +++ BL/MB/UGLYPicking/Receptie.cls.xml (.../Receptie.cls.xml) (revision 60344) @@ -2067,7 +2067,7 @@ #dim RGID As %String = ..#TempBufferRGID Set VolgNr = ..CreateNewBuffer(RGID,Initialen) If $$$HasLength(ToeleveringId) { - Set DnaCodeIterator = ##class(DOM.Halux.AAP.DnaCodeRepository).%New().ZoekViaToeleveringIdEnRecent(ToeleveringId) + Set DnaCodeIterator = ##class(DOM.Halux.AAP.DnaCodeRepository).%New().ZoekViaToeleveringIdEnNotStatusEnRecent(ToeleveringId,##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBuffer()) } ElseIf $$$HasLength(PalletId) { Set DnaCodeIterator = ##class(DOM.Halux.AAP.DnaCodeRepository).%New().ZoekViaPalletCodeEnRecent(PalletId) } Else { Index: vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml =================================================================== diff -u -r60318 -r60344 --- vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 60318) +++ vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 60344) @@ -141,6 +141,13 @@ ]]> + +ToeleveringId:%String,Status:DOM.Halux.AAP.enu.DnaCodeStatus +TECH.Iterator + + + ToeleveringId:%String TECH.Iterator Index: vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml =================================================================== diff -u -r60318 -r60344 --- vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 60318) +++ vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 60344) @@ -81,6 +81,13 @@ ]]> + +ToeleveringId:%String,Status:DOM.Halux.AAP.enu.DnaCodeStatus +TECH.Iterator + + + ToeleveringId:%String TECH.Iterator