@@ -, +, @@ --- koha-tmpl/intranet-tmpl/prog/en/modules/members/paycollect.tt | 9 +++++++-- members/paycollect.pl | 8 +++++++- 2 files changed, 14 insertions(+), 3 deletions(-) --- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/paycollect.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/members/paycollect.tt @@ -65,6 +65,11 @@ You must pay a value less than or equal to [% total_due | format('%.2f') %]. [% END %] +[% IF ( error_under ) %] +
+ You must collect a value greater than or equal to [% total_paid | format('%.2f') %]. +
+[% END %] [% IF ( pay_individual ) %] [% IF ( error_registers ) %] @@ -117,7 +122,7 @@
  • - +
  • @@ -246,7 +251,7 @@ [% IF type != 'WRITEOFF' %]
  • - +
  • --- a/members/paycollect.pl +++ a/members/paycollect.pl @@ -67,7 +67,8 @@ my $user = $input->remote_user; my $library_id = C4::Context->userenv->{'branch'}; my $total_due = $account->outstanding_debits->total_outstanding; -my $total_paid = $input->param('paid'); +my $total_paid = $input->param('paid'); +my $total_collected = $input->param('collected'); my $selected_lines = $input->param('selected'); # comes from pay.pl my $pay_individual = $input->param('pay_individual'); @@ -164,6 +165,11 @@ if ( $total_paid and $total_paid ne '0.00' ) { error_over => 1, total_due => $total_due ); + } elsif ( $total_collected < $total_paid && !( $writeoff_individual || $type eq 'writeoff') ) { + $template->param( + error_under => 1, + total_paid => $total_paid + ); } else { output_and_exit( $input, $cookie, $template, 'wrong_csrf_token' ) unless Koha::Token->new->check_csrf( { --