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