Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/drill-student-2-oracle.xql'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/drill-student-2-postgresql.xql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/lorsm/www/tracking-rte/drill-student-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/tracking-rte/Attic/drill-student-2.tcl,v diff -u -r1.1.2.2 -r1.1.2.2.2.1 --- openacs-4/packages/lorsm/www/tracking-rte/drill-student-2.tcl 11 Jul 2006 20:43:13 -0000 1.1.2.2 +++ openacs-4/packages/lorsm/www/tracking-rte/drill-student-2.tcl 5 Dec 2006 10:53:19 -0000 1.1.2.2.2.1 @@ -56,21 +56,7 @@ set extra_vars fs_local_package_id -db_foreach organizations { - select - org.org_id, - org.org_title as org_title, - org.hasmetadata, - tree_level(o.tree_sortkey) as indent - from - ims_cp_organizations org, acs_objects o - where - org.org_id = o.object_id - and - man_id = :man_id - order by - org_id -} { +db_foreach organizations {} { set indent [expr $indent +1] set missing_text "[_ lorsm.Nothing_here]" @@ -85,32 +71,7 @@ append orgs_list "
" append orgs_list "" -db_foreach organization_item { - SELECT - o.object_id, - repeat(' ', (tree_level(tree_sortkey) - :indent)* 2) as indent, - i.ims_item_id, - i.item_title as item_title, - i.hasmetadata, - i.ims_item_id as identifierref, - i.type, - i.org_id, - m.fs_package_id, - m.folder_id, - m.course_name - FROM - acs_objects o, ims_cp_items i, ims_cp_manifests m - WHERE - o.object_type = 'ims_item' - AND - i.org_id = :org_id - AND - o.object_id = i.ims_item_id - AND - m.man_id = :man_id - ORDER BY - object_id, tree_sortkey -} { +db_foreach organization_item {} { if { [empty_string_p $identifierref] } { @@ -129,29 +90,7 @@ set item_table "" -db_foreach student_activity { - select * - from - lorsm_student_track lorsm, lorsm_cmi_core cmi, ims_cp_manifests manif, ims_cp_items imsitems - where - lorsm.community_id=:community_id - and - lorsm.track_id=cmi.track_id - and - lorsm.course_id=:man_id - and - manif.man_id=:man_id - and - cmi.man_id=:man_id - and - cmi.item_id=:identifierref - and - user_id=:user_id - and - imsitems.item_id=cmi.item_id - order by - cmi.track_id asc - } { +db_foreach student_activity {} { set cut_start_time [string range $start_time 0 18] set total_total_time [expr $total_time+$session_time] set edit_url [export_vars -base "drill-student-singletrack" {track_id}] Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/drill-student-2.xql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/lorsm/www/tracking-rte/drill-student-singletrack.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/tracking-rte/Attic/drill-student-singletrack.tcl,v diff -u -r1.1.2.2 -r1.1.2.2.2.1 --- openacs-4/packages/lorsm/www/tracking-rte/drill-student-singletrack.tcl 11 Jul 2006 20:43:13 -0000 1.1.2.2 +++ openacs-4/packages/lorsm/www/tracking-rte/drill-student-singletrack.tcl 5 Dec 2006 10:53:19 -0000 1.1.2.2.2.1 @@ -22,22 +22,12 @@ set man_name [lorsm::get_course_name -manifest_id $man_id] -set thistrack [ db_1row thiscmitrack " select * from lorsm_cmi_core where track_id=:track_id " ] +set thistrack [ db_1row thiscmitrack "" ] set thistrack $track_id set context [list "$classname,$man_name,$student_name,session_id: $track_id"] -set numrows [ db_0or1row istherealready " select min(lorsm.track_id) as mint from lorsm_cmi_core cmi, lorsm_student_track lorsm - where - lorsm.community_id=:community_id - and - lorsm.course_id=:man_id - and - user_id=:user_id - and - lorsm.track_id=cmi.track_id - and - lorsm.track_id>:track_id "] +set numrows [ db_0or1row istherealready ""] # seems numrows always 1 when doing an aggregate query if { $mint == "" } { set querypart "" @@ -69,28 +59,8 @@ } } -db_multirow \ - student_track single_student_track " - select * - from - lorsm_student_track lorsm, ims_cp_manifests manif - where - lorsm.community_id=$community_id - and - lorsm.course_id=$man_id - and - ( - lorsm.track_id>=$track_id - $querypart - ) - and - manif.man_id=$man_id - and - user_id=$user_id - order by - lorsm.track_id asc " \ - { +db_multirow student_track single_student_track "" { set edit_url [export_vars -base "drill-student-singletrack" {track_id}] set drill_url [export_vars -base "drill-student-singletrack" {track_id}] - } +} Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/drill-student-singletrack.xql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/lorsm/www/tracking-rte/drill-student.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/tracking-rte/Attic/drill-student.tcl,v diff -u -r1.1.2.2 -r1.1.2.2.2.1 --- openacs-4/packages/lorsm/www/tracking-rte/drill-student.tcl 11 Jul 2006 20:43:13 -0000 1.1.2.2 +++ openacs-4/packages/lorsm/www/tracking-rte/drill-student.tcl 5 Dec 2006 10:53:19 -0000 1.1.2.2.2.1 @@ -64,27 +64,7 @@ drill_url total_total_time cut_start_time - } student single_student { - select * - from - lorsm_student_track lorsm, lorsm_cmi_core cmi, ims_cp_manifests manif, ims_cp_items imsitems - where - lorsm.community_id=:community_id - and - lorsm.track_id=cmi.track_id - and - lorsm.course_id=:man_id - and - manif.man_id=:man_id - and - cmi.man_id=:man_id - and - user_id=:user_id - and - imsitems.ims_item_id=cmi.item_id - order by - cmi.track_id asc - } { + } student single_student {} { set cut_start_time [string range $start_time 0 18] set total_total_time [expr $total_time+$session_time] set edit_url [export_vars -base "drill-student-singletrack" {track_id}] Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/drill-student.xql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/lorsm/www/tracking-rte/items.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/tracking-rte/Attic/items.tcl,v diff -u -r1.1.2.2 -r1.1.2.2.2.1 --- openacs-4/packages/lorsm/www/tracking-rte/items.tcl 11 Jul 2006 20:43:13 -0000 1.1.2.2 +++ openacs-4/packages/lorsm/www/tracking-rte/items.tcl 5 Dec 2006 10:53:19 -0000 1.1.2.2.2.1 @@ -31,29 +31,6 @@ set indent [expr $indent +1] db_multirow -extend { item_id items_title identifierref } suborgs select_suborgs { - SELECT - o.object_id, - i.item_id, - i.item_title as item_title, - i.hasmetadata, - i.item_id as identifierref, - i.type, - i.org_id, - m.fs_package_id, - m.folder_id, - m.course_name - FROM - acs_objects o, ims_cp_items i, ims_cp_manifests m - WHERE - o.object_type = 'ims_item' - AND - i.org_id = :org_id - AND - o.object_id = i.item_id - AND - m.man_id = :man_id - ORDER BY - object_id, tree_sortkey } { set item_id $item_id } Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/items.xql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/lorsm/www/tracking-rte/list.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/tracking-rte/Attic/list.tcl,v diff -u -r1.1.2.2 -r1.1.2.2.2.1 --- openacs-4/packages/lorsm/www/tracking-rte/list.tcl 11 Jul 2006 20:43:13 -0000 1.1.2.2 +++ openacs-4/packages/lorsm/www/tracking-rte/list.tcl 5 Dec 2006 10:53:19 -0000 1.1.2.2.2.1 @@ -23,24 +23,7 @@ -extend { edit_url drill_url - } students which_students { - select user_id, course_name, max(score_raw) as max_attained from - ( - select * - from - lorsm_student_track lorsm, lorsm_cmi_core cmi, ims_cp_manifests manif - where - lorsm.community_id=:community_id - and - lorsm.track_id=cmi.track_id - and - lorsm.course_id=:man_id - and - manif.man_id=:man_id - ) alltracks - group by - user_id, course_name - } { + } students which_students {} { set edit_url [export_vars -base "drill-student" {user_id}] set drill_url [export_vars -base "drill-student" {user_id}] } Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/list.xql'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/orgs-oracle.xql'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/orgs-postgresql.xql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/lorsm/www/tracking-rte/orgs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/tracking-rte/Attic/orgs.tcl,v diff -u -r1.1.2.2 -r1.1.2.2.2.1 --- openacs-4/packages/lorsm/www/tracking-rte/orgs.tcl 11 Jul 2006 20:43:13 -0000 1.1.2.2 +++ openacs-4/packages/lorsm/www/tracking-rte/orgs.tcl 5 Dec 2006 10:53:19 -0000 1.1.2.2.2.1 @@ -25,51 +25,12 @@ # documentation for further details. -db_multirow orgs select_orgs { - select - org.org_id, - org.org_title as org_title, - org.hasmetadata, - tree_level(o.tree_sortkey) as indent - from - ims_cp_organizations org, acs_objects o - where - org.org_id = o.object_id - and - man_id = :man_id - order by - org_id -} { +db_multirow orgs select_orgs {} { set org_title $org_title } -db_multirow suborgs select_suborgs { - SELECT - o.object_id, - repeat(' ', (tree_level(tree_sortkey) - :indent)* 2) as indent, - i.item_id, - i.item_title as item_title, - i.hasmetadata, - i.item_id as identifierref, - i.type, - i.org_id, - m.fs_package_id, - m.folder_id, - m.course_name - FROM - acs_objects o, ims_cp_items i, ims_cp_manifests m - WHERE - o.object_type = 'ims_item' - AND - i.org_id = :org_id - AND - o.object_id = i.item_id - AND - m.man_id = :man_id - ORDER BY - object_id, tree_sortkey -} +db_multirow suborgs select_suborgs {} Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/toc-oracle.xql'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/toc-postgresql.xql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/lorsm/www/tracking-rte/toc.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/tracking-rte/Attic/toc.tcl,v diff -u -r1.1.2.2 -r1.1.2.2.2.1 --- openacs-4/packages/lorsm/www/tracking-rte/toc.tcl 11 Jul 2006 20:43:13 -0000 1.1.2.2 +++ openacs-4/packages/lorsm/www/tracking-rte/toc.tcl 5 Dec 2006 10:53:19 -0000 1.1.2.2.2.1 @@ -36,21 +36,7 @@ set extra_vars fs_local_package_id -db_foreach organizations { - select - org.org_id, - org.org_title as org_title, - org.hasmetadata, - tree_level(o.tree_sortkey) as indent - from - ims_cp_organizations org, acs_objects o - where - org.org_id = o.object_id - and - man_id = :man_id - order by - org_id -} { +db_foreach organizations {} { set indent [expr $indent +1] set missing_text "[_ lorsm.Nothing_here]" @@ -65,32 +51,7 @@ append orgs_list "
Organization: $org_title ($org_id)
" append orgs_list "" -db_foreach organization_item { - SELECT - o.object_id, - repeat(' ', (tree_level(tree_sortkey) - :indent)* 2) as indent, - i.item_id, - i.item_title as item_title, - i.hasmetadata, - i.item_id as identifierref, - i.type, - i.org_id, - m.fs_package_id, - m.folder_id, - m.course_name - FROM - acs_objects o, ims_cp_items i, ims_cp_manifests m - WHERE - o.object_type = 'ims_item' - AND - i.org_id = :org_id - AND - o.object_id = i.item_id - AND - m.man_id = :man_id - ORDER BY - object_id, tree_sortkey -} { +db_foreach organization_item {} { if { [empty_string_p $identifierref] } { @@ -107,29 +68,7 @@ set item_table "" -db_foreach student_activity { - select * - from - lorsm_student_track lorsm, lorsm_cmi_core cmi, ims_cp_manifests manif, ims_cp_items imsitems - where - lorsm.community_id=:community_id - and - lorsm.track_id=cmi.track_id - and - lorsm.course_id=:man_id - and - manif.man_id=:man_id - and - cmi.man_id=:man_id - and - cmi.item_id=:identifierref - and - user_id=:user_id - and - imsitems.ims_item_id=cmi.item_id - order by - cmi.track_id asc - } { +db_foreach student_activity {} { set cut_start_time [string range $start_time 0 18] set total_total_time [expr $total_time+$session_time] set edit_url [export_vars -base "drill-student-singletrack" {track_id}] Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/tracking-rte/toc.xql'. Fisheye: No comparison available. Pass `N' to diff?
Organization: $org_title ($org_id)