From 0e9d0175f15e1de80c773e0f8b654340295ed025 Mon Sep 17 00:00:00 2001 From: ivan Date: Sat, 27 Dec 2003 08:24:13 +0000 Subject: [PATCH] package reports by agent --- httemplate/index.html | 2 +- httemplate/search/cust_pkg.cgi | 6 ++++ httemplate/search/cust_pkg.html | 46 --------------------------- httemplate/search/cust_pkg_report.cgi | 17 ---------- 4 files changed, 7 insertions(+), 64 deletions(-) delete mode 100755 httemplate/search/cust_pkg.html diff --git a/httemplate/index.html b/httemplate/index.html index 27f34b43b..414ee7f96 100644 --- a/httemplate/index.html +++ b/httemplate/index.html @@ -57,7 +57,7 @@
-
View pending credit card batch

Packages (by next bill date range) +
View pending credit card batch

Packages (by next bill date range)

Invoice reports

Invoice event errors (failed credit cards) diff --git a/httemplate/search/cust_pkg.cgi b/httemplate/search/cust_pkg.cgi index 74f584084..2e9dc5a22 100755 --- a/httemplate/search/cust_pkg.cgi +++ b/httemplate/search/cust_pkg.cgi @@ -35,6 +35,12 @@ if ( $cgi->param('magic') && $cgi->param('magic') eq 'bill' ) { $range .= ( $range ? 'AND ' : ' WHERE ' ). '( cancel IS NULL OR cancel = 0 )'; + if ( $cgi->param('agentnum') =~ /^(\d+)$/ and $1 ) { + $range .= ( $range ? 'AND ' : ' WHERE ' ). + "$1 = ( SELECT agentnum FROM cust_main". + " WHERE cust_main.custnum = cust_pkg.custnum )"; + } + #false laziness with below my $statement = "SELECT COUNT(*) FROM cust_pkg $range"; warn $statement; diff --git a/httemplate/search/cust_pkg.html b/httemplate/search/cust_pkg.html deleted file mode 100755 index 0dad83a2a..000000000 --- a/httemplate/search/cust_pkg.html +++ /dev/null @@ -1,46 +0,0 @@ - - - Packages - - - - - - -

Packages

- - - - - diff --git a/httemplate/search/cust_pkg_report.cgi b/httemplate/search/cust_pkg_report.cgi index b31674540..0dad83a2a 100755 --- a/httemplate/search/cust_pkg_report.cgi +++ b/httemplate/search/cust_pkg_report.cgi @@ -36,23 +36,6 @@ }); -<% my %agent_search = dbdef->table('agent')->column('disabled') - ? ( 'disabled' => '' ) : (); - my @agents = qsearch( 'agent', \%agent_search ); - if ( scalar(@agents) == 1 ) { -%> - -<% } else { %> - - - Agent: - -- 2.20.1

From:	m/d/y
To:	m/d/y