X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Freport_cdr.html;h=f3ad1e69f463ded5f77017fd29ef14355b258ebf;hb=d1014a727cefa5d9813153594541f62ec15fc8b9;hp=06f0b1aae9d1ee91a61013ca9c72443b6c361793;hpb=4688c4a55a51c4ce2100c1c98e7e650eb77ac95d;p=freeside.git diff --git a/httemplate/search/report_cdr.html b/httemplate/search/report_cdr.html index 06f0b1aae..f3ad1e69f 100644 --- a/httemplate/search/report_cdr.html +++ b/httemplate/search/report_cdr.html @@ -2,7 +2,14 @@
- +
+ + + + + +% #if ( ) { # disable for everyone not using termination billing... +% foreach my $termpart ( 1..1 ) { #qsearch('part_termination + + + + + + +% } +% #} + <% include ( '/elements/tr-input-beginning_ending.html' ) %> @@ -30,6 +54,62 @@ + + + + + + + + + + + + <% include( '/elements/tr-input-lessthan_greaterthan.html', + 'label' => 'Duration (sec)', + 'field' => 'duration', + ) + %> + + <% include( '/elements/tr-input-lessthan_greaterthan.html', + 'label' => 'Billable duration (sec)', + 'field' => 'billsec', + ) + %> + + <% include( '/elements/tr-select-cdrbatch.html' ) %> + + + + + + + + + + + + + + + + + + + +
+ Search options +
Status: @@ -14,6 +21,23 @@
Termination Status: + +
Destination Context: + +
Charged Party #: + +
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) = @_; + ) + %> +

@@ -41,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 + ]; +