X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fview%2Fsvc_phone.cgi;h=8c0c9e02ecf5fb59c21e7ebf2ee28ca7bf54d9e5;hb=8437f01c51860146d00a23b29854f68e07967b63;hp=732f3cd79591f5bdb447a206c0bc996d5be940ee;hpb=5e05724a635a22776f1b973f5d7e77989da4e048;p=freeside.git

diff --git a/httemplate/view/svc_phone.cgi b/httemplate/view/svc_phone.cgi
index 732f3cd79..8c0c9e02e 100644
--- a/httemplate/view/svc_phone.cgi
+++ b/httemplate/view/svc_phone.cgi
@@ -1,10 +1,52 @@
 <% include('elements/svc_Common.html',
-              'table'  => 'svc_phone',
-              'fields' => [qw( countrycode phonenum )], #pin
-              'labels' => {
-                            'countrycode' => 'Country code',
-                            'phonenum'    => 'Phone number',
-                            'pin'         => 'PIN',
-                          },
-           )
+              'table'     => 'svc_phone',
+              'fields'    => [qw(
+                                  countrycode
+                                  phonenum
+                                  sip_password
+                                  pin
+                                  phone_name
+                             )],
+              'labels'    => {
+                               'countrycode'  => 'Country code',
+                               'phonenum'     => 'Phone number',
+                               'sip_password' => 'SIP password',
+                               'pin'          => 'PIN',
+                               'phone_name'   => 'Name',
+                             },
+              'html_foot' => $html_foot,
+          )
 %>
+<%init>
+
+my $html_foot = sub {
+  my $svc_phone = shift;
+
+  tie my %what, 'Tie::IxHash',
+    'pending' => 'NULL',
+    'billed'  => 'done',
+  ;
+
+  #XXX src & charged party (& default prefix) as per voip_cdr.pm
+  #XXX handle toll free too
+
+  my $number = $svc_phone->phonenum;
+
+  #my @links = map {
+  #  qq(<A HREF="${p}search/cdr.html?src=$number;freesidestatus=$what{$_}">).
+  #  "View $_ CDRs</A>";
+  #} keys(%what);
+  my @links = map {
+    qq(<A HREF="${p}search/cdr.html?cdrbatch=__ALL__;charged_party=$number;freesidestatus=$what{$_}">).
+    "View $_ CDRs</A>";
+  } keys(%what);
+
+  my @ilinks = ( qq(<A HREF="${p}search/cdr.html?dst=$number">).
+                 'View incoming CDRs</A>' );
+
+  join(' | ', @links ). '<BR>'.
+  join(' | ', @ilinks). '<BR>';
+
+};
+
+</%init>