OpenACS

vinodk
committed
MAIN:vinodk:20020208063544
on 08 Feb 02
adjusted install sequence to use ad_parameter instead of checking db directly
openacs-4/.../ticket-tracker/www/tickets.tcl (+5 -5)
84 84 }
85 85 lappend severity_list [list any all [list]]
86 86 lappend severity_slider $severity_list
87 87
88 88 # adding the priority and severity options to the opion bar
89 89 lappend dimensional $priority_slider $severity_slider
90 90
91 91 set dimensional_bar [ad_dimensional $dimensional]
92 92
93 93 # ad_table definition
94 94 # NOTE: 1) [list]'s are used here instead of {}'s because ad_table
95 95 #          does not evaluate $category_name
96 96 #       2) The link generated for submitted_by does not work if
97 97 #          it references a group. An SDM ticket has been created
98 98 #          requesting this feature.
99 99 set table_def [list]
100 100 lappend table_def [list line_number "Num" {} {<td align=right>$Tcount</td>} ]
101 101 lappend table_def [list ticket_id "ID#" {} \
102 102         {<td align=center><a href="ticket-view?ticket_id=$ticket_id">$ticket_id</a></td>} ]
103 103 lappend table_def [list category "$category_name" {} c ]
104   lappend table_def [list pretty_priority "Priority" {pretty_priority $order} c ]
105   lappend table_def [list pretty_severity "Severity" {pretty_severity $order} c ]
  104 lappend table_def [list pretty_priority "Priority" {priority $order} c ]
  105 lappend table_def [list pretty_severity "Severity" {severity $order} c ]
106 106 lappend table_def [list state "Status" {} c ]
107 107 lappend table_def [list subject "Subject" {} c ]
108 108 # vinodk: kludge - since you can't order by alias names in postgres
109 109 #         have to order by item #
110   lappend table_def [list creator_id "Submitted by" {upper(9) $order} \
  110 lappend table_def [list creator_id "Submitted by" {upper(11) $order} \
111 111         {<td align=center><a href="/shared/community-member?user_id=$creator_id">$creator_name</a></td>} ]
112 112 # vinodk: kludge again
113   lappend table_def [list assignee_id "Assigned to" {upper(12) $order} \
  113 lappend table_def [list assignee_id "Assigned to" {upper(14) $order} \
114 114         {<td align=center><a href="/shared/community-member?user_id=$assignee_id">$assignee_name</a></td>} ]
115 115 lappend table_def [list created "Created" {created $order} c ]
116 116
117 117
118 118 # sql to retrieve selected tickets
119 119 set view_select ""
120 120 set view_from ""
121 121 set view_where ""
122 122 # only getting the content and mime type if it's a full view
123 123 if [string equal $view "full"] {
124 124     set view_select ", cr.mime_type, cr.content"
125 125     set view_from ", cr_revisions cr "
126 126     set view_where "[db_map live_revision]"
127 127 }
128 128
129 129
130 130 # this is the ugly part
131 131 # 3 different queries for 3 different assignee types
132 132
133 133 # openacs change - vinodk