|
Lines 43-48
use Koha::Account;
Link Here
|
| 43 |
use Koha::AuthorisedValues; |
43 |
use Koha::AuthorisedValues; |
| 44 |
use Koha::DateUtils; |
44 |
use Koha::DateUtils; |
| 45 |
use Koha::Calendar; |
45 |
use Koha::Calendar; |
|
|
46 |
use Koha::Checkouts; |
| 46 |
use Koha::IssuingRules; |
47 |
use Koha::IssuingRules; |
| 47 |
use Koha::Items; |
48 |
use Koha::Items; |
| 48 |
use Koha::Patrons; |
49 |
use Koha::Patrons; |
|
Lines 1066-1072
sub CanBookBeIssued {
Link Here
|
| 1066 |
require C4::Serials; |
1067 |
require C4::Serials; |
| 1067 |
my $is_a_subscription = C4::Serials::CountSubscriptionFromBiblionumber($biblionumber); |
1068 |
my $is_a_subscription = C4::Serials::CountSubscriptionFromBiblionumber($biblionumber); |
| 1068 |
unless ($is_a_subscription) { |
1069 |
unless ($is_a_subscription) { |
| 1069 |
my $issues = Koha::Issues->search( |
1070 |
my $checkouts = Koha::Checkouts->search( |
| 1070 |
{ |
1071 |
{ |
| 1071 |
borrowernumber => $borrower->{borrowernumber}, |
1072 |
borrowernumber => $borrower->{borrowernumber}, |
| 1072 |
biblionumber => $biblionumber, |
1073 |
biblionumber => $biblionumber, |
|
Lines 1077-1083
sub CanBookBeIssued {
Link Here
|
| 1077 |
); |
1078 |
); |
| 1078 |
# if we get here, we don't already have a loan on this item, |
1079 |
# if we get here, we don't already have a loan on this item, |
| 1079 |
# so if there are any loans on this bib, ask for confirmation |
1080 |
# so if there are any loans on this bib, ask for confirmation |
| 1080 |
if ( $issues->count ) { |
1081 |
if ( $checkouts->count ) { |
| 1081 |
$needsconfirmation{BIBLIO_ALREADY_ISSUED} = 1; |
1082 |
$needsconfirmation{BIBLIO_ALREADY_ISSUED} = 1; |
| 1082 |
} |
1083 |
} |
| 1083 |
} |
1084 |
} |
| 1084 |
- |
|
|