summaryrefslogtreecommitdiff
path: root/httemplate/search/cust_pay_pending.html
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/search/cust_pay_pending.html')
-rwxr-xr-xhttemplate/search/cust_pay_pending.html57
1 files changed, 0 insertions, 57 deletions
diff --git a/httemplate/search/cust_pay_pending.html b/httemplate/search/cust_pay_pending.html
deleted file mode 100755
index 8b7350853..000000000
--- a/httemplate/search/cust_pay_pending.html
+++ /dev/null
@@ -1,57 +0,0 @@
-<% include( 'elements/cust_pay_or_refund.html',
- 'thing' => 'pay_pending',
- 'amount_field' => 'paid',
- 'name_singular' => 'pending payment',
- 'name_verb' => 'pending',
- 'disable_link' => 1,
- 'disable_by' => 1, #add otaker to cust_pay_pending?
- 'html_init' => include('/elements/init_overlib.html'),
- 'addl_header' => [ 'Time', 'Payment Status', ],
- 'addl_fields' => [ sub { time2str('%r', shift->_date ) },
- $status_sub,
- ],
- 'redirect_empty' => $redirect_empty,
- )
-%>
-<%init>
-
-my %statusaction = (
- 'new' => 'delete',
- 'pending' => 'complete',
- #'authorized' => '',
- 'captured' => 'capture',
- #'declined' => '',
- #wouldn't need to take action on a done state#'done'
-);
-
-my $edit_pending =
- $FS::CurrentUser::CurrentUser->access_right('Edit customer pending payments');
-
-my $status_sub = sub {
- my $pending = shift;
- my $return = $pending->status;
- my $action = $statusaction{$pending->status};
- return $return unless $action && $edit_pending;
- my $link = include('/elements/popup_link.html',
- 'action' => $p. 'edit/cust_pay_pending.html'.
- '?paypendingnum='. $pending->paypendingnum.
- ";action=$action",
- 'label' => $action,
- 'color' => '#ff0000',
- 'width' => 655,
- 'height' => ( $action eq 'delete' ? 480 : 575 ),
- 'actionlabel' => ucfirst($action). ' pending payment',
- );
- $return. qq! <FONT SIZE="-1">($link)</FONT>!;
-};
-
-my $redirect_empty = sub {
- my $cgi = shift;
- if ( $cgi->param('custnum') =~ /^(\d+)$/ ) {
- $p. "view/cust_main.cgi?$1";
- } else {
- '';
- }
-};
-
-</%init>