Index: WSimpl/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r74608 -r75015
--- WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 74608)
+++ WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 75015)
@@ -559,7 +559,6 @@
 				Set Response.Foutboodschap = Response.Foutboodschap_ "Unknown PIN '" _PIN_"'. "
 			} Else {
 				Set DnaCode = DnaCodeIterator.Next()
-				Set DnaCode.IsDirecteLevering = ..GeefIsDirecteLevering(PalletBijwerkenRequest.ProductionOrderId)
 				Set DnaCode.PalletCode = PalletBijwerkenRequest.PalletCode
 				Do ..DnaCodeRepository.Bewaar(DnaCode)
 				Do ListOfDnaCodes.Insert(DnaCode)