<%doc> tr-cust_svc - Short display of a customer service for use in view/cust_main. Formerly part of view/cust_main/packages/services.html Usage: <% include('/elements/tr-cust_svc.html', #required 'part_svc' => $part_svc, 'cust_svc' => $cust_svc, 'cust_pkg' => $cust_pkg, #optional 'cust_pkg-display_times' => '', #bool 'manage_link' => '', #for svc_broadband 'manage_link_text' => '', #default 'Manage Device' 'manage_link_loc' => '', #default 'bottom', or 'right' ) %> % if ( $opt{no_links} ) { <% $part_svc->svc |h %>: % } else { <% FS::UI::Web::svc_link($m, $part_svc, $cust_svc) %> % } % if ( $opt{before_svc_callback} ) { <% &{ $opt{before_svc_callback} }( $cust_svc ) %> % } <% $cust_svc->agent_svcid ? $cust_svc->agent_svcid.': ' : '' %> % if ( $opt{no_links} ) { <% ($cust_svc->label)[1] |h %> % } else { <% FS::UI::Web::svc_label_link($m, $part_svc, $cust_svc) %> % } % if ($part_svc->svcdb eq 'svc_circuit') {
Provider: <% $svc_x->circuit_provider->provider %>
Type: <% $svc_x->circuit_type->typename %> % } % if ( $opt{after_svc_callback} ) { <% &{ $opt{after_svc_callback} }( $cust_svc ) %> % } <% FS::UI::Web::svc_export_links($m, $part_svc, $cust_svc) %> % if ( $opt{'manage_link_loc'} eq 'right' && ! $opt{no_links} ) { <& /elements/manage_device_link.html, 'svc' => $svc_x, 'part_svc' => $opt{'part_svc'} || $cust_svc->part_svc, 'manage_link' => $opt{'manage_link'}, 'manage_link_text' => $opt{'manage_link_text'}, 'manage_link-new_window' => $opt{'manage_link-new_window'} &> % } % if ( $cust_svc->overlimit ) { Overlimit: <% time2str('%b %o %Y' . $opt{'cust_pkg-display_times'} ? ' %l:%M %P' : '', $cust_svc->overlimit ) %> % } % # first column: (optional external balance and) recharge link % if ( $part_svc->svcdb eq 'svc_phone' % && ! $opt{no_links} % ) % { % my( $html, $hashref ) = $svc_x->export_getstatus; % if ( length($hashref->{'Balance'}) ) { #quelle hack Balance: <% $hashref->{'Balance'} %>  % } % } % if ( $curuser->access_right('Recharge customer service') % && $part_svc->svcdb eq 'svc_acct' % && ! $opt{no_links} % && ( $svc_x->seconds ne '' % || $svc_x->upbytes ne '' % || $svc_x->downbytes ne '' % || $svc_x->totalbytes ne '' % ) % ) { ( <% svc_recharge_link($cust_svc)%> ) % } % # second column: all other action links % if ( $part_svc->svcdb eq 'svc_broadband' && ! $opt{no_links} ) { ( <% include('/elements/popup_link-ping.html', 'ip' => $svc_x->ip_addr ) %> ) % if ( $opt{'manage_link_loc'} eq 'bottom' && ! $opt{no_links} ) { <& /elements/manage_device_link.html, 'svc' => $svc_x, 'part_svc' => $opt{'part_svc'} || $cust_svc->part_svc, 'manage_link' => $opt{'manage_link'}, 'manage_link_text' => $opt{'manage_link_text'}, 'manage_link-new_window' => $opt{'manage_link-new_window'}, 'prepend' => '( ', 'append' => ' )' &> % } % } #svc_broadband % 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').''; $opt{'manage_link_loc'} ||= 'bottom';