diff options
author | ivan <ivan> | 2008-03-29 09:12:06 +0000 |
---|---|---|
committer | ivan <ivan> | 2008-03-29 09:12:06 +0000 |
commit | 1c55c2f7b069bec5f64e2f69901cb34abbbef624 (patch) | |
tree | 8cd502e2b7bef2c7c62e7b10e179def79213f60f /httemplate/view | |
parent | 52cf328cb18c3062e91b5acb7da14d50be90c9f1 (diff) |
add quick links for unprocessed and processed CDRs to svc_phone view
Diffstat (limited to 'httemplate/view')
-rw-r--r-- | httemplate/view/elements/svc_Common.html | 12 | ||||
-rw-r--r-- | httemplate/view/svc_phone.cgi | 42 |
2 files changed, 46 insertions, 8 deletions
diff --git a/httemplate/view/elements/svc_Common.html b/httemplate/view/elements/svc_Common.html index 0500248b1..b6d8e652f 100644 --- a/httemplate/view/elements/svc_Common.html +++ b/httemplate/view/elements/svc_Common.html @@ -84,6 +84,18 @@ Service #<B><% $svcnum %></B> </TABLE></TD></TR></TABLE> <BR> + +% if ( defined($opt{'html_foot'}) ) { + + <% ref($opt{'html_foot'}) + ? &{ $opt{'html_foot'} }($svc_x) + : $opt{'html_foot'} + %> + <BR> + +% } + + <% joblisting({'svcnum'=>$svcnum}, 1) %> <% include('/elements/footer.html') %> diff --git a/httemplate/view/svc_phone.cgi b/httemplate/view/svc_phone.cgi index 732f3cd79..5dcf35916 100644 --- a/httemplate/view/svc_phone.cgi +++ b/httemplate/view/svc_phone.cgi @@ -1,10 +1,36 @@ <% 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 )], #pin + 'labels' => { + 'countrycode' => 'Country code', + 'phonenum' => 'Phone number', + 'pin' => 'PIN', + }, + '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); + + join(' | ', @links). '<BR>'; + +}; + +</%init> |