Index: openacs-4/packages/acs-automated-testing/tcl/aa-test-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/tcl/Attic/aa-test-procs-oracle.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs-oracle.xql	11 Nov 2001 18:03:52 -0000	1.1
+++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs-oracle.xql	11 Feb 2003 11:05:04 -0000	1.2
@@ -1,6 +1,6 @@
 <?xml version="1.0"?>
 <queryset>
-   <rdbms><type>oracle</type><version>8.1.7</version></rdbms>
+   <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
  
 <fullquery name="aa_run_testcase.delete_testcase_results_sql">
   <querytext>
Index: openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	22 Nov 2002 10:55:39 -0000	1.2
+++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	11 Feb 2003 11:05:04 -0000	1.3
@@ -699,12 +699,12 @@
     ns_log Notice "LOG: $aa_testcase_id, $test_notes"
     set test_result "log"
   }
-  db_dml test_result_insert {
-    insert into aa_test_results
-           (testcase_id, package_key, test_id, timestamp, result, notes)
-    values (:aa_testcase_id, :aa_package_key, :aa_testcase_test_id,
-            sysdate, :test_result, :test_notes)
+  # Notes in database can only hold so many characters
+  if { [string length $test_notes] > 2000 } {
+      set test_notes "[string range $test_notes 0 1996]..."
   }
+
+  db_dml test_result_insert {}
 }
 
 ad_proc aa_log_final {
Index: openacs-4/packages/acs-automated-testing/www/admin/testcase-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/admin/testcase-oracle.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-automated-testing/www/admin/testcase-oracle.xql	11 Nov 2001 18:03:52 -0000	1.1
+++ openacs-4/packages/acs-automated-testing/www/admin/testcase-oracle.xql	11 Feb 2003 11:06:07 -0000	1.2
@@ -1,7 +1,7 @@
 <?xml version="1.0"?>
 <queryset>
   
-<rdbms><type>oracle</type><version>8.1.7</version></rdbms>
+<rdbms><type>oracle</type><version>8.1.6</version></rdbms>
  
 <fullquery name="acs-automated-testing.testcase_query">
   <querytext>