rt/share/html/Ticket/Elements/ShowCustomers

   1 %# Copyright (c) 2004 Ivan Kohler <ivan-rt@420.am>
   2 %#
   3 %# This work is made available to you under the terms of Version 2 of
   4 %# the GNU General Public License. A copy of that license should have
   5 %# been provided with this software, but in any event can be snarfed
   6 %# from www.gnu.org.
   7 %#
   8 %# This work is distributed in the hope that it will be useful, but
   9 %# WITHOUT ANY WARRANTY; without even the implied warranty of
  10 %# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11 %# General Public License for more details.
  12 <table>
  13 % my @cust = map { $_->TargetURI->Resolver }
  14 %                   @{ $Ticket->Customers->ItemsArrayRef };
  15 %
  16 % foreach my $custResolver ( @cust ) {
  17   <tr>
  18     <td class="value">
  19       <% $custResolver->AsStringLong |n %>
  20 %# includes service label and view/svc_ link for cust_svc links
  21     </td>
  22   </tr>
  23 % }
  24
  25 % unless ( @cust ) {
  26   <tr>
  27     <td class="labeltop">
  28       <i>(none)<i>
  29     </td>
  30   </tr>
  31
  32 % }
  33 </table>
  34 <%ARGS>
  35 $Ticket => undef
  36 </%ARGS>
  37