X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=inline;f=httemplate%2Fsearch%2Freport_cdr.html;h=f3ad1e69f463ded5f77017fd29ef14355b258ebf;hb=d1014a727cefa5d9813153594541f62ec15fc8b9;hp=6a0b89bf8ea4096d18e93cc355b3e9c928cc7390;hpb=69678d308805f5ca4b171ea0c5ac1da957811aa0;p=freeside.git
diff --git a/httemplate/search/report_cdr.html b/httemplate/search/report_cdr.html
index 6a0b89bf8..f3ad1e69f 100644
--- a/httemplate/search/report_cdr.html
+++ b/httemplate/search/report_cdr.html
@@ -5,6 +5,12 @@
+
+ Search options
+ |
+
+
+
Status: |
|
+
+ Destination Context: |
+
+
+ |
+
+
+
+
+ Charged Party #: |
+
+
+ |
+
+
<% include( '/elements/tr-input-lessthan_greaterthan.html',
'label' => 'Duration (sec)',
'field' => 'duration',
@@ -62,6 +83,33 @@
<% include( '/elements/tr-select-cdrbatch.html' ) %>
+
+ Acct ID (one per-line): |
+ |
+
+
+
+ |
+
+
+
+ Display options |
+
+
+
+
+
+
+ <% include('/elements/checkboxes.html',
+ 'names_list' => $names_list,
+ 'element_name_prefix' => 'show_',
+ 'checked_callback' => sub { $show_default{$_[1]} },
+ # my($cgi, $name) = @_;
+ )
+ %>
+ |
+
+
@@ -73,4 +121,26 @@
die "access denied"
unless $FS::CurrentUser::CurrentUser->access_right('List rating data');
+my @fields = fields('cdr');
+my $labels = FS::cdr->table_info->{'fields'};
+
+#XXX config
+my @show_default = qw(
+ calldate clid src dst dcontext charged_party
+ startdate answerdate enddate duration billsec
+ disposition amaflags accountcode userfield
+ rated_price upstream_price carrierid
+ svcnum freesidestatus freesiderewritestatus cdrbatch
+);
+my %show_default = map { $_=>1 } @show_default;
+
+my $names_list = [ map {
+ [ $_ => {
+ 'label' => 'Show '. ( $labels->{$_} || $_ )
+ }
+ ]
+ }
+ @fields
+ ];
+
%init>