Index: PlanScan/Main.pas
===================================================================
diff -u -r273 -r274
--- PlanScan/Main.pas	(.../Main.pas)	(revision 273)
+++ PlanScan/Main.pas	(.../Main.pas)	(revision 274)
@@ -171,13 +171,13 @@
     else
       ScanTijdstipAsString := DateTimeToStr(DnaCodes[ii].ScanTijdstip.AsDateTime);
 
-    cdsDnaCodes.InsertRecord([ DnaCodes[ii].DnaCode,
-                                  DnaCodes[ii].PalletCode,
-                                  DnaCodes[ii].Toelevering,
-                                  GetEnumName(typeInfo(DnaCodeStatus),Ord(DnaCodes[ii].Status)),
-                                  DnaCodes[ii].BatchId,
-                                  ScanTijdstipAsString,
-                                  DnaCodes[ii].InitialenScanner]);
+    cdsDnaCodes.InsertRecord([DnaCodes[ii].DnaCode,
+                              DnaCodes[ii].PalletCode,
+                              DnaCodes[ii].Toelevering,
+                              GetEnumName(typeInfo(DnaCodeStatus),Ord(DnaCodes[ii].Status)),
+                              DnaCodes[ii].BatchId,
+                              ScanTijdstipAsString,
+                              DnaCodes[ii].InitialenScanner]);
     ii := ii + 1;
   end;
 end;