|
Lines 35-44
use Koha::Acquisition::Orders;
Link Here
|
| 35 |
use Koha::ArticleRequests; |
35 |
use Koha::ArticleRequests; |
| 36 |
use Koha::Biblio::Metadatas; |
36 |
use Koha::Biblio::Metadatas; |
| 37 |
use Koha::Biblioitems; |
37 |
use Koha::Biblioitems; |
|
|
38 |
use Koha::Checkouts; |
| 38 |
use Koha::CirculationRules; |
39 |
use Koha::CirculationRules; |
| 39 |
use Koha::Item::Transfer::Limits; |
40 |
use Koha::Item::Transfer::Limits; |
| 40 |
use Koha::Items; |
41 |
use Koha::Items; |
| 41 |
use Koha::Libraries; |
42 |
use Koha::Libraries; |
|
|
43 |
use Koha::Old::Checkouts; |
| 42 |
use Koha::Suggestions; |
44 |
use Koha::Suggestions; |
| 43 |
use Koha::Subscriptions; |
45 |
use Koha::Subscriptions; |
| 44 |
|
46 |
|
|
Lines 353-358
sub article_requests {
Link Here
|
| 353 |
return Koha::ArticleRequests->_new_from_dbic( scalar $self->_result->article_requests ); |
355 |
return Koha::ArticleRequests->_new_from_dbic( scalar $self->_result->article_requests ); |
| 354 |
} |
356 |
} |
| 355 |
|
357 |
|
|
|
358 |
=head3 current_checkouts |
| 359 |
|
| 360 |
my $current_checkouts = $biblio->current_checkouts |
| 361 |
|
| 362 |
Returns the current checkouts associated with this biblio |
| 363 |
|
| 364 |
=cut |
| 365 |
|
| 366 |
sub current_checkouts { |
| 367 |
my ($self) = @_; |
| 368 |
|
| 369 |
return Koha::Checkouts->search( { "item.biblionumber" => $self->id }, |
| 370 |
{ join => 'item' } ); |
| 371 |
} |
| 372 |
|
| 373 |
=head3 old_checkouts |
| 374 |
|
| 375 |
my $old_checkouts = $biblio->old_checkouts |
| 376 |
|
| 377 |
Returns the past checkouts associated with this biblio |
| 378 |
|
| 379 |
=cut |
| 380 |
|
| 381 |
sub old_checkouts { |
| 382 |
my ( $self ) = @_; |
| 383 |
|
| 384 |
return Koha::Old::Checkouts->search( { "item.biblionumber" => $self->id }, |
| 385 |
{ join => 'item' } ); |
| 386 |
} |
| 387 |
|
| 356 |
=head3 items |
388 |
=head3 items |
| 357 |
|
389 |
|
| 358 |
my $items = $biblio->items(); |
390 |
my $items = $biblio->items(); |
| 359 |
- |
|
|