Index: openacs-4/packages/logger/lib/entries.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/lib/entries.tcl,v diff -u -N -r1.10.2.4 -r1.10.2.5 --- openacs-4/packages/logger/lib/entries.tcl 25 Apr 2005 11:10:16 -0000 1.10.2.4 +++ openacs-4/packages/logger/lib/entries.tcl 9 May 2005 14:49:37 -0000 1.10.2.5 @@ -130,7 +130,7 @@ append project_where " and lp.active_p = :project_status " } - set project_status_values [list [list "Open" "t"] [list "Closed" "f"]] + set project_status_values [list [list "[_ logger.Open]" "t"] [list "[_ logger.Closed]" "f"]] } else { set project_where "and lp.project_id = :project_id" @@ -153,54 +153,54 @@ label {} display_template { - Edit + alt="[_ logger.Edit]" border="0"> } } project_id { display_template {@entries.project_name@} - label "Project" + label "[_ logger.Project]" hide_p {[ad_decode [exists_and_not_null project_id] 1 1 0]} } user_id { - label "User" + label "[_ logger.User]" display_col user_name link_url_eval {[acs_community_member_url -user_id $user_id]} csv_col user_name hide_p {[ad_decode [exists_and_not_null user_id] 1 1 0]} } time_stamp { - label "Date" + label "[_ logger.Date]" display_col time_stamp_pretty - aggregate_label {[ad_decode $variable(type) "additive" "Total" "Average"]} - aggregate_group_label {[ad_decode $variable(type) "additive" "Group total" "Group Average"]} + aggregate_label {[ad_decode $variable(type) "additive" "[_ logger.Total_1]" "[_ logger.Average]"]} + aggregate_group_label {[ad_decode $variable(type) "additive" "[_ logger.Group_total]" "[_ logger.Group_Average]"]} } value { label $variable(name) link_url_eval {[export_vars -base "${my_base_url}log" { entry_id }]} - link_html { title "View this entry" } + link_html { title "[_ logger.View_this_entry]" } aggregate {[ad_decode $variable(type) "additive" sum average]} html { align right } display_eval {[lc_numeric $value]} } description { - label "Description" + label "[_ logger.Description]" display_eval {[string_truncate -len 50 -- $description]} link_url_eval {[export_vars -base "${my_base_url}log" { entry_id }]} - link_html { title "View this entry" } + link_html { title "[_ logger.View_this_entry]" } } task_name { - label "Task" + label "[_ logger.Task]" link_url_eval {[export_vars -base "${my_project_manager_url}task-one" { task_id }]} } description_long { - label "Description" + label "[_ logger.Description]" display_eval {[string_truncate -len 400 -- $description]} hide_p 1 link_url_eval {[export_vars -base "${my_base_url}log" { entry_id }]} - link_html { title "View this entry" } + link_html { title "[_ logger.View_this_entry]" } } } @@ -210,7 +210,7 @@ set filters { project_id { - label "Projects" + label "[_ logger.Projects]" values $project_values where_clause { le.project_id = :project_id @@ -219,14 +219,14 @@ has_default_p {[ad_decode [llength $project_values] 1 1 0]} } project_status { - label "Project status" + label "[_ logger.Project_status]" values $project_status_values where_clause { lp.active_p = :project_status } } variable_id { - label "Variables" + label "[_ logger.Variables]" values {[db_list_of_lists select_variables {}]} where_clause { le.variable_id = :variable_id @@ -235,85 +235,85 @@ has_default_p t } projection_id { - label "Projections" + label "[_ logger.Projections]" type multivar values $projection_values has_default_p 1 } user_id { - label "Users" + label "[_ logger.Users]" values {[db_list_of_lists select_users {}]} where_clause { submitter.person_id = :user_id } } time_stamp { - label "Date" + label "[_ logger.Date]" where_clause { le.time_stamp >= to_date(:start_date,'YYYY-MM-DD') and le.time_stamp <= to_date(:end_date,'YYYY-MM-DD') } - other_label "Custom" + other_label "[_ logger.Custom]" type multival has_default_p 1 values { { - "Today" { + "[_ logger.Today]" { [clock format [clock seconds] -format "%Y-%m-%d"] [clock format [clock seconds] -format "%Y-%m-%d"] } } { - "Yesterday" { + "[_ logger.Yesterday]" { [clock format [clock scan "-1 days"] -format "%Y-%m-%d"] [clock format [clock scan "-1 days"] -format "%Y-%m-%d"] } } { - "This week" { + "[_ logger.This_week]" { [clock format [clock scan "-$weekdayno days"] -format "%Y-%m-%d"] [clock format [clock scan "[expr 6-$weekdayno] days"] -format "%Y-%m-%d"] } } { - "Last week" { + "[_ logger.Last_week]" { [clock format [clock scan "[expr -7-$weekdayno] days"] -format "%Y-%m-%d"] [clock format [clock scan "[expr -1-$weekdayno] days"] -format "%Y-%m-%d"] } } { - "Past 7 days" { + "[_ logger.Past_7_days]" { [clock format [clock scan "-1 week 1 day"] -format "%Y-%m-%d"] [clock format [clock seconds] -format "%Y-%m-%d"] } } { - "This month" { + "[_ logger.This_month]" { [clock format [clock scan "[expr 1-$monthdayno] days"] -format "%Y-%m-%d"] [clock format [clock scan "1 month -1 day" -base [clock scan "[expr 1-$monthdayno] days"]] -format "%Y-%m-%d"] } } { - "Last month" { + "[_ logger.Last_month]" { [clock format [clock scan "-1 month [expr 1-$monthdayno] days"] -format "%Y-%m-%d"] [clock format [clock scan "1 month -1 day" -base [clock scan "-1 month [expr 1-$monthdayno] days"]] -format "%Y-%m-%d"] } } { - "Past 30 days" { + "[_ logger.Past_30_days]" { [clock format [clock scan "-1 month 1 day"] -format "%Y-%m-%d"] [clock format [clock seconds] -format "%Y-%m-%d"] } } { - "Always" { + "[_ logger.Always]" { [clock format 0 -format "%Y-%m-%d"] [clock format [clock scan "+10 year"] -format "%Y-%m-%d"] } } } } pm_task_id { - label "Tasks" + label "[_ logger.Tasks]" where_clause { task.item_id = :pm_task_id } @@ -322,18 +322,18 @@ set orderbys { time_stamp { - label "Date" + label "[_ logger.Date]" orderby_desc "le.time_stamp desc, ao.creation_date desc" orderby_asc "le.time_stamp asc, ao.creation_date asc" default_direction desc } project_id { - label "Project" + label "[_ logger.Project]" orderby_asc "project_name asc, le.time_stamp desc, ao.creation_date desc" orderby_desc "project_name desc, le.time_stamp desc, ao.creation_date desc" } user_id { - label "User" + label "[_ logger.User]" orderby_asc "user_name asc, le.time_stamp desc, ao.creation_date desc" orderby_desc "user_name desc, le.time_stamp desc, ao.creation_date desc" } @@ -343,7 +343,7 @@ orderby_desc "value desc, le.time_stamp desc, ao.creation_date desc" } description { - label "Description" + label "[_ logger.Description]" orderby_asc "description asc, le.time_stamp desc, ao.creation_date desc" orderby_desc "description desc, le.time_stamp desc, ao.creation_date desc" } @@ -357,10 +357,10 @@ set groupby_values { - { "Day" { { groupby time_stamp } { orderby time_stamp,desc } } } - { "Week" { { groupby time_stamp_week } { orderby time_stamp,desc } } } - { "Project" { { groupby project_name } { orderby project_id,asc } } } - { "User" { { groupby user_id } { orderby user_id,asc } } } + { "#logger.Day#" { { groupby time_stamp } { orderby time_stamp,desc } } } + { "#logger.Week#" { { groupby time_stamp_week } { orderby time_stamp,desc } } } + { "#logger.Project#" { { groupby project_name } { orderby project_id,asc } } } + { "#logger.User#" { { groupby user_id } { orderby user_id,asc } } } } set normal_row { @@ -449,17 +449,17 @@ set add_link "${base_url}project-select" } -set actions_list [list "Add Entry" $add_link "Add new log entry"] +set actions_list [list "[_ logger.Add_Entry]" $add_link "[_ logger.Add_new_log_entry]"] set delete_link "${base_url}log-delete" -set bulk_actions_list [list "Delete" $delete_link "Delete checked entries"] +set bulk_actions_list [list "[_ logger.Delete]" $delete_link "[_ logger.lt_Delete_checked_entrie]"] list::create \ -name entries \ -multirow entries \ -key entry_id \ - -row_pretty_plural "entries" \ + -row_pretty_plural "[_ logger.entries]" \ -checkbox_name checkbox \ -selected_format $format \ -class "list" \ @@ -474,17 +474,17 @@ } \ -elements $elements -filters $filters \ -groupby { - label "Group by" + label "[_ logger.Group_by]" type multivar values $groupby_values } -orderby $orderbys -formats { normal { - label "Table" + label "[_ logger.Table]" layout table row $normal_row } detailed { - label "Detailed table" + label "[_ logger.Detailed_table]" layout table row { checkbox { @@ -504,7 +504,7 @@ } } list { - label "List" + label "[_ logger.List]" layout list template { @@ -519,17 +519,16 @@
- Project:
+ [_ logger.Project]:
- By - on + [_ logger.lt_span_classlist-labelB]
} } csv { - label "CSV" + label "[_ logger.CSV]" output csv page_size 0 } @@ -573,7 +572,7 @@ set edit_p [expr $project_write_p($project_id) || ($user_id == [ad_conn user_id])] set delete_p $edit_p if { $delete_p } { - set delete_onclick "return confirm('Are you sure you want to delete log entry with $value $variable(unit) $variable(name) on $time_stamp?');" + set delete_onclick "return confirm('[_ logger.lt_Are_you_sure_you_want_5]');" set delete_url [export_vars -base "${base_url}log-delete" { entry_id }] } else { set delete_url {} Index: openacs-4/packages/logger/lib/nav-bar.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/lib/nav-bar.tcl,v diff -u -N -r1.1.2.3 -r1.1.2.4 --- openacs-4/packages/logger/lib/nav-bar.tcl 29 Apr 2005 15:14:44 -0000 1.1.2.3 +++ openacs-4/packages/logger/lib/nav-bar.tcl 9 May 2005 14:49:37 -0000 1.1.2.4 @@ -16,47 +16,47 @@ set index_urls [list "${package_url}" "${package_url}."] lappend link_list $index_urls lappend link_list {} -lappend link_list "List" +lappend link_list "[_ logger.List]" # My log entry page if { [ad_conn user_id] != 0 } { lappend link_list $index_urls lappend link_list [list [list user_id $user_id]] - lappend link_list "My Entries" + lappend link_list "[_ logger.My_Entries]" lappend link_list [list "${package_url}project-select"] lappend link_list {} - lappend link_list "Add Entry" + lappend link_list "[_ logger.Add_Entry]" if {![empty_string_p $project_manager_url]} { if {[empty_string_p $project_id]} { lappend link_list [list "${project_manager_url}"] lappend link_list {} - lappend link_list "Projects" + lappend link_list "[_ logger.Projects]" lappend link_list [list "${project_manager_url}processes"] lappend link_list {} - lappend link_list "Processes" + lappend link_list "[_ logger.Processes]" lappend link_list [list "${project_manager_url}tasks"] lappend link_list {} - lappend link_list "Tasks" + lappend link_list "[_ logger.Tasks]" } else { set project_item_id [logger::util::project_manager_project_id -project_id $project_id] lappend link_list [list [export_vars -base "${project_manager_url}one" {project_item_id}]] lappend link_list {} - lappend link_list "View Project" + lappend link_list "[_ logger.View_Project]" lappend link_list [list "${project_manager_url}processes"] lappend link_list {} - lappend link_list "Processes" + lappend link_list "[_ logger.Processes]" lappend link_list [list [export_vars -base "${project_manager_url}tasks" {project_item_id}]] lappend link_list {} - lappend link_list "Tasks" + lappend link_list "[_ logger.Tasks]" } } @@ -66,7 +66,7 @@ if { $admin_p } { lappend link_list [list "${package_url}admin/"] lappend link_list {} - lappend link_list "Admin" + lappend link_list "[_ logger.Admin]" } # Convert the list to a multirow and add the selected_p attribute Index: openacs-4/packages/logger/lib/projection.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/lib/projection.adp,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/logger/lib/projection.adp 14 Jan 2004 08:58:12 -0000 1.2 +++ openacs-4/packages/logger/lib/projection.adp 9 May 2005 14:49:37 -0000 1.2.2.1 @@ -1,12 +1,12 @@ - +
Dates#logger.Dates# @progress_time_pct@% -    @progress_days@/@total_days@ days + #logger.lt_progress_total_days#    @progress_time_pct@% @@ -32,3 +32,4 @@
+ Index: openacs-4/packages/logger/tcl/entry-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/tcl/entry-procs.tcl,v diff -u -N -r1.3.8.4 -r1.3.8.5 --- openacs-4/packages/logger/tcl/entry-procs.tcl 27 Apr 2005 07:21:19 -0000 1.3.8.4 +++ openacs-4/packages/logger/tcl/entry-procs.tcl 9 May 2005 14:49:37 -0000 1.3.8.5 @@ -85,11 +85,13 @@ :entry_id) " - logger::variable::get -variable_id [logger::project::get_primary_variable -project_id $project_id] -array variable_array + logger::project::get -project_id $project_id -array project_array + logger::variable::get -variable_id [logger::project::get_primary_variable -project_id $project_id] -array variable_array + set log_title "$project_array(name)\: [pm::task::name -task_item_id $task_item_id]: logged $value $variable_array(unit)" pm::util::general_comment_add \ -object_id $task_item_id \ - -title "Logged $value $variable_array(unit)" \ + -title $log_title \ -comment $description \ -mime_type "text/html" \ -user_id [ad_conn user_id] \ Index: openacs-4/packages/logger/tcl/project-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/tcl/project-procs.tcl,v diff -u -N -r1.9.2.1 -r1.9.2.2 --- openacs-4/packages/logger/tcl/project-procs.tcl 17 Sep 2004 21:06:04 -0000 1.9.2.1 +++ openacs-4/packages/logger/tcl/project-procs.tcl 9 May 2005 14:49:37 -0000 1.9.2.2 @@ -286,7 +286,7 @@ set users_list [db_list_of_lists select_project_leads {}] - lappend users_list { "Search..." ":search:"} + lappend users_list { "[_ logger.Search]..." ":search:"} return $users_list } Index: openacs-4/packages/logger/www/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/index.adp,v diff -u -N -r1.16.2.2 -r1.16.2.3 --- openacs-4/packages/logger/www/index.adp 25 Apr 2005 11:25:01 -0000 1.16.2.2 +++ openacs-4/packages/logger/www/index.adp 9 May 2005 14:49:37 -0000 1.16.2.3 @@ -5,11 +5,11 @@

- There are no projects in this instance of logger. + #logger.lt_There_are_no_projects#

@@ -50,3 +50,4 @@ &="show_tasks_p"> + Index: openacs-4/packages/logger/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/index.tcl,v diff -u -N -r1.22.2.2 -r1.22.2.3 --- openacs-4/packages/logger/www/index.tcl 25 Apr 2005 11:25:01 -0000 1.22.2.2 +++ openacs-4/packages/logger/www/index.tcl 9 May 2005 14:49:37 -0000 1.22.2.3 @@ -19,7 +19,7 @@ } -validate { time_stamps_valid { if { [llength $time_stamp] != 0 && [llength $time_stamp] != 2 } { - ad_complain "You must supply either two or no time_stamp values" + ad_complain "[_ logger.lt_You_must_supply_eithe]" } else { if { [catch { set time_stamp_secs [list] @@ -30,7 +30,7 @@ # We sort the time stamps here. Plain integer sort should be what we want set time_stamp_secs [lsort -integer $time_stamp_secs] }] } { - ad_complain "Time stamps not valid" + ad_complain "[_ logger.lt_Time_stamps_not_valid]" } else { set start_date [clock format [lindex $time_stamp_secs 0] -format "%Y-%m-%d"] set end_date [clock format [lindex $time_stamp_secs 1] -format "%Y-%m-%d"] Index: openacs-4/packages/logger/www/log-delete.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/log-delete.adp,v diff -u -N -r1.3 -r1.3.2.1 --- openacs-4/packages/logger/www/log-delete.adp 5 Jan 2004 20:23:50 -0000 1.3 +++ openacs-4/packages/logger/www/log-delete.adp 9 May 2005 14:49:38 -0000 1.3.2.1 @@ -3,11 +3,12 @@ @context@

- Are you sure you want to delete this log entrythese @num_entries@ log entries? + #logger.lt_Are_you_sure_you_want# #logger.this_log_entry##logger.lt_these_num_entries_log#?

- Delete + #logger.Delete#     - Cancel, do not delete + #logger.Cancel_do_not_delete#

+ Index: openacs-4/packages/logger/www/log-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/log-delete.tcl,v diff -u -N -r1.5.2.1 -r1.5.2.2 --- openacs-4/packages/logger/www/log-delete.tcl 17 Sep 2004 21:06:05 -0000 1.5.2.1 +++ openacs-4/packages/logger/www/log-delete.tcl 9 May 2005 14:49:38 -0000 1.5.2.2 @@ -31,7 +31,7 @@ logger::entry::delete -entry_id $entry_id } -ad_returnredirect -message "Entry deleted" $return_url +ad_returnredirect -message "[_ logger.Entry_deleted]" $return_url # should update project-manager if appropriate Index: openacs-4/packages/logger/www/log.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/log.adp,v diff -u -N -r1.13.2.2 -r1.13.2.3 --- openacs-4/packages/logger/www/log.adp 17 Sep 2004 21:06:05 -0000 1.13.2.2 +++ openacs-4/packages/logger/www/log.adp 9 May 2005 14:49:38 -0000 1.13.2.3 @@ -21,7 +21,7 @@ @@ -46,7 +46,7 @@ -

Recent Entries

+

#logger.Recent_Entries#

+ Index: openacs-4/packages/logger/www/log.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/log.tcl,v diff -u -N -r1.21.2.6 -r1.21.2.7 --- openacs-4/packages/logger/www/log.tcl 3 Dec 2004 20:29:11 -0000 1.21.2.6 +++ openacs-4/packages/logger/www/log.tcl 9 May 2005 14:49:38 -0000 1.21.2.7 @@ -19,7 +19,7 @@ # For the sake of simplicity of the form # we are requiring a project_id to be provided in add mode if { ![exists_and_not_null entry_id] && ![exists_and_not_null project_id] } { - ad_complain "When adding a log entry a project_id must be provided (either entry_id or project_id must be present)." + ad_complain "[_ logger.lt_When_adding_a_log_ent]" } } } @@ -71,7 +71,7 @@ set variable_id [logger::project::get_primary_variable -project_id $project_id] if { [empty_string_p $variable_id] } { - ad_return_error "Project has no variable" "An administrator needs to associate a variable, such as time or expense, to this project before any logging can be done." + ad_return_error "[_ logger.lt_Project_has_no_variab]" "[_ logger.lt_An_administrator_need]" ad_script_abort } } @@ -112,7 +112,7 @@ # versus displaying/editing one if { [exists_and_not_null entry_id] || ${__refreshing_p} } { # Initial request in display or edit mode or a submit of the form - set page_title "Edit Log Entry" + set page_title "[_ logger.Edit_Log_Entry]" if { [string equal $edit "t"] && $edit_p } { set ad_form_mode edit @@ -126,7 +126,7 @@ } else { # Initial request in add mode - set page_title "Add Log Entry" + set page_title "[_ logger.Add_Log_Entry]" set ad_form_mode edit } @@ -151,8 +151,8 @@ ad_form -extend -name log_entry_form -export { project_id variable_id return_url } -form { {project:text(inform) - {section "Project"} - {label Project} + {section "[_ logger.Project]"} + {label "[_ logger.Project]"} {value $project_array(name)} } } @@ -206,11 +206,11 @@ {html {size 7 maxlength 7}} } {description:text,optional - {label Description} + {label "[_ logger.Description]"} {html {size 50}} } {time_stamp:date(date),to_sql(ansi),from_sql(ansi) - {label Date} + {label "[_ logger.Date]"} } } @@ -237,15 +237,15 @@ } {pm_task_id:integer(select),optional {section "Task"} - {label "Subject"} + {label "[_ logger.Subject]"} {options {$task_options}} {html {onChange "document.log_entry_form.__refreshing_p.value='1';submit()"}} {value $my_task_id} {help} - {help_text "If you change this, please wait for the page to refresh"} + {help_text "[_ logger.lt_If_you_change_this_pl]"} } {status_description:text(inform) - {label "Status"} + {label "[_ logger.Status]"} } } @@ -271,27 +271,27 @@ ad_form -extend -name log_entry_form -form { {remaining_work:text(inform) - {label "Remaining work"} + {label "[_ logger.Remaining_work]"} {value $display_hours} - {after_html "hours"} + {after_html "[_ logger.hours]"} } {total_hours_work:text(inform) - {label "Total work"} + {label "[_ logger.Total_work]"} {value $total_hours_work} - {after_html "hours"} + {after_html "[_ logger.hours]"} } } ad_form -extend -name log_entry_form -form { {percent_complete:float - {label "Complete"} + {label "[_ logger.Complete]"} {value $percent_complete} {after_html "%"} {html {size 5 maxlength 5}} {help} - {help_text "Set to 100% to close the task, less to open it"} + {help_text "[_ logger.lt_Set_to_100_to_close_t]"} } } @@ -414,7 +414,7 @@ ad_set_client_property logger time_stamp $time_stamp # Present the user with an add form again for quick logging - ad_returnredirect -message "Log entry for $value $variable_array(unit) with description \"$description\" added." [export_vars -base [ad_conn url] { project_id variable_id pm_project_id pm_task_id}] + ad_returnredirect -message "[_ logger.lt_Log_entry_for_value_v]" [export_vars -base [ad_conn url] { project_id variable_id pm_project_id pm_task_id}] ad_script_abort } -edit_data { @@ -479,7 +479,7 @@ } -after_submit { - ad_returnredirect -message "Log entry modified." $return_url + ad_returnredirect -message "[_ logger.Log_entry_modified]" $return_url if {![string equal $pm_task_id -1]} { pm::project::compute_status $pm_project_id Index: openacs-4/packages/logger/www/no-projects.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/no-projects.adp,v diff -u -N -r1.2 -r1.2.8.1 --- openacs-4/packages/logger/www/no-projects.adp 8 May 2003 13:55:50 -0000 1.2 +++ openacs-4/packages/logger/www/no-projects.adp 9 May 2005 14:49:38 -0000 1.2.8.1 @@ -1,17 +1,18 @@ -Logger Application +#logger.Logger_Application#

- Before anyone can start working with the Logger application an administrator needs to setup a project. + #logger.lt_Before_anyone_can_sta#

- Since you are an administrator you may visit the admin pages to do so now. + #logger.lt_Since_you_are_an_admi#

- Please contact an administrator about this. Thank you. + #logger.lt_Please_contact_an_adm#

+ Index: openacs-4/packages/logger/www/admin/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/index.adp,v diff -u -N -r1.14 -r1.14.2.1 --- openacs-4/packages/logger/www/admin/index.adp 16 Feb 2004 15:03:01 -0000 1.14 +++ openacs-4/packages/logger/www/admin/index.adp 9 May 2005 14:49:38 -0000 1.14.2.1 @@ -11,7 +11,7 @@

- Projects not in this logger application instance which can be linked in: + <#_ Projects not in this logger application instance which can be linked in:#>

@@ -26,52 +26,52 @@

Logger Application Instance

Help

- The logger can track a number of variables in different projects. + <#_ The logger can track a number of variables in different projects#>.

- A variable is something you wish to track, for example: + <#_ A variable is something you wish to track, for example:#>

  • - Time spent (hours) + <#_ Time spent (hours)#>
  • - Expenses (currency, USD, EUR, whatever) + <#_ Expenses (currency, USD, EUR, whatever)#>
  • - Weight of goods shipped (lbs, kgs) + <#_ Weight of goods shipped (lbs, kgs)#>
  • - Your personal weight (lbs, kgs). Non-additive. + <#_ Your personal weight (lbs, kgs). Non-additive.#>

- Variables are shared between all projects, so that you can + <#_ Variables are shared between all projects, so that you can summarize the variable across projects. However, if you have many diverse projects going on, only certain variables will make sense for any given project, hence we let you map variables to - projects. + projects.#>

- Some variables will be additive, meaning that it makes + <#_ Some variables will be additive, meaning that it makes sense to add them together and look at the total. An example of an additive variable is time spent. Others are non-additive, which means the opposite. Instead, you would typically average over them. An example is measuring your personal weight, or the account balance of your bank account. It doesn't make sense to add those numbers together, they're snapshots at a given point in time, and just because you check your account balance 10 times a - day doesn't (necessarily) mean you're getting richer and richer. + day doesn't (necessarily) mean you're getting richer and richer.#>

@@ -88,23 +88,23 @@

- You can mount multiple instances of the logger + <#_ You can mount multiple instances of the logger application. The projects you define are shared between all logger application instances, subject to the permissions you grant on them. Each instance of logger will be setup to display a certain subset of the projects available, as defined by the - administrator of that instance. + administrator of that instance.#>

- An example of why this is useful is if you work for a company, + <#_ An example of why this is useful is if you work for a company, which works on many different projects for different clients. In that scenario, you would mount a logger instance in your intranet, where people log the hours they spend on projects. Then if you want to give your clients access to your logs, you can mount an instance per client in the client's extranet area. These client loggers would only have access to the projects that pertain to the - given client. + given client.#>

Index: openacs-4/packages/logger/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/index.tcl,v diff -u -N -r1.9 -r1.9.2.1 --- openacs-4/packages/logger/www/admin/index.tcl 4 Jan 2004 17:24:38 -0000 1.9 +++ openacs-4/packages/logger/www/admin/index.tcl 9 May 2005 14:49:38 -0000 1.9.2.1 @@ -24,43 +24,43 @@ template::list::create \ -name projects \ - -no_data "No projects in this instance of logger." \ + -no_data "[_ logger.lt_No_projects_in_this_i]" \ -actions { - "Create new project" project {} + "[_ logger.Create_new_project]" project {} } \ -elements { edit { link_url_col edit_url display_template { - Edit + [_ logger.Edit] } sub_class narrow html { align center } } name { - label "Project Name" + label "[_ logger.Project_Name]" link_url_col display_url } active_p { - label "Active" + label "[_ logger.Active]" display_template { - Yes (toggle)No (toggle) + Yes (toggle)No (toggle) } html { align center } } project_lead { - label "Project Lead" + label "[_ logger.Project_Lead]" display_template {@projects.project_lead_chunk;noquote@} } permissions { - label "Permissions" + label "[_ logger.Permissions]" link_url_col permissions_url display_template {Permissions} sub_class narrow html { align center } } unlink { - label "Unlink" + label "[_ logger.Unlink]" link_url_col unmap_url display_template {Unlink} sub_class narrow @@ -70,8 +70,8 @@ sub_class narrow display_template { - Delete + Delete } html { align center } @@ -104,13 +104,13 @@ -name "mappable_projects" \ -elements { name { - label "Project Name" + label "[_ logger.Project_Name]" } link { - label "Link in" + label "[_ logger.Link_in]" link_url_col map_url html { align center } - display_template "Link to instance" + display_template "[_ logger.Link_to_instance]" } } @@ -132,32 +132,32 @@ template::list::create \ -name variables \ -actions { - "Create new variable" variable {} + "[_ logger.Create_new_variable]" variable {} } \ -elements { edit { link_url_col edit_url display_template { - Edit + [_ logger.Edit] } sub_class narrow html { align center } } name { - label "Variable Name" + label "[_ logger.Variable_Name]" link_url_col edit_url } unit { - label "Unit" + label "[_ logger.Unit]" } type { - label "Additive" + label "[_ logger.Additive]" display_template { YesNo } } permissions { - label "Permissions" + label "[_ logger.Permissions]" link_url_col permissions_url display_template {Permissions} sub_class narrow @@ -167,8 +167,8 @@ sub_class narrow display_template { - Delete + Delete } html { align center } Index: openacs-4/packages/logger/www/admin/map-variable-to-project-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/map-variable-to-project-2.tcl,v diff -u -N -r1.3 -r1.3.2.1 --- openacs-4/packages/logger/www/admin/map-variable-to-project-2.tcl 27 Feb 2004 17:43:53 -0000 1.3 +++ openacs-4/packages/logger/www/admin/map-variable-to-project-2.tcl 9 May 2005 14:49:38 -0000 1.3.2.1 @@ -14,4 +14,4 @@ logger::variable::get -variable_id $variable_id -array variable logger::project::get -project_id $project_id -array project -ad_returnredirect -message "Variable \"$variable(name)\" has been added to \"$project(name)\"." [export_vars -base "project" { project_id }] +ad_returnredirect -message "[_ logger.lt_Variable_variablename]" [export_vars -base "project" { project_id }] Index: openacs-4/packages/logger/www/admin/map-variable-to-project.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/map-variable-to-project.tcl,v diff -u -N -r1.4 -r1.4.2.1 --- openacs-4/packages/logger/www/admin/map-variable-to-project.tcl 27 Feb 2004 17:43:53 -0000 1.4 +++ openacs-4/packages/logger/www/admin/map-variable-to-project.tcl 9 May 2005 14:49:38 -0000 1.4.2.1 @@ -10,34 +10,34 @@ logger::project::get -project_id $project_id -array project -set page_title "Add a variable to project \"$project(name)\"" +set page_title "[_ logger.lt_Add_a_variable_to_pro]" set context [list [list [export_vars -base project { project_id }] $project(name)] $page_title] # List all variables not already mapped to the project logger::package::variables_multirow -not_in_project_id $project_id template::list::create \ - -name "variables" \ + -name "[_ logger.variables]" \ -pass_properties { project_id } \ - -no_data "No variables not already part of this project" \ - -actions [list "Create new variable" [export_vars -base variable { project_id }] {}] \ + -no_data "[_ logger.lt_No_variables_not_alre]" \ + -actions [list "[_ logger.Create_new_variable]" [export_vars -base variable { project_id }] {}] \ -elements { name { - label "Variable Name" + label "[_ logger.Variable_Name]" } unit { - label "Unit" + label "[_ logger.Unit]" } type { - label "Additive" + label "[_ logger.Additive]" display_template { YesNo } } add { sub_class narrow - label "Add" - display_template "Add @variables.name@ to $project(name)" + label "[_ logger.Add]" + display_template "[_ logger.lt_Add_variablesname_to_]" link_url_eval {[export_vars -base map-variable-to-project-2 { project_id variable_id }]} } } Index: openacs-4/packages/logger/www/admin/project.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/project.tcl,v diff -u -N -r1.16 -r1.16.2.1 --- openacs-4/packages/logger/www/admin/project.tcl 27 Feb 2004 17:43:53 -0000 1.16 +++ openacs-4/packages/logger/www/admin/project.tcl 9 May 2005 14:49:38 -0000 1.16.2.1 @@ -27,12 +27,12 @@ if { [exists_and_not_null project_id] } { # Initial request in display or edit mode or a submit of the form - set page_title "One Project" + set page_title "[_ logger.One_Project]" set ad_form_mode display set project_exists_p [db_string project_exists_p {}] } else { # Initial request in add mode - set page_title "Add a Project" + set page_title "[_ logger.Add_a_Project]" set ad_form_mode edit set project_exists_p 0 } @@ -50,12 +50,12 @@ {name:text {html {size 50}} - {label "Name"} + {label "[_ logger.Name]"} } {description:text(textarea),optional {html {cols 60 rows 13}} - {label "Description"} + {label "[_ logger.Description]"} } {project_lead:search,optional @@ -69,7 +69,7 @@ if { ![ad_form_new_p -key project_id] } { ad_form -extend -name project_form -form { {active_p:text(radio) - {label "Active"} + {label "[_ logger.Active]"} {options {{Yes t} {No f}}} } } @@ -113,9 +113,9 @@ } -after_submit { if { [ad_form_new_p -key project_id] } { - set message "Project \"$name\" has been created." + set message "[_ logger.lt_Project_name_has_been]" } else { - set message "Project \"$name\" has been modified." + set message "[_ logger.lt_Project_name_has_been_1]" } ad_returnredirect -message $message [export_vars -base [ad_conn url] { project_id }] @@ -157,24 +157,24 @@ template::list::create \ -name variables \ - -actions [list "Add variable" [export_vars -base map-variable-to-project { project_id }] {}] \ + -actions [list "[_ logger.Add_variable]" [export_vars -base map-variable-to-project { project_id }] {}] \ -elements { name { - label "Variable Name" + label "[_ logger.Variable_Name]" link_url_col display_url } unit { - label "Unit" + label "[_ logger.Unit]" } type { - label "Additive" + label "[_ logger.Additive]" display_template { YesNo } html { align center } } primary_p { - label "Primary" + label "[_ logger.Primary]" display_template { * set @@ -190,31 +190,31 @@ template::list::create \ - -name "projections" \ - -actions [list "Create new projection" [export_vars -base projection { project_id }] {}] \ + -name "[_ logger.projections]" \ + -actions [list "[_ logger.lt_Create_new_projection]" [export_vars -base projection { project_id }] {}] \ -elements { name { - label "Projection Name" + label "[_ logger.Projection_Name]" link_url_col display_url } start_date_pretty { - label "Start" + label "[_ logger.Start]" } end_date_pretty { - label "End" + label "[_ logger.End]" } variable_name { - label "Variable" + label "[_ logger.Variable]" } value_pretty { - label "Value" + label "[_ logger.Value]" html { align right } } delete { sub_class narrow display_template { - Delete + [_ logger.Delete]
} html { align center } Index: openacs-4/packages/logger/www/admin/projection.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/projection.tcl,v diff -u -N -r1.7 -r1.7.2.1 --- openacs-4/packages/logger/www/admin/projection.tcl 11 Dec 2003 21:40:07 -0000 1.7 +++ openacs-4/packages/logger/www/admin/projection.tcl 9 May 2005 14:49:38 -0000 1.7.2.1 @@ -30,11 +30,11 @@ if { [exists_and_not_null projection_id] } { # Initial request in display or edit mode or a submit of the form - set page_title "One projection" + set page_title "[_ logger.One_projection]" set ad_form_mode display } else { # Initial request in add mode - set page_title "Add a projection" + set page_title "[_ logger.Add_a_projection]" set ad_form_mode edit } @@ -47,7 +47,7 @@ set end_day_seconds [expr $start_day_seconds + 60*60*24*31] set end_day [clock format $end_day_seconds -format "%Y %m %d"] -set actions_list [list [list Edit "edit"] [list Done done]] +set actions_list [list [list Edit "[_ acs-kernel.common_edit]"] [list Done done]] ad_form -name projection_form -cancel_url index -mode $ad_form_mode -actions $actions_list -form { projection_id:key(logger_projections_seq) Index: openacs-4/packages/logger/www/admin/variable-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/variable-delete.tcl,v diff -u -N -r1.4 -r1.4.2.1 --- openacs-4/packages/logger/www/admin/variable-delete.tcl 11 Dec 2003 21:40:07 -0000 1.4 +++ openacs-4/packages/logger/www/admin/variable-delete.tcl 9 May 2005 14:49:38 -0000 1.4.2.1 @@ -17,7 +17,7 @@ set n_log_entries [db_string n_log_entries {}] if { $n_log_entries > 0 } { - ad_return_complaint 1 "Variable is in use: you cannot delete this variable as it is being used by log entries" + ad_return_complaint 1 "[_ logger.lt_Variable_is_in_use_yo]" ad_script_abort } Index: openacs-4/packages/logger/www/admin/variable.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/variable.tcl,v diff -u -N -r1.7 -r1.7.2.1 --- openacs-4/packages/logger/www/admin/variable.tcl 4 Jan 2004 17:24:38 -0000 1.7 +++ openacs-4/packages/logger/www/admin/variable.tcl 9 May 2005 14:49:38 -0000 1.7.2.1 @@ -19,33 +19,33 @@ if { [exists_and_not_null variable_id] } { # Initial request in display or edit mode or a submit of the form - set page_title "One variable" + set page_title "[_ logger.One_variable]" set ad_form_mode display } else { # Initial request in add mode - set page_title "Add a variable" + set page_title "[_ logger.Add_a_variable]" set ad_form_mode edit } set context [list $page_title] -set actions_list [list [list Edit "edit"] [list Done done]] +set actions_list [list [list Edit "[_ acs-kernel.common_edit]"] [list Done [_ acs-kernel.common_done]]] ad_form -name variable_form -cancel_url index -export { project_id } -mode $ad_form_mode -actions $actions_list -form { variable_id:key(acs_object_id_seq) {name:text {html {size 50}} - {label "Name"} + {label "[_ logger.Name]"} } {unit:text {html {size 50}} - {label "Unit"} + {label "[_ logger.Unit]"} } {type:text(radio) {options {{Additive additive} {Non-Additive non-additive}}} - {label "Type"} + {label "[_ logger.Type]"} } } -select_query_name select_variable -validate {
- Add Entry + #logger.Add_Entry#