|
Lines 38-43
use Koha::ERM::EUsage::UsagePlatforms;
Link Here
|
| 38 |
use Koha::ERM::EUsage::UsageDatabases; |
38 |
use Koha::ERM::EUsage::UsageDatabases; |
| 39 |
use Koha::ERM::EUsage::MonthlyUsages; |
39 |
use Koha::ERM::EUsage::MonthlyUsages; |
| 40 |
use Koha::ERM::EUsage::SushiCounter; |
40 |
use Koha::ERM::EUsage::SushiCounter; |
|
|
41 |
use Koha::Acquisition::Bookseller; |
| 41 |
use Koha::BackgroundJob::ErmSushiHarvester; |
42 |
use Koha::BackgroundJob::ErmSushiHarvester; |
| 42 |
|
43 |
|
| 43 |
=head1 NAME |
44 |
=head1 NAME |
|
Lines 379-384
sub erm_usage_databases {
Link Here
|
| 379 |
return Koha::ERM::EUsage::UsageDatabases->_new_from_dbic($usage_database_rs); |
380 |
return Koha::ERM::EUsage::UsageDatabases->_new_from_dbic($usage_database_rs); |
| 380 |
} |
381 |
} |
| 381 |
|
382 |
|
|
|
383 |
|
| 384 |
=head3 vendor |
| 385 |
|
| 386 |
Return the vendor for this provider |
| 387 |
|
| 388 |
=cut |
| 389 |
|
| 390 |
sub vendor { |
| 391 |
my ($self) = @_; |
| 392 |
my $vendor_rs = $self->_result->vendor; |
| 393 |
return unless $vendor_rs; |
| 394 |
return Koha::Acquisition::Bookseller->_new_from_dbic($vendor_rs); |
| 395 |
} |
| 396 |
|
| 382 |
=head2 Internal methods |
397 |
=head2 Internal methods |
| 383 |
|
398 |
|
| 384 |
=head3 _build_url_query |
399 |
=head3 _build_url_query |