Index: openacs-4/packages/dotlrn-ecommerce/www/sections-list-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/sections-list-postgresql.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/dotlrn-ecommerce/www/sections-list-postgresql.xql 19 Jul 2007 01:35:47 -0000 1.1
@@ -0,0 +1,29 @@
+
+
+
+ postgresql7.1
+
+
+ SELECT
+ dca.community_id,
+ dca.community_key as section_identifier,
+ dca.community_key as section_key,
+ dca.pretty_name,
+ dc.course_name,
+ des.course_id,
+ des.section_id,
+ dca.active_start_date,
+ des.date_time_start,
+ dca.active_end_date,
+ des.date_time_end
+ FROM cr_items ci,
+ dotlrn_catalog dc,
+ dotlrn_ecommerce_section des,
+ dotlrn_communities_all dca
+ WHERE ci.live_revision = dc.course_id
+ and des.course_id = ci.item_id
+ and dca.community_id = des.community_id
+ [template::list::orderby_clause -name sections_list -orderby]
+
+
+
\ No newline at end of file
Index: openacs-4/packages/dotlrn-ecommerce/www/sections-list.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/sections-list.adp,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/dotlrn-ecommerce/www/sections-list.adp 19 Jul 2007 01:35:47 -0000 1.1
@@ -0,0 +1,23 @@
+
+
+
+ Course Catalog Sections List
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
\ No newline at end of file
Index: openacs-4/packages/dotlrn-ecommerce/www/sections-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/sections-list.tcl,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/dotlrn-ecommerce/www/sections-list.tcl 19 Jul 2007 01:35:47 -0000 1.1
@@ -0,0 +1,72 @@
+ad_page_contract {
+ List of course sections in a course catalog.
+
+ @author Katie Lau (Katie.Lau # gmail.com)
+
+ @creation-date 2007-06-22
+ #@arch-tag: ebe33d91-6940-42d6-9ca9-2e4d280f0233
+ #@cvs-id $Id: sections-list.tcl,v 1.1 2007/07/19 01:35:47 daveb Exp $
+} {
+ section_identifiers:optional
+ orderby:optional
+}
+
+# require administrative permissions
+set package_id [ad_conn package_id]
+permission::require_permission -object_id $package_id -privilege "admin"
+
+template::list::create \
+ -name sections_list \
+ -multirow sections_list \
+ -key section_identifier \
+ -bulk_actions [list "Set Section Identifiers" "applications" "Set Section Identifiers"] \
+ -bulk_action_click_function "set_section_identifiers" \
+ -elements {
+ course_name {
+ label "Course Name"
+ }
+ pretty_name {
+ label "Section Name"
+ }
+ section_identifier {
+ label "Section Identifier (Key)"
+ }
+ active_start_date {
+ label "Start Date"
+ }
+ active_end_date {
+ label "End Date"
+ }
+ } \
+ -orderby {
+ course_name {
+ orderby "dc.course_name"
+ }
+ pretty_name {
+ orderby "dca.pretty_name"
+ }
+ section_identifier {
+ orderby "section_identifier"
+ }
+ active_start_date {
+ orderby "dca.active_start_date"
+ }
+ active_end_date {
+ orderby "dca.active_end_date"
+ }
+ }
+
+db_multirow \
+ -extend {
+ #edit_url
+ #delete_url
+ } sections_list sections_select {
+
+ } {
+ #set edit_url [export_vars -base "news-edit" {item_id}]
+ #set delete_url [export_vars -base "news-delete" {item_id}]
+ }
+
+
+
+