diff options
author | ivan <ivan> | 2003-10-06 11:14:30 +0000 |
---|---|---|
committer | ivan <ivan> | 2003-10-06 11:14:30 +0000 |
commit | 71eb3c33da045ffdc963b5ad8111af8a8bef878d (patch) | |
tree | 6a94f6e1fa319c617f9080779bd26f486372d6bf /httemplate/search | |
parent | 2b6242f9d8fe2d9afb3937e3eea03cd0ece1e5f8 (diff) |
agent browse shows # of active accounts & links to appropriate account search
Diffstat (limited to 'httemplate/search')
-rwxr-xr-x | httemplate/search/svc_acct.cgi | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/httemplate/search/svc_acct.cgi b/httemplate/search/svc_acct.cgi index e43f4f79b..0954bf652 100755 --- a/httemplate/search/svc_acct.cgi +++ b/httemplate/search/svc_acct.cgi @@ -48,12 +48,23 @@ if ( $query eq 'svcnum' ) { $sortby=\*uid_sort; $orderby = ( $unlinked ? 'AND' : 'WHERE' ). " ${tblname}uid IS NOT NULL ORDER BY ${tblname}uid"; +} elsif ( $query =~ /popnum=(\d+)/ ) { + my $popnum = $1; + $unlinked .= ( $unlinked ? 'AND' : 'WHERE' ). + " popnum = $popnum"; + $sortby=\*username_sort; + $orderby = "ORDER BY ${tblname}username"; } else { $sortby=\*uid_sort; @svc_acct = @{&usernamesearch}; } -if ( $query eq 'svcnum' || $query eq 'username' || $query eq 'uid' ) { + +if ( $query eq 'svcnum' + || $query eq 'username' + || $query eq 'uid' + || $query eq 'popnum' + ) { my $statement = "SELECT COUNT(*) FROM svc_acct $unlinked"; my $sth = dbh->prepare($statement) |