This commit was generated by cvs2svn to compensate for changes in r4407,
[freeside.git] / httemplate / view / cust_main / tickets.html
1 <%
2   my( $cust_main ) = @_;
3
4   my $conf = new FS::Conf;
5   my $num = 10;
6
7   my @tickets = ();
8   unless ( $conf->config('ticket_system-custom_priority_field') ) {
9
10     @tickets =
11       @{ FS::TicketSystem->customer_tickets($cust_main->custnum, $num) };
12
13   } else {
14
15     foreach my $priority (
16       $conf->config('ticket_system-custom_priority_field-values'), ''
17     ) {
18       last if scalar(@tickets) >= $num;
19       push @tickets, 
20         @{ FS::TicketSystem->customer_tickets( $cust_main->custnum,
21                                                $num - scalar(@tickets),
22                                                $priority,
23                                              )
24          };
25     }
26
27   }
28
29 %>
30
31 Highest priority tickets
32 (<A HREF="<%= FS::TicketSystem->href_customer_tickets($cust_main->custnum) %>">View all tickets for this customer</A>)
33 (<A HREF="<%= FS::TicketSystem->href_new_ticket($cust_main->custnum, join(', ', grep { $_ !~ /^(POST|FAX)$/ } $cust_main->invoicing_list ) ) %>">New ticket for this customer</A>)
34 <%= table() %>
35 <TR>
36   <TH>#</TH>
37   <TH>Subject</TH>
38   <TH>Priority</TH>
39   <TH>Queue</TH>
40   <TH>Status</TH>
41 </TR>
42 <% foreach my $ticket ( @tickets ) {
43      my $href = FS::TicketSystem->href_ticket($ticket->{id});
44 %>
45 <TR>
46   <TD><A HREF=<%=$href%>><%= $ticket->{id} %></A></TD>
47   <TD><A HREF=<%=$href%>><%= $ticket->{subject} %></A></TD>
48   <TD ALIGN="right"><%= $ticket->{content} || $ticket->{priority} %></TD>
49   <TD><%= $ticket->{name} %></TD>
50   <TD><%= $ticket->{status} %></TD>
51 </TR>
52 <% } %>
53 </TABLE>
54