summaryrefslogtreecommitdiff
path: root/httemplate/edit/process/cust_pay.cgi
diff options
context:
space:
mode:
authorlevinse <levinse>2011-07-06 04:15:36 +0000
committerlevinse <levinse>2011-07-06 04:15:36 +0000
commit33b372baa48b3799566a37bbd3912520f591c7de (patch)
tree5006629bbcedb107af9d51451cde67d4b0afcf35 /httemplate/edit/process/cust_pay.cgi
parentce639adb2033f14b0bb6ef27354e2574dfc55ab7 (diff)
modify backdated payment application behaviour, RT11870
Diffstat (limited to 'httemplate/edit/process/cust_pay.cgi')
-rwxr-xr-xhttemplate/edit/process/cust_pay.cgi3
1 files changed, 2 insertions, 1 deletions
diff --git a/httemplate/edit/process/cust_pay.cgi b/httemplate/edit/process/cust_pay.cgi
index 2c77e6b..e74f902 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' ) {
%