<%doc> tr-cust_svc_cancel - Short display of a canceled customer service for use in view/cust_main. % if ( $opt{no_links} ) { <% $part_svc->svc |h %>: % } else { <% FS::UI::Web::svc_link($m, $part_svc, $cust_svc) %> % } % if ( $opt{no_links} ) { <% ($cust_svc->label)[1] |h %> % } else { <% FS::UI::Web::svc_label_link($m, $part_svc, $cust_svc) %> % } %# no action links except unprovision, the service is canceled % if ( $curuser->access_right('Unprovision customer service') && ! $opt{no_links} ) { ( <% $svc_unprovision_link %> ) % } <%init> my %opt = @_; my $curuser = $FS::CurrentUser::CurrentUser; my $cust_svc = $opt{'cust_svc'}; my $part_svc = $opt{'part_svc'} || $cust_svc->part_svc; my $cust_pkg = $opt{'cust_pkg'} || $cust_svc->cust_pkg; my $svc_x = $cust_svc->svc_x; my $svc_unprovision_link = qq!!.emt('Unprovision').'';