diff options
| -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 f540555d4..8bd4dba02 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> |