Putting 4.2.0 on top of 4.0.17
[usit-rt.git] / share / html / Ticket / Elements / ShowDates
CommitLineData
84fb5b46
MKG
1%# BEGIN BPS TAGGED BLOCK {{{
2%#
3%# COPYRIGHT:
4%#
403d7b0b 5%# This software is Copyright (c) 1996-2013 Best Practical Solutions, LLC
84fb5b46
MKG
6%# <sales@bestpractical.com>
7%#
8%# (Except where explicitly superseded by other copyright notices)
9%#
10%#
11%# LICENSE:
12%#
13%# This work is made available to you under the terms of Version 2 of
14%# the GNU General Public License. A copy of that license should have
15%# been provided with this software, but in any event can be snarfed
16%# from www.gnu.org.
17%#
18%# This work is distributed in the hope that it will be useful, but
19%# WITHOUT ANY WARRANTY; without even the implied warranty of
20%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
21%# General Public License for more details.
22%#
23%# You should have received a copy of the GNU General Public License
24%# along with this program; if not, write to the Free Software
25%# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
26%# 02110-1301 or visit their web page on the internet at
27%# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html.
28%#
29%#
30%# CONTRIBUTION SUBMISSION POLICY:
31%#
32%# (The following paragraph is not intended to limit the rights granted
33%# to you to modify and distribute this software under the terms of
34%# the GNU General Public License and is only of importance to you if
35%# you choose to contribute your changes and enhancements to the
36%# community by submitting them to Best Practical Solutions, LLC.)
37%#
38%# By intentionally submitting any modifications, corrections or
39%# derivatives to this work, or any other work intended for use with
40%# Request Tracker, to Best Practical Solutions, LLC, you confirm that
41%# you are the copyright holder for those contributions and you grant
42%# Best Practical Solutions, LLC a nonexclusive, worldwide, irrevocable,
43%# royalty-free, perpetual, license to use, copy, create derivative
44%# works based on those contributions, and sublicense and distribute
45%# those contributions and any derivatives thereof.
46%#
47%# END BPS TAGGED BLOCK }}}
48<table>
49 <tr class="date created">
50 <td class="label"><&|/l&>Created</&>:</td>\
51 <td class="value"><% $Ticket->CreatedObj->AsString %></td>
52 </tr>
53 <tr class="date starts">
54 <td class="label"><&|/l&>Starts</&>:</td>\
55 <td class="value"><% $Ticket->StartsObj->AsString %></td>
56 </tr>
57 <tr class="date started">
58 <td class="label"><&|/l&>Started</&>:</td>\
59 <td class="value"><% $Ticket->StartedObj->AsString %></td>
60 </tr>
61 <tr class="date told">
62 <td class="label"><a href="<% RT->Config->Get('WebPath') %>/Ticket/Display.html?id=<% $Ticket->id %>&Action=SetTold"><&|/l&>Last Contact</&></a>:</td>\
63 <td class="value"><% $Ticket->ToldObj->AsString %></td>
64 </tr>
65 <tr class="date due">
66 <td class="label"><&|/l&>Due</&>:</td>\
67% my $due = $Ticket->DueObj;
68% if ( $due && $due->Unix > 0 && $due->Diff < 0 ) {
69 <td class="value"><span class="overdue"><% $due->AsString %></span></td>
70% } else {
71 <td class="value"><% $due->AsString %></td>
72% }
73 </tr>
74 <tr class="date resolved">
75 <td class="label"><&|/l&>Closed</&>:</td>\
76 <td class="value"><% $Ticket->ResolvedObj->AsString %></td>
77 </tr>
78 <tr class="date updated">
79 <td class="label"><&|/l&>Updated</&>:</td>\
80% my $UpdatedString = $Ticket->LastUpdated ? loc("[_1] by [_2]", $Ticket->LastUpdatedAsString, $m->scomp('/Elements/ShowUser', User => $Ticket->LastUpdatedByObj)) : loc("Never");
81% if ($UpdatedLink) {
af59614d 82 <td class="value"><a href="<% $UpdatedLink %>"><% $UpdatedString | n %></a></td>
84fb5b46
MKG
83% } else {
84 <td class="value"><% $UpdatedString | n %></td>
85% }
86 </tr>
af59614d 87 <& /Ticket/Elements/ShowCustomFields, Ticket => $Ticket, Grouping => 'Dates', Table => 0 &>
84fb5b46
MKG
88% $m->callback( %ARGS, CallbackName => 'EndOfList', TicketObj => $Ticket );
89</table>
90<%ARGS>
91$Ticket => undef
92$UpdatedLink => 1
93</%ARGS>
af59614d
MKG
94<%INIT>
95if ($UpdatedLink and $Ticket) {
96 my $txns = $Ticket->Transactions;
97 $txns->OrderByCols(
98 { FIELD => "Created", ORDER => "DESC" },
99 { FIELD => "id", ORDER => "DESC" },
100 );
101 $txns->RowsPerPage(1);
102
103 if (my $latest = $txns->First) {
104 $UpdatedLink = "#txn-" . $latest->id;
105 } else {
106 undef $UpdatedLink;
107 }
108}
109</%INIT>