Index: openacs-4/packages/lab-report-central/www/admin/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report-central/www/admin/index.adp,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/lab-report-central/www/admin/index.adp 24 Apr 2006 11:27:04 -0000 1.1 +++ openacs-4/packages/lab-report-central/www/admin/index.adp 24 Apr 2006 12:08:06 -0000 1.2 @@ -1,6 +1,12 @@ + + + +
+
+
\ No newline at end of file Index: openacs-4/packages/lab-report-central/www/admin/template-ae-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report-central/www/admin/Attic/template-ae-postgresql.xql,v diff -u -N --- openacs-4/packages/lab-report-central/www/admin/template-ae-postgresql.xql 24 Apr 2006 11:27:04 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,25 +0,0 @@ - - - - postgresql7.4 - - - - UPDATE lrc_template - SET name = :name, - description = :description - WHERE template_id = :template_id - - - - - - UPDATE acs_objects - SET modifying_user = :modifying_user, - modifying_ip = :modifying_ip, - package_id = :package_id - WHERE object_id = :template_id - - - - Index: openacs-4/packages/lab-report-central/www/admin/template-ae.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report-central/www/admin/Attic/template-ae.adp,v diff -u -N --- openacs-4/packages/lab-report-central/www/admin/template-ae.adp 24 Apr 2006 11:27:04 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,6 +0,0 @@ - -@page_title;noquote@ -@context;noquote@ -template.name - - Index: openacs-4/packages/lab-report-central/www/admin/template-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report-central/www/admin/Attic/template-ae.tcl,v diff -u -N --- openacs-4/packages/lab-report-central/www/admin/template-ae.tcl 24 Apr 2006 11:27:04 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,60 +0,0 @@ -ad_page_contract { - Add/Edit a report template. - - @author Nick Carroll (nick.c@rroll.net) - @creation-date 2006-04-18 - @cvs-id $Id: template-ae.tcl,v 1.1 2006/04/24 11:27:04 ncarroll Exp $ -} { - template_id:integer,optional - {return_url "templates"} -} - -auth::require_login - -if { [info exists template_id] } { - set page_title [_ lab-report-central.edit_template] -} else { - set page_title [_ lab-report-central.add_template] -} - -set context [list $page_title] -set package_id [ad_conn package_id] -set user_id [ad_conn user_id] -set peeraddr [ad_conn peeraddr] - -ad_form -name template -cancel_url $return_url -form { - {template_id:key(acs_object_id_seq)} - {return_url:text(hidden) {value $return_url}} - {name:text - {html {size 50}} - {label "[_ lab-report-central.name]" } - {help_text "[_ lab-report-central.help_enter_template_name]"} - } - {description:richtext(richtext),optional - {label "[_ lab-report-central.description]" } - {help_text "[_ lab-report-central.help_enter_template_description]"} - {html {cols 48 rows 6}} - {htmlarea_p 0} - {nospell} - } -} -select_query { - SELECT name, description - FROM lrc_template WHERE template_id = :template_id -} -new_data { - - package_instantiate_object \ - -var_list [list [list package_id $package_id] \ - [list name $name] \ - [list description $description]] \ - -form_id template lrc_template - -} -edit_data { - set modifying_user [ad_conn user_id] - set modifying_ip [ad_conn peeraddr] - - db_dml template_update {} - db_dml object_update {} -} -after_submit { - ad_returnredirect $return_url - ad_script_abort -} Index: openacs-4/packages/lab-report-central/www/admin/template-del-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report-central/www/admin/Attic/template-del-postgresql.xql,v diff -u -N --- openacs-4/packages/lab-report-central/www/admin/template-del-postgresql.xql 24 Apr 2006 11:27:04 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,12 +0,0 @@ - - - - postgresql7.4 - - - - SELECT lrc_template__del(:template_id) - - - - Index: openacs-4/packages/lab-report-central/www/admin/template-del.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report-central/www/admin/Attic/template-del.tcl,v diff -u -N --- openacs-4/packages/lab-report-central/www/admin/template-del.tcl 24 Apr 2006 11:27:04 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,23 +0,0 @@ -ad_page_contract { - Delete the specified report template. - - @param template_id The ID of the report template to delete. - @param return_url Optional url to redirect to when the delete operation - is complete. - - @author Nick Carroll (nick.c@rroll.net) - @creation-date 2005-12-04 - @cvs-id $Id: template-del.tcl,v 1.1 2006/04/24 11:27:04 ncarroll Exp $ -} { - template_id:integer - {return_url "templates"} -} - -set package_id [ad_conn package_id] - -db_transaction { - db_exec_plsql template_delete {} -} - -ad_returnredirect $return_url -ad_script_abort Index: openacs-4/packages/lab-report-central/www/admin/templates-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report-central/www/admin/Attic/templates-postgresql.xql,v diff -u -N --- openacs-4/packages/lab-report-central/www/admin/templates-postgresql.xql 24 Apr 2006 11:27:04 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,14 +0,0 @@ - - - - postgresql7.4 - - - - SELECT template_id, name, description from lrc_template - WHERE package_id = :package_id - [template::list::orderby_clause -orderby -name "templates"] - - - - Index: openacs-4/packages/lab-report-central/www/admin/templates.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report-central/www/admin/Attic/templates.adp,v diff -u -N --- openacs-4/packages/lab-report-central/www/admin/templates.adp 24 Apr 2006 11:27:04 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,5 +0,0 @@ - -@page_title;noquote@ -@context;noquote@ - - Index: openacs-4/packages/lab-report-central/www/admin/templates.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report-central/www/admin/Attic/templates.tcl,v diff -u -N --- openacs-4/packages/lab-report-central/www/admin/templates.tcl 24 Apr 2006 11:27:04 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,55 +0,0 @@ -ad_page_contract { - Page for viewing templates. - - @author Nick Carroll (nick.c@rroll.net) - @creation-date 2006-04-17 - @cvs-id $Id: templates.tcl,v 1.1 2006/04/24 11:27:04 ncarroll Exp $ -} { - {orderby "name,asc"} -} - -set page_title "[_ lab-report-central.templates]" -set context [list $page_title] -set package_id [ad_conn package_id] - -set elements { - edit { - sub_class narrow - display_template { - - } - link_url_eval {[export_vars -url -base template-ae { template_id }]} - } - name { - label "#lab-report-central.name#" - link_url_eval {[export_vars -url -base template { template_id }]} - } - description { - label "#lab-report-central.description#" - } - delete { - sub_class narrow - display_template { - - } - link_url_eval {[export_vars -url -base template-del { template_id }]} - link_html {title "#lab-report-central.remove_template#" onclick "return confirm(\'[_ lab-report-central.want_to_delete_template]\');"} - } -} - -template::list::create \ - -name templates \ - -actions [list "#lab-report-central.add_template#" [export_vars -base template-ae {}] "#lab-report-central.add_template_to_list#"] \ - -multirow templates \ - -no_data "#lab-report-central.no_templates_created#" \ - -elements $elements \ - -orderby { - name {orderby {lower(name)}} - } - -db_multirow templates get_templates {} { - set description [template::util::richtext::get_property content \ - $description] -} - -ad_return_template