'type' => 'checkbox',
},
+ {
+ 'key' => 'svc_broadband-manage_link',
+ 'section' => 'UI',
+ 'description' => 'URL for svc_broadband "Manage Device" link. The following substitutions are available: $ip_addr.',
+ 'type' => 'text',
+ },
+
);
1;
#for services.html
'svc_external-skip_manual' => $conf->exists('svc_external-skip_manual'),
'legacy_link' => $conf->exists('legacy_link'),
+ 'svc_broadband-manage_link' => $conf->config('svc_broadband-manage_link'),
);
#subroutines
% )
% ) {
( <%svc_recharge_link($cust_svc)%> )
-% }
+% }
</FONT></TD>
- <TD ALIGN="right" VALIGN="top" STYLE="padding-bottom:5px;padding-top:0px"><FONT SIZE="-2">
+ <TD ALIGN="right" VALIGN="top" STYLE="padding-bottom:5px;padding-top:0px">
-% if ( $curuser->access_right('Unprovision customer service') ) {
- ( <%svc_unprovision_link($cust_svc)%> )
-% }
- </FONT></TD>
+% my $manage_link = $opt{'svc_broadband-manage_link'};
+% if ( $manage_link && $part_svc->svcdb eq 'svc_broadband' ) {
+% my $ip_addr = $cust_svc->svc_x->ip_addr;
+% my $svc_manage_link = eval(qq("$manage_link"));
+ <FONT SIZE="-1" STYLE="float:left">( <A HREF="<% $svc_manage_link %>">Manage Device</A> )</FONT>
+
+% }
+
+
+% if ( $curuser->access_right('Unprovision customer service') ) {
+ <FONT SIZE="-2">( <%svc_unprovision_link($cust_svc)%> )</FONT>
+% }
+ </TD>
</TR>
% }
my $part_pkg = $opt{'part_pkg'};
my $curuser = $FS::CurrentUser::CurrentUser;
+my $conf = new FS::Conf;
+
sub svc_provision_link {
my ($cust_pkg, $part_svc, $opt, $curuser) = @_;
( my $svc_nbsp = $part_svc->svc ) =~ s/\s+/ /g;