2 tr-cust_svc - Short display of a customer service for use in view/cust_main.
4 Formerly part of view/cust_main/packages/services.html
8 <% include('/elements/tr-cust_svc.html',
10 'part_svc' => $part_svc,
11 'cust_svc' => $cust_svc,
12 'cust_pkg' => $cust_pkg,
14 'cust_pkg-display_times' => '', #bool
15 'svc_broadband-manage_link' => '',
16 'maestro-status_test' => '',
22 <TD ALIGN="right" VALIGN="top"><%
23 FS::UI::Web::svc_link($m, $part_svc, $cust_svc)
25 <TD STYLE="padding-bottom:0px"><B><%
26 FS::UI::Web::svc_label_link($m, $part_svc, $cust_svc)
29 % if ( $cust_svc->overlimit ) {
31 <TD ALIGN="right" COLSPAN="3" VALIGN="top"
32 STYLE="padding-bottom:1px; padding-top:0px">
33 <FONT SIZE="-2" COLOR="#FFD000">Overlimit: <%
34 time2str('%b %o %Y' . $opt{'cust_pkg-display_times'} ? ' %l:%M %P' : '',
35 $cust_svc->overlimit )
41 % # first column: recharge link
42 <TD ALIGN="right" VALIGN="top" STYLE="padding-bottom:5px; padding-top:0px">
43 % if ( $curuser->access_right('Recharge customer service')
44 % && $part_svc->svcdb eq 'svc_acct'
45 % && ( $svc_x->seconds ne ''
46 % || $svc_x->upbytes ne ''
47 % || $svc_x->downbytes ne ''
48 % || $svc_x->totalbytes ne ''
51 <FONT SIZE="-2">( <% svc_recharge_link($cust_svc)%> )</FONT>
54 % # second column: all other action links
55 <TD ALIGN="right" VALIGN="top" STYLE="padding-bottom:5px; padding-top:0px">
56 % if ( $part_svc->svcdb eq 'svc_broadband' ) {
57 <FONT SIZE="-1" STYLE="float:left">( <%
58 include('/elements/popup_link-ping.html',
59 'ip' => $svc_x->ip_addr
61 % my $manage_link = $opt{'svc_broadband-manage_link'};
62 % if ( $manage_link ) {
63 % my $ip_addr = $svc_x->ip_addr; #substitution for $manage_link
64 <FONT SIZE="-1" STYLE="float:left">( <A HREF="<%
65 eval(qq("$manage_link"))
66 %>"><% mt('Manage Device') |h %></A> )</FONT>
69 % if ( $curuser->access_right('Unprovision customer service') ) {
70 <FONT SIZE="-2">( <% $svc_unprovision_link %> )</FONT>
72 % if ( $part_svc->svcdb eq 'svc_pbx' && $opt{'maestro-status_test'} ) {
73 <FONT SIZE="-2">( <A HREF="<%$p%>misc/maestro-customer_status-test.html?<% $cust_pkg->custnum.'+'.$cust_svc->svcnum %>">Test maestro status</A> )
81 my $curuser = $FS::CurrentUser::CurrentUser;
83 my $cust_svc = $opt{'cust_svc'};
84 my $part_svc = $opt{'part_svc'} || $cust_svc->part_svc;
85 my $cust_pkg = $opt{'cust_pkg'} || $cust_svc->cust_pkg;
86 my $svc_x = $cust_svc->svc_x;
88 my $svc_unprovision_link =
89 qq!<A HREF="javascript:areyousure('${p}misc/unprovision.cgi?! .
91 qq!', '!.emt('Permanently unprovision and delete this service?').')">'.emt('Unprovision').'</A>';