diff options
Diffstat (limited to 'httemplate/view/svc_phone.cgi')
-rw-r--r-- | httemplate/view/svc_phone.cgi | 40 |
1 files changed, 33 insertions, 7 deletions
diff --git a/httemplate/view/svc_phone.cgi b/httemplate/view/svc_phone.cgi index c5fce62d9..75591c747 100644 --- a/httemplate/view/svc_phone.cgi +++ b/httemplate/view/svc_phone.cgi @@ -1,15 +1,11 @@ <% include('elements/svc_Common.html', 'table' => 'svc_phone', - 'fields' => [qw( - countrycode - phonenum - sip_password - pin - phone_name - )], + 'fields' => \@fields, 'labels' => { 'countrycode' => 'Country code', 'phonenum' => 'Phone number', + 'domain' => 'Domain', + 'pbx_title' => 'PBX', 'sip_password' => 'SIP password', 'pin' => 'PIN', 'phone_name' => 'Name', @@ -19,10 +15,36 @@ %> <%init> +my $conf = new FS::Conf; +my $countrydefault = $conf->config('countrydefault') || 'US'; + +my @fields = qw( countrycode phonenum ); +push @fields, 'domain' if $conf->exists('svc_phone-domain'); +push @fields, qw( pbx_title sip_password pin phone_name ); + my $html_foot = sub { my $svc_phone = shift; ### + # E911 Info + ### + + my $e911 = + 'E911 Information'. + &ntable("#cccccc"). '<TR><TD>'. ntable("#cccccc",2). + '<TR><TD>Location</TD>'. + '<TD BGCOLOR="#FFFFFF">'. + $svc_phone->location_label( 'join_string' => '<BR>', + 'double_space' => ' ', + 'escape_function' => \&encode_entities, + 'countrydefault' => $countrydefault, + ). + '</TD></TR>'. + '</TABLE></TD></TR></TABLE>'. + '<BR>' + ; + + ### # Devices ### @@ -56,6 +78,7 @@ my $html_foot = sub { '<TH CLASS="grid" BGCOLOR="#cccccc">Type</TH>'. '<TH CLASS="grid" BGCOLOR="#cccccc">MAC Addr</TH>'. '<TH CLASS="grid" BGCOLOR="#cccccc"></TH>'. + '<TH CLASS="grid" BGCOLOR="#cccccc"></TH>'. '</TR>'; my $bgcolor1 = '#eeeeee'; my $bgcolor2 = '#ffffff'; @@ -71,10 +94,12 @@ my $html_foot = sub { my $td = qq(<TD CLASS="grid" BGCOLOR="$bgcolor">); my $devicenum = $phone_device->devicenum; + my $export_links = join( '<BR>', @{ $phone_device->export_links } ); $devices .= '<TR>'. $td. $phone_device->part_device->devicename. '</TD>'. $td. $phone_device->mac_addr. '</TD>'. + $td. $export_links. '</TD>'. "$td( ". qq(<A HREF="${p}edit/phone_device.html?$devicenum">edit</A> | ). qq(<A HREF="javascript:areyousure('${p}misc/delete-phone_device.html?$devicenum')">delete</A>). @@ -118,6 +143,7 @@ my $html_foot = sub { # concatenate & return ### + $e911. $devices. join(' | ', @links ). '<BR>'. join(' | ', @ilinks). '<BR>'; |