diff --git a/product/ERP5Form/Form.py b/product/ERP5Form/Form.py
index 0495066a22b50ec17efed9cf36726d9b807c377c..3f65f8f765a32cb4bd612d9592a48c8475973fe3 100644
--- a/product/ERP5Form/Form.py
+++ b/product/ERP5Form/Form.py
@@ -927,6 +927,10 @@ class ERP5Form(ZMIForm, ZopePageTemplate):
         return [group for group in self.group_list
                 if self.get_fields_in_group(group, include_disabled=1)]
 
+    # Find support in ZMI. This is useful for development.
+    def PrincipiaSearchSource(self):
+      return str((self.pt, self.name, self.action, self.update_action,
+                  self.encoding, self.stored_encoding, self.enctype))
 
 # utility function
 def get_field_meta_type_and_proxy_flag(field):
diff --git a/product/ERP5Form/FormulatorPatch.py b/product/ERP5Form/FormulatorPatch.py
index 00214543641097cfd2697c3cef77b2cc63013c67..c00720297a131b8096b10839751a0d9b2438f47f 100644
--- a/product/ERP5Form/FormulatorPatch.py
+++ b/product/ERP5Form/FormulatorPatch.py
@@ -1464,3 +1464,10 @@ def Field_render_dict(self, value=None, REQUEST=None, key=None, **kw):
   """
   return self.widget.render_dict(self, value)
 Field.render_dict = Field_render_dict
+
+
+# Find support in ZMI. This is useful for development.
+def Field_PrincipiaSearchSource(self):
+  return str((self.values.values(), self.tales.values(),
+              self.overrides.values()))
+Field.PrincipiaSearchSource = Field_PrincipiaSearchSource