projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of git.freeside.biz:/home/git/freeside
[freeside.git]
/
httemplate
/
search
/
report_cdr.html
diff --git
a/httemplate/search/report_cdr.html
b/httemplate/search/report_cdr.html
index
0e1693b
..
0eefd4c
100644
(file)
--- a/
httemplate/search/report_cdr.html
+++ b/
httemplate/search/report_cdr.html
@@
-148,6
+148,11
@@
</TR>
<TR>
</TR>
<TR>
+ <TD ALIGN="right">Acct Code (one per-line):</TD>
+ <TD><TEXTAREA NAME="accountcode"></TEXTAREA></TD>
+ </TR>
+
+ <TR>
<TH CLASS="background" COLSPAN=2> </TH>
</TR>
<TH CLASS="background" COLSPAN=2> </TH>
</TR>
@@
-185,6
+190,10
@@
die "access denied"
my @fields = fields('cdr');
my $labels = FS::cdr->table_info->{'fields'};
my @fields = fields('cdr');
my $labels = FS::cdr->table_info->{'fields'};
+my $conf = new FS::Conf;
+my $default_phone_countrycode =
+ $conf->config('default_phone_countrycode') || '1';
+
#XXX config
my @show_default = qw(
calldate clid src dst dcontext charged_party
#XXX config
my @show_default = qw(
calldate clid src dst dcontext charged_party
@@
-217,7
+226,7
@@
if ( $cgi->param('custnum') =~ /^(\d+)$/ ) {
});
die "Customer not found!" unless $cust_main;
});
die "Customer not found!" unless $cust_main;
- #historical
?
+ #historical
packages? It would help, it was still usage, it happened
foreach my $cust_pkg ( $cust_main->ncancelled_pkgs ) {
my @voip_pkgs =
foreach my $cust_pkg ( $cust_main->ncancelled_pkgs ) {
my @voip_pkgs =
@@
-242,7
+251,7
@@
if ( $cgi->param('custnum') =~ /^(\d+)$/ ) {
my @numbers = map {
my $number = $_->phonenum;
$number = $_->countrycode. $number
my @numbers = map {
my $number = $_->phonenum;
$number = $_->countrycode. $number
-
unless $_->countrycode eq '1'
;
+
unless $_->countrycode eq $default_phone_countrycode
;
$number;
}
@svc_phone;
$number;
}
@svc_phone;