|
Lines 36-41
use Koha::ERM::EUsage::UsagePlatforms;
Link Here
|
| 36 |
use Koha::ERM::EUsage::UsageDatabases; |
36 |
use Koha::ERM::EUsage::UsageDatabases; |
| 37 |
use Koha::ERM::EUsage::MonthlyUsages; |
37 |
use Koha::ERM::EUsage::MonthlyUsages; |
| 38 |
use Koha::ERM::EUsage::SushiCounter; |
38 |
use Koha::ERM::EUsage::SushiCounter; |
|
|
39 |
use Koha::Acquisition::Bookseller; |
| 39 |
use Koha::BackgroundJob::ErmSushiHarvester; |
40 |
use Koha::BackgroundJob::ErmSushiHarvester; |
| 40 |
|
41 |
|
| 41 |
=head1 NAME |
42 |
=head1 NAME |
|
Lines 367-372
sub erm_usage_databases {
Link Here
|
| 367 |
return Koha::ERM::EUsage::UsageDatabases->_new_from_dbic($usage_database_rs); |
368 |
return Koha::ERM::EUsage::UsageDatabases->_new_from_dbic($usage_database_rs); |
| 368 |
} |
369 |
} |
| 369 |
|
370 |
|
|
|
371 |
|
| 372 |
=head3 vendor |
| 373 |
|
| 374 |
Return the vendor for this provider |
| 375 |
|
| 376 |
=cut |
| 377 |
|
| 378 |
sub vendor { |
| 379 |
my ($self) = @_; |
| 380 |
my $vendor_rs = $self->_result->vendor; |
| 381 |
return unless $vendor_rs; |
| 382 |
return Koha::Acquisition::Bookseller->_new_from_dbic($vendor_rs); |
| 383 |
} |
| 384 |
|
| 370 |
=head2 Internal methods |
385 |
=head2 Internal methods |
| 371 |
|
386 |
|
| 372 |
=head3 _build_url_query |
387 |
=head3 _build_url_query |