diff options
author | ivan <ivan> | 2004-06-10 12:58:40 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-06-10 12:58:40 +0000 |
commit | 7209026857ada1ec716c728ae966f0fc986b180e (patch) | |
tree | 638df90f3f195db62f41420287d8ece5ebb8a4e6 /httemplate/browse | |
parent | 3913f6d159b5b8110061690b7c97642c27abf7eb (diff) |
now available as methods
Diffstat (limited to 'httemplate/browse')
-rwxr-xr-x | httemplate/browse/agent.cgi | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/httemplate/browse/agent.cgi b/httemplate/browse/agent.cgi index af3288720..f38934297 100755 --- a/httemplate/browse/agent.cgi +++ b/httemplate/browse/agent.cgi @@ -10,29 +10,6 @@ %search = ( 'disabled' => '' ); } - #bad false laziness with search/cust_main.cgi (also needs fixing up for - #old mysql) - my $ncancelled = " - 0 < ( SELECT COUNT(*) FROM cust_pkg - WHERE cust_pkg.custnum = cust_main.custnum - AND ( cust_pkg.cancel IS NULL - OR cust_pkg.cancel = 0 - ) - ) - OR 0 = ( SELECT COUNT(*) FROM cust_pkg - WHERE cust_pkg.custnum = cust_main.custnum - ) - "; - - my $ncancelled_sth = dbh->prepare("SELECT COUNT(*) FROM cust_main - WHERE agentnum = ? - AND ( $ncancelled ) ") - or die dbh->errstr; - - my $total_sth = dbh->prepare("SELECT COUNT(*) FROM cust_main - WHERE agentnum = ? ") - or die dbh->errstr; - %> <%= header('Agent Listing', menubar( @@ -70,14 +47,6 @@ foreach my $agent ( sort { $a->getfield('agent') cmp $b->getfield('agent') } qsearch('agent', \%search ) ) { - $ncancelled_sth->execute($agent->agentnum) or die $ncancelled_sth->errstr; - my $num_ncancelled = $ncancelled_sth->fetchrow_arrayref->[0]; - - $total_sth->execute($agent->agentnum) or die $total_sth->errstr; - my $num_total = $total_sth->fetchrow_arrayref->[0]; - - my $num_cancelled = $num_total - $num_ncancelled; - my $cust_main_link = $p. 'search/cust_main.cgi?agentnum_on=1&'. 'agentnum='. $agent->agentnum; |