Index: openacs-4/packages/dotlrn/www/admin/term.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/term.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/dotlrn/www/admin/term.xql	7 Mar 2002 20:24:41 -0000	1.3
+++ openacs-4/packages/dotlrn/www/admin/term.xql	7 Mar 2002 20:58:40 -0000	1.4
@@ -1,10 +1,23 @@
 <?xml version="1.0"?>
 
 <queryset>
+
+    <fullquery name="select_term_info">
+        <querytext>
+            select term_name,
+                   term_year,
+                   to_char(start_date, 'Mon DD YYYY') as start_date,
+                   to_char(end_date, 'Mon DD YYYY') as end_date
+            from dotlrn_terms
+            where term_id = :term_id
+        </querytext>
+    </fullquery>
+
     <fullquery name="select_classes">
         <querytext>
             select dotlrn_class_instances_full.*
             from dotlrn_class_instances_full
+            where dotlrn_class_instances_full.term_id = :term_id
             order by dotlrn_class_instances_full.department_name,
                      dotlrn_class_instances_full.department_key,
                      dotlrn_class_instances_full.class_name,
@@ -18,6 +31,34 @@
         <querytext>
             select dotlrn_class_instances_full.*
             from dotlrn_class_instances_full
+            where dotlrn_class_instances_full.term_id = :term_id
+            and dotlrn_class_instances_full.department_key = :department_key
+            order by dotlrn_class_instances_full.department_name,
+                     dotlrn_class_instances_full.department_key,
+                     dotlrn_class_instances_full.class_name,
+                     dotlrn_class_instances_full.class_key,
+                     dotlrn_class_instances_full.pretty_name,
+                     dotlrn_class_instances_full.community_key
+        </querytext>
+    </fullquery>
+
+    <fullquery name="select_all_classes">
+        <querytext>
+            select dotlrn_class_instances_full.*
+            from dotlrn_class_instances_full
+            order by dotlrn_class_instances_full.department_name,
+                     dotlrn_class_instances_full.department_key,
+                     dotlrn_class_instances_full.class_name,
+                     dotlrn_class_instances_full.class_key,
+                     dotlrn_class_instances_full.pretty_name,
+                     dotlrn_class_instances_full.community_key
+        </querytext>
+    </fullquery>
+
+    <fullquery name="select_all_classes_by_department">
+        <querytext>
+            select dotlrn_class_instances_full.*
+            from dotlrn_class_instances_full
             where dotlrn_class_instances_full.department_key = :department_key
             order by dotlrn_class_instances_full.department_name,
                      dotlrn_class_instances_full.department_key,
@@ -27,4 +68,5 @@
                      dotlrn_class_instances_full.community_key
         </querytext>
     </fullquery>
+
 </queryset>