This commit was generated by cvs2svn to compensate for changes in r2523,
[freeside.git] / rt / webrt / Elements / MyTickets
1 <& /Elements/TitleBoxStart, title => "25 highest priority tickets I own..." &>
2 <TABLE BORDER=0 cellspacing=0 cellpadding=1 WIDTH=100%>
3 <TR>
4 <TH ALIGN=RIGHT>#</TH>
5 <TH ALIGN=LEFT>Subject</TH>
6 <TH ALIGN=LEFT>Queue</TH>
7 <TH ALIGN=LEFT>Status</TH>
8 <TH ALIGN=LEFT>&nbsp;</TH>
9 </TR>
10 % while (my $Ticket = $MyTickets->Next) {
11 <TR>
12 <TD ALIGN=RIGHT>
13 <%$Ticket->Id%>
14 </TD>
15 <TD>
16 <A HREF="<% $RT::WebPath %>/Ticket/Display.html?id=<%$Ticket->Id%>">
17 <%$Ticket->Subject || '[no subject]'%>
18 </A>
19 </TD>
20 <TD>
21 <%$Ticket->QueueObj->Name%>
22 </TD><TD>
23 <%$Ticket->Status%>
24 </TD>
25 <TD ALIGN=RIGHT>
26 [<A HREF="<% $RT::WebPath %>/Ticket/Update.html?id=<%$Ticket->Id%>">Update</A>]
27 </TD>
28 </TR>
29 % }
30 </TABLE>
31 <& /Elements/TitleBoxEnd &>
32
33
34 <%INIT>
35 my $MyTickets;
36 $MyTickets = new RT::Tickets ($session{'CurrentUser'});
37 $MyTickets->LimitOwner(VALUE => $session{'CurrentUser'}->Id);
38 $MyTickets->LimitStatus(VALUE => "open");
39 $MyTickets->LimitStatus(VALUE => "new");
40 $MyTickets->OrderBy(FIELD => 'Priority', ORDER => 'DESC');
41 $MyTickets->RowsPerPage(25);
42
43 </%INIT>