From be5e9ca0a09d7a29e99930326cacc3303145dc43 Mon Sep 17 00:00:00 2001 From: Arthur Suzuki Date: Mon, 13 May 2019 11:29:50 +0200 Subject: [PATCH] Bug 17247 : Check if patron is debarred in HoldItem and HoldTitle Test plan : Make sure a debarred patron cannot hold a title or item through ILS-DI. Response from the WebService should be "PatronDebarred". --- C4/ILSDI/Services.pm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/C4/ILSDI/Services.pm b/C4/ILSDI/Services.pm index 43935bbf8f..fa3cb3894a 100644 --- a/C4/ILSDI/Services.pm +++ b/C4/ILSDI/Services.pm @@ -675,6 +675,9 @@ sub HoldTitle { my $patron = Koha::Patrons->find( $borrowernumber ); return { code => 'PatronNotFound' } unless $patron; + # If borrower is debarred return an error code + return { code => 'PatronDebarred' } if $patron->is_debarred; + # Get the biblio record, or return an error code my $biblionumber = $cgi->param('bib_id'); my $biblio = Koha::Biblios->find( $biblionumber ); @@ -760,6 +763,9 @@ sub HoldItem { my $patron = Koha::Patrons->find( $borrowernumber ); return { code => 'PatronNotFound' } unless $patron; + # If borrower is debarred return an error code + return { code => 'PatronDebarred' } if $patron->is_debarred; + # Get the biblio or return an error code my $biblionumber = $cgi->param('bib_id'); my $biblio = Koha::Biblios->find( $biblionumber ); -- 2.11.0