summaryrefslogtreecommitdiff
path: root/httemplate/search/report_cust_credit.html
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/search/report_cust_credit.html')
-rw-r--r--httemplate/search/report_cust_credit.html57
1 files changed, 0 insertions, 57 deletions
diff --git a/httemplate/search/report_cust_credit.html b/httemplate/search/report_cust_credit.html
deleted file mode 100644
index 16a75ebf4..000000000
--- a/httemplate/search/report_cust_credit.html
+++ /dev/null
@@ -1,57 +0,0 @@
-<% include('/elements/header.html', $title ) %>
-
-<FORM ACTION="cust_credit.html" METHOD="GET">
-<INPUT TYPE="hidden" NAME="magic" VALUE="_date">
-<INPUT TYPE="hidden" NAME="unapplied" VALUE="<% $unapplied %>">
-
-<TABLE>
-
- <% include( '/elements/tr-select-user.html',
- 'label' => 'Credits by employee: ',
- 'access_user' => \%access_user,
- )
- %>
-
- <% include( '/elements/tr-select-agent.html',
- 'curr_value' => scalar( $cgi->param('agentnum') ),
- 'label' => 'for agent: ',
- 'disable_empty' => 0,
- )
- %>
-
- <% include( '/elements/tr-input-beginning_ending.html' ) %>
-
- <% include( '/elements/tr-input-lessthan_greaterthan.html',
- 'label' => 'Amount',
- 'field' => 'amount',
- )
- %>
-
-</TABLE>
-
-<BR>
-<INPUT TYPE="submit" VALUE="Get Report">
-
-</FORM>
-
-<% include('/elements/footer.html') %>
-
-<%init>
-
-die "access denied"
- unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');
-
-my $sth = dbh->prepare("SELECT DISTINCT usernum FROM cust_credit")
- or die dbh->errstr;
-$sth->execute or die $sth->errstr;
-my @usernum = map $_->[0], @{$sth->fetchall_arrayref};
-my %access_user =
- map { $_ => qsearchs('access_user',{'usernum'=>$_})->username }
- @usernum;
-
-my $unapplied = $cgi->param('unapplied') ? 1 : 0;
-
-my $title = $cgi->param('unapplied') ?
- 'Unapplied credit report' : 'Credit report';
-
-</%init>