RT# 82949 - changes section name from fees to pricing, better opiton
[freeside.git] / httemplate / elements / tr-cust_svc_cancel.html
1 <%doc>
2 tr-cust_svc_cancel - Short display of a canceled customer service 
3 for use in view/cust_main.
4 </%doc>
5 <TR STYLE="color:#cccccc;">
6   <TD ALIGN="right" VALIGN="top">
7 %   if ( $opt{no_links} ) {
8       <% $part_svc->svc |h %>:
9 %   } else {
10       <% FS::UI::Web::svc_link($m, $part_svc, $cust_svc) %>
11 %   }
12   </TD>
13   <TD STYLE="padding-bottom:0px;"><B>
14 %   if ( $opt{no_links} ) {
15       <% ($cust_svc->label)[1] |h %>
16 %   } else {
17       <% FS::UI::Web::svc_label_link($m, $part_svc, $cust_svc) %>
18 %   }
19   </B></TD>
20 </TR>
21 %# no action links except unprovision, the service is canceled
22 % if ( $curuser->access_right('Unprovision customer service') && ! $opt{no_links} ) {
23 <TR>
24   <TD COLSPAN="2" ALIGN="right" VALIGN="top" STYLE="padding-bottom:5px; padding-top:0px">
25     <FONT SIZE="-2">(&nbsp;<% $svc_unprovision_link %>&nbsp;)</FONT>
26   </TD>
27 </TR>
28 % }
29
30 <%init>
31 my %opt = @_;
32 my $curuser = $FS::CurrentUser::CurrentUser;
33
34 my $cust_svc = $opt{'cust_svc'};
35 my $part_svc = $opt{'part_svc'} || $cust_svc->part_svc;
36 my $cust_pkg = $opt{'cust_pkg'} || $cust_svc->cust_pkg;
37 my $svc_x = $cust_svc->svc_x;
38
39 my $svc_unprovision_link = 
40   qq!<A HREF="javascript:areyousure('${p}misc/unprovision.cgi?! .
41   $cust_svc->svcnum .
42   qq!', '!.emt('Permanently unprovision and delete this service?').qq!')">!.emt('Unprovision').'</A>';
43
44 </%init>