use Modern::Perl;
use CGI qw ( -utf8 );
use C4::Auth;
-use C4::Branch;
use C4::Context;
use C4::Koha qw( GetAuthorisedValues );
use C4::Output;
my $expiration_date = $query->param('expiration_date_filter') || '';
my $routing = $query->param('routing') || C4::Context->preference("RoutingSerials");
my $searched = $query->param('searched') || 0;
-my @subscriptionids = $query ->param('subscriptionid');
+my @subscriptionids = $query->multi_param('subscriptionid');
my $op = $query->param('op');
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
}
}
-my $branches = GetBranches();
-my @branches_loop;
-foreach (sort keys %$branches){
- my $selected = 0;
- $selected = 1 if( defined $branch and $branch eq $_ );
- push @branches_loop, {
- branchcode => $_,
- branchname => $branches->{$_}->{'branchname'},
- selected => $selected,
- };
-}
-
-
$template->param(
openedsubscriptions => \@openedsubscriptions,
closedsubscriptions => \@closedsubscriptions,
publisher_filter => $publisher,
bookseller_filter => $bookseller,
branch_filter => $branch,
- locations => C4::Koha::GetAuthorisedValues('LOC', $location),
+ location_filter => $location,
expiration_date_filter => $expiration_date_dt,
- branches_loop => \@branches_loop,
done_searched => $searched,
routing => $routing,
additional_field_filters => $additional_field_filters,