sub search {
my ( $class, $params ) = @_;
- croak "Cannot search on other fields than aqbooksellers.name" if $params and grep { $_ !~ /^name$/ } keys %$params;
-
my $schema = Koha::Database->new->schema;
my $search_params;
use C4::Context;
use C4::Output;
+use Koha::Acquisition::Bookseller;
use Koha::Acquisition::Currency;
use Koha::Acquisition::Currencies;
# TODO rewrite the following when Koha::Acquisition::Orders will use Koha::Objects
my $schema = Koha::Database->schema;
my $nb_of_orders = $schema->resultset('Aqorder')->search( { currency => $currency->currency } )->count;
+ my $nb_of_vendors = Koha::Acquisition::Bookseller->search( { -or => { listprice => $currency->currency, invoiceprice => $currency->currency } });
$template->param(
currency => $currency,
nb_of_orders => $nb_of_orders,
+ nb_of_vendors => $nb_of_vendors,
);
} elsif ( $op eq 'delete_confirmed' ) {
my $currency = Koha::Acquisition::Currencies->find($currency_code);
[% END %]
[% IF op =='delete_confirm' %]
- [% IF nb_of_orders %]
+ [% IF nb_of_orders or nb_of_vendors %]
<div class="dialog alert">
<h3>Cannot delete currency <span class="ex">'[% currency.currency %]'</span></h3>
- <p>This currency is used by [% nb_of_orders %] orders. Deletion not possible</p>
+ <p>
+ [% IF nb_of_orders %]
+ This currency is used by [% nb_of_orders %] orders.
+ [% ELSIF nb_of_vendors %]
+ This currency is used by [% nb_of_vendors %] vendors.
+ [% END %]
+ Deletion not possible
+ </p>
<form action="/cgi-bin/koha/admin/currency.pl" method="post">
<button type="submit" class="approve"><i class="fa fa-fw fa-check"></i> OK</button>
</form>