Index: openacs-4/packages/simulation/www/siminst/map-tasks.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/map-tasks.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/simulation/www/siminst/map-tasks.tcl 15 Dec 2003 15:28:21 -0000 1.3
+++ openacs-4/packages/simulation/www/siminst/map-tasks.tcl 19 Dec 2003 14:00:39 -0000 1.4
@@ -10,7 +10,7 @@
set page_title "Tasks for $workflow_array(pretty_name)"
set context [list [list "." "SimInst" ] $page_title]
-db_multirow -extend { description_html } tasks select_taks {
+db_multirow -extend { description_html prop_missing_count } tasks select_taks {
select a.action_id,
a.short_name,
a.pretty_name,
@@ -26,6 +26,7 @@
and st.task_id = a.action_id
} {
set description_html [ad_html_text_convert -maxlen 100 -from $description_mime_type -- $description]
+ set prop_missing_count [expr $attachment_num - $prop_not_empty_count]
}
# TODO: Honor description_mime_type, fancy truncate
@@ -43,8 +44,10 @@
}
attachment_num {
label "Number of attachments"
+ display_template {@tasks.attachment_num@}
}
- prop_not_empty_count {
- label "Number of attachments populated"
+ prop_missing_count {
+ label "Missing attachments"
+ display_template {@tasks.prop_missing_count@}
}
}