Index: openacs-4/packages/logger/www/lib/entries-table.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/lib/Attic/entries-table.adp,v diff -u -r1.4.2.3 -r1.4.2.4 --- openacs-4/packages/logger/www/lib/entries-table.adp 15 May 2003 08:49:36 -0000 1.4.2.3 +++ openacs-4/packages/logger/www/lib/entries-table.adp 15 May 2003 09:13:54 -0000 1.4.2.4 @@ -84,10 +84,20 @@ <tr class="logger_listing_subheader"> <td class="logger_listing_narrow" align="center"> </td> <td class="logger_listing_narrow" colspan="3"> - <b>Subtotal</b> + <if @variable.type@ eq "additive"> + <b>Subtotal</b> + </if> + <else> + <b>Subtotal Average</b> + </else> </td> <td class="logger_listing_narrow" align="right" nowrap> - <b>@entries.subtotal@</b> + <if @variable.type@ eq "additive"> + <b>@entries.subtotal@</b> + </if> + <else> + <b>@entries.subaverage@</b> + </else> </td> <td class="logger_listing_narrow"> </td> <td class="logger_listing_narrow" align="center"> </td> Index: openacs-4/packages/logger/www/lib/entries-table.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/lib/Attic/entries-table.tcl,v diff -u -r1.5.2.3 -r1.5.2.4 --- openacs-4/packages/logger/www/lib/entries-table.tcl 15 May 2003 08:49:36 -0000 1.5.2.3 +++ openacs-4/packages/logger/www/lib/entries-table.tcl 15 May 2003 09:13:55 -0000 1.5.2.4 @@ -67,9 +67,10 @@ set value_count 0 set last_group_by_value {} +set value_subcount 0 set value_subtotal 0 -db_multirow -extend { subtotal view_url edit_url delete_url delete_onclick user_chunk selected_p } entries select_entries {} { +db_multirow -extend { subtotal subaverage view_url edit_url delete_url delete_onclick user_chunk selected_p } entries select_entries {} { set description [string_truncate -len 50 $description] set project_name [string_truncate -len 20 $project_name] set selected_p [string equal $id $selected_entry_id] @@ -89,12 +90,16 @@ # Should we reset the subtotal? if { ![string equal $last_group_by_value [set $group_by]] } { set value_subtotal 0 + set value_subcount 0 } - # Calculate new subtotal + # Calculate new subtotal/average set value_subtotal [expr $value_subtotal + $value] + incr value_subcount + # and store it in the column set subtotal $value_subtotal + set subaverage [expr round(100.0 * $value_subtotal / $value_subcount) / 100.0] set last_group_by_value [set $group_by] }