Index: openacs-4/packages/assessment/tcl/assessment-qti-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/Attic/assessment-qti-procs-postgresql.xql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/assessment/tcl/assessment-qti-procs-postgresql.xql 31 May 2004 09:22:03 -0000 1.1 +++ openacs-4/packages/assessment/tcl/assessment-qti-procs-postgresql.xql 31 May 2004 14:48:00 -0000 1.2 @@ -3,6 +3,39 @@ postgresql7.1 + + + SELECT MAX(assessment_id) FROM as_assessments + + + + + + INSERT INTO as_assessments (assessment_id, name, definition) + VALUES (:as_assessments__assessment_id, :as_assessments__name, :as_assessments__definition) + + + + + + SELECT MAX(section_id) FROM as_sections + + + + + + INSERT INTO as_sections (section_id, name, definition) + VALUES (:as_sections__section_id, :as_sections__name, :as_sections__definition) + + + + + + INSERT INTO as_assessment_section_map (assessment_id, section_id) + VALUES (:as_assessments__assessment_id, :as_sections__section_id) + + + INSERT INTO as_items (item_id, item_display_type_id, name, item_text) @@ -24,4 +57,11 @@ + + + INSERT INTO as_item_section_map (item_id, section_id) + VALUES (:item_id, :section_id) + + + \ No newline at end of file