This commit was manufactured by cvs2svn to create tag 'TORRUS_1_0_9'.TORRUS_1_0_9

1 files changed, 0 insertions, 67 deletions

diff --git a/httemplate/search/prepay_credit.html b/httemplate/search/prepay_credit.html
deleted file mode 100644
index 36403511b..000000000
--- a/httemplate/search/prepay_credit.html
+++ /dev/null
@@ -1,67 +0,0 @@
-<% include( 'elements/search.html',
-                 'title'       => 'Unused Prepaid Cards'.
-                                  ($agent ? ' for '. $agent->agent : ''),
-                 'menubar'     => [
-                   'Generate cards' => $p.'edit/prepay_credit.cgi',
-                 ],
-                 'name'        => 'prepaid cards',
-                 'query'       => {  'table'   => 'prepay_credit',
-                                     'hashref' => $hashref,
-                                  },
-                 'count_query' => $count_query,
-                 #'redirect'    => $link,
-                 'header'      => [ '#', qw(Amount Time Upload Download Total Agent) ],
-                 'fields'      => [
-                   'identifier',
-                   sub { sprintf('$%.2f', shift->amount ) },
-                   sub { my $c = shift;
-                         $c->seconds ? duration_exact($c->seconds) : ''
-                       },
-                   sub { my $c = shift;
-                         $c->upbytes 
-                           ? FS::UI::bytecount::bytecount_unexact($c->upbytes)
-                           : ''
-                       },
-                   sub { my $c = shift;
-                         $c->downbytes
-                           ? FS::UI::bytecount::bytecount_unexact($c->downbytes)
-                           : ''
-                       },
-                   sub { my $c = shift;
-                         $c->totalbytes
-                           ? FS::UI::bytecount::bytecount_unexact($c->totalbytes)
-                           : ''
-                       },
-                   sub { my $agent = shift->agent;
-                         $agent ? $agent->agent : '';
-                       },
-                 ],
-                 'links' => [
-                   '',
-                   '',
-                   '',
-                   '',
-                   '',
-                   '',
-                   sub { my $agent = shift->agent;
-                         $agent ? [ "${p}edit/agent.cgi?", 'agentnum' ] : '';
-                       },
-                 ],
-      )
-%>
-<%init>
-
-die "access denied"
-  unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
-
-my $agent = '';
-my $hashref = {};
-if ( $cgi->param('agentnum') =~ /^(\d+)$/ ) {
-$hashref->{agentnum} = $1;
-$agent = qsearchs('agent', { 'agentnum' => $1 } );
-}
-
-my $count_query = 'SELECT COUNT(*) FROM prepay_credit';
-$count_query .= ' WHERE agentnum = '. $agent->agentnum if $agent;
-
-</%init>