Index: openacs-4/packages/dynamic-types/tcl/dynamic-type-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dynamic-types/tcl/dynamic-type-procs.xql,v
diff -u -r1.1 -r1.1.2.1
--- openacs-4/packages/dynamic-types/tcl/dynamic-type-procs.xql	14 Feb 2005 14:33:28 -0000	1.1
+++ openacs-4/packages/dynamic-types/tcl/dynamic-type-procs.xql	17 Feb 2005 03:12:37 -0000	1.1.2.1
@@ -52,5 +52,19 @@
  
          </querytext>
    </fullquery>
- 
+
+  <fullquery name="dtype::get_table_name.get_table_name">
+    <querytext>
+      select table_name from acs_object_types where
+      object_type=:object_type
+    </querytext>
+  </fullquery>
+
+  <fullquery name="dtype::get_id_column.get_id_column">
+    <querytext>
+      select id_column from acs_object_types where
+      object_type=:object_type
+    </querytext>
+  </fullquery>
+  
 </queryset>