Index: WSimpl/Halux/AAP/DnaCodeService.cls.xml =================================================================== diff -u -r55818 -r55819 --- WSimpl/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 55818) +++ WSimpl/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 55819) @@ -164,9 +164,11 @@ Set DnaCode.InitialenScanner = "" Set DnaCode.ScanTijdstip = "" Set DnaCode.PalletCode = "" - } else { + Set DnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).Ongedaan() + } Else { Set DnaCode.InitialenScanner = DnaCodeAfmeldenRequest.Header.Initialen Set DnaCode.PalletCode = DnaCodeAfmeldenRequest.PalletCode + Set DnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).Gescand() } Do ..DnaCodeRepository.Bewaar(DnaCode)