Index: PlanScan/Main.dfm
===================================================================
diff -u -r264 -r265
--- PlanScan/Main.dfm	(.../Main.dfm)	(revision 264)
+++ PlanScan/Main.dfm	(.../Main.dfm)	(revision 265)
@@ -106,7 +106,45 @@
   end
   object cdsDnaCodes: TClientDataSet
     Aggregates = <>
+    FieldDefs = <
+      item
+        Name = 'cdsDnaCodesDnaCode'
+        DataType = ftString
+        Size = 10
+      end
+      item
+        Name = 'cdsDnaCodesPallet'
+        DataType = ftString
+        Size = 10
+      end
+      item
+        Name = 'cdsDnaCodesToelevering'
+        DataType = ftString
+        Size = 10
+      end
+      item
+        Name = 'cdsDnaCodesStatus'
+        DataType = ftString
+        Size = 10
+      end
+      item
+        Name = 'cdsDnaCodesBatch'
+        DataType = ftString
+        Size = 6
+      end
+      item
+        Name = 'cdsDnaCodesScantijdstip'
+        DataType = ftString
+        Size = 20
+      end
+      item
+        Name = 'cdsDnaCodesInitialen'
+        DataType = ftString
+        Size = 3
+      end>
+    IndexDefs = <>
     Params = <>
+    StoreDefs = True
     Left = 64
     Top = 184
   end