Lines 668-673
sub CanBookBeIssued {
Link Here
|
668 |
my $override_high_holds = $params->{override_high_holds} || 0; |
668 |
my $override_high_holds = $params->{override_high_holds} || 0; |
669 |
|
669 |
|
670 |
my $item = GetItem(undef, $barcode ); |
670 |
my $item = GetItem(undef, $barcode ); |
|
|
671 |
# MANDATORY CHECKS - unless item exists, nothing else matters |
672 |
unless ( $item->{barcode} ) { |
673 |
$issuingimpossible{UNKNOWN_BARCODE} = 1; |
674 |
} |
675 |
return ( \%issuingimpossible, \%needsconfirmation ) if %issuingimpossible; |
676 |
|
671 |
my $issue = Koha::Checkouts->find( { itemnumber => $item->{itemnumber} } ); |
677 |
my $issue = Koha::Checkouts->find( { itemnumber => $item->{itemnumber} } ); |
672 |
my $biblio = Koha::Biblios->find( $item->{biblionumber} ); |
678 |
my $biblio = Koha::Biblios->find( $item->{biblionumber} ); |
673 |
my $biblioitem = $biblio->biblioitem; |
679 |
my $biblioitem = $biblio->biblioitem; |
Lines 675-686
sub CanBookBeIssued {
Link Here
|
675 |
my $dbh = C4::Context->dbh; |
681 |
my $dbh = C4::Context->dbh; |
676 |
my $patron_unblessed = $patron->unblessed; |
682 |
my $patron_unblessed = $patron->unblessed; |
677 |
|
683 |
|
678 |
# MANDATORY CHECKS - unless item exists, nothing else matters |
|
|
679 |
unless ( $item->{barcode} ) { |
680 |
$issuingimpossible{UNKNOWN_BARCODE} = 1; |
681 |
} |
682 |
return ( \%issuingimpossible, \%needsconfirmation ) if %issuingimpossible; |
683 |
|
684 |
# |
684 |
# |
685 |
# DUE DATE is OK ? -- should already have checked. |
685 |
# DUE DATE is OK ? -- should already have checked. |
686 |
# |
686 |
# |
687 |
- |
|
|