From 9b0177fa39ab83fdb19fcc86e4b15689671c5e9f Mon Sep 17 00:00:00 2001 From: Aleisha Amohia Date: Thu, 6 Feb 2020 22:25:06 +0000 Subject: [PATCH] Bug 15775: Show message on OPAC summary if holds are blocked due to fines To test: 1) Set maxoutstanding syspref to 5 2) Create a manual invoice for a borrower for $6 3) Log in to the OPAC as this borrower 4) Go to opac-user.pl, your summary page 5) Confirm there is a warning box explaining that the borrower is blocked from holds due to fines 6) Back on the staff side, pay some or all of the borrower's fines so they are no longer over the max outstanding amount 7) Refresh the summary page in the OPAC and confirm the warning is gone Sponsored-by: Catalyst IT Signed-off-by: David Nind Signed-off-by: Katrin Fischer Signed-off-by: Martin Renvoize Signed-off-by: Joy Nelson --- koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-user.tt | 6 ++++++ opac/opac-user.pl | 5 +++++ 2 files changed, 11 insertions(+) diff --git a/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-user.tt b/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-user.tt index 96c494c949..8ae3f29deb 100644 --- a/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-user.tt +++ b/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-user.tt @@ -58,6 +58,12 @@ [% END %] + [% IF ( borrower.blockedonfines ) %] +
+ Please note: Your account has outstanding fees & charges of [% amountoutstanding | $Price %]. Checkouts and holds are blocked because your fine balance is over the limit. +
+ [% END %] + [% IF ( borrower.warndeparture ) %]
Please note: Your card will expire on [% borrower.warndeparture | $KohaDates %]. Please contact the library for more information. diff --git a/opac/opac-user.pl b/opac/opac-user.pl index 99a32ebb63..96e9bf42fb 100755 --- a/opac/opac-user.pl +++ b/opac/opac-user.pl @@ -135,6 +135,11 @@ if ( C4::Context->preference('OpacRenewalAllowed') ); } +my $maxoutstanding = C4::Context->preference('maxoutstanding'); +if ( $amountoutstanding && ( $amountoutstanding > $maxoutstanding ) ){ + $borr->{blockedonfines} = 1; +} + # Warningdate is the date that the warning starts appearing if ( $borr->{'dateexpiry'} && C4::Context->preference('NotifyBorrowerDeparture') ) { my $days_to_expiry = Date_to_Days( $warning_year, $warning_month, $warning_day ) - Date_to_Days( $today_year, $today_month, $today_day ); -- 2.39.5