From 33b372baa48b3799566a37bbd3912520f591c7de Mon Sep 17 00:00:00 2001 From: levinse Date: Wed, 6 Jul 2011 04:15:36 +0000 Subject: modify backdated payment application behaviour, RT11870 --- httemplate/edit/process/cust_pay.cgi | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'httemplate') diff --git a/httemplate/edit/process/cust_pay.cgi b/httemplate/edit/process/cust_pay.cgi index 2c77e6b57..e74f9022f 100755 --- a/httemplate/edit/process/cust_pay.cgi +++ b/httemplate/edit/process/cust_pay.cgi @@ -7,7 +7,8 @@ % if ( $cgi->param('apply') eq 'yes' ) { % my $cust_main = qsearchs('cust_main', { 'custnum' => $linknum }) % or die "unknown custnum $linknum"; -% $cust_main->apply_payments( 'manual' => 1 ); +% $cust_main->apply_payments( 'manual' => 1, +% 'backdate_application' => ($_date < time-86400) ); % } % if ( $link eq 'popup' ) { % -- cgit v1.2.1