Index: openacs-4/packages/curriculum-central/tcl/uos-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum-central/tcl/uos-procs-postgresql.xql,v diff -u -N -r1.10 -r1.11 --- openacs-4/packages/curriculum-central/tcl/uos-procs-postgresql.xql 3 Jan 2006 13:26:48 -0000 1.10 +++ openacs-4/packages/curriculum-central/tcl/uos-procs-postgresql.xql 4 Jan 2006 23:32:35 -0000 1.11 @@ -39,6 +39,17 @@ + + + SELECT g.gradattr_set_id, g.latest_revision_id + FROM cc_uos u, cc_uos_revisions r, cr_items i, cc_uos_gradattr_set g + WHERE u.uos_id = :uos_id + AND i.item_id = u.uos_id + AND r.uos_revision_id = i.latest_revision + AND g.parent_uos_id = :uos_id + + + SELECT w.workload_id, wr.formal_contact_hrs, wr.informal_study_hrs, @@ -61,6 +72,13 @@ + + + SELECT gradattr_id FROM cc_uos_gradattr_map + WHERE revision_id = :latest_revision_id + + + SELECT count(*) @@ -167,6 +185,18 @@ + + + SELECT cc_uos_gradattr_set_rev__new ( + null, + :gradattr_set_id, + now(), + :user_id, + :creation_ip + ); + + + SELECT cc_uos_workload_revision__new ( @@ -194,6 +224,15 @@ + + + SELECT cc_uos_gradattr__map ( + :revision_id, + :gradattr_id + ); + + + SELECT m.name || ' (' || m.identifier || ')' AS method_name, @@ -204,6 +243,16 @@ + + + SELECT g.name || ' (' || g.identifier || ')' AS ga_name, + g.gradattr_id + FROM cc_uos_gradattr g, acs_objects o + WHERE o.object_id = g.gradattr_id + AND o.package_id = :package_id + + + SELECT latest_revision FROM cr_items WHERE item_id = :object_id @@ -230,6 +279,16 @@ + + + SELECT i.latest_revision AS latest_ga_revision + FROM cr_items i, cr_child_rels c + WHERE c.relation_tag = 'cc_uos_gradattr_set' + AND c.parent_id = :object_id + AND i.item_id = c.child_id + + + SELECT i.latest_revision AS latest_workload_revision @@ -261,6 +320,13 @@ + + + UPDATE cc_uos_gradattr_set SET live_revision_id = :latest_ga_revision + WHERE parent_uos_id = :object_id + + + UPDATE cc_uos_workload SET live_revision_id = :latest_workload_revision