% include('/elements/header.html', 'Call Detail Record Search' ) %>
<% include('/elements/footer.html') %> <%init> 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>