Index: BL/MB/UGLYPicking/Receptie.cls.xml =================================================================== diff -u -r74608 -r75043 --- BL/MB/UGLYPicking/Receptie.cls.xml (.../Receptie.cls.xml) (revision 74608) +++ BL/MB/UGLYPicking/Receptie.cls.xml (.../Receptie.cls.xml) (revision 75043) @@ -2072,6 +2072,7 @@ Set DnaCodeIterator = ##class(DOM.Halux.AAP.DnaCodeRepository).%New().ZoekViaPalletCodeEnRecent(PalletId) } ElseIf $$$HasLength(DnaCodeIterator) { Set DnaCodeIterator = DnaCodeIterator + Do DnaCodeIterator.Reset() } Else { Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("ToeleveringId, PalletId en lijst van dnacodes zijn leeg.")) } Index: WSimpl/Halux/AAP/DnaCodeService/BufferHelper.cls.xml =================================================================== diff -u -r74608 -r75043 --- WSimpl/Halux/AAP/DnaCodeService/BufferHelper.cls.xml (.../BufferHelper.cls.xml) (revision 74608) +++ WSimpl/Halux/AAP/DnaCodeService/BufferHelper.cls.xml (.../BufferHelper.cls.xml) (revision 75043) @@ -41,7 +41,7 @@ } } } - Do DnaCodeIterator.Reset() + If $isObject(DnaCode) { If Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBuffer() { #dim RGID = ..BepaalRGIDviaDnaCode(DnaCode)