X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fview%2Fsvc_broadband.cgi;h=ae23386a18b56525c99f35ee307bf3f624b36122;hp=677a4b058776bfc153274c02fedd7ca211488baf;hb=a44fcf8b6fb405c09a47de27b32fcb19f121dcae;hpb=58d44fbe5eb9ab32e6d87063a4a3b22ddba9a828 diff --git a/httemplate/view/svc_broadband.cgi b/httemplate/view/svc_broadband.cgi index 677a4b058..ae23386a1 100644 --- a/httemplate/view/svc_broadband.cgi +++ b/httemplate/view/svc_broadband.cgi @@ -37,41 +37,106 @@ my ( $svc_broadband->getfield('speed_up'), $svc_broadband->getfield('ip_addr') ); +%> - - -print header('Broadband Service View', menubar( +<%=header('Broadband Service View', menubar( ( ( $custnum ) - ? ( "View this package (#$pkgnum)" => "${p}view/cust_pkg.cgi?$pkgnum", - "View this customer (#$custnum)" => "${p}view/cust_main.cgi?$custnum", + ? ( "View this customer (#$custnum)" => "${p}view/cust_main.cgi?$custnum", ) : ( "Cancel this (unaudited) website" => "${p}misc/cancel-unaudited.cgi?$svcnum" ) ), "Main menu" => $p, -)). - qq!Edit this information
!. - ntable("#cccccc"). ''. ntable("#cccccc",2). - qq!Service number!. - qq!$svcnum!. - qq!Router!. - qq!$routernum: $routername!. - qq!Download Speed!. - qq!$speed_down!. - qq!Upload Speed!. - qq!$speed_up!. - qq!IP Address!. - qq!$ip_addr!. - ''; +)) +%> +Edit this information +
+<%=ntable("#cccccc")%> + + + <%=ntable("#cccccc",2)%> + + Service number + <%=$svcnum%> + + + Router + <%=$routernum%>: <%=$routername%> + + + Download Speed + <%=$speed_down%> + + + Upload Speed + <%=$speed_up%> + + + IP Address + <%=$ip_addr%> + + + +<% foreach (sort { $a cmp $b } $svc_broadband->virtual_fields) { - print $svc_broadband->pvf($_)->widget('HTML', 'view', - $svc_broadband->getfield($_)), "\n"; + print $svc_broadband->pvf($_)->widget('HTML', 'view', + $svc_broadband->getfield($_)), "\n"; } -print ''; +%> + + + + -print '
'. joblisting({'svcnum'=>$svcnum}, 1). - '' -; +
+<%=ntable("#cccccc", 2)%> +<% + my $sb_router = qsearchs('router', { svcnum => $svcnum }); + if ($sb_router) { + %> + Router associated: <%=$sb_router->routername%> + + (details) + +
+ <% my @addr_block; + if (@addr_block = $sb_router->addr_block) { + %> + Address space + + (edit) + +
+ <% print ntable("#cccccc", 1); + foreach (@addr_block) { %> + + <%=$_->ip_gateway%>/<%=$_->ip_netmask%> + + <% } %> + + <% } else { %> + No address space allocated. + <% } %> +
+ <% + } else { %> + +
+ +Add router named + + +
+ +<% +} +%> + +
+<%=joblisting({'svcnum'=>$svcnum}, 1)%> + + +