|
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 |
- |
|
|