|
Lines 688-693
sub HoldTitle {
Link Here
|
| 688 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
688 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
| 689 |
return { code => 'PatronNotFound' } unless $patron; |
689 |
return { code => 'PatronNotFound' } unless $patron; |
| 690 |
|
690 |
|
|
|
691 |
# If borrower is debarred return an error code |
| 692 |
return { code => 'PatronDebarred' } if $patron->is_debarred; |
| 693 |
|
| 691 |
# Get the biblio record, or return an error code |
694 |
# Get the biblio record, or return an error code |
| 692 |
my $biblionumber = $cgi->param('bib_id'); |
695 |
my $biblionumber = $cgi->param('bib_id'); |
| 693 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
696 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
|
Lines 773-778
sub HoldItem {
Link Here
|
| 773 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
776 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
| 774 |
return { code => 'PatronNotFound' } unless $patron; |
777 |
return { code => 'PatronNotFound' } unless $patron; |
| 775 |
|
778 |
|
|
|
779 |
# If borrower is debarred return an error code |
| 780 |
return { code => 'PatronDebarred' } if $patron->is_debarred; |
| 781 |
|
| 776 |
# Get the biblio or return an error code |
782 |
# Get the biblio or return an error code |
| 777 |
my $biblionumber = $cgi->param('bib_id'); |
783 |
my $biblionumber = $cgi->param('bib_id'); |
| 778 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
784 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
| 779 |
- |
|
|