diff options
author | ivan <ivan> | 2009-07-06 23:14:14 +0000 |
---|---|---|
committer | ivan <ivan> | 2009-07-06 23:14:14 +0000 |
commit | 1080ae07385ed313d3a72c12869d7d0b84136504 (patch) | |
tree | a64541bc4135c07c3653593bb08294719edf90ed /httemplate | |
parent | d3f594f217cb9a24fda25d94fe7f0fbe35ab3b50 (diff) |
search cdr by acctid
Diffstat (limited to 'httemplate')
-rw-r--r-- | httemplate/search/cdr.html | 17 | ||||
-rw-r--r-- | httemplate/search/report_cdr.html | 5 |
2 files changed, 22 insertions, 0 deletions
diff --git a/httemplate/search/cdr.html b/httemplate/search/cdr.html index ceee6f2fd..d1f68c5c6 100644 --- a/httemplate/search/cdr.html +++ b/httemplate/search/cdr.html @@ -194,6 +194,23 @@ if ( $cgi->param('cdrbatch') ne '__ALL__' ) { } ### +# acctid +### + +if ( $cgi->param('acctid') =~ /\d/ ) { + my $acctid = $cgi->param('acctid'); + $acctid =~ s/\r\n/\n/g; #browsers? + my @acctid = map { /^\s*(\d+)\s*$/ or die "guru meditation #4"; $1; } + grep { /^\s*(\d+)\s*$/ } + split(/\n/, $acctid); + if ( @acctid ) { + my $search = 'acctid IN ( '. join(',', @acctid). ' )'; + push @qsearch, $search; + push @search, $search; + } +} + +### # finish it up ### diff --git a/httemplate/search/report_cdr.html b/httemplate/search/report_cdr.html index c5f728c87..f3ad1e69f 100644 --- a/httemplate/search/report_cdr.html +++ b/httemplate/search/report_cdr.html @@ -84,6 +84,11 @@ <% include( '/elements/tr-select-cdrbatch.html' ) %> <TR> + <TD ALIGN="right">Acct ID (one per-line):</TD> + <TD><TEXTAREA NAME="acctid"></TEXTAREA></TD> + </TR> + + <TR> <TH BGCOLOR="#e8e8e8" COLSPAN=2> </TH> </TR> |