Index: PlanScan/UI/frameDnaCodes.dfm
===================================================================
diff -u -r481 -r544
--- PlanScan/UI/frameDnaCodes.dfm	(.../frameDnaCodes.dfm)	(revision 481)
+++ PlanScan/UI/frameDnaCodes.dfm	(.../frameDnaCodes.dfm)	(revision 544)
@@ -66,6 +66,12 @@
         FieldName = 'cdsDnaCodesLadecode'
         Title.Caption = 'Ladecode'
         Visible = True
+      end
+      item
+        Expanded = False
+        FieldName = 'cdsDnaCodesParentDnaCode'
+        Title.Caption = 'ParentCode'
+        Visible = True
       end>
   end
   object pnlActies: TPanel