2 tr-cust_svc_cancel - Short display of a canceled customer service
3 for use in view/cust_main.
5 <TR STYLE="color:#cccccc;">
6 <TD ALIGN="right" VALIGN="top">
7 % if ( $opt{no_links} ) {
8 <% $part_svc->svc |h %>:
10 <% FS::UI::Web::svc_link($m, $part_svc, $cust_svc) %>
13 <TD STYLE="padding-bottom:0px;"><B>
14 % if ( $opt{no_links} ) {
15 <% ($cust_svc->label)[1] |h %>
17 <% FS::UI::Web::svc_label_link($m, $part_svc, $cust_svc) %>
21 %# no action links except unprovision, the service is canceled
22 % if ( $curuser->access_right('Unprovision customer service') && ! $opt{no_links} ) {
24 <TD COLSPAN="2" ALIGN="right" VALIGN="top" STYLE="padding-bottom:5px; padding-top:0px">
25 <FONT SIZE="-2">( <% $svc_unprovision_link %> )</FONT>
32 my $curuser = $FS::CurrentUser::CurrentUser;
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;
39 my $svc_unprovision_link =
40 qq!<A HREF="javascript:areyousure('${p}misc/unprovision.cgi?! .
42 qq!', '!.emt('Permanently unprovision and delete this service?').qq!')">!.emt('Unprovision').'</A>';