--- loncom/interface/loncommon.pm	2006/04/21 22:00:56	1.346
+++ loncom/interface/loncommon.pm	2006/04/22 01:06:48	1.347
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.346 2006/04/21 22:00:56 albertel Exp $
+# $Id: loncommon.pm,v 1.347 2006/04/22 01:06:48 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3054,6 +3054,9 @@ sub standard_css {
     my $vlink  = &designparm($function.'.vlink',$domain);
     my $link   = &designparm($function.'.link',$domain);
     my $sans   = 'Arial,Helvetica,sans-serif';
+    my $data_table_head = '#CCCCFF';
+    my $data_table_light = '#EEEEEE';
+    my $data_table_dark = '#DDD';
     return <<END;
 <style type="text/css">
 h1, h2, h3, th { font-family: $sans }
@@ -3112,6 +3115,24 @@ td.LC_menubuttons_img {
   font-family: $sans;
   font-weight: bold;
 }
+
+table.LC_data_table {
+  border: 1px solid #000000;
+  border-collapse: seperate;
+}
+table.LC_data_table tr th {
+    background-color: $data_table_head;
+}
+table.LC_data_table tr td {
+    background-color: $data_table_light;
+}
+table.LC_data_table tr.LC_even_row td {
+    background-color: $data_table_dark;
+}
+table.LC_data_table tr.LC_empty td {
+  background-color: #FFFFFF;
+}
+
 </style>
 END
 }
@@ -3456,6 +3477,29 @@ sub simple_error_page {
     }
     return $page;
 }
+
+{
+    my $row_count;
+    sub start_data_table {
+	undef($row_count);
+	return '<table class="LC_data_table">';
+    }
+
+    sub end_data_table {
+	undef($row_count);
+	return '</table>';
+    }
+
+    sub start_data_table_row {
+	$row_count++;
+	return  '<tr '.(($row_count % 2)?'':'class="LC_even_row"').'>';
+    }
+
+    sub end_data_table_row {
+	return '</tr>';
+    }
+}
+
 ###############################################
 
 =pod